Well, after reading the Zork Tut, i decided i'd give it my go of doing it from scratch from what i had learn.
well so far, everything ive done seems to work with no error report. However, it is supposed to print the name of the location you are in, then go down a line a print the directions you can go, however, it refuses to print the name, as well as skip to the next line with out another empty print command in between.
so, can anybody figure it out?
Total_Loc = 4
type loc
name as string
north as integer
south as integer
east as integer
west as integer
endtype
dim locations(Total_Loc) as loc
data "North Field",0,1,1,1
data "South Field",1,0,1,1
data "East Field",1,1,0,1
data "West Field",1,1,1,0
for i = 1 to Total_Loc
read locations(i).name
read locations(i).north
read locations(i).south
read locations(i).east
read locations(i).west
next i
plc_loc = 1
print "Name: ",locations(plr_loc).name
print
print "North? ",locations(plr_loc).north
print "South? ",locations(plr_loc).south
print "East? ",locations(plr_loc).east
print "West? ",locations(plr_loc).west
do
input ">>_", cmd$
sync
loop
oh and if you see something that i could do better please tell me
