home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 64 / 064.d81 / exterminator (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  3KB  |  68 lines
  1. 10 poke53281,0:poke53280,0
  2. 20 dimb$(12),c$(12),d$(12),e$(12)
  3. 30 fori=1to11:readb$(i),c$(i),d$(i),e$(i):next
  4. 40 print"[147]"chr$(14)chr$(9):y=1
  5. 50 printtab(10)"                    "
  6. 60 printtab(10)"    [197][216][212][197][210][205][201][206][193][212][207][210]    [152] "
  7. 70 printtab(10)"                    [152] "
  8. 80 printtab(11)"                    "
  9. 90 fori=1to11
  10. 100 printtab(9)"[152]"b$(i)"[129]  "c$(i)
  11. 110 next
  12. 120 poke214,17:print
  13. 130 printtab(6)"[155][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
  14. 140 printtab(6)"[221]   [213]se the [195][210][211][210] keys and   [221]"
  15. 150 printtab(6)"[221]  press [210][197][212][213][210][206] to select.  [221]"
  16. 180 printtab(6)"[221]     [208]ress [209] to return     [221]"
  17. 190 printtab(6)"[221]         to [204][207][193][196][211][212][193][210].      [221]"
  18. 200 printtab(6)"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
  19. 220 print"[154]"
  20. 230 print"      [164][146]>[157][157][157][157]";
  21. 240 geta$:ifa$=""then240
  22. 250 ifa$=chr$(13)then330
  23. 260 ifa$=""ora$="[157]"thenprint"    ":y=y+1:ify>11theny=1:goto220
  24. 270 ifa$=""ora$="[145]"thenprint"    [145][145]":y=y-1:ify<1theny=11:poke214,15:print
  25. 280 ifa$<>"q"then320
  26. 290 open15,8,15,"r0:hello connect=hello connect"
  27. 300 input#15,er%:close15:ifer%<>63thenend
  28. 310 print"[144]":load"hello connect",8
  29. 320 goto230
  30. 330 print"[147][129]"
  31. 340 printtab(11)"[212]he problem with"
  32. 350 printtab(18-(len(c$(y))/2))c$(y)"[129] is:"
  33. 360 printe$(y)
  34. 370 print"[152] [201]f this is the problem you want fixed,"
  35. 380 print" then press [210][197][212][213][210][206][146].  [201]f not, then press"
  36. 390 print" the [211][208][193][195][197] [194][193][210][146] to return to the menu."
  37. 400 geta$:ifa$=""then400
  38. 410 ifa$=" "then40
  39. 420 ifa$<>chr$(13)then400
  40. 430 open15,8,15,"i0":close15
  41. 440 print"[144]          [204]oading "d$(y)
  42. 450 print"[144]load"chr$(34)d$(y)chr$(34)",8"
  43. 460 print"run[145][145][145][145][145][145][145][145]"
  44. 470 poke631,13:poke632,13:poke198,2
  45. 480 data"#53","[198]ont [195]ustomizer","f.customizer"
  46. 490 data"[212]he fonts are saved incorrectly, with an[204] for an [193], [205] for a [194], etc."
  47. 500 data"#53","[210]oman [206]umerals","f.roman numerals"
  48. 510 data"[212]he program won't run from the [204][207][193][196][211][212][193][210] menu."
  49. 540 data"#54","[211]tar [195]opier","f.star copier"
  50. 550 data"[217]ou occasionally get a 'break in 1060'  for no apparent reason."
  51. 560 data"#54","[211]tar [206]ibbler","f.star nibbler"
  52. 570 data"[212]he computer hangs up after the fifth   disk swap."
  53. 580 data"#55","[194]ackgammon","f.backgammon"
  54. 590 data"[212]he program can crash after hours of    play."
  55. 620 data"#57","[215]iz-[194]ang","f.wiz-bang"
  56. 630 data"[208]rogram won't accept a '?', '\' or an   '=' sign."
  57. 640 data"#58","[205]urder [207]ne","f.murder one"
  58. 650 data"[201]f using the keyboard, you encounter an 'undefined statement' error.
  59. 660 [131]"#59","(NULL)angram","f.tangram"
  60. 670 [131]"(NULL)he sprites aren't loaded and appear as blocks rather than shapes."
  61. 680 [131]"#61","(NULL)hoot the (NULL)oon","f.shoot moon"
  62. 690 [131]"(NULL)he scoring is incorrect if you 'shoot  the moon'."
  63. 700 [131]"#61","(NULL)ro-(NULL)itler (NULL)anual","pt reader"
  64. 710 [131]"ascour lines are missing from the bottom  of the first page."
  65. 720 [131]"#62","(NULL)olitical peek(NULL)","f.political bs"
  66. 730 [131]"(NULL)ou get a 'bad subscript error' when    the dice are rolled."
  67. 10000 [159]15,8,15,"s0:exterminator":[160]15:[148]"exterminator",8:[128]
  68.