home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1992 April / 1992-04.d64 / peg.boot (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  334b  |  13 lines
  1. 0 clr
  2. 5 poke53280,6:poke53281,6
  3. 10 print"[147]"
  4. 20 a$="[215]hen [208]egman is loaded and run,":gosub5000
  5. 30 a$="pressing the joystick fire button":gosub5000
  6. 40 a$="will start the game.":gosub5000
  7. 50 print"":a$="[208]ress [193]ny [203]ey":gosub5000
  8. 60 get a$:if a$="" then 60
  9. 65 print"":a$="[204]oading...":gosub5000
  10. 70 load"pegman!",8
  11. 5000 for x=1 to (40-len(a$))/2:printchr$(32);:next:printa$
  12. 5010 return
  13.