plirof2

2 DELETE - ZX CSSCGC DAAD TopGun2 -RC6K.DSF firelord strategix FIX

Jun 2nd, 2022 (edited)
1,005
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SCL 63.19 KB | None | 0 0
  1. /CTL
  2. _
  3.  
  4. #ifdef "pcw"
  5.    #define notspeccy 1
  6. #endif
  7.  
  8. #ifdef "c64"
  9.    #define notspeccy 1
  10. #endif
  11. ; Flag Defines
  12.  
  13. #define dark_                                    0
  14. #define carry_count_                             1
  15. #define sam1destroyed_                           2
  16. #define msnion_goals_                            3
  17. #define msnion_                                  4
  18. #define inventory_limit_                         5
  19. #define is_just_entered_                         7
  20. #define previous_location_                       8
  21. #define is_mobile_                               9
  22. #define give_banan_or_drop_banan_or_throw_banan_ 10
  23. #define launc_missi_or_fire_missi_or_drop_bomb_  11
  24. #define give_rock_or_drop_rock_or_throw_rock_    12
  25. #define launc_missi_or_fire_missi_               13
  26. #define drop_nuke_or_fire_nuke_                  14
  27. #define drop_rock_or_throw_rock_                 15
  28. #define level1_                                  16
  29. #define maluva_reserved_20_                      20
  30. #define maluva_reserved_21_                      21
  31. #define maluva_reserved_22_                      22
  32. #define dark2_                                   28
  33. #define turns1_                                  31
  34. #define turns2_                                  32
  35. #define verb_                                    33
  36. #define noun1_                                   34
  37. #define adjective1_                              35
  38. #define adverb_                                  36
  39. #define items_carryable_                         37
  40. #define player_location_                         38
  41. #define proposition_                             43
  42. #define noun2_                                   44
  43. #define adjective2_                              45
  44. #define objectprintmode_                         53
  45. #define is_done_                                 60
  46. #define has_done_something_                      65
  47.  
  48. ; Room Defines
  49.  
  50. #define lakeside                                 1
  51. #define outside_cave                             2
  52. #define treasure_room                            3
  53. #define loc_1_1base                              4
  54. #define loc_1_3cook                              5
  55. #define loc_3_2tonga                             6
  56. #define loc_2_5narau                             7
  57. #define loc_4_1fiji                              8
  58. #define loc_5_2java                              9
  59. #define loc5_5boss                               10
  60. #define loc_5_1                                  11
  61. #define loc_5_3                                  12
  62. #define loc_5_4                                  13
  63. #define loc_4_2                                  14
  64. #define loc_4_3                                  15
  65. #define loc_4_4air                               16
  66. #define loc_4_5                                  17
  67. #define loc_3_1                                  18
  68. #define loc_3_3                                  19
  69. #define loc_3_4                                  20
  70. #define loc_3_5                                  21
  71. #define loc_2_1                                  22
  72. #define loc_2_2                                  23
  73. #define loc_2_3                                  24
  74. #define loc_2_4                                  25
  75. #define loc_1_2                                  26
  76. #define loc_1_4                                  27
  77. #define loc_1_5                                  28
  78.  
  79. ; Object Defines
  80.  
  81. #define apple                                    1
  82. #define troll                                    2
  83. #define banana                                   3
  84. #define bana1                                    4
  85. #define rock1                                    5
  86. #define rock                                     6
  87. #define nuke                                     7
  88. #define king_kong                                8
  89. #define old01                                    9
  90. #define sam1                                     10
  91. #define sam2                                     11
  92. #define pln1                                     12
  93. #define grn1                                     13
  94. #define pln2                                     14
  95. #define grn2                                     15
  96. #define grn3                                     16
  97. #define pln7                                     17
  98. #define grn4                                     18
  99. #define grn5                                     19
  100. #define pln5                                     20
  101. #define pln3                                     21
  102. #define grn6                                     22
  103. #define grn7                                     23
  104. #define pln9                                     24
  105. #define aircarrier                               25
  106. #define pln4                                     26
  107. #define pln6                                     27
  108. #define pln8                                     28
  109. #define pln10                                    29
  110. #define pln11                                    30
  111. #define old02                                    31
  112. #define grn8                                     32
  113. #define grn9                                     33
  114. #define grn10                                    34
  115. #define pln12                                    35
  116. #define old03                                    36
  117. #define tom_cruise                               37
  118. #define bmb1                                     38
  119. #define bmb2                                     39
  120. #define bmb3                                     40
  121. #define bmb4                                     41
  122. #define bmb5                                     42
  123. #define bmb6                                     43
  124. #define bmb7                                     44
  125. #define bmb8                                     45
  126. #define bmb9                                     46
  127. #define bmb10                                    47
  128. #define bmb11                                    48
  129. #define bmb12                                    49
  130. #define bmb13                                    50
  131. #define msn1                                     51
  132. #define msn2                                     52
  133. #define msn3                                     53
  134. #define msn4                                     54
  135. #define msn5                                     55
  136. #define msn6                                     56
  137. #define msn7                                     57
  138. #define msn8                                     58
  139. #define msn9                                     59
  140. #define msn10                                    60
  141. #define msn11                                    61
  142. #define msn12                                    62
  143. #define mso01                                    63
  144. #define mso02                                    64
  145. #define mso03                                    65
  146.  
  147. ; Process Defines
  148.  
  149. #define process_anykey                           10
  150.  
  151.  
  152. /VOC
  153. S      2    noun
  154. SOUTH  2    noun
  155. E      3    noun
  156. EAST   3    noun
  157. W      4    noun
  158. WEST   4    noun
  159. N      5    noun
  160. NORTH  5    noun
  161. NW     6    noun
  162. SE     7    noun
  163. SW     8    noun
  164. NE     9    noun
  165. D      10   noun
  166. DOWN   10   noun
  167. U      11   noun
  168. UP     11   noun
  169. ENTER  12   noun
  170. EXIT   13   noun
  171. LEAVE  13   noun
  172. I      14   noun
  173. INV    14   noun
  174. INVEN  14   noun
  175. ALL    50   noun
  176. EVERY  50   noun
  177. APPLE  51   noun
  178. TROLL  52   noun
  179. BANAN  53   noun
  180. BANA1  54   noun
  181. ROCK1  55   noun
  182. ROCK   56   noun
  183. ROCKS  56   noun
  184. NUKE   57   noun
  185. NUKES  57   noun
  186. KONG   58   noun
  187. KONGS  58   noun
  188. OLD01  59   noun
  189. SAM1   60   noun
  190. SAM2   61   noun
  191. PLN1   62   noun
  192. GRN1   63   noun
  193. PLN2   64   noun
  194. GRN2   65   noun
  195. GRN3   66   noun
  196. PLN7   67   noun
  197. GRN4   68   noun
  198. GRN5   69   noun
  199. PLN5   70   noun
  200. PLN3   71   noun
  201. GRN6   72   noun
  202. GRN7   73   noun
  203. PLN9   74   noun
  204. AIRCA  75   noun
  205. PLN4   76   noun
  206. PLN6   77   noun
  207. PLN8   78   noun
  208. PLN10  79   noun
  209. PLN11  80   noun
  210. OLD02  81   noun
  211. GRN8   82   noun
  212. GRN9   83   noun
  213. GRN10  84   noun
  214. PLN12  85   noun
  215. OLD03  86   noun
  216. CRUIS  87   noun
  217. BMB1   88   noun
  218. BMB2   89   noun
  219. BMB3   90   noun
  220. BMB4   91   noun
  221. BMB5   92   noun
  222. BMB6   93   noun
  223. BMB7   94   noun
  224. BMB8   95   noun
  225. BMB9   96   noun
  226. BMB10  97   noun
  227. BMB11  98   noun
  228. BMB12  99   noun
  229. BMB13  100  noun
  230. MSN1   101  noun
  231. MSN2   102  noun
  232. MSN3   103  noun
  233. MSN4   104  noun
  234. MSN5   105  noun
  235. MSN6   106  noun
  236. MSN7   107  noun
  237. MSN8   108  noun
  238. MSN9   109  noun
  239. MSN10  110  noun
  240. MSN11  111  noun
  241. MSN12  112  noun
  242. MSO01  113  noun
  243. MSO02  114  noun
  244. MSO03  115  noun
  245. MISSI  116  noun
  246. BOMB   117  noun
  247. BOMBS  117  noun
  248. EIGHT  118  noun
  249. TURN   119  noun
  250. TURNS  119  noun
  251. LOOP   120  noun
  252. LOOPS  120  noun
  253. LEAF   121  noun
  254. LEAFS  121  noun
  255. EJECT  21   verb
  256. QUIT   21   verb
  257. RESTA  21   verb
  258. GET    22   verb
  259. TAKE   22   verb
  260. DISCA  23   verb
  261. DROP   23   verb
  262. OPEN   24   verb
  263. CLOSE  25   verb
  264. WEAR   26   verb
  265. REMOV  27   verb
  266. UNWEA  27   verb
  267. INSER  28   verb
  268. PUT    28   verb
  269. L      29   verb
  270. LOOK   29   verb
  271. R      29   verb
  272. GIVE   30   verb
  273. THROW  31   verb
  274. LAUNC  32   verb
  275. FIRE   33   verb
  276. CUBAN  34   verb
  277. STALL  35   verb
  278. OUTSI  36   verb
  279. FAILI  37   verb
  280. REVER  38   verb
  281. LOAD   39   verb
  282. SAVE   40   verb
  283. EXAM   41   verb
  284. EXAMI  41   verb
  285. X      41   verb
  286.  
  287. /STX
  288.  
  289. /0 "\nIt's too dark to see anything.\n"
  290. /1 "\nYou see "
  291. /2 ""
  292. /3 ""
  293. /4 ""
  294. /5 ""
  295. /6 "You don't quite understand that.\n\n"
  296. /7 "You can't go in that direction.\n\n"
  297. /8 "You can't DO that.\n\n"
  298. /9 "You are carrying "
  299. /10 "AND you're wearing "
  300. /11 "Nothing at all.\n"
  301. /12 "Are you sure?\n\n"
  302. /13 "\nWould you like another go?\n\n"
  303. /14 "Goodbye...\n"
  304. /15 "OK.\n"
  305. #ifdef "pcw"
  306. /16 "                                                                                     ..."
  307. #endif
  308. #ifdef "c64"
  309. /16 "                                     ..."
  310. #endif
  311. #ifndef "notspeccy"
  312. /16 "                                       ..."
  313. #endif
  314. /17 "\nYou have taken "
  315. /18 " turn"
  316. /19 "s"
  317. /20 "."
  318. /21 "\nYou have scored "
  319. /22 "%\n"
  320. /23 "You're NOT wearing one OF those.\n\n"
  321. /24 "You can't. You're wearing the _.\n\n"
  322. /25 "You already have the _.\n\n"
  323. /26 "There isn't one of those here.\n\n"
  324. /27 "You can't carry ANY more things.\n\n"
  325. /28 "You don't have one of those.\n\n"
  326. /29 "You're already wearing the _.\n\n"
  327. /30 "Y"
  328. /31 "N"
  329. #ifdef "pcw"
  330. /32 "                                                                                     ..."
  331. #endif
  332. #ifdef "c64"
  333. /32 "                                     ..."
  334. #endif
  335. #ifndef "notspeccy"
  336. /32 "                                       ..."
  337. #endif
  338. /33 ">"
  339. /34 ">"
  340. /35 "TIME passes...\n"
  341. /36 "You now have the _.\n\n"
  342. /37 "You're now wearing the _.\n\n"
  343. /38 "You've removed the _.\n\n"
  344. /39 "You've dropped the _.\n\n"
  345. /40 "You can't wear the _.\n\n"
  346. /41 "You can't remove the _.\n\n"
  347. /42 "You can't remove the _. Your hands are full.\n\n"
  348. /43 "The _ weighs too much FOR you.\n\n"
  349. /44 "The _ is in the \n"
  350. /45 "The _ isn't in the \n"
  351. /46 ", "
  352. /47 " and "
  353. /48 ".\n"
  354. /49 "You don't have the _.\n\n"
  355. /50 "You're not wearing the _.\n\n"
  356. /51 "."
  357. /52 "There isn't one OF those in the"
  358. /53 "nothing OF interest.\n"
  359. /54 "TYPE in name OF file:\n"
  360. /55 "File corrupt.\n"
  361. /56 "I/O Error!  File NOT Saved!\n"
  362. /57 "Directory full.\n"
  363. /58 "Disk full.\n"
  364. /59 "File name error.\n"
  365. /60 "TYPE in name OF file.\n"
  366. /61 "Game Saved\n\n"
  367. /62 "."
  368. /63 "You see nothing special.\n\n"
  369. /64 "Score: "
  370.  
  371. /MTX
  372. ;Gorilla
  373. /0  "\n      .\"'\". \n  .-.| -=- |.-.\n I  I,|oYo|,I II\n II I   '   II I\n I I I +-+ I  II\n II  I'-=-'I I I\n I I I.-:-.I  II\n II  I -:- I I I\n I-I I'==='I  -I\nIIII-I     I-IIII\n"
  374. ; Plane Formation   PROCESS 13
  375. /1 "\n          --|--\n       *---o0o---*\n    --|-- \n*---o0o---* \n          --|--\n       *---o0o---*\n"
  376. ; Missile Silo  PROCESS 14
  377. /2 "   |\n  | |\n  | |\n :| |:\n|:| |:|\n"
  378. ;Air Carrier PROCESS 12
  379. /3 "+-----------------------------D\n|--|-|--|-|--|-|--|-|--|-|--|-|-\n|-|-----------D|--|-----------|--|/\n|o o o o o o o o o o o o o o o o/  \n|------------------------------/\n"
  380. ;"    -----------\n     |--|-|--|-|\n   -|-----------|--\n  |o o o o o o o o/  \n   ---------------\n"
  381. ;pln1
  382. /4 "        | | \n    x---o8o---x  \n"
  383. ;pln4 formation
  384. /5 "\n          --|--\n       *---o0o---*\n   --|-- \n*---o0o---* \n          --|--\n       *---o0o---*\n"
  385. ; plane 12
  386. /6 "      --|--\n*---o--(.)--o---*\n"
  387. ;
  388. /7 "\nHe seems angry OR hungry. He guards the mountains. \nHe likes throwing trees TO airplanes!"
  389. /8 "\nNOT USED"
  390. ; Nuke explosion PROCESS 11
  391. /9 "\n       ..-^~~~^-..\n     .~           ~.\n    (;:           :;)\n     (:           :)\n       ':.-   -.:'\n           | |\n         (=====)\n           | |\n           | |\n           | |\n        ((     ))\n"
  392. ; plane ΑΑ
  393. /10 "\n   --|--\n*-*-(.)-*-*\n"
  394.  
  395. ; plane BB
  396. /11 "\n   x-|-x\n*-.-(.)-.-*\n"
  397.  
  398.  
  399. /OTX
  400.  
  401. /0 ""
  402. /1 "an apple"
  403. /2 "an enormous troll"
  404. /3 "a banana"
  405. /4 "a banana"
  406. /5 "a big rock"
  407. /6 "a big rock"
  408. /7 "a nuclear warhead (nuke)"
  409. /8 "King Kong. \nHe seems angry OR hungry. He guards the mountains. \nHe likes throwing trees TO airplanes! \n      .\"'\". \n  .-.| -=- |.-.\n I  I,|oYo|,I II\n II I   '   II I\n I I I +-+ I  II\n II  I'-=-'I I I\n I I I.-:-.I  II\n II  I -:- I I I\n I-I I'==='I  -I\nIIII-I     I-IIII\n"
  410. /9 "a formation containing 2 MKs 24 Spitfires , 1 Soviet Yakovlev Yak-3 , 2 P-47D Thunderbolts AND a P-38J Lightning  "
  411. /10 "a SAM1 missile silo"
  412. /11 "a SAM2 missile silo"
  413. /12 "a Saab JAS 39E Gripen"
  414. /13 "a MR-SAM missile silo"
  415. /14 "a Sukhoi Su-35S"
  416. /15 "a Iron Dome missile silo"
  417. /16 "a MEADS missile silo"
  418. /17 "a Shenyang FC-31"
  419. /18 "a Aster 30 SAMP/T"
  420. /19 "a HQ-9 missile silo"
  421. /20 "a F-15EX Eagle II"
  422. /21 "a Eurofighter Typhoon"
  423. /22 "a MIM-104 Patriot"
  424. /23 "a THAAD (Terminal High Altitude Area Defense) missile silo"
  425. /24 "a J-20"
  426. /25 "A Huge Aircraft Carrier... It seems AT least 3 times bigger that 'USS Gerald R Ford'! With a quick look you can estimate that this has Length OF 1011m has a Displacement OF 304,800 tons.You estimate that this would cost about $38.4 billion give OR take a few pennies! "
  427. /26 "a Dassault Rafale"
  428. /27 "a Sukhoi Su-35S"
  429. /28 "a F-22 Raptor "
  430. /29 "a Sukhoi Su-57"
  431. /30 "a F-35 Lightning II"
  432. /31 "a formation containing 2 MKs 24 Spitfires , 1 Soviet Yakovlev Yak-3 , 2 P-47D Thunderbolts AND a P-38J Lightning  "
  433. /32 "a S-300VM (Antey-2500)"
  434. /33 "a S-400 Triumph"
  435. /34 "a S-500 Prometheus Range"
  436. /35 "a F-35 Lightning II"
  437. /36 "a formation containing 2 MKs 24 Spitfires , 1 Soviet Yakovlev Yak-3 , 2 P-47D Thunderbolts AND a P-38J Lightning  "
  438. /37 "Tom Cruise who was the master mind behind this!. He is also the bad guy AND end boss!"
  439. /38 "a bomb"
  440. /39 "a bomb"
  441. /40 "a bomb"
  442. /41 "a bomb"
  443. /42 "a bomb"
  444. /43 "a bomb"
  445. /44 "a bomb"
  446. /45 "a bomb"
  447. /46 "a bomb"
  448. /47 "a bomb"
  449. /48 "a bomb"
  450. /49 "a bomb"
  451. /50 "a bomb"
  452. /51 "a missile"
  453. /52 "a missile"
  454. /53 "a missile"
  455. /54 "a missile"
  456. /55 "a missile"
  457. /56 "a missile"
  458. /57 "a missile"
  459. /58 "a missile"
  460. /59 "a missile"
  461. /60 "a missile"
  462. /61 "a missile"
  463. /62 "a missile"
  464. /63 "a missile"
  465. /64 "a missile"
  466. /65 "a missile"
  467.  
  468. /LTX
  469.  
  470. /0 ""
  471. /1 "You are BY the side OF a beautiful lake."
  472. /2 "You are outside a cave. The entrance lies north."
  473. /3 "You are in a room OF treasures."
  474. /4 "You fly over your Base Island.\n\nExits: E"
  475. /5 "You fly over Cook Island.   \n\nExits: E, W"
  476. /6 "You fly over Tonga Island.\n\nExits: E, W"
  477. /7 "You fly over Narau Island.\n\nExits: N, W"
  478. /8 "You fly over Fiji Islands.\n\nExits: S, E"
  479. /9 "You fly over Java Islands.\n\nExits: E, W"
  480. /10 "Mountain Boss Base.\n\nExits: W"
  481. /11 "Sea\n\nExits: N, E"
  482. /12 "Mountain\n\nExits: E, W"
  483. /13 "Mountain\n\nExits: N, E, W"
  484. /14 "Sea\n\nExits: E, W"
  485. /15 "Sea\n\nExits: N, E, W"
  486. /16 "You are AT a strategic spot near the coast! \n\nExits: S, E, W"
  487. /17 "Mountain\n\nExits: N, W"
  488. /18 "Sea\n\nExits: N, E"
  489. /19 "Sea\n\nExits: S, E, W"
  490. /20 "Sea\n\nExits: E, W"
  491. /21 "Sea\n\nExits: S, W"
  492. /22 "Sea\n\nExits: S, E"
  493. /23 "Sea\n\nExits: E, W"
  494. /24 "Sea\n\nExits: E, W"
  495. /25 "Sea\n\nExits: E, W"
  496. /26 "Sea\n\nExits: E, W"
  497. /27 "Sea\n\nExits: E, W"
  498. /28 "Sea\n\nExits: S, W"
  499.  
  500. /CON
  501.  
  502. /0
  503. /1
  504. /2
  505. /3
  506. /4 E loc_1_2
  507. /5 W loc_1_2 E loc_1_4
  508. /6 W loc_3_1 E loc_3_3
  509. /7 N loc_1_5 W loc_2_4
  510. /8 E loc_4_2 S loc_5_1
  511. /9 W loc_5_1 E loc_5_3
  512. /10 W loc_5_4
  513. /11 N loc_4_1fiji E loc_5_2java
  514. /12 W loc_5_2java E loc_5_4
  515. /13 N loc_4_4air W loc_5_3 E loc5_5boss
  516. /14 E loc_4_3 W loc_4_1fiji
  517. /15 N loc_3_3 E loc_4_4air W loc_4_2
  518. /16 E loc_4_5 W loc_4_3 S loc_5_4
  519. /17 N loc_3_5 W loc_4_4air
  520. /18 N loc_2_1 E loc_3_2tonga
  521. /19 W loc_3_2tonga E loc_3_4 S loc_4_3
  522. /20 W loc_3_3 E loc_3_5
  523. /21 W loc_3_4 S loc_4_5
  524. /22 E loc_2_2 S loc_3_1
  525. /23 E loc_2_3 W loc_2_1
  526. /24 E loc_2_4 W loc_2_2
  527. /25 E loc_2_5narau W loc_2_3
  528. /26 W loc_1_1base E loc_1_3cook
  529. /27 W loc_1_3cook E loc_1_5
  530. /28 W loc_1_4 S loc_2_5narau
  531.  
  532. /OBJ
  533.  
  534. /0     252  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  535. /1     1    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    APPLE _
  536. /2     2    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  537. /3     252  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BANAN _
  538. /4     23   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BANA1 _
  539. /5     23   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    ROCK1 _
  540. /6     252  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    ROCK  _
  541. /7     252  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    NUKE  _
  542. /8     13   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  543. /9     26   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  544. /10    5    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  545. /11    5    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  546. /12    5    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  547. /13    6    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  548. /14    6    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  549. /15    7    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  550. /16    7    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  551. /17    7    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  552. /18    8    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  553. /19    8    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  554. /20    8    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  555. /21    8    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  556. /22    9    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  557. /23    9    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  558. /24    9    1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  559. /25    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  560. /26    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  561. /27    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  562. /28    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  563. /29    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  564. /30    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  565. /31    16   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  566. /32    10   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  567. /33    10   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  568. /34    10   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  569. /35    10   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  570. /36    10   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  571. /37    10   1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    _     _
  572. /38    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB1  _
  573. /39    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB2  _
  574. /40    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB3  _
  575. /41    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB4  _
  576. /42    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB5  _
  577. /43    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB6  _
  578. /44    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB7  _
  579. /45    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB8  _
  580. /46    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB9  _
  581. /47    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB10 _
  582. /48    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB11 _
  583. /49    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB12 _
  584. /50    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    BMB13 _
  585. /51    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN1  _
  586. /52    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN2  _
  587. /53    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN3  _
  588. /54    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN4  _
  589. /55    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN5  _
  590. /56    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN6  _
  591. /57    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN7  _
  592. /58    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN8  _
  593. /59    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN9  _
  594. /60    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN10 _
  595. /61    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN11 _
  596. /62    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSN12 _
  597. /63    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSO01 _
  598. /64    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSO02 _
  599. /65    254  1   _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _    MSO03 _
  600.  
  601. /PRO 0
  602.  
  603. > _       _      AT      0
  604.                 WINDOW 0
  605.                 CLS
  606.                 PROCESS 6
  607.  
  608. > _       _     WINDOW  0
  609. ; SET the boundries FOR the main text window
  610.  
  611. > _       _     WINDOW 1
  612. #ifdef "pcw"
  613.                 BORDER  0
  614. #endif
  615. #ifdef "c64"
  616.                 BORDER  0
  617. #endif
  618. #ifndef "notspeccy"
  619.                 BORDER  0
  620. #endif
  621.                 WINAT   0       0
  622. #ifdef "pcw"
  623.                 INK 4
  624.                 PAPER 0
  625. #endif
  626. #ifdef "c64"
  627.                 INK 4
  628.                 PAPER 0
  629. #endif
  630. #ifndef "notspeccy"
  631.                 INK 4
  632.                 PAPER 0
  633. #endif
  634. #ifdef "pcw"
  635.                 WINSIZE 33      127
  636. #endif
  637. #ifdef "c64"
  638.                 WINSIZE 25      127
  639. #endif
  640. #ifndef "notspeccy"
  641.                 WINSIZE 25      127
  642. #endif
  643.                 CLS
  644.  
  645. > _       _     PICTURE @player_location_ ; [Player]
  646.                 DISPLAY 0 ; 0 = Display the previously buffered graphic, nonzero = DO NOT display
  647.  
  648.  
  649. ; Display location text
  650.  
  651. > _       _       DESC    @player_location_ ; [Player]
  652.                 NEWLINE
  653.  
  654. ; Call the on_describe {} logic here ...
  655.  
  656. > _       _     PROCESS 3
  657.  
  658. ; Call the main parser event loop here ...
  659.  
  660. > _       _     PROCESS 1
  661.  
  662. /PRO 1
  663.  
  664. > _       _     PROCESS 4
  665.  
  666. > _       _     PARSE   0
  667.                 PROCESS 2
  668.                 REDO
  669.  
  670. > _       _     EQ      turns1_   255
  671.                 PLUS    turns2_ 1
  672.                 CLEAR   turns1_
  673.                 SKIP    1
  674.  
  675. > _       _     PLUS    turns1_   1
  676.  
  677. > _       _     NEWLINE ; Adds a newline before the response
  678.  
  679. > _       _     PROCESS 5
  680.                 ISDONE
  681.                 REDO
  682.  
  683. > _       _     MOVE    player_location_
  684.                 CLS
  685.                 RESTART
  686.  
  687. > _       _     NEWTEXT
  688.                 LT      verb_    14
  689.                 SYSMESS 7
  690.                 REDO
  691.  
  692. > _       _     SYSMESS 8
  693.                 REDO
  694.  
  695. /PRO 2
  696.  
  697. > _       _     NEWLINE ; Adds a newline before the response
  698. > _       _     HASAT 87; TIMEOUT
  699.                 SYSMESS 35
  700.                 DONE
  701.  
  702. > _       _     SYSMESS 6
  703.  
  704. /PRO 3
  705.  
  706. > _      _    ZERO 6
  707.               LET msnion_ 1
  708.               LET inventory_limit_ 100
  709.               LET 6 255
  710.               LET items_carryable_ 100
  711.  
  712. > _      _    CLEAR is_done_
  713.  
  714. > _      _    AT 0
  715.               SET is_mobile_
  716.               CLS
  717.               PROCESS 7
  718.               SET is_just_entered_
  719.               COPYFF player_location_ previous_location_
  720.               LET objectprintmode_ 64
  721.               GOTO loc_1_1base
  722.               CLS
  723.               RESTART
  724.  
  725. > _      _    PROCESS 8
  726.  
  727. > _      _    AT loc_1_1base
  728.               ISAT pln12 252
  729.               MESSAGE "CONGRATULATIONS YOU KILLED EVERYONE. YOU WIN! YOU CAN RETURN HOME AND WAIT FOR TOP-GUN 3\n"
  730.               MESSAGE "The President reveals you a BIG secret! \nHe says :\n"
  731.               MESSAGE "You can find the Update FOR \n-10D bathroom Design-\n in the end OF the Top Gun 2 ZX 48k tape!!!!\n"
  732.               PROCESS process_anykey
  733.               MESSAGE "The President is so happy that he tosses the Medal OF Honor in the air so you can GET it WHILE flying!!!"
  734.               PROCESS process_anykey
  735.               MESSAGE " ... Suddenly... \n"
  736.               PROCESS process_anykey
  737.               MESSAGE "A giant hand grabs the medal!\n"
  738.               MESSAGE " " MES 0
  739.               MESSAGE "\nIt is King Kong!!! \nKing Kong likes this game so he throws the medal back TO the President!\n"
  740.               MESSAGE "Now it is his turn TO throw something. King Kong throws a nuke AT the President!"
  741.               PROCESS process_anykey
  742.               MESSAGE " The Nuke was armed this TIME!\n"
  743.               PROCESS process_anykey
  744.               ;MESSAGE 9
  745.               PROCESS 11
  746.               PROCESS process_anykey              
  747.               MESSAGE "Thank you FOR playing Top Gun 2 -Maverick Dangerous !!! \n"
  748.               MESSAGE "Developed BY Firelord Quality Games 2022\n"
  749.               GOTO 0
  750.               END
  751.               DONE
  752.  
  753. > _      _    PRESENT old01
  754.               ;MESSAGE 1
  755.               PROCESS 13
  756.  
  757. > _      _    PRESENT old02
  758.               ;MESSAGE 1
  759.               PROCESS 13
  760.  
  761. > _      _    PRESENT old03
  762.               ;MESSAGE 1
  763.               PROCESS 13
  764.  
  765. > _      _    PRESENT king_kong
  766.               MESSAGE 7 MES 0
  767.  
  768. > _      _    PRESENT aircarrier
  769.               ;MESSAGE 3
  770.               PROCESS 12
  771.  
  772. > _      _    CLEAR level1_
  773.  
  774. > _      _    PRESENT sam1
  775.               SET level1_
  776.               MESSAGE 2
  777.  
  778. > _      _    ZERO level1_
  779.               PRESENT grn3
  780.               SET level1_
  781.               MESSAGE 2
  782.  
  783. > _      _    ZERO level1_
  784.               PRESENT grn1
  785.               SET level1_
  786.               MESSAGE 2
  787.  
  788. > _      _    CLEAR level1_
  789.  
  790. > _      _    PRESENT sam2
  791.               SET level1_
  792.               MESSAGE 2
  793.  
  794. > _      _    ZERO level1_
  795.               PRESENT grn7
  796.               SET level1_
  797.               MESSAGE 2
  798.  
  799. > _      _    ZERO level1_
  800.               PRESENT grn2
  801.               SET level1_
  802.               MESSAGE 2
  803.  
  804. > _      _    CLEAR level1_
  805.  
  806. > _      _    PRESENT grn4
  807.               SET level1_
  808.               MESSAGE 2
  809.  
  810. > _      _    ZERO level1_
  811.               PRESENT grn8
  812.               SET level1_
  813.               MESSAGE 2
  814.  
  815. > _      _    PRESENT grn5
  816.               MESSAGE 2
  817.  
  818. > _      _    PRESENT grn6
  819.               MESSAGE 2
  820.  
  821. > _      _    PRESENT grn10
  822.               MESSAGE 2
  823.  
  824. > _      _    PRESENT grn9
  825.               MESSAGE 2
  826.  
  827. > _      _    PRESENT pln1
  828.               MESSAGE 4
  829.  
  830. > _      _    PRESENT pln2
  831.               MESSAGE 10
  832.  
  833. > _      _    PRESENT pln7
  834.               MESSAGE 4
  835.  
  836. > _      _    PRESENT pln5
  837.               MESSAGE 10
  838.  
  839. > _      _    PRESENT pln3
  840.               MESSAGE 4
  841.  
  842. > _      _    PRESENT pln9
  843.               MESSAGE 11
  844.  
  845. > _      _    PRESENT pln4
  846.               PRESENT pln6
  847.               PRESENT pln8
  848.               MESSAGE 5
  849.  
  850. > _      _    PRESENT pln10
  851.               MESSAGE 10
  852.  
  853. > _      _    PRESENT pln11
  854.               MESSAGE 11
  855.  
  856. > _      _    PRESENT pln12
  857.               MESSAGE 6
  858.  
  859. > _      _    PRESENT tom_cruise
  860.               MESSAGE " XXXXX \n"
  861.               MESSAGE " -O-O- \n"
  862.               MESSAGE "   | \n"
  863.               MESSAGE "  --- \n"
  864.  
  865.  
  866. /PRO 4
  867.  
  868. > _      _    CLEAR is_done_
  869.  
  870. > _      _    CLEAR is_just_entered_
  871.  
  872. > _      _    NOTSAME player_location_ previous_location_
  873.               SET is_just_entered_
  874.  
  875. > _      _    COPYFF player_location_ previous_location_
  876.  
  877.  
  878. /PRO 5
  879.  
  880. > I      _    SYSMESS 9
  881.               LISTAT 254
  882.               NEWLINE
  883.               DONE
  884. > E      _    AT loc_5_4
  885.               ISNOTAT king_kong 252
  886.               MESSAGE "King Kong is  guarding the mountains!\n"
  887.               DONE
  888.  
  889. > S      _    AT loc_1_5
  890.               ISNOTAT pln1 252
  891.               MESSAGE "You must destroy the other defences first!\n"
  892.               DONE
  893.  
  894. > E      _    AT loc_2_4
  895.               ISNOTAT pln1 252
  896.               MESSAGE "You must destroy the other defences first!\n"
  897.               DONE
  898.  
  899. > E      _    AT loc_3_1
  900.               ISNOTAT pln7 252
  901.               MESSAGE "You must destroy the other defences first!\n"
  902.               DONE
  903.  
  904. > W      _    AT loc_3_3
  905.               ISNOTAT pln7 252
  906.               MESSAGE "You must destroy the other defences first!\n"
  907.               DONE
  908.  
  909. > W      _    AT loc_4_2
  910.               ISNOTAT pln2 252
  911.               MESSAGE "You must destroy the other defences first!\n"
  912.               DONE
  913.  
  914. > N      _    AT loc_5_1
  915.               ISNOTAT pln2 252
  916.               MESSAGE "You must destroy the other defences first!\n"
  917.               DONE
  918.  
  919. > E      _    AT loc_5_1
  920.               ISNOTAT pln5 252
  921.               MESSAGE "You must destroy the other defences first!\n"
  922.               DONE
  923.  
  924. > W      _    AT loc_5_3
  925.               ISNOTAT pln5 252
  926.               MESSAGE "You must destroy the other defences first!\n"
  927.               DONE
  928.  
  929. > E      _    AT loc_4_3
  930.               ISNOTAT pln9 252
  931.               MESSAGE "You must destroy the other defences first!\n"
  932.               DONE
  933.  
  934. > W      _    AT loc_4_5
  935.               ISNOTAT pln9 252
  936.               MESSAGE "You must destroy the other defences first!\n"
  937.               DONE
  938.  
  939. > N      _    AT loc_5_4
  940.               ISNOTAT pln9 252
  941.               MESSAGE "You must destroy the other defences first!\n"
  942.               DONE
  943.  
  944. > E      _    AT loc_5_4
  945.               ISNOTAT aircarrier 252
  946.               MESSAGE "You must clear the Aircraft Carrier Defences.TO enter the main base.\n"
  947.               DONE
  948.  
  949. > W      _    AT loc_1_2
  950.               ISNOTAT tom_cruise 252
  951.               MESSAGE "You're ashamed to return to your home base before you kill EVERYONE and EVERYTHING in the final base!\n"
  952.              DONE
  953.  
  954. > _      _    CLEAR has_done_something_
  955.  
  956. > _      _    CLEAR give_banan_or_drop_banan_or_throw_banan_
  957.              CLEAR launc_missi_or_fire_missi_or_drop_bomb_
  958.              CLEAR give_rock_or_drop_rock_or_throw_rock_
  959.              CLEAR launc_missi_or_fire_missi_
  960.              CLEAR drop_nuke_or_fire_nuke_
  961.              CLEAR drop_rock_or_throw_rock_
  962.  
  963. > GIVE   BANAN SET give_banan_or_drop_banan_or_throw_banan_
  964.  
  965. > DROP   BANAN SET give_banan_or_drop_banan_or_throw_banan_
  966.  
  967. > THROW  BANAN SET give_banan_or_drop_banan_or_throw_banan_
  968.  
  969. > LAUNC  MISSI SET launc_missi_or_fire_missi_or_drop_bomb_
  970.              SET launc_missi_or_fire_missi_
  971.  
  972. > FIRE   MISSI SET launc_missi_or_fire_missi_or_drop_bomb_
  973.              SET launc_missi_or_fire_missi_
  974.  
  975. > DROP   BOMB SET launc_missi_or_fire_missi_or_drop_bomb_
  976.  
  977. > GIVE   ROCK SET give_rock_or_drop_rock_or_throw_rock_
  978.  
  979. > DROP   ROCK SET give_rock_or_drop_rock_or_throw_rock_
  980.              SET drop_rock_or_throw_rock_
  981.  
  982. > THROW  ROCK SET give_rock_or_drop_rock_or_throw_rock_
  983.              SET drop_rock_or_throw_rock_
  984.  
  985. > DROP   NUKE SET drop_nuke_or_fire_nuke_
  986.  
  987. > FIRE   NUKE SET drop_nuke_or_fire_nuke_
  988.  
  989. > GIVE   APPLE PRESENT troll
  990.              CARRIED apple
  991.              SET has_done_something_
  992.              MESSAGE "The troll eats the apple then wanders off.\n"
  993.              DESTROY apple
  994.              DESTROY troll
  995.  
  996. > GET    BANAN PRESENT bana1
  997.              SET has_done_something_
  998.              MESSAGE "You open the window and get the banana.\n"
  999.              DESTROY bana1
  1000.              PLACE banana 254
  1001.  
  1002. > GET    ROCK PRESENT rock1
  1003.              SET has_done_something_
  1004.              MESSAGE "You open the window and get the rock.\n"
  1005.              DESTROY rock1
  1006.              PLACE rock 254
  1007.  
  1008. > _      _    NOTZERO give_banan_or_drop_banan_or_throw_banan_
  1009.              PRESENT king_kong
  1010.              CARRIED banana
  1011.              SET has_done_something_
  1012.              MESSAGE "King Kong eats the banana waves goodbye and then wanders off.\n"
  1013.              DESTROY banana
  1014.              DESTROY king_kong
  1015.              PLUS msnion_goals_ 1
  1016.              SYSMESS 64
  1017.              PRINT msnion_goals_
  1018.              MESSAGE " \n"
  1019.  
  1020. > _      _    NOTZERO launc_missi_or_fire_missi_or_drop_bomb_
  1021.              PRESENT king_kong
  1022.              SET has_done_something_
  1023.              MESSAGE "You aim with your onboard super AI computer and fire. \nOne KK fart is enough to confuse the complex electronic sensors of your plane!!!\n"
  1024.              MESSAGE "You see on screen a message:\n R-Tape Loading Error!!!\n"
  1025.  
  1026. > _      _    NOTZERO give_rock_or_drop_rock_or_throw_rock_
  1027.              PRESENT king_kong
  1028.              CARRIED rock
  1029.              NOTCARR nuke
  1030.              SET has_done_something_
  1031.              MESSAGE "King Kong likes to play 'throw'.He throws the rock back at you. He seems to enjoy it. Now it is his turn: He throws something to you. It is a...Nuclear Warhead!!! You decide to keep the nuke!\n"
  1032.              PLACE nuke 254
  1033.              PLUS msnion_goals_ 1
  1034.              SYSMESS 64
  1035.              PRINT msnion_goals_
  1036.              MESSAGE " \n"
  1037.  
  1038. > _      _    NOTZERO launc_missi_or_fire_missi_
  1039.              AT loc_1_2
  1040.              PRESENT old01
  1041.              CARRIED mso01
  1042.              SET has_done_something_
  1043.              MESSAGE "With one missile you destroy : a formation containing 2 MKs 24 Spitfires , 1 Soviet Yakovlev Yak-3 , 2 P-47D Thunderbolts and a P-38J Lightning  \n"
  1044.              DESTROY mso01
  1045.              DESTROY old01
  1046.              PLUS msnion_goals_ 1
  1047.              SYSMESS 64
  1048.              PRINT msnion_goals_
  1049.              MESSAGE " \n"
  1050.  
  1051. > _      _    NOTZERO launc_missi_or_fire_missi_
  1052.              AT loc_1_3cook
  1053.              ABSENT sam2
  1054.              CARRIED msn1
  1055.              SET has_done_something_
  1056.              MESSAGE "Your missile destroys a Saab JAS 39E Gripen\n"
  1057.              DESTROY msn1
  1058.              DESTROY pln1
  1059.              PLUS msnion_goals_ 1
  1060.              SYSMESS 64
  1061.              PRINT msnion_goals_
  1062.              MESSAGE " \n"
  1063.  
  1064. > DROP   BOMB AT loc_1_3cook
  1065.              ISNOTAT sam1 255
  1066.              PRESENT sam2
  1067.              CARRIED bmb2
  1068.              SET has_done_something_
  1069.              MESSAGE "Your bomb destroys SAM Silo #2\n"
  1070.              DESTROY bmb12
  1071.              DESTROY sam2
  1072.              PLUS msnion_goals_ 1
  1073.              SYSMESS 64
  1074.              PRINT msnion_goals_
  1075.              MESSAGE " \n"
  1076.  
  1077. > DROP   BOMB AT loc_1_3cook
  1078.              PRESENT sam1
  1079.              CARRIED bmb1
  1080.              SET has_done_something_
  1081.              MESSAGE "Your bomb destroys SAM Silo #1\n"
  1082.              DESTROY bmb11
  1083.              DESTROY sam1
  1084.              PLUS msnion_goals_ 1
  1085.              SYSMESS 64
  1086.              PRINT msnion_goals_
  1087.              MESSAGE " \n"
  1088.  
  1089. > _      _    NOTZERO launc_missi_or_fire_missi_
  1090.              AT loc_2_5narau
  1091.              ABSENT grn3
  1092.              CARRIED msn7
  1093.              SET has_done_something_
  1094.              MESSAGE "Your missile destroys a Shenyang FC-31\n"
  1095.              DESTROY msn7
  1096.              DESTROY pln7
  1097.              PLUS msnion_goals_ 1
  1098.              SYSMESS 64
  1099.              PRINT msnion_goals_
  1100.              MESSAGE " \n"
  1101.  
  1102. > DROP   BOMB AT loc_2_5narau
  1103.              ISNOTAT grn2 255
  1104.              PRESENT grn3
  1105.              CARRIED bmb3
  1106.              SET has_done_something_
  1107.              MESSAGE "Your bomb destroys a MEADS missile silo\n"
  1108.              DESTROY bmb3
  1109.              DESTROY grn3
  1110.              PLUS msnion_goals_ 1
  1111.              SYSMESS 64
  1112.              PRINT msnion_goals_
  1113.              MESSAGE " \n"
  1114.  
  1115. > DROP   BOMB AT loc_2_5narau
  1116.              PRESENT grn2
  1117.              CARRIED bmb2
  1118.              SET has_done_something_
  1119.              MESSAGE "Your bomb destroys an Iron Dome missile silo\n"
  1120.              DESTROY bmb2
  1121.              DESTROY grn2
  1122.              PLUS msnion_goals_ 1
  1123.              SYSMESS 64
  1124.              PRINT msnion_goals_
  1125.              MESSAGE " \n"
  1126.  
  1127. > _      _    NOTZERO launc_missi_or_fire_missi_
  1128.              AT loc_3_2tonga
  1129.              ABSENT grn1
  1130.              CARRIED msn2
  1131.              SET has_done_something_
  1132.              MESSAGE "Your missile destroys a Sukhoi Su-35S\n"
  1133.              DESTROY msn2
  1134.              DESTROY pln2
  1135.              PLUS msnion_goals_ 1
  1136.              SYSMESS 64
  1137.              PRINT msnion_goals_
  1138.              MESSAGE " \n"
  1139.  
  1140. > DROP   BOMB AT loc_3_2tonga
  1141.              PRESENT grn1
  1142.              CARRIED bmb1
  1143.              SET has_done_something_
  1144.              MESSAGE "Your bomb destroys a MR-SAM missile silo\n"
  1145.              DESTROY grn1
  1146.              DESTROY bmb1
  1147.              PLUS msnion_goals_ 1
  1148.              SYSMESS 64
  1149.              PRINT msnion_goals_
  1150.              MESSAGE " \n"
  1151.  
  1152. > _      _    NOTZERO launc_missi_or_fire_missi_
  1153.              AT loc_4_1fiji
  1154.              ABSENT pln3
  1155.              CARRIED msn5
  1156.              SET has_done_something_
  1157.              MESSAGE "Your missile destroys a F-15EX Eagle II\n"
  1158.              DESTROY msn5
  1159.              DESTROY pln5
  1160.              PLUS msnion_goals_ 1
  1161.              SYSMESS 64
  1162.              PRINT msnion_goals_
  1163.              MESSAGE " \n"
  1164.  
  1165. > _      _    NOTZERO launc_missi_or_fire_missi_
  1166.              AT loc_4_1fiji
  1167.              ABSENT grn4
  1168.              CARRIED msn3
  1169.              SET has_done_something_
  1170.              MESSAGE "Your missile destroys a Eurofighter Typhoon\n"
  1171.              DESTROY msn3
  1172.              DESTROY pln3
  1173.              PLUS msnion_goals_ 1
  1174.              SYSMESS 64
  1175.              PRINT msnion_goals_
  1176.              MESSAGE " \n"
  1177.  
  1178. > DROP   BOMB AT loc_4_1fiji
  1179.              ISNOTAT grn4 255
  1180.              PRESENT grn5
  1181.              CARRIED bmb5
  1182.              SET has_done_something_
  1183.              MESSAGE "Your bomb destroys a HQ-9 missile silo\n"
  1184.              DESTROY bmb5
  1185.              DESTROY grn5
  1186.              PLUS msnion_goals_ 1
  1187.              SYSMESS 64
  1188.              PRINT msnion_goals_
  1189.              MESSAGE " \n"
  1190.  
  1191. > DROP   BOMB AT loc_4_1fiji
  1192.              PRESENT grn4
  1193.              CARRIED bmb4
  1194.              SET has_done_something_
  1195.              MESSAGE "Your bomb destroys a Aster 30 SAMP/T\n"
  1196.              DESTROY bmb4
  1197.              DESTROY grn4
  1198.              PLUS msnion_goals_ 1
  1199.              SYSMESS 64
  1200.              PRINT msnion_goals_
  1201.              MESSAGE " \n"
  1202.  
  1203. > _      _    NOTZERO launc_missi_or_fire_missi_
  1204.              AT loc_5_2java
  1205.              ABSENT grn6
  1206.              CARRIED msn9
  1207.              SET has_done_something_
  1208.              MESSAGE "Your missile destroys a J-20\n"
  1209.              DESTROY msn9
  1210.              DESTROY pln9
  1211.              PLUS msnion_goals_ 1
  1212.              SYSMESS 64
  1213.              PRINT msnion_goals_
  1214.              MESSAGE " \n"
  1215.  
  1216. > DROP   BOMB AT loc_5_2java
  1217.              ISNOTAT grn6 255
  1218.              PRESENT grn7
  1219.              CARRIED bmb7
  1220.              SET has_done_something_
  1221.              MESSAGE "Your bomb destroys a THAAD (Terminal High Altitude Area Defense) missile silo\n"
  1222.              DESTROY bmb7
  1223.              DESTROY grn7
  1224.              PLUS msnion_goals_ 1
  1225.              SYSMESS 64
  1226.              PRINT msnion_goals_
  1227.              MESSAGE " \n"
  1228.  
  1229. > DROP   BOMB AT loc_5_2java
  1230.              PRESENT grn6
  1231.              CARRIED bmb6
  1232.              SET has_done_something_
  1233.              MESSAGE "Your bomb destroys a MIM-104 Patriot\n"
  1234.              DESTROY bmb6
  1235.              DESTROY grn6
  1236.              PLUS msnion_goals_ 1
  1237.              SYSMESS 64
  1238.              PRINT msnion_goals_
  1239.              MESSAGE " \n"
  1240.  
  1241. > _      _    NOTZERO drop_nuke_or_fire_nuke_
  1242.              AT loc_4_4air
  1243.              CARRIED nuke
  1244.              SET has_done_something_
  1245.              MESSAGE "You always wanted to see that a nuke can do. You drop the nuke and everything is destroyed!!!! You wish you had another nuke!\n"
  1246.              ;MESSAGE 9 ;nuke
  1247.              PROCESS 11
  1248.              DESTROY nuke
  1249.              DESTROY pln8
  1250.              DESTROY pln10
  1251.              DESTROY pln11
  1252.              DESTROY pln6
  1253.              DESTROY pln4
  1254.              DESTROY old02
  1255.              DESTROY aircarrier
  1256.              PLUS msnion_goals_ 1
  1257.              PLUS msnion_goals_ 1
  1258.              PLUS msnion_goals_ 1
  1259.              PLUS msnion_goals_ 1
  1260.              PLUS msnion_goals_ 1
  1261.              PLUS msnion_goals_ 1
  1262.              SYSMESS 64
  1263.              PRINT msnion_goals_
  1264.              MESSAGE " \n"
  1265.  
  1266. > DROP   BOMB AT loc_4_4air
  1267.              ABSENT pln11
  1268.              CARRIED bmb13
  1269.              SET has_done_something_
  1270.              MESSAGE "Your missile destroys the Air Carrier\n"
  1271.              DESTROY aircarrier
  1272.              DESTROY bmb13
  1273.              PLUS msnion_goals_ 1
  1274.              SYSMESS 64
  1275.              PRINT msnion_goals_
  1276.              MESSAGE " \n"
  1277.  
  1278. > _      _    NOTZERO launc_missi_or_fire_missi_
  1279.              AT loc_4_4air
  1280.              ABSENT pln10
  1281.              CARRIED msn11
  1282.              SET has_done_something_
  1283.              MESSAGE "Your missile destroys a F-35 Lightning II\n"
  1284.              DESTROY msn11
  1285.              DESTROY pln11
  1286.              PLUS msnion_goals_ 1
  1287.              SYSMESS 64
  1288.              PRINT msnion_goals_
  1289.              MESSAGE " \n"
  1290.  
  1291. > _      _    NOTZERO launc_missi_or_fire_missi_
  1292.              AT loc_4_4air
  1293.              ABSENT pln8
  1294.              CARRIED msn10
  1295.              SET has_done_something_
  1296.              MESSAGE "Your missile destroys a Sukhoi Su-57\n"
  1297.              DESTROY msn10
  1298.              DESTROY pln10
  1299.              PLUS msnion_goals_ 1
  1300.              SYSMESS 64
  1301.              PRINT msnion_goals_
  1302.              MESSAGE " \n"
  1303.  
  1304. > _      _    NOTZERO launc_missi_or_fire_missi_
  1305.              AT loc_4_4air
  1306.              ABSENT pln6
  1307.              CARRIED msn8
  1308.              SET has_done_something_
  1309.              MESSAGE "Your missile destroys a F-22 Raptor\n"
  1310.              DESTROY msn8
  1311.              DESTROY pln8
  1312.              PLUS msnion_goals_ 1
  1313.              SYSMESS 64
  1314.              PRINT msnion_goals_
  1315.              MESSAGE " \n"
  1316.  
  1317. > _      _    NOTZERO launc_missi_or_fire_missi_
  1318.              AT loc_4_4air
  1319.              ISNOTAT pln4 255
  1320.              PRESENT pln6
  1321.              CARRIED msn6
  1322.              SET has_done_something_
  1323.              MESSAGE "Your missile destroys a Sukhoi Su-35S\n"
  1324.              DESTROY msn6
  1325.              DESTROY pln6
  1326.              PLUS msnion_goals_ 1
  1327.              SYSMESS 64
  1328.              PRINT msnion_goals_
  1329.              MESSAGE " \n"
  1330.  
  1331. > _      _    NOTZERO launc_missi_or_fire_missi_
  1332.              AT loc_4_4air
  1333.              PRESENT pln4
  1334.              CARRIED msn4
  1335.              SET has_done_something_
  1336.              MESSAGE "Your missile destroys a Dassault Rafale\n"
  1337.              DESTROY msn4
  1338.              DESTROY pln4
  1339.              PLUS msnion_goals_ 1
  1340.              SYSMESS 64
  1341.              PRINT msnion_goals_
  1342.              MESSAGE " \n"
  1343.  
  1344. > _      _    NOTZERO launc_missi_or_fire_missi_
  1345.              AT loc_4_4air
  1346.              PRESENT old02
  1347.              CARRIED mso02
  1348.              SET has_done_something_
  1349.              MESSAGE "You have become so good that with one missile you also destroy : a formation containing 2 MKs 24 Spitfires , 1 Soviet Yakovlev Yak-3 , 2 P-47D Thunderbolts and a P-38J Lightning  \n"
  1350.              DESTROY mso02
  1351.              DESTROY old02
  1352.              PLUS msnion_goals_ 1
  1353.              SYSMESS 64
  1354.              PRINT msnion_goals_
  1355.              MESSAGE " \n"
  1356.  
  1357. > _      _    NOTZERO drop_rock_or_throw_rock_
  1358.              PRESENT tom_cruise
  1359.              AT loc5_5boss
  1360.              ABSENT pln12
  1361.              CARRIED rock
  1362.              SET has_done_something_
  1363.              MESSAGE "You drop the rock right in the head of Tom Cruise. There will not be another Top-Gun in the next 36 years!\n"
  1364.              DESTROY rock
  1365.              DESTROY tom_cruise
  1366.              PLUS msnion_goals_ 1
  1367.              SYSMESS 64
  1368.              PRINT msnion_goals_
  1369.              MESSAGE " \n"
  1370.  
  1371. > _      _    NOTZERO launc_missi_or_fire_missi_
  1372.              AT loc5_5boss
  1373.              ABSENT grn10
  1374.              CARRIED msn12
  1375.              SET has_done_something_
  1376.              MESSAGE "Your missile destroys a F-35 Lightning II\n"
  1377.              DESTROY msn12
  1378.              DESTROY pln12
  1379.              PLUS msnion_goals_ 1
  1380.              SYSMESS 64
  1381.              PRINT msnion_goals_
  1382.              MESSAGE " \n"
  1383.  
  1384. > DROP   BOMB AT loc5_5boss
  1385.              ISNOTAT grn9 255
  1386.              PRESENT grn10
  1387.              CARRIED bmb10
  1388.              SET has_done_something_
  1389.              MESSAGE "Your bomb destroys a S-500 Prometheus Range\n"
  1390.              DESTROY bmb10
  1391.              DESTROY grn10
  1392.              PLUS msnion_goals_ 1
  1393.              SYSMESS 64
  1394.              PRINT msnion_goals_
  1395.              MESSAGE " \n"
  1396.  
  1397. > DROP   BOMB AT loc5_5boss
  1398.              ISNOTAT grn8 255
  1399.              PRESENT grn9
  1400.              CARRIED bmb9
  1401.              SET has_done_something_
  1402.              MESSAGE "Your bomb destroys a S-400 Triumph\n"
  1403.              DESTROY bmb9
  1404.              DESTROY grn9
  1405.              PLUS msnion_goals_ 1
  1406.              SYSMESS 64
  1407.              PRINT msnion_goals_
  1408.              MESSAGE " \n"
  1409.  
  1410. > DROP   BOMB AT loc5_5boss
  1411.              PRESENT grn8
  1412.              CARRIED bmb8
  1413.              SET has_done_something_
  1414.              MESSAGE "Your bomb destroys a S-300VM (Antey-2500)\n"
  1415.              DESTROY bmb8
  1416.              DESTROY grn8
  1417.              PLUS msnion_goals_ 1
  1418.              SYSMESS 64
  1419.              PRINT msnion_goals_
  1420.              MESSAGE " \n"
  1421.  
  1422. > _      _    NOTZERO launc_missi_or_fire_missi_
  1423.              AT loc5_5boss
  1424.              PRESENT old03
  1425.              CARRIED mso03
  1426.              SET has_done_something_
  1427.              MESSAGE "With one missile you destroy : a formation containing 2 MKs 24 Spitfires , 1 Soviet Yakovlev Yak-3 , 2 P-47D Thunderbolts and a P-38J Lightning  \n"
  1428.              DESTROY mso03
  1429.              DESTROY old03
  1430.              PLUS msnion_goals_ 1
  1431.              SYSMESS 64
  1432.              PRINT msnion_goals_
  1433.              MESSAGE " \n"
  1434.  
  1435. > _      _    NOTZERO drop_nuke_or_fire_nuke_
  1436.              AT loc5_5boss
  1437.              CARRIED nuke
  1438.              SET has_done_something_
  1439.              MESSAGE "You decide it's more fun TO nuke them all! You drop the nuke AND you see all the enemy base destroyed. The evil Tom Cruise is gone! There won't be another Top Gun sequel for the next 36 years!\n"
  1440.              ;MESSAGE 9
  1441.              PROCESS 11
  1442.              DESTROY nuke
  1443.              DESTROY tom_cruise
  1444.              DESTROY old03
  1445.              DESTROY grn8
  1446.              DESTROY grn9
  1447.              DESTROY pln12
  1448.              DESTROY grn10
  1449.              PLUS msnion_goals_ 1
  1450.              PLUS msnion_goals_ 1
  1451.              PLUS msnion_goals_ 1
  1452.              PLUS msnion_goals_ 1
  1453.              PLUS msnion_goals_ 1
  1454.              PLUS msnion_goals_ 1
  1455.              SYSMESS 64
  1456.              PRINT msnion_goals_
  1457.              MESSAGE " \n"
  1458.  
  1459. > CUBAN  EIGHT SET has_done_something_
  1460.              MESSAGE "You perform an amazing Cuban Eight Maneuver : This maneuver consists of a 5of8ths loop to the 45-degree line, then a half roll, a three-quarter loop again to the 45-degree line, then a half roll, and a quick 1of8 loop to the flight level.  \n"
  1461.  
  1462. > STALL  TURN SET has_done_something_
  1463.              MESSAGE "You perform an amazing Stall Turn : The torque/gyroscopic effect of this maneuver is what makes it so thrilling to watch.  To start, the pilot completes a quarter loop to vertical. As airspeed decreases, the pilot applies the rudder so the aircraft rotates around the yaw axis. This causes the nose to point to the ground, and there's a pause made, drawing the vertical flight line down AND making a quarter loop TO level flight. Despite being called a "Stall Turn," the aircraft doesn't really stall. What happens here is that gyroscopic forces caused by the propeller during the rate of yaw produce a rolling movement. Keeping the aircraft under control during this maneuver is challenging, and requires expert skill. \n"
  1464.  
  1465. > OUTSI  LOOP SET has_done_something_
  1466.              MESSAGE "You perform an outside loop : This was the figure that test pilot and aviation pioneer Jim Doolittle proved as technically possible back in the early 1920's, despite many aeronautical engineers claiming it was impossible. The pilot enters a vertical circle from straight, level flight, its canopy pointing out OF the loop, AND drops. What makes this so challenging is that it creates powerful negative G forces.\n"
  1467.  
  1468. > FAILI  LEAF SET has_done_something_
  1469.               MESSAGE "You perform a Failing Leaf : There are many different roll variations TO choose from, but our pick is the rolling leaf. With the throttle off, the wings level stall, AND the plane begins TO slip into one direction. The pilot THEN counters the slip with the rudder before a TRUE spin occurs, so it slips back the other direction, like a leaf. Countering with the rudder again slides it back, AND the pilot can THEN CONTINUE this slip AND slide motion OR simply dive TO EXIT into the next maneuver.\n"
  1470.  
  1471. > REVER  TURN SET has_done_something_
  1472.               MESSAGE "You perform a reverse turn\n"
  1473.  
  1474. > X      APPLE ZERO has_done_something_
  1475.               PRESENT apple
  1476.               MESSAGE "Delicious.\n"
  1477.               DONE
  1478.  
  1479. > X      TROLL ZERO has_done_something_
  1480.               PRESENT troll
  1481.               MESSAGE "Hungry.\n"
  1482.               DONE
  1483.  
  1484. > X      BANAN ZERO has_done_something_
  1485.               PRESENT banana
  1486.               MESSAGE "Maybe you will need it.\n"
  1487.               DONE
  1488.  
  1489. > X      BANA1 ZERO has_done_something_
  1490.               PRESENT bana1
  1491.               MESSAGE "Maybe you will need it.\n"
  1492.               DONE
  1493.  
  1494. > X      ROCK1 ZERO has_done_something_
  1495.               PRESENT rock1
  1496.               MESSAGE "Maybe you will need it.\n"
  1497.               DONE
  1498.  
  1499. > X      ROCK ZERO has_done_something_
  1500.               PRESENT rock
  1501.               MESSAGE "Maybe you will need it.\n"
  1502.               DONE
  1503.  
  1504. > X      OLD01 ZERO has_done_something_
  1505.               PRESENT old01
  1506.               MESSAGE "Ready TO fire.\n"
  1507.               DONE
  1508.  
  1509. > X      SAM1 ZERO has_done_something_
  1510.               PRESENT sam1
  1511.               MESSAGE "Ready TO fire.\n"
  1512.               DONE
  1513.  
  1514. > X      SAM2 ZERO has_done_something_
  1515.               PRESENT sam2
  1516.               MESSAGE "Ready TO fire.\n"
  1517.               DONE
  1518.  
  1519. > X      PLN1 ZERO has_done_something_
  1520.               PRESENT pln1
  1521.               MESSAGE "Ready TO fire.\n"
  1522.               DONE
  1523.  
  1524. > X      GRN1 ZERO has_done_something_
  1525.               PRESENT grn1
  1526.               MESSAGE "Ready TO fire.\n"
  1527.               DONE
  1528.  
  1529. > X      PLN2 ZERO has_done_something_
  1530.               PRESENT pln2
  1531.               MESSAGE "Ready TO fire.\n"
  1532.               DONE
  1533.  
  1534. > X      GRN2 ZERO has_done_something_
  1535.               PRESENT grn2
  1536.               MESSAGE "Ready TO fire.\n"
  1537.               DONE
  1538.  
  1539. > X      GRN3 ZERO has_done_something_
  1540.               PRESENT grn3
  1541.               MESSAGE "Ready TO fire.\n"
  1542.               DONE
  1543.  
  1544. > X      PLN7 ZERO has_done_something_
  1545.               PRESENT pln7
  1546.               MESSAGE "Ready TO fire.\n"
  1547.               DONE
  1548.  
  1549. > X      GRN4 ZERO has_done_something_
  1550.               PRESENT grn4
  1551.               MESSAGE "Ready TO fire.\n"
  1552.               DONE
  1553.  
  1554. > X      GRN5 ZERO has_done_something_
  1555.               PRESENT grn5
  1556.               MESSAGE "Ready TO fire.\n"
  1557.               DONE
  1558.  
  1559. > X      PLN5 ZERO has_done_something_
  1560.               PRESENT pln5
  1561.               MESSAGE "Ready TO fire.\n"
  1562.               DONE
  1563.  
  1564. > X      PLN3 ZERO has_done_something_
  1565.               PRESENT pln3
  1566.               MESSAGE "Ready TO fire.\n"
  1567.               DONE
  1568.  
  1569. > X      GRN6 ZERO has_done_something_
  1570.               PRESENT grn6
  1571.               MESSAGE "Ready TO fire.\n"
  1572.               DONE
  1573.  
  1574. > X      GRN7 ZERO has_done_something_
  1575.               PRESENT grn7
  1576.               MESSAGE "Ready TO fire.\n"
  1577.               DONE
  1578.  
  1579. > X      PLN9 ZERO has_done_something_
  1580.               PRESENT pln9
  1581.               MESSAGE "Ready TO fire.\n"
  1582.               DONE
  1583.  
  1584. > X      AIRCA ZERO has_done_something_
  1585.               PRESENT aircarrier
  1586.               MESSAGE "Ready TO fire.\n"
  1587.               DONE
  1588.  
  1589. > X      PLN4 ZERO has_done_something_
  1590.               PRESENT pln4
  1591.               MESSAGE "Ready TO fire.\n"
  1592.               DONE
  1593.  
  1594. > X      PLN6 ZERO has_done_something_
  1595.               PRESENT pln6
  1596.               MESSAGE "Ready TO fire.\n"
  1597.               DONE
  1598.  
  1599. > X      PLN8 ZERO has_done_something_
  1600.               PRESENT pln8
  1601.               MESSAGE "Ready TO fire.\n"
  1602.               DONE
  1603.  
  1604. > X      PLN10 ZERO has_done_something_
  1605.               PRESENT pln10
  1606.               MESSAGE "Ready TO fire.\n"
  1607.               DONE
  1608.  
  1609. > X      PLN11 ZERO has_done_something_
  1610.               PRESENT pln11
  1611.               MESSAGE "Ready TO fire.\n"
  1612.               DONE
  1613.  
  1614. > X      OLD02 ZERO has_done_something_
  1615.               PRESENT old02
  1616.               MESSAGE "Ready TO fire.\n"
  1617.               DONE
  1618.  
  1619. > X      GRN8 ZERO has_done_something_
  1620.               PRESENT grn8
  1621.               MESSAGE "Ready TO fire.\n"
  1622.               DONE
  1623.  
  1624. > X      GRN9 ZERO has_done_something_
  1625.               PRESENT grn9
  1626.               MESSAGE "Ready TO fire.\n"
  1627.               DONE
  1628.  
  1629. > X      GRN10 ZERO has_done_something_
  1630.               PRESENT grn10
  1631.               MESSAGE "Ready TO fire.\n"
  1632.               DONE
  1633.  
  1634. > X      PLN12 ZERO has_done_something_
  1635.               PRESENT pln12
  1636.               MESSAGE "Ready TO fire.\n"
  1637.               DONE
  1638.  
  1639. > X      OLD03 ZERO has_done_something_
  1640.               PRESENT old03
  1641.               MESSAGE "Ready TO fire.\n"
  1642.               DONE
  1643.  
  1644. > X      BMB1 ZERO has_done_something_
  1645.               PRESENT bmb1
  1646.               MESSAGE "Delicious.\n"
  1647.               DONE
  1648.  
  1649. > X      BMB2 ZERO has_done_something_
  1650.               PRESENT bmb2
  1651.               MESSAGE "Delicious.\n"
  1652.               DONE
  1653.  
  1654. > X      BMB3 ZERO has_done_something_
  1655.               PRESENT bmb3
  1656.               MESSAGE "Delicious.\n"
  1657.               DONE
  1658.  
  1659. > X      BMB4 ZERO has_done_something_
  1660.               PRESENT bmb4
  1661.               MESSAGE "Delicious.\n"
  1662.               DONE
  1663.  
  1664. > X      BMB5 ZERO has_done_something_
  1665.               PRESENT bmb5
  1666.               MESSAGE "Delicious.\n"
  1667.               DONE
  1668.  
  1669. > X      BMB6 ZERO has_done_something_
  1670.               PRESENT bmb6
  1671.               MESSAGE "Delicious.\n"
  1672.               DONE
  1673.  
  1674. > X      BMB7 ZERO has_done_something_
  1675.               PRESENT bmb7
  1676.               MESSAGE "Delicious.\n"
  1677.               DONE
  1678.  
  1679. > X      BMB8 ZERO has_done_something_
  1680.               PRESENT bmb8
  1681.               MESSAGE "Delicious.\n"
  1682.               DONE
  1683.  
  1684. > X      BMB9 ZERO has_done_something_
  1685.               PRESENT bmb9
  1686.               MESSAGE "Delicious.\n"
  1687.               DONE
  1688.  
  1689. > X      BMB10 ZERO has_done_something_
  1690.               PRESENT bmb10
  1691.               MESSAGE "Delicious.\n"
  1692.               DONE
  1693.  
  1694. > X      BMB11 ZERO has_done_something_
  1695.               PRESENT bmb11
  1696.               MESSAGE "Delicious.\n"
  1697.               DONE
  1698.  
  1699. > X      BMB12 ZERO has_done_something_
  1700.               PRESENT bmb12
  1701.               MESSAGE "Delicious.\n"
  1702.               DONE
  1703.  
  1704. > X      BMB13 ZERO has_done_something_
  1705.               PRESENT bmb13
  1706.               MESSAGE "Delicious.\n"
  1707.               DONE
  1708.  
  1709. > X      MSN1 ZERO has_done_something_
  1710.               PRESENT msn1
  1711.               MESSAGE "Delicious.\n"
  1712.               DONE
  1713.  
  1714. > X      MSN2 ZERO has_done_something_
  1715.               PRESENT msn2
  1716.               MESSAGE "Delicious.\n"
  1717.               DONE
  1718.  
  1719. > X      MSN3 ZERO has_done_something_
  1720.               PRESENT msn3
  1721.               MESSAGE "Delicious.\n"
  1722.               DONE
  1723.  
  1724. > X      MSN4 ZERO has_done_something_
  1725.               PRESENT msn4
  1726.               MESSAGE "Delicious.\n"
  1727.               DONE
  1728.  
  1729. > X      MSN5 ZERO has_done_something_
  1730.               PRESENT msn5
  1731.               MESSAGE "Delicious.\n"
  1732.               DONE
  1733.  
  1734. > X      MSN6 ZERO has_done_something_
  1735.               PRESENT msn6
  1736.               MESSAGE "Delicious.\n"
  1737.               DONE
  1738.  
  1739. > X      MSN7 ZERO has_done_something_
  1740.               PRESENT msn7
  1741.               MESSAGE "Delicious.\n"
  1742.               DONE
  1743.  
  1744. > X      MSN8 ZERO has_done_something_
  1745.               PRESENT msn8
  1746.               MESSAGE "Delicious.\n"
  1747.               DONE
  1748.  
  1749. > X      MSN9 ZERO has_done_something_
  1750.               PRESENT msn9
  1751.               MESSAGE "Delicious.\n"
  1752.               DONE
  1753.  
  1754. > X      MSN10 ZERO has_done_something_
  1755.               PRESENT msn10
  1756.               MESSAGE "Delicious.\n"
  1757.               DONE
  1758.  
  1759. > X      MSN11 ZERO has_done_something_
  1760.               PRESENT msn11
  1761.               MESSAGE "Delicious.\n"
  1762.               DONE
  1763.  
  1764. > X      MSN12 ZERO has_done_something_
  1765.               PRESENT msn12
  1766.               MESSAGE "Delicious.\n"
  1767.               DONE
  1768.  
  1769. > X      MSO01 ZERO has_done_something_
  1770.               PRESENT mso01
  1771.               MESSAGE "Delicious.\n"
  1772.               DONE
  1773.  
  1774. > X      MSO02 ZERO has_done_something_
  1775.               PRESENT mso02
  1776.               MESSAGE "Delicious.\n"
  1777.               DONE
  1778.  
  1779. > X      MSO03 ZERO has_done_something_
  1780.               PRESENT mso03
  1781.               MESSAGE "Delicious.\n"
  1782.               DONE
  1783.  
  1784. > _      _    LT verb_ 13
  1785.               NOTDONE
  1786.  
  1787. > _      _    ZERO has_done_something_
  1788.               PROCESS 9
  1789.  
  1790. > _      _    ZERO has_done_something_
  1791.               NOTDONE
  1792.  
  1793.  
  1794. /PRO 6
  1795.  
  1796. ; SET the boundries FOR the main text window
  1797.  
  1798. > _       _     WINDOW 1
  1799. #ifdef "pcw"
  1800.                 BORDER  0
  1801. #endif
  1802. #ifdef "c64"
  1803.                 BORDER  0
  1804. #endif
  1805. #ifndef "notspeccy"
  1806.                 BORDER  0
  1807. #endif
  1808.                 WINAT   0       0
  1809. #ifdef "pcw"
  1810.                 INK 4
  1811.                 PAPER 0
  1812. #endif
  1813. #ifdef "c64"
  1814.                 INK 4
  1815.                 PAPER 0
  1816. #endif
  1817. #ifndef "notspeccy"
  1818.                 INK 4
  1819.                 PAPER 0
  1820. #endif
  1821. #ifdef "pcw"
  1822.                 WINSIZE 33      127
  1823. #endif
  1824. #ifdef "c64"
  1825.                 WINSIZE 25      127
  1826. #endif
  1827. #ifndef "notspeccy"
  1828.                 WINSIZE 25      127
  1829. #endif
  1830.                 CLS
  1831.  
  1832.                 CLEAR   255
  1833.  
  1834. > _       _     NOTEQ   255     29 ; 29 = GFlags
  1835.                 CLEAR   @255
  1836.  
  1837. > _       _     PLUS    255     1
  1838.                 LT      255     255
  1839.                 SKIP    -2
  1840.  
  1841. > _       _     RESET
  1842.                 LET 17 255 ; Mark the graphics view as dirty
  1843.                 LET     52 10 ; Strength
  1844.                 LET     items_carryable_  10 ; Max Carry
  1845.                 SET     46 ; CPNoun
  1846.                 SET     47 ; CPAdject
  1847.                 GOTO    0
  1848.  
  1849. /PRO 7
  1850.  
  1851. > _      _    PAUSE 50
  1852.               MESSAGE " +-++-++-+ +-++-++-+ +-+\n"
  1853.               MESSAGE " |T  O  P| |G  U  N   2|\n"
  1854.               MESSAGE " +-++-++-+ +-++-++-+ +-+\n"
  1855.               MESSAGE "   MaveRick Dangerous !\n"
  1856.               MESSAGE " BY Firelord Quality Games\n"              
  1857.               PROCESS process_anykey
  1858.               CLS
  1859.               MESSAGE "You are a flight instructor.\n"
  1860.             ;SAM    PROCESS 14
  1861.             ;OldPlanes      PROCESS 13
  1862.             ;Nuke  PROCESS 11
  1863.             ;AirCarrier  PROCESS 12
  1864. ;            MESSAGE 10
  1865. ;            MESSAGE 11
  1866. ;              MESSAGE 9
  1867. ;             MESSAGE "mes 8 \n" MES 8              
  1868. ;              MESSAGE "AAAAAAAAAAA"
  1869. ;              MESSAGE "mes 0 \n" MES 0
  1870. ;              MESSAGE "mes 1 \n" MES 1
  1871. ;              MESSAGE "mes 2 \n" MES 2
  1872. ;              MESSAGE "mes 3 \n" MES 3
  1873. ;              MESSAGE "mes 4 \n" MES 4
  1874. ;              MESSAGE "mes 5 \n" MES 5
  1875. ;              MESSAGE "mes 6 \n" MES 6
  1876. ;              MESSAGE "mes 7 \n" MES 7
  1877. ;              MESSAGE "AAAAAAAAAAA"
  1878. ;                 MESSAGE RANDOM 5
  1879. ;                 PRINT RANDOM 5
  1880.               INK 6
  1881.               MESSAGE "An unknown evil mastermind plans TO FILL the USA market with fake iPads. President AND the admirals summoned you TO help. You also must prove TO the noob pilots that you are the best! Your Goal : Destroy All the Enemies!\n"
  1882.  
  1883.  
  1884.               PROCESS process_anykey
  1885.               INK 3
  1886.               MESSAGE "Mission briefing:\n"
  1887.               MESSAGE "You will operate a highly automated drone manually. You can CONTROL it with the basic known commands! \n"
  1888.               PROCESS process_anykey
  1889.               INK 1
  1890.               MESSAGE "Mission briefing:\n"
  1891.               MESSAGE "We suspect enemy has many aircrafts that are protected BY Ground TO Air defence systems! Before you destroy a target you must destroy it's protectors!\n"
  1892.              INK 4
  1893.              MESSAGE "Good luck! Most of us here are counting on you! The other ones are in war room, designing 'Plan B'.\n"
  1894.              PROCESS process_anykey
  1895.  
  1896.  
  1897. /PRO 8
  1898.  
  1899. > _      _    ZERO dark_
  1900.              ABSENT 0
  1901.              LISTOBJ
  1902.  
  1903. > _      _    PRESENT 0
  1904.              LISTOBJ
  1905.  
  1906. > _      _    NEWLINE
  1907.  
  1908.  
  1909. /PRO 9
  1910.  
  1911. > I      _    SET has_done_something_
  1912.              NEWLINE
  1913.              OK
  1914.              NEWLINE
  1915.  
  1916. > LOOK   _    SET has_done_something_
  1917.              CLS
  1918.              RESTART
  1919.  
  1920. > X      _    SET has_done_something_
  1921.              SYSMESS 63
  1922.              DONE
  1923.  
  1924. > GET    ALL  DOALL 255
  1925.  
  1926. > GET    _    SET has_done_something_
  1927.              AUTOG
  1928.              DONE
  1929.  
  1930. > DROP   _    SET has_done_something_
  1931.              AUTOD
  1932.              DONE
  1933.  
  1934. > DROP   ALL  DOALL 254
  1935.  
  1936. > QUIT   _    SET has_done_something_
  1937.              QUIT
  1938.              GOTO 0
  1939.              END
  1940.              DONE
  1941.  
  1942. > SAVE   _    SET has_done_something_
  1943.              SAVE 0
  1944.              RESTART
  1945.  
  1946. > LOAD   _    SET has_done_something_
  1947.              LOAD 0
  1948.              RESTART
  1949.  
  1950. > LOOK   _    SET has_done_something_
  1951.              PLUS 29 128
  1952.              CLS
  1953.              RESTART
  1954.  
  1955.  
  1956. /PRO 10
  1957.  
  1958. > _       _   SAVEAT
  1959.              ANYKEY
  1960.              BACKAT
  1961.              SAVEAT
  1962. #ifdef "pcw"
  1963.              MESSAGE "                                                                                        "
  1964. #endif
  1965. #ifdef "c64"
  1966.              MESSAGE "                                        "
  1967. #endif
  1968. #ifndef "notspeccy"
  1969.              MESSAGE "                                          "
  1970. #endif
  1971.              BACKAT
  1972.  
  1973.  
  1974. ;-----------------------------------------------------------------------
  1975. ; Call it as PROCESS 11
  1976. /PRO 11
  1977. > _      _    ;INK 3
  1978.               ;MESSAGE "A"
  1979.               ;INK 4
  1980.               ;MESSAGE "B"
  1981.               ;INK 5
  1982.  
  1983. ; Nuke explosion
  1984. INK 2
  1985. MES "\n       ..-^~~~^-.."
  1986. MES "\n     .~           ~."
  1987. INK 3
  1988. MES "\n    (;:           :;)"
  1989. INK 2
  1990. MES "\n     (:           :)"
  1991. INK 3
  1992. MES "\n       ':.-   -.:'"
  1993. INK 2
  1994. MES "\n           | |"
  1995. MES "\n         (=====)"
  1996. MES "\n           | |"
  1997. MES "\n           | |"
  1998. MES "\n           | |"
  1999. MES "\n        ((     ))"
  2000. MES "\n"
  2001. INK 4
  2002.  
  2003. ; AIR CARRIER
  2004. /PRO 12
  2005.  
  2006. > _      _    ;INK 3
  2007.               ;MESSAGE "A"
  2008.               ;INK 4
  2009.               ;MESSAGE "B"
  2010.               ;INK 5
  2011. ; AIR CARRIER
  2012. MES "\n"
  2013. INK 3
  2014. MES "\n+-----------------------------+"
  2015. INK 3
  2016. MES "\n|--|-|--|-|--|-|--|-|--|-|--|-|-"
  2017. INK 7
  2018. MES "\n|-|-----------D|--|-----------|--|/"
  2019. INK 4
  2020. MES "\n|o o o o o o o o o o o o o o o o/"
  2021. INK 3
  2022. MES "\n|------------------------------/"
  2023. INK 5
  2024. MESSAGE "\n"
  2025. INK 4
  2026.  
  2027. ; Old airplanes
  2028. /PRO 13
  2029.  
  2030. > _      _    ;INK 3
  2031.               ;MESSAGE "A"
  2032.               ;INK 4
  2033.               ;MESSAGE "B"
  2034.               ;INK 5
  2035. ; Old01-03  -MESSAGE 1
  2036. INK 3
  2037. MESSAGE "          --|--"
  2038. MESSAGE "       *---o0o---*"
  2039. INK 4
  2040. MESSAGE "   --|-- "
  2041. MESSAGE "*---o0o---* "
  2042. INK 3
  2043. MESSAGE "          --|--"
  2044. MESSAGE "       *---o0o---*"
  2045. INK 4
  2046.  
  2047.  
  2048. ; Missile Silo
  2049. /PRO 14
  2050.  
  2051. > _      _    ;INK 3
  2052.               ;MESSAGE "A"
  2053.               ;INK 4
  2054.               ;MESSAGE "B"
  2055.               ;INK 5
  2056. ; Missile Silo  -MESSAGE 2
  2057.   INK 5
  2058.   MESSAGE "   |"
  2059.   INK 5
  2060.   MESSAGE "  | |"
  2061.  
  2062.   MESSAGE "  | |"
  2063.  
  2064.   MESSAGE " :| |:"
  2065.   INK 5
  2066.   MESSAGE "|:| |:|"
  2067.     INK 4
  2068.  
  2069. ;MESSAGE 7 MES 0 King kong
  2070.  
  2071.  
  2072. ;MESSAGE 4 : pln 1,2,5,7,9,3
  2073.  
  2074. ;MESSAGE 5 :pln 4,6,8
  2075.  
  2076. ;MESSAGE 6 : pln12
  2077.  
  2078.  
  2079. /END
  2080.  
Add Comment
Please, Sign In to add comment