home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1984 November / 1984-11.d64 / hesgames (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  2KB  |  45 lines
  1. 1 rem hes games demo boot
  2. 3 rem copyright 3-2-1 software 1984
  3. 5 a=a+1
  4. 10 if a=2 then load "sg",8,1
  5. 20 if a=3 then load "sc",8,1
  6. 30 if a=4 then (NULL)
  7. 100 rem
  8. 110 poke 32534,96:poke 32512,96:poke 32515,96:poke 32518,96:poke 5632,0
  9. 120 print"[147][149]"
  10. 130 poke 53280,5:poke 53281,7
  11. 150 print"[164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]"
  12. 160 print"  hesgames/long jump  ";
  13. 180 print "[146]            programmed by 3-2-1 software inc."
  14. 190 print "[146]           copyright 1984 hes[146]"
  15. 195 fort=1to2000:nextt
  16. 196 rempoke53280,0
  17. 197 print"[147]";
  18. 198 print "[146] hesgames/longjump : please copy        [146]";
  19. 200 print "to play:run by moving the joystick back"
  20. 202 print "  and forth;( left and right ).  run as"
  21. 204 print "  fast as you can.  at the board,  push"
  22. 206 print"  the stick up to jump.  hold the stick"
  23. 207 print"  to the right for a forward landing."
  24. 208 print "        [164][164]               [164][164][164][164][164][164][164][164][164][164][164][164][164][164]"
  25. 209 print "[215] press f1[146] for a demo or instant replay[146]"
  26. 210 print "         [164][164][164][164][164][164][164][164]  "
  27. 212 print "the full hesgames[146] also features:"
  28. 213 print "    [215] 100 meter dash"
  29. 214 print "    [215] 110 meter hurdles"
  30. 216 print "    [215] archery"
  31. 217 print "    [215] springboard diving"
  32. 218 print "    [215] two hand snatch and"
  33. 219 print "      clean & jerk weightlifting events"
  34. 220 print "[215] 1-6 players can choose their country,"
  35. 222 print "  shirt color, sock color & their name.
  36. 223 [153] "(NULL) displays u.s., olympic, world records"
  37. 224 [153] "(NULL) save yourwait great performances and show"
  38. 226 [153] "  them to your friends later!"
  39. 228 [153] "       tototototototototototototototototototototototototo"
  40. 230 [153] "       get coupon at your dealer";
  41. 250 [151]198,10
  42. 260 [131] 147,83,89,83,49,54,51,56,52,13
  43. 270 [129]i[178]1[164]10:[135]x:[151]630[170]i,x:[130]
  44. 280 [147] "lj.md",8,1
  45.