Only way to find the problem is to try and match up all your If's with EndIf's. Fortunately you've tabbed everything correctly and it's set out nice.
You might want to put a marker next to each If and EndIF you match up so you don't match 2 If's to the same EndIf by accident. In any case, I had a quick skim over it and found your problem:
`check for items
itemType = item(row,column)
if itemType = 0
print "There are no useable items in your view."
else
if left$(itemProperty$(itemtype),1) = "T"
print "You run into "; item$(itemType);"!"
health = health - asc(right$(itemProperty$,1))
print "You are dealt "; asc(right$(itemProperty$,1)); " points of damage."
endif
You're missing an EndIf in there. It should be:
`check for items
itemType = item(row,column)
if itemType = 0
print "There are no useable items in your view."
else
if left$(itemProperty$(itemtype),1) = "T"
print "You run into "; item$(itemType);"!"
health = health - asc(right$(itemProperty$,1))
print "You are dealt "; asc(right$(itemProperty$,1)); " points of damage."
endif
endif
I have you to thank though because when skimming over the code it's easy to pick up where the tab didn't go back in properly. Oh yeah, you also have a couple other syntax errors in there that doesn't let it compile properly but the nesting is correct now.
"Computers are useless they can only give you answers."
