home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 2 #2 / Commodore_Disk_User_Vol.2_2_1989_-_Side_B.d64 / game-basic (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  465b  |  15 lines
  1. 10 print"[147]":s$="                         [146]":lo=1243:poke53280,0:poke53281,0
  2. 20 print"[145]";:fort=1to11:prints$:next
  3. 30 print"[150]         enter the [158]yellow[150] room"
  4. 40 print"         move with cursor keys":goto100
  5. 50 getd$:ifd$=""then50
  6. 60 ifd$="[145]"thenm=1:p=peek(lo-40):goto90
  7. 65 ifd$=""thenm=2:p=peek(lo+40):goto90
  8. 70 ifd$="[157]"thenm=3:p=peek(lo-1):goto90
  9. 75 ifd$=""thenm=4:p=peek(lo+1):goto90
  10. 80 goto50
  11. 90 ifp<>32then50
  12. 100 poke49623,m:sys49168:pokelo,42:poke55515,1
  13. 110 ifpeek(49610)=27andpeek(49611)=43thenprint"            you found it!":end
  14. 120 forz=1to50:next:goto50
  15.