home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Games / F-14-CHEAT-V2.0 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  4.3 KB  |  122 lines
  1. 10 REM *** COPYRIGHT HPI (1989) ***
  2. 100 DIM X(108):DIM F(8)
  3. 110 PRINT"[147]":CLR:POKE53280,0:POKE53281,0
  4. 120 GOSUB660
  5. 130 PRINTTAB(1)""MM$
  6. 140 PRINTTAB(1)SR$
  7. 150 PRINTTAB(6)WB$
  8. 160 PRINT" PLEASE INSERT A FORMATTED DATA DISK
  9. 170 [153]"  CONTAINING A DEAD / RETIRED PILOT
  10. 180 PRINT"
  11. 190 [153][163]1)""ID$
  12. 200 [153]"        HITOPEN RETURN TO CONTINUE"
  13. 210 [153][163](40[171]([195](CO$)))[173]2)""CO$
  14. 220 [141] 710
  15. 230 [141] 760
  16. 240 [159]15,8,15,"I0":[141] 630
  17. 250 [159]8,8,8,"#"
  18. 260 [152]15,"U1";8;0;17;1:[141] 630
  19. 270 [152]15,"B-P";8;0
  20. 280 [129] J[178]1[164]256
  21. 290 [135] X
  22. 300 [152]8,[199](X);:
  23. 310 [130] J
  24. 320 [152]15,"U2";8;0;17;1:[141] 630
  25. 330 [160]8:[160]15
  26. 340 [131] 0,148,3,0,0,3,221,226,216,211,215
  27. 350 [131] 236,225,212,224,220,235,211,211,211,211
  28. 360 [131] 211,249,224,212,233,216,229,220,214,222
  29. 370 [131] 249,211,211,211,211,211,211,249,218
  30. 380 [131] 226,226,230,216,249,211,211,211,211,211
  31. 390 [131] 211,211,211,211,128,248,22,9,1,0,0,100
  32. 400 [131] 0,100,2,1,0,0,0,0,0,1,0,0,0,0,0,0,0,0
  33. 410 [131] 0,0,0,0,0,0,0,0,32,91,9,0,0,93,6,0,0,0
  34. 420 [131] 3,2,2,2,2,0,0,2,0,1,0,1,2,0,0,1,1,1,0,1,2,1,0,0,0,0,0,0,1,2,0,1
  35. 421 [131] 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  36. 422 [131] 255,255,255,255,255,255,255,255,255,255,255
  37. 423 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  38. 424 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  39. 425 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  40. 426 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  41. 427 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  42. 428 [131] 255,255,255,255,255,255,255,255,255,255
  43. 429 [131] 255,255,255,255,255,255,255,255,255,255,255
  44. 430 [159]15,8,15,"I0":[141] 630
  45. 431 [159]8,8,8,"#"
  46. 432 [152]15,"U1";8;0;17;0:[141] 630
  47. 433 [152]15,"B-P";8;0
  48. 434 [129] S[178]1[164]256
  49. 435 [135] F
  50. 436 [152]8,[199](F);:
  51. 437 [130] S
  52. 438 [152]15,"U2";8;0;17;0:[141] 630
  53. 439 [160]8:[160]15
  54. 440 [131] 17,10,74,81,69,32,68,89,78,65,77,73,88
  55. 441 [131] 32,32,32,32,32,9,91,255,255,255,255,255
  56. 442 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  57. 443 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  58. 444 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  59. 445 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  60. 446 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  61. 447 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  62. 448 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  63. 449 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  64. 450 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  65. 451 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  66. 452 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  67. 453 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  68. 454 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  69. 455 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  70. 456 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  71. 457 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255
  72. 458 [131] 255,255,255,255,255,255,255,255,255,255,255,255,255,255
  73. 580 [153]"LOAD          PILOT HAS BEEN SAVED
  74. 590 PRINT"      REMOVE DATA DISK AT THIS TIME
  75. 600 [153]"
  76. 601 PRINT"   IF YOU HAVE ANY PROBLEMS OR IF YOU
  77. 602 [153]"   WOULD LIKE TO CHANGE YOUR PILOT OR
  78. 603 PRINT"   CO-PILOT'S CODENAME OR NAME E-MAIL
  79. 604 [153]"      HOMEBOY AF5 AT ALIEN FORCES
  80. 605 FORU=1TO4000:NEXTU
  81. 606 PRINT"[147]           RETURNING TO BASIC
  82. 607 [158]64738
  83. 610 [128]
  84. 620 [143] *** ERROR ROUTINE ***
  85. 630 [132]15,EN,EM$,ET,ES
  86. 640 [139] EN [167] [153]EN,EM$,ET,ES
  87. 650 [142]
  88. 660 MM$[178]"  F-14 TOMCAT-ACTIVISION-DISK CHEAT"
  89. 670 WB$[178]"
  90. 680 SR$="[159]************************************* "
  91. 690 ID$="HOMEBOY PRODUCTIONS INCORPORATED 1989"
  92. 700 RETURN
  93. 710 GET A$
  94. 720 IF A$ = "Q"THEN PRINT"QUIT":END
  95. 730 IF A$ = CHR$(13) THEN RETURN
  96. 740 GOTO 710
  97. 750 END
  98. 760 PRINT"[147]":PRINT"FOLLOW THESE INSTRUCTIONS CAREFULLY"
  99. 770 PRINT" -MAKE SURE THERE IS DEAD OR RETIRED  "
  100. 780 PRINT"  PILOT ON THE DATA DISK
  101. 790 [153]" -MAKE SURE THERE ARE NO WRITE PROTECT "
  102. 800 [153]"  TABS ON THE DISK
  103. 810 PRINT" -PRESS RETURN AND DO NOT REMOVE THE  "
  104. 820 PRINT"  DISKETTE FROM THE DISK DRIVE UNTIL  "
  105. 830 PRINT"  PROMPTED TO
  106. 840 [153]"HERE'S WHAT THE PROGRAM DOES:
  107. 850 PRINT" -PASSES YOU THROUGH TRAINING
  108. 860 [153]" -PASSES YOU THROUGH V-124 GUNFIGHTER
  109. 870 PRINT"  SCHOOL WITH AN EXCELLENT REPUTATION
  110. 880 [153]" -GETS YOU YOUR WINGS
  111. 890 PRINT" -PROMOTES YOU TO LIEUTENANT JG
  112. 900 [153]" -NAME: JOE DYNAMIX
  113. 910 PRINT" -CODENAME: MAVERICK
  114. 920 [153]" -CO-PILOT'S CODENAME: GOOSE
  115. 930 PRINT"CREDITS
  116. 940 [153]"DESIGN     : HOMEBOY
  117. 950 PRINT"PROGRAMMING: HOMEBOY
  118. 960 [153]"GRAPHICS   : QUANTUM LINK
  119. 970 PRINT"   HIT Q TO QUIT - RETURN TO CONTINUE"
  120. 980 GOSUB 710
  121. 990 RETURN
  122.