home *** CD-ROM | disk | FTP | other *** search
/ 101 OnLy ThE BeSt GaMeS 7 / 101onlythebestgames7techexpresssoftware1996.iso / shootem / tanc / test.bak < prev    next >
Text File  |  1995-09-25  |  28KB  |  1,457 lines
  1.  
  2.  
  3. // testing
  4. :minus
  5. explosion=,-#1,     expbsmok.spr
  6. explosion=#1,-#1,   expbig.spr
  7. explosion=-#1,-#1,  expsred.spr
  8. explosion=-#1,,     expssmok.spr
  9. text=,,0,16,testing_down
  10. text=,,0,-16,testing_up
  11. score=1000;
  12. boss_wav=attack.wav;
  13. r
  14.  
  15.  
  16.  
  17. //*********************************
  18. :save_pcx
  19. external=1002
  20. r
  21.  
  22.  
  23. //*********************************
  24.  
  25. // shops
  26.  
  27. // repairs
  28. :171
  29. health=full
  30. set_map=,,70,71,66,67,68
  31. text=,,0,-48,All_Armour_Restored!
  32. text=,,0,+48,All_Armour_Restored!
  33. r
  34.  
  35. :170;    // fuel
  36. call=buy_repair
  37. transport=,-#1
  38. r
  39.  
  40. :buy_repair
  41. menu=200,100,@10,@2,money:
  42. Tune_up_________10
  43. New_parts_______20
  44. Strip_&_repair__50
  45. New_vehicle____100
  46. menu_end=buy_tune_up,buy_new_parts,buy_strip,buy_new_vehicle,!menu_r
  47. goto=buy_repair
  48.  
  49. :buy_tune_up; health=50;  r
  50. :buy_new_parts; health=100; r
  51. :buy_strip; health=250; r
  52. :buy_new_vehicle; health=full; r
  53.  
  54.  
  55. // get ammo
  56. :172
  57. external=1001
  58. set_map=,,70,71,66,67,68
  59. text=,,+32,0,___New_Weapon!^Press_QWERTY_to_use
  60. text=,,-32,0,___New_Weapon!^Press_QWERTY_to_use
  61. r
  62.  
  63.  
  64. // buy ammo
  65. call=buy_ammo
  66. transport=,-#1
  67. r
  68.  
  69. :buy_ammo
  70. menu=200,100,@13,@2,Money:
  71. penetrator_________10000
  72. heli_killer_________5000
  73. wall_blaster________2000
  74. uzi_________________1000
  75. menu_end=buy_penetrator,buy_heli_killer,buy_wall_blaster,buy_uzi,!menu_r
  76. r
  77.  
  78. :buy_uzi; main_shot=shtlitmi.rot; r
  79. :buy_wall_blaster; main_shot=shtmedmi.rot; r
  80. :buy_heli_killer; main_shot=shtwhitm.rot; r
  81. :buy_penetrator; main_shot=shtmetal.rot; r
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88. :rescue
  89. text=-60,,0,-16,pilot_rescued^____10000
  90. score=10000
  91. health=100
  92. wav=applause.wav
  93. @3=>1
  94. r
  95.  
  96.  
  97.  
  98. //*********************************
  99.  
  100. :start
  101. mix_sound=11025
  102.  
  103.  
  104.  
  105. //***********************************************************************
  106.  
  107. :start_game
  108. mod_off
  109. @load=default.@
  110.  
  111. game_over_bmp=title.bmp
  112.  
  113. cant_afford_wav=money.wav
  114. call=start_menu
  115.  
  116. :restart_game
  117.  
  118. @2=100000
  119. @3=0
  120.  
  121. // 0. grass
  122. block_connects=Grass
  123. 81,82,83; 75; 73,76; 80; 54,55,56; 63,58; 62,61; 57
  124. 70,71,66,67,68,70,71,66,67,68,70,71,66,67,68,70,71,66,67,68,64,65,69
  125. 59; 74; 78,79; 60
  126. 1,4,6; 256
  127. block_connects_end
  128.  
  129. // 1. trees
  130. block_connects=Trees
  131. 157; 158; 159; 160; 161; 162; 163; 164
  132. 165,166,167,168,169; 165;165;165;165
  133. -1; 64
  134. block_connects_end
  135.  
  136. // 2. red stuff
  137. block_connects=Red_stuff
  138. 110,111; 109; 104,105; 106; 92,93; 98; 94,95; 97
  139. 102,103,102,103,102,103,102,103,102,103,102,103,100,101
  140. 96; 108; 107; 99
  141. 3,7; 256
  142. block_connects_end
  143.  
  144. // 3. Sea
  145. block_connects=Sea
  146. 149,150; 148; 143,147; 144,146; 129,130; 135; 136,133,132; 137
  147. 138,139,138,139,138,139,138,139,140; 134; 145; 142; 131
  148. 7; 256
  149. block_connects_end
  150.  
  151. // 4. concrete
  152. block_connects=Airfield
  153. 30,5; 31,32; 33,34; 38,35,36; 38,35,36; 37; 39,40; 41,42,43
  154. 0,1; 0; 0; 0; 0
  155. 5; 256
  156. block_connects_end
  157.  
  158. // 5. Building
  159. block_connects=Building
  160. 19; 19,20,21,22; 23,24; 28; 28; 29; 25,26; 27
  161. 19; 19;19;19;19
  162. -1; 256
  163. block_connects_end
  164.  
  165. // 6. Road on grass
  166. road_block_connects=Road
  167. 112,117; 116,119; 114; 115; 112; 113; 118
  168. 7; 256
  169. block_connects_end
  170.  
  171. // 7. Road on red
  172. road_block_connects=Road/Bridge
  173. 120,121; 125,127; 122; 126; 123; 124; 120
  174. 6; 256
  175. block_connects_end
  176.  
  177.  
  178. block_hit_wav=69,blow.wav
  179. block_hit_wav=65,blow.wav
  180. block_hit_wav=64,blow.wav
  181.  
  182. block_hit_wav=100,blow.wav
  183. block_hit_wav=101,blow.wav
  184.  
  185.  
  186. block_hit_wav=35,blow.wav
  187. block_hit_wav=36,blow.wav
  188. block_hit_wav=37,blow.wav
  189. block_hit_wav=38,blow.wav
  190.  
  191. block_hit_wav=42,blow.wav
  192.  
  193. block_hit_wav=30,blow.wav
  194. block_hit_wav=31,blow.wav
  195.  
  196. // on ground heli/planes
  197. block_hit_wav=17,blow.wav
  198. block_hit_wav=88,blow.wav
  199. block_hit_wav=89,blow.wav
  200. block_hit_wav=90,blow.wav
  201. block_hit_wav=91,blow.wav
  202.  
  203. // big hanger
  204. block_hit_wav=9,blow.wav
  205.  
  206.  
  207.  
  208. //**************************************************************
  209.  
  210. block_power=9,1000
  211.  
  212.  
  213.  
  214.  
  215. //**************************************************************
  216. // damage imprints
  217.  
  218. // concrete hole
  219. imprint=0,44,47
  220. imprint=1,44,47
  221.  
  222. // grass hole
  223. imprint=70,72
  224. imprint=71,72
  225. imprint=66,72
  226. imprint=67,72
  227. imprint=68,72
  228. imprint=64,72
  229.  
  230.  
  231. //**************************************************************
  232. mod=chroxial.mod
  233.  
  234. death=death; game_over=game_over; exit_menu=start_game;
  235.  
  236. wobble_speed=16; wobble_min=32; mouse_friction=40;
  237.  
  238. skid=8; gravity_skid=8; gravity=0; flying_shots;
  239. rotate_accelerate=64; rotate_speed=1500
  240. hit_percent=100; rotation_sprites=0;
  241. shoot_macro=0
  242. shadow=1
  243.  
  244.  
  245. //*****************************************
  246. // declare sprites...
  247. animate_rate=800;
  248. rotation_sprites=2; 180_rotation;
  249. trail_speed=600
  250.     sprite=shtmetal.rot
  251.     sprite=shtmedmi.rot
  252.     sprite=shtwhitm.rot
  253.     sprite=shtlitmi.rot
  254. rotation_sprites=1
  255. fire_wav=uzishort.wav
  256.     sprite=shtlitbu.rot
  257. fire_wav=
  258.  
  259. rotation_sprites=1; 360_rotation;
  260. trail_speed=500
  261.     sprite=thetank.rot
  262.     sprite=empty.rot
  263. trail_speed=250
  264.     sprite=pldelgrn.rot;                // height=750
  265. //    sprite=plbigblk.rot   // boss: height=600
  266.     sprite=plblk.rot;                   // height=400
  267.     sprite=plsleath.rot;                // height=1000
  268.     sprite=planegrn.rot;                // height=500
  269.     sprite=plwhite.rot;                 // height=300
  270. rotation_sprites=2
  271.     sprite=heligrn.rot;                 // height=150
  272.     sprite=heliblk.rot;                 // height=250
  273.  
  274. rotation_sprites=0
  275.     sprite=expbsmok.spr
  276. animate_rate=800
  277.     sprite=trlwsmok.spr
  278. animate_rate=400
  279.     sprite=expsred.spr
  280. animate_rate=500
  281.     sprite=expbig.spr
  282. animate_rate=1000
  283.     sprite=expssmok.spr
  284.  
  285. rotation_sprites=1
  286.  
  287.  
  288. //*****************************************
  289. // declare macros...
  290.  
  291. macro_reset=1
  292.     macro=plcircr.m
  293.     macro=plup.m
  294.     macro=pldown.m
  295.  
  296.     macro=plcircl.m
  297.     macro=plright.m
  298.     macro=plleft.m
  299.     macro=plcircl.m
  300.  
  301.     macro=beacon.m
  302.  
  303. macro_reset=0
  304.     macro=frright.m
  305.     macro=frleft.m
  306.  
  307.  
  308. //*****************************************
  309. // trails...
  310.  
  311. block_trail=66,expsred.spr
  312. block_trail=70,
  313. block_trail=71,
  314.  
  315.  
  316.  
  317. //*****************************************
  318. // explosions...
  319.  
  320. start_explosion=expbsmok.spr
  321. end_explosion=expbig.spr
  322. hit_explosion=expsred.spr
  323.  
  324.  
  325. //mouse_trail=expbsmok.spr
  326. //mouse_trail_speed=400
  327.  
  328.  
  329. //*****************************************
  330.  
  331. hit_wav=blow.wav;
  332. //end_wav=attack.wav;
  333. //start_wav=lkyeah.wav;
  334.  
  335.  
  336.  
  337. //*****************************************
  338. // calls
  339.  
  340. key_call=12,minus;
  341. key_call=25,save_pcx;           // P=save pcx
  342. key_call=24,options;
  343.  
  344.  
  345.  
  346.  
  347.  
  348.  
  349. //*************************************************************************
  350. // da game!!!
  351.  
  352. trail=expbsmok.spr;
  353. fire_trail=expssmok.spr
  354. block_collide_wav=homer001.wav
  355. hit_percent=@1;
  356.  
  357.  
  358.  
  359. //rotate_accelerate=48
  360. //rotate_speed=500
  361. //height=500
  362. //rotation_sprites=0;
  363. //item=#54,#80,0,shtmetal.rot,pldelgrn.rot
  364. //rotation_sprites=1;
  365.  
  366. height=32
  367. item=#54,#78, 0,shtlitbu.rot,thetank.rot
  368. block_collide_wav=;
  369. rotation_sprites=0;
  370. health_sprite=bldrepai.spr;
  371. //health_sprite=revdash.spr;
  372.  
  373.  
  374. //*******************************
  375. // baddies
  376.  
  377. fire_trail=expssmok.spr
  378.  
  379. no_trail
  380. hit_percent=300
  381.  
  382. height=500
  383. //item=#0054,#0080,plcircl.m,shtlitmi.rot,pldelgrn.rot
  384.  
  385.  
  386. //*********************
  387. // helis...
  388.  
  389.  
  390. //**********
  391. height=160
  392.  
  393. // heli around airport buildings
  394. item=#0050,#0079,follow,shtlitmi.rot,heligrn.rot
  395. item=#0056,#0082,follow,shtlitmi.rot,heligrn.rot
  396.  
  397. // heli around ace pilot
  398. item=#0047,#34,plcircbl.m,shtlitmi.rot,heligrn.rot
  399. item=#0037,#34,plcircbl.m,shtlitmi.rot,heligrn.rot
  400.  
  401. // heli guarding
  402. item=#64,#73,plcircr.m,shtlitmi.rot,heligrn.rot
  403.  
  404. // guarding ammo
  405. item=#55,#88,plcircr.m,shtlitmi.rot,heligrn.rot
  406.  
  407. // guard bunkers
  408. item=#84,#72,plcircr.m,shtlitmi.rot,heligrn.rot
  409.  
  410.  
  411. //***** black helis...
  412. height=250
  413. no_trail
  414.  
  415. fire_trail=trlwsmok.spr
  416. // guard pilots on desert
  417. item=#72,#54,plcircr.m,shtmedmi.rot,heliblk.rot
  418.  
  419. item=#95,#97,plcircr.m,shtmedmi.rot,heliblk.rot
  420.  
  421.  
  422.  
  423. //**********
  424. height=500
  425. trail=expbsmok.spr
  426. fire_trail=expssmok.spr
  427.  
  428. // planes guarding somethings
  429. item=#41,#42,plcircbl.m,shtlitmi.rot,plblk.rot
  430.  
  431. // guarding ship wreck
  432. item=#61,#59,plcircbl.m,shtlitmi.rot,plblk.rot
  433.  
  434. // guard pilots on desert
  435. item=#66,#45,pldown.m,shtlitmi.rot,plblk.rot
  436. item=#68,#64,plup.m,shtlitmi.rot,plblk.rot
  437.  
  438.  
  439. //**********
  440. height=1000
  441.  
  442.  
  443. fire_trail=trlwsmok.spr
  444. // guarding sleaths
  445. sleath=1
  446. no_trail
  447. item=#89,#80,plcircbl.m,shtwhitm.rot,plsleath.rot
  448. sleath=0
  449.  
  450.  
  451.  
  452.  
  453. //*************************************************************************
  454. // calls
  455.  
  456. call=#65,#65,bridge1;
  457. call=#69,#65,bridge2;
  458. call=#76,#103,bridge3;
  459. call=#63,#32,bridge4
  460. call=#61,#40,#62,#47,bridge5
  461.  
  462. call=#54,#76,out_of_airport;
  463. call=#39,#90,to_bl_island1;
  464. call=#31,#90,to_bl_island2;
  465.  
  466. call=#42,#98,save_pilot1;
  467. call=#48,#41,save_pilot2;
  468. call=#53,#93,#54,#93,save_pilot3;       // save 2 pilots on desert
  469. call=#62,#104,#64,#106,save_pilot4;     // save heli pilots(bottom map border)
  470. call=#28,#27,save_pilot5;               // save heli next to river
  471. call=#25,#23,save_pilot6;               // save heli next to river
  472. call=#26,#19,save_pilot7;               // save heli next to river
  473. call=#28,#80,#29,#83,save_pilot8;       // save pilots in desert
  474. call=#35,#73,#40,#77,save_pilot9;
  475. call=#22,#66,#29,#74,save_pilot10;
  476. call=#23,#83,#24,#85,save_pilot11;
  477. call=#22,#60,#24,#65,save_pilot12;
  478. call=#22,#34,#25,#38,save_pilot13;
  479. call=#52,#51,save_pilot14
  480. call=#54,#45,save_pilot15
  481. call=#41,#51,#47,#52,save_pilot16
  482. call=#41,#51,#47,#52,save_pilot17
  483. call=#42,#19,#47,#20,save_pilot18
  484. call=#59,#47,#61,#48,save_pilot19
  485.  
  486. call=#39,#34,ace_pilot1;                // rescue ace pilot
  487. call=#64,#71,#66,#74,protect_fuel;      // protect fuel supply
  488. call=#33,#66,#34,#72,trapped;           // trap person
  489.  
  490. call=#28,#48,#30,#51,protect_ammo1;
  491. call=#27,#44,protect_ammo2;             // kill the guy getting the ammo!
  492. call=#56,#36,protect_ammo3
  493. call=#56,#35,protect_ammo4
  494.  
  495.  
  496.  
  497. //****** right side of river
  498. call=#82,#60,#84,#69,air_strip;         // air strip guard
  499. call=#87,#69,#92,#76,heli_pad;          // protect heli pad
  500. call=#84,#80,#88,#82,protect_sleath;    // protect sleaths
  501.  
  502. call=#90,#91,bridge_b1;                 // bridge at bottom of map
  503. call=#89,#97,#91,#98,bridge_b2;         // after bridge
  504. call=#96,#99,bridge_b3;
  505. call=#96,#102,island_br1;               // bottom right island
  506. call=#91,#104,#92,#106,island_br2;
  507. call=#102,#103,#103,#106,island_br3;
  508.  
  509. call=#67,#77,#76,#84,save_pilot_br1;    // save pilots at bottom right
  510.  
  511.  
  512. //************* Forest
  513. call=#97,#52,#100,#56,forest1
  514. call=#98,#44,#101,#47,forest2
  515. call=#90,#37,forest3
  516. call=#93,#44,forest4
  517. call=#94,#50,forest5
  518. call=#84,#56,forest6
  519. call=#90,#52,forest7
  520. call=#77,#47,forest8
  521. call=#77,#43,forest9
  522. call=#82,#43,#84,#45,forest10
  523. call=#87,#47,forest11
  524. call=#90,#46,forest12
  525. call=#87,#42,forest13
  526. call=#82,#38,forest14
  527. call=#75,#38,#77,#39,forest15
  528. call=#79,#30,#81,#31,forest16
  529. call=#82,#27,forest17
  530. call=#85,#34,#86,#36,forest18
  531. call=#91,#31,forest19
  532.  
  533.  
  534. call=#94,#38,#96,#39,protect_repairs1
  535. call=#92,#55,protect_repairs2
  536. call=#74,#30,#77,#31,protect_repairs3
  537.  
  538. call=#100,#28,forest_end
  539.  
  540.  
  541. //*************************************************************************
  542. play
  543.  
  544.  
  545. //*************************************************************************
  546. // routines to make planes appear
  547.  
  548. // crossing bridges
  549. :bridge1
  550. height=500
  551. trail=expbsmok.spr
  552. fire_trail=expssmok.spr
  553. item=#0074,#0065,follow2,shtlitmi.rot,plblk.rot
  554. r
  555.  
  556. :bridge2
  557. height=500
  558. trail=expbsmok.spr
  559. fire_trail=expssmok.spr
  560. item=#0062,#0065,follow2,shtlitmi.rot,plblk.rot
  561. r
  562.  
  563. :bridge3
  564. height=400
  565. trail=expbsmok.spr
  566. fire_trail=expssmok.spr
  567. item=#84,#103,plright.m,shtlitbu.rot,plblk.rot
  568. item=#68,#103,plleft.m,shtlitbu.rot,plblk.rot
  569. r
  570.  
  571. :bridge4
  572. height=400
  573. trail=expbsmok.spr
  574. fire_trail=expssmok.spr
  575. item=+#8,,follow2,shtlitbu.rot,plblk.rot
  576. r
  577.  
  578. :bridge5
  579. height=400
  580. trail=expbsmok.spr
  581. fire_trail=expssmok.spr
  582. item=#61,-#8,pldown.m,shtlitbu.rot,plblk.rot
  583. item=#61,+#8,plup.m,shtlitbu.rot,plblk.rot
  584. r
  585.  
  586.  
  587.  
  588. //***********
  589. // coming out of 1st airport
  590. :out_of_airport
  591. height=400
  592. trail=expbsmok.spr
  593. fire_trail=expssmok.spr
  594. item=#46,#75,follow2,shtlitbu.rot,plblk.rot
  595. item=#63,#75,follow2,shtlitbu.rot,plblk.rot
  596. r
  597.  
  598. // going to bottom left island
  599. :to_bl_island1
  600. height=250
  601. no_trail
  602. fire_trail=trlwsmok.spr
  603. item=#33,#90,follow,shtmedmi.rot,heliblk.rot
  604. r
  605.  
  606. :to_bl_island2
  607. height=1000
  608. trail=expbsmok.spr
  609. fire_trail=trlwsmok.spr
  610. item=#23,#90,follow2,shtwhitm.rot,plsleath.rot
  611. item=#25,#90,plcircbl.m,shtwhitm.rot,plsleath.rot
  612.  
  613. height=250
  614. no_trail
  615. fire_trail=trlwsmok.spr
  616. item=#26,#93,follow,shtmedmi.rot,heliblk.rot
  617. item=#31,#93,plcircl.m,shtmedmi.rot,heliblk.rot
  618. item=#20,#89,follow,shtmedmi.rot,heliblk.rot
  619. r
  620.  
  621.  
  622.  
  623. // saving a pilot(bottom of map)
  624. :save_pilot1
  625. height=250
  626. no_trail
  627. item=#42,#105,follow,shtmedmi.rot,heliblk.rot
  628. r
  629.  
  630. // save pilot on desert(mid map)
  631. :save_pilot2
  632. height=400
  633. trail=expbsmok.spr
  634. fire_trail=expssmok.spr
  635. item=#48,#49,follow2,shtlitbu.rot,plblk.rot
  636. item=#48,#33,pldown.m,shtlitbu.rot,plblk.rot
  637. r
  638.  
  639. // save 2 pilots on desert
  640. :save_pilot3
  641. height=150
  642. trail=expbsmok.spr
  643. fire_trail=trlwsmok.spr
  644. item=#53,#100,follow,shtmedmi.rot,heligrn.rot
  645. item=#54,#100,follow,shtmedmi.rot,heligrn.rot
  646. r
  647.  
  648. // save heli pilots(bottom map border)
  649. :save_pilot4
  650. height=150
  651. no_trail
  652. fire_trail=trlwsmok.spr
  653. item=#70,#103,follow,shtmedmi.rot,heligrn.rot
  654. r
  655.  
  656. :save_pilot5
  657. height=750
  658. trail=expbsmok.spr
  659. fire_trail=trlwsmok.spr
  660. item=#28,#35,follow2,shtmedmi.rot,plblk.rot
  661. r
  662.  
  663. :save_pilot6
  664. height=750
  665. trail=expbsmok.spr
  666. fire_trail=trlwsmok.spr
  667. item=#32,#23,plleft.m,shtmedmi.rot,plblk.rot
  668. r
  669.  
  670. :save_pilot7
  671. height=750
  672. trail=expbsmok.spr
  673. fire_trail=trlwsmok.spr
  674. item=#34,#19,plleft.m,shtmedmi.rot,planegrn.rot
  675. r
  676.  
  677. // save pilots in desert
  678. :save_pilot8
  679. height=1000
  680. trail=expbsmok.spr
  681. fire_trail=trlwsmok.spr
  682. item=#28,#88,plup.m,shtwhitm.rot,plsleath.rot
  683. item=#28,#72,pldown.m,shtwhitm.rot,plsleath.rot
  684. r
  685.  
  686. :save_pilot9
  687. height=250
  688. no_trail
  689. fire_trail=trlwsmok.spr
  690. item=#37,#75,plcircr.m,shtmedmi.rot,heliblk.rot
  691. item=#35,#73,plcircr.m,shtmedmi.rot,heliblk.rot
  692. r
  693.  
  694. :save_pilot10
  695. height=750
  696. trail=expbsmok.spr
  697. fire_trail=trlwsmok.spr
  698. item=#30,#71,plcircbl.m,shtmedmi.rot,planegrn.rot
  699. item=#30,#68,plcircbl.m,shtmedmi.rot,planegrn.rot
  700. r
  701.  
  702. :save_pilot11
  703. set_map=#26,#83,100,101
  704. set_map=#26,#84,100,101
  705. height=750
  706. trail=expbsmok.spr
  707. fire_trail=trlwsmok.spr
  708. item=#22,#92,follow2,shtmedmi.rot,planegrn.rot
  709. item=#23,#76,follow2,shtmedmi.rot,planegrn.rot
  710. r
  711.  
  712. :save_pilot12
  713. height=750
  714. trail=expbsmok.spr
  715. fire_trail=trlwsmok.spr
  716. item=#23,+#8,follow2,shtmedmi.rot,planegrn.rot
  717. item=#22,-#8,follow2,shtmedmi.rot,planegrn.rot
  718. r
  719.  
  720. :save_pilot13
  721. height=750
  722. trail=expbsmok.spr
  723. fire_trail=trlwsmok.spr
  724. item=#22,#26,follow2,shtmedmi.rot,planegrn.rot
  725. item=#23,#27,pldown.m,shtmedmi.rot,planegrn.rot
  726. item=#24,#27,pldown.m,shtmedmi.rot,planegrn.rot
  727. item=#25,#26,follow2,shtmedmi.rot,planegrn.rot
  728. r
  729.  
  730. :save_pilot14
  731. height=1000
  732. trail=expbsmok.spr
  733. fire_trail=trlwsmok.spr
  734. item=#52,-#7,follow2,shtwhitm.rot,plsleath.rot
  735. r
  736.  
  737. :save_pilot15
  738. height=1000
  739. trail=expbsmok.spr
  740. fire_trail=trlwsmok.spr
  741. item=#53,#45,plcircr.m,shtwhitm.rot,plsleath.rot
  742. r
  743.  
  744. :save_pilot16
  745. height=1000
  746. trail=expbsmok.spr
  747. fire_trail=trlwsmok.spr
  748. item=#53,#45,plcircr.m,shtwhitm.rot,plsleath.rot
  749. r
  750.  
  751. :save_pilot17
  752. height=1000
  753. trail=expbsmok.spr
  754. fire_trail=trlwsmok.spr
  755. item=+#8,,follow2,shtwhitm.rot,plsleath.rot
  756. item=-#8,,follow2,shtwhitm.rot,plsleath.rot
  757. r
  758.  
  759. :save_pilot18
  760. height=400
  761. trail=expbsmok.spr
  762. fire_trail=expssmok.spr
  763. item=#42,-#8,follow2,shtlitbu.rot,plblk.rot
  764. item=#43,-#7,pldown.m,shtlitbu.rot,plblk.rot
  765. item=#44,-#6,follow2,shtlitbu.rot,plblk.rot
  766. item=#45,-#7,pldown.m,shtlitbu.rot,plblk.rot
  767. item=#46,-#8,follow2,shtlitbu.rot,plblk.rot
  768. r
  769.  
  770. :save_pilot19
  771. height=250
  772. no_trail
  773. fire_trail=trlwsmok.spr
  774. item=#61,#47,plcircl.m,shtmedmi.rot,heliblk.rot
  775. r
  776.  
  777.  
  778.  
  779.  
  780.  
  781. //************
  782.  
  783.  
  784. // rescue ace pilot trapped in red rocks
  785. :ace_pilot1
  786. height=600
  787. trail=expbsmok.spr
  788. fire_trail=expssmok.spr
  789. item=#47,#33,follow2,shtlitmi.rot,planegrn.rot
  790. item=#31,#34,follow2,shtlitmi.rot,planegrn.rot
  791. height=400
  792. item=#40,#41,plup.m,shtlitmi.rot,planegrn.rot
  793. item=#39,#27,pldown.m,shtlitmi.rot,planegrn.rot
  794. r
  795.  
  796.  
  797. :protect_fuel
  798. height=150
  799. no_trail
  800. fire_trail=expssmok.spr
  801. item=#63,#72,plcircbl.m,shtlitmi.rot,heligrn.rot
  802. r
  803.  
  804. // trap player in red blocks
  805. :trapped
  806. height=750
  807. trail=expbsmok.spr
  808. fire_trail=trlwsmok.spr
  809. item=#32,-#8,follow2,shtmedmi.rot,planegrn.rot
  810. item=#33,+#8,plup.m,shtmedmi.rot,planegrn.rot
  811. item=#34,-#8,follow2,shtmedmi.rot,planegrn.rot
  812.  
  813. set_map=#35,#66,100,101
  814. set_map=#35,#67,100,101
  815. set_map=#35,#68,100,101
  816. set_map=#35,#69,100,101
  817. set_map=#35,#70,100,101
  818. set_map=#35,#71,100,101
  819.  
  820. set_map=#36,#66,100,101
  821. set_map=#36,#67,100,101
  822. set_map=#36,#68,100,101
  823. set_map=#36,#69,100,101
  824. set_map=#36,#70,100,101
  825. set_map=#36,#71,100,101
  826.  
  827.  
  828. set_map=#30,#66,100,101
  829. set_map=#30,#67,100,101
  830. set_map=#30,#68,100,101
  831. set_map=#30,#69,100,101
  832. set_map=#30,#70,100,101
  833. set_map=#30,#71,100,101
  834.  
  835. set_map=#31,#66,100,101
  836. set_map=#31,#67,100,101
  837. set_map=#31,#68,100,101
  838. set_map=#31,#69,100,101
  839. set_map=#31,#70,100,101
  840. set_map=#31,#71,100,101
  841.  
  842. text=,,-16,0,Ha_Ha_Ha!!!
  843. text=,,16,0,Ha_Ha_Ha!!!
  844. wav=attack.wav
  845. r
  846.  
  847.  
  848. :protect_ammo1
  849. height=750
  850. trail=expbsmok.spr
  851. fire_trail=trlwsmok.spr
  852. item=#29,#43,pldown.m,shtmedmi.rot,planegrn.rot
  853. item=#30,#41,follow2,shtmedmi.rot,planegrn.rot
  854. item=#31,#42,pldown.m,shtmedmi.rot,planegrn.rot
  855. r
  856.  
  857. :protect_ammo2
  858. height=1000
  859. no_trail
  860. fire_trail=trlwsmok.spr
  861. item=,-#8,follow2,shtwhitm.rot,plsleath.rot
  862. item=,+#8,follow2,shtwhitm.rot,plsleath.rot
  863. item=+#8,,follow2,shtwhitm.rot,plsleath.rot
  864. item=-#8,,follow2,shtwhitm.rot,plsleath.rot
  865. r
  866.  
  867. :protect_ammo3
  868. height=400
  869. trail=expbsmok.spr
  870. fire_trail=expssmok.spr
  871. item=,-#7,follow2,shtlitbu.rot,plblk.rot
  872. r
  873.  
  874. :protect_ammo4
  875. height=400
  876. trail=expbsmok.spr
  877. fire_trail=expssmok.spr
  878. item=,+#8,follow2,shtlitbu.rot,plblk.rot
  879. r
  880.  
  881.  
  882.  
  883.  
  884.  
  885.  
  886.  
  887.  
  888.  
  889.  
  890. //*****************
  891. // 2nd airport(right side)
  892.  
  893. // guarding air strip
  894. :air_strip
  895. height=1000
  896. no_trail
  897. sleath=1
  898. fire_trail=trlwsmok.spr
  899. item=#82,-#8,follow2,shtwhitm.rot,plsleath.rot
  900. item=#83,+#8,follow2,shtwhitm.rot,plsleath.rot
  901. sleath=0
  902. r
  903.  
  904. // guard heli pad
  905. :heli_pad
  906. height=150
  907. no_trail
  908. fire_trail=expssmok.spr
  909. item=#87,#71,plcircr.m,shtlitmi.rot,heligrn.rot
  910. item=#87,#74,follow,shtlitmi.rot,heligrn.rot
  911. item=#90,#73,plcircr.m,shtlitmi.rot,heligrn.rot
  912. r
  913.  
  914.  
  915. :protect_sleath
  916. height=1000
  917. no_trail
  918. sleath=1
  919. fire_trail=trlwsmok.spr
  920. item=-#8,#80,follow2,shtwhitm.rot,plsleath.rot
  921. item=+#8,#81,follow2,shtwhitm.rot,plsleath.rot
  922. sleath=0
  923. r
  924.  
  925.  
  926. // OK!
  927. :bridge_b1
  928. height=400
  929. trail=expbsmok.spr
  930. fire_trail=expssmok.spr
  931. item=#90,#100,follow2,shtlitbu.rot,plblk.rot
  932. item=#90,#80,follow2,shtlitbu.rot,plblk.rot
  933. r
  934.  
  935. :bridge_b2
  936. height=400
  937. trail=expbsmok.spr
  938. fire_trail=expssmok.spr
  939. item=#84,#97,follow2,shtlitbu.rot,plblk.rot
  940. item=#96,#98,follow2,shtlitbu.rot,plblk.rot
  941. r
  942.  
  943. :bridge_b3
  944. height=400
  945. trail=expbsmok.spr
  946. fire_trail=expssmok.spr
  947. item=,#109,follow2,shtlitbu.rot,plblk.rot
  948. r
  949.  
  950. // OK!
  951. :island_br1
  952. height=400
  953. trail=expbsmok.spr
  954. fire_trail=trlwsmok.spr
  955. item=#85,#104,follow2,shtmedmi.rot,plwhite.rot
  956. item=#105,#103,plleft.m,shtmedmi.rot,plwhite.rot
  957. item=#105,#105,follow2,shtmedmi.rot,plwhite.rot
  958. r
  959.  
  960. :island_br2
  961. height=250
  962. no_trail
  963. fire_trail=trlwsmok.spr
  964. item=#87,#104,plcircr.m,shtmedmi.rot,heliblk.rot
  965.  
  966. :island_br3
  967. height=250
  968. no_trail
  969. fire_trail=trlwsmok.spr
  970. item=#104,#104,plcircr.m,shtmedmi.rot,heliblk.rot
  971. item=#104,#99,plcircr.m,shtmedmi.rot,heliblk.rot
  972. r
  973.  
  974.  
  975. :save_pilot_br1
  976. height=250
  977. no_trail
  978. fire_trail=trlwsmok.spr
  979. item=#66,#79,plcircr.m,shtmedmi.rot,heliblk.rot
  980. item=#67,#81,plcircr.m,shtmedmi.rot,heliblk.rot
  981. item=#69,#83,plcircr.m,shtmedmi.rot,heliblk.rot
  982. r
  983.  
  984.  
  985.  
  986.  
  987.  
  988.  
  989.  
  990.  
  991. //****************
  992. // forest
  993.  
  994. // start of forest
  995. :forest1
  996. start_explosion=;
  997.  
  998. height=600
  999. trail=expbsmok.spr
  1000. fire_trail=expssmok.spr
  1001. item=#98,#45,follow2,shtlitmi.rot,planegrn.rot
  1002. item=#97,#45,follow2,shtlitmi.rot,planegrn.rot
  1003. r
  1004.  
  1005. // jets from all sides
  1006. :forest2
  1007. height=600
  1008. trail=expbsmok.spr
  1009. fire_trail=expssmok.spr
  1010. item=#99,#37,pldown.m,shtlitmi.rot,planegrn.rot
  1011. item=#106,#45,plleft.m,shtlitmi.rot,planegrn.rot
  1012. item=#100,#52,plup.m,shtlitmi.rot,planegrn.rot
  1013. item=#93,#44,plright.m,shtlitmi.rot,planegrn.rot
  1014. r
  1015.  
  1016. :forest3
  1017. height=600
  1018. trail=expbsmok.spr
  1019. fire_trail=expssmok.spr
  1020. item=,+#7,follow2,shtlitmi.rot,planegrn.rot
  1021. r
  1022.  
  1023. :forest4
  1024. height=600
  1025. trail=expbsmok.spr
  1026. fire_trail=expssmok.spr
  1027. item=#94,#52,follow2,shtlitmi.rot,planegrn.rot
  1028. item=#93,#52,follow2,shtlitmi.rot,planegrn.rot
  1029. r
  1030.  
  1031. :forest5
  1032. height=600
  1033. trail=expbsmok.spr
  1034. fire_trail=expssmok.spr
  1035. item=,+#7,follow2,shtlitmi.rot,planegrn.rot
  1036. r
  1037.  
  1038. :forest6
  1039. height=600
  1040. trail=expbsmok.spr
  1041. fire_trail=expssmok.spr
  1042. item=-#7,,follow2,shtlitmi.rot,planegrn.rot
  1043. r
  1044.  
  1045. // ambush from above
  1046. :forest7
  1047. height=600
  1048. trail=expbsmok.spr
  1049. fire_trail=expssmok.spr
  1050. item=#89,#44,follow2,shtlitmi.rot,planegrn.rot
  1051. item=#90,#44,pldown.m,shtlitmi.rot,planegrn.rot
  1052. item=#91,#44,follow2,shtlitmi.rot,planegrn.rot
  1053. r
  1054.  
  1055. :forest8
  1056. height=600
  1057. trail=expbsmok.spr
  1058. fire_trail=expssmok.spr
  1059. item=,-#7,follow2,shtlitmi.rot,planegrn.rot
  1060. r
  1061.  
  1062. :forest9
  1063. height=600
  1064. trail=expbsmok.spr
  1065. fire_trail=expssmok.spr
  1066. item=+#7,,follow2,shtlitmi.rot,planegrn.rot
  1067. r
  1068.  
  1069. :forest10
  1070. height=600
  1071. trail=expbsmok.spr
  1072. fire_trail=expssmok.spr
  1073. item=#82,#51,follow2,shtlitmi.rot,planegrn.rot
  1074. item=#83,#51,follow2,shtlitmi.rot,planegrn.rot
  1075. r
  1076.  
  1077. :forest11
  1078. height=600
  1079. trail=expbsmok.spr
  1080. fire_trail=expssmok.spr
  1081. item=-#7,,follow2,shtlitmi.rot,planegrn.rot
  1082. r
  1083.  
  1084. :forest12
  1085. height=600
  1086. trail=expbsmok.spr
  1087. fire_trail=expssmok.spr
  1088. item=,-#7,follow2,shtlitmi.rot,planegrn.rot
  1089. r
  1090.  
  1091. :forest13
  1092. height=600
  1093. trail=expbsmok.spr
  1094. fire_trail=expssmok.spr
  1095. item=#84,#39,plcircr.m,shtlitmi.rot,planegrn.rot
  1096. r
  1097.  
  1098. :forest14
  1099. height=600
  1100. trail=expbsmok.spr
  1101. fire_trail=expssmok.spr
  1102. item=#73,#37,follow2,shtlitmi.rot,planegrn.rot
  1103. item=#73,#37,follow2,shtlitmi.rot,planegrn.rot
  1104. r
  1105.  
  1106. :forest15
  1107. height=600
  1108. trail=expbsmok.spr
  1109. fire_trail=expssmok.spr
  1110. item=#76,#30,follow2,shtlitmi.rot,planegrn.rot
  1111. r
  1112.  
  1113. :forest16
  1114. height=600
  1115. trail=expbsmok.spr
  1116. fire_trail=expssmok.spr
  1117. item=#79,#23,follow2,shtlitmi.rot,planegrn.rot
  1118. item=#78,#23,follow2,shtlitmi.rot,planegrn.rot
  1119. r
  1120.  
  1121. :forest17
  1122. height=600
  1123. trail=expbsmok.spr
  1124. fire_trail=expssmok.spr
  1125. item=#83,#35,follow2,shtlitmi.rot,planegrn.rot
  1126. item=#84,#35,follow2,shtlitmi.rot,planegrn.rot
  1127. r
  1128.  
  1129. :forest18
  1130. height=600
  1131. trail=expbsmok.spr
  1132. fire_trail=expssmok.spr
  1133. item=#92,#34,follow2,shtlitmi.rot,planegrn.rot
  1134. item=#92,#35,follow2,shtlitmi.rot,planegrn.rot
  1135. r
  1136.  
  1137. :forest19
  1138. height=600
  1139. trail=expbsmok.spr
  1140. fire_trail=expssmok.spr
  1141. item=,+#7,follow2,shtlitmi.rot,planegrn.rot
  1142. item=,+#16,follow2,shtlitmi.rot,planegrn.rot
  1143. r
  1144.  
  1145. // end of forest
  1146. :forest_end
  1147. height=600
  1148. trail=expbsmok.spr
  1149. fire_trail=expssmok.spr
  1150. item=#101,#20,follow2,shtlitmi.rot,planegrn.rot
  1151. item=#101,#12,follow2,shtlitmi.rot,planegrn.rot
  1152. r
  1153.  
  1154.  
  1155. :protect_repairs1
  1156. height=250
  1157. no_trail
  1158. fire_trail=trlwsmok.spr
  1159. item=#96,#36,plcircr.m,shtmedmi.rot,heliblk.rot
  1160. item=#95,#36,plcircl.m,shtmedmi.rot,heliblk.rot
  1161. r
  1162.  
  1163. :protect_repairs2
  1164. height=250
  1165. no_trail
  1166. fire_trail=trlwsmok.spr
  1167. item=#86,#56,plcircr.m,shtmedmi.rot,heliblk.rot
  1168.  
  1169. height=600
  1170. trail=expbsmok.spr
  1171. fire_trail=expssmok.spr
  1172. item=#90,#48,pldown.m,shtlitmi.rot,planegrn.rot
  1173. item=#80,#54,follow2,shtlitmi.rot,planegrn.rot
  1174. item=#80,#57,follow2,shtlitmi.rot,planegrn.rot
  1175. r
  1176.  
  1177. :protect_repairs3
  1178. height=250
  1179. no_trail
  1180. fire_trail=trlwsmok.spr
  1181. item=#73,#27,plcircr.m,shtmedmi.rot,heliblk.rot
  1182.  
  1183. height=600
  1184. trail=expbsmok.spr
  1185. fire_trail=expssmok.spr
  1186. item=#74,#20,follow2,shtlitmi.rot,planegrn.rot
  1187. item=#75,#20,follow2,shtlitmi.rot,planegrn.rot
  1188. r
  1189.  
  1190.  
  1191.  
  1192. //***************************************************************************
  1193. // misc routines
  1194.  
  1195. // starting menu
  1196. :start_menu
  1197. bmp=257,title.bmp
  1198. boss_wav=welcome.wav
  1199. menu=200,250
  1200. play_the_game!
  1201. high_scores
  1202. credits
  1203. options
  1204. exit
  1205. menu_end=!play_the_game,show_high_scores,credits,options_from_menu,!exit_game,!exit_game
  1206. goto=start_menu;
  1207.  
  1208. :menu_r
  1209. r;
  1210.  
  1211. :show_high_scores
  1212. high_scores=0,0,title.bmp;
  1213. r;
  1214.  
  1215. :credits
  1216. pcx=257,tank3d.pcx; any_key;
  1217. r;
  1218.  
  1219. :exit_game
  1220. //pcx=257,-tank-.pcx;
  1221. //any_key
  1222. @save=default.@
  1223. exit=0;
  1224.  
  1225.  
  1226.  
  1227. :play_the_game
  1228. external=1000,@4,start_menu,globe.spr
  1229. pcx=257,tank3d.pcx
  1230. menu=272,380,@11
  1231. easy
  1232. normal
  1233. hard
  1234. menu_end=easy_game,normal_game,hard_game,!play_the_game
  1235. r
  1236.  
  1237. :easy_game; @1=5; r;
  1238. :normal_game; @1=10; r;
  1239. :hard_game; @1=20; r;
  1240.  
  1241.  
  1242.  
  1243.  
  1244.  
  1245.  
  1246.  
  1247. //*******************************
  1248. :options_from_menu
  1249. bmp=257,title.bmp
  1250. :options
  1251. menu=200,250,@12
  1252. sound_on
  1253. sound_off
  1254. mix_at_11khz
  1255. mix_at_22khz
  1256. play_music
  1257. stop_music
  1258. calibrate_the_joystick
  1259. done
  1260. menu_end=sound_on,sound_off,11khz,22khz,music_on,music_off,calibrate,!menu_r,!menu_r
  1261. goto=options;
  1262.  
  1263. :sound_on; sound=1; r;
  1264. :sound_off; sound=0; r;
  1265. :11khz; mix_sound=11025; r;
  1266. :22khz; mix_sound=22050; r;
  1267. :music_on; mod_on; r
  1268. :music_off; mod_off; r
  1269. :calibrate; calibrate_joystick; r
  1270.  
  1271.  
  1272.  
  1273. //*******************************
  1274. // ending bits...
  1275.  
  1276. :death
  1277. pcx=257,-tank-.pcx
  1278. any_key
  1279. goto=restart_game
  1280.  
  1281. :game_over
  1282. pcx=257,-tank-.pcx
  1283. any_key
  1284. goto=start_game
  1285.  
  1286.  
  1287.  
  1288.  
  1289. //*******************************
  1290.  
  1291. // hits big plane hanger
  1292. :H9
  1293. hit_percent=100
  1294. fire_trail=trlwsmok.spr
  1295. trail=expsred.spr
  1296. trail_speed=250
  1297.  
  1298. rotation_sprites=1
  1299. height=600
  1300. 360_rotation
  1301. middle=0,256
  1302. boss_item=,-#8,follow2,shtmetal.rot,plbigblk.rot
  1303. rotation_sprites=0
  1304.  
  1305. fire_trail=expssmok.spr
  1306. hit_percent=300
  1307.  
  1308.  
  1309. set_map=,,44,47
  1310. explosion=,,expbig.spr
  1311. set_map=-#1,,47,44
  1312. explosion=-#1,,expbig.spr
  1313. set_map=+#1,,44,47
  1314. explosion=+#1,,expbig.spr
  1315.  
  1316. set_map=-#1,-#2,47,44
  1317. explosion=-#1,-#2,expbig.spr
  1318. set_map=,-#2,44,47
  1319. explosion=,-#2,expbig.spr
  1320. set_map=+#1,-#2,47,44
  1321. explosion=+#1,-#2,expbig.spr
  1322.  
  1323. set_map=-#1,-#1,44,47
  1324. explosion=-#1,-#1,expbig.spr
  1325. set_map=,-#1,47,44
  1326. explosion=,-#1,expbig.spr
  1327. set_map=+#1,-#1,44,47
  1328. explosion=+#1,-#1,expbig.spr
  1329.  
  1330. lives=1
  1331. text=-74,+#1,0,12,Extra_Life!!
  1332. text=-110,-#1,0,-12,Hanger_destroyed^___Watch_out!
  1333. text=-64,,-20,0,Watch_out!
  1334. text=-64,,+20,0,Watch_out!
  1335.  
  1336. boss_wav=attack.wav
  1337. r
  1338.  
  1339.  
  1340.  
  1341. // hitting rocks on grass
  1342. :H69
  1343. set_map=,,65
  1344. r
  1345. :H65
  1346. set_map=,,64
  1347. r
  1348. :H64
  1349. set_map=,,72
  1350. r
  1351.  
  1352. // hitting red stuff
  1353. :H100
  1354. :H101
  1355. set_map=,,102,103
  1356. r
  1357.  
  1358. // hitting ammo dumps
  1359. :H42
  1360. :H43
  1361. :H30
  1362. :H31
  1363. flash_explosion=256,600,+64
  1364. explosion=expbig.spr
  1365. set_map=,,48
  1366. :cache_score
  1367. score=1000
  1368. text=,,0,-16,Cache_blown!^___1000
  1369. r
  1370.  
  1371. :H37
  1372. :H38
  1373. flash_explosion=256,600,+64
  1374. explosion=expbig.spr
  1375. set_map=,,46
  1376. goto=cache_score
  1377.  
  1378. // hitting fence buildings
  1379. :H35
  1380. :H36
  1381. explosion=expbig.spr
  1382. set_map=,,46
  1383. r
  1384.  
  1385. // debris hit
  1386. :H48
  1387. set_map=,,46
  1388. r
  1389.  
  1390.  
  1391. // rescue pilots
  1392. :13
  1393. text=-100,+#1,0,+16,pilot_hospitalised
  1394. set_map=,,14,16,18
  1395. goto=rescue
  1396. :52
  1397. set_map=,,49
  1398. goto=rescue
  1399. :53
  1400. set_map=,,102,103
  1401. goto=rescue
  1402.  
  1403. // going into hanger switch thingy
  1404. :23
  1405. external=1003,32,600,thetank.rot,pldelgrn.rot
  1406. boss_wav=jetover.wav
  1407. r
  1408.  
  1409.  
  1410. // destroy helis on pad
  1411. :H17
  1412. score=4000
  1413. text=,,0,-16,Baddie_killed!^_____4000
  1414. explosion=expbig.spr
  1415. set_map=,,13
  1416. r
  1417.  
  1418. // destroy planes/helis on ground
  1419. :H88
  1420. :H89
  1421. :H90
  1422. :H91
  1423. score=4000
  1424. text=,,0,-16,Baddie_killed!^_____4000
  1425. explosion=expbig.spr
  1426. set_map=,,44,47
  1427. r
  1428.  
  1429. // bunkers
  1430. :H86
  1431. :H87
  1432. explosion=expbig.spr
  1433. set_map=,,48
  1434. score=2000
  1435. text=,,0,-16,Bunker_blown!^____2000
  1436. r
  1437.  
  1438.  
  1439.  
  1440.  
  1441.  
  1442.  
  1443. //*******************************
  1444. Variables...
  1445.  
  1446. @1      easy/medium/hard
  1447. @2      Money
  1448. @3      Pilots saved
  1449. @4      Place on globe you're at
  1450.  
  1451. Last selects...
  1452. @10  buy fuel
  1453. @11  easy,med...
  1454. @12  options
  1455. @13  ammo
  1456.  
  1457.