• Advertisement

Archived

This topic is now archived and is closed to further replies.

Game Code

This topic is 5860 days old which is more than the 365 day threshold we allow for new replies. Please post a new topic.

If you intended to correct an error in the post then please contact us.

Recommended Posts

What is the most well written computer game code you have ever come across. Post its name and a url to find it.

Share this post


Link to post
Share on other sites
Advertisement
i wrote this in oot, it rocks
  
var xy : int := 10
var yx : int := 10

var xx1 : int := 1

var the_number : string

var streamNumber : int
open : streamNumber, "h:/map01.map", get
var lineNumber := 0
var line : string

var win : int :=
Window.Open ("graphics:260;260,title:Bob''s Crappy Ass Adventure")
setscreen ("nocursor")

for xx : 1 .. 576
exit when eof (streamNumber)
get : streamNumber, line : *
the_number := line (1 .. xx1)
Pic.ScreenLoad ("h:/tile" + the_number + ".bmp", xy, yx, picCopy)
xy := xy + 10
if xy = 250 then
lineNumber := lineNumber + 1
yx := yx + 10
xy := 10
end if
end for


Try and guess what it does

Share this post


Link to post
Share on other sites

  • Advertisement