home *** CD-ROM | disk | FTP | other *** search
/ Computer Discount - Smash Disk / SmashDisk.bin / Cdc / cd / incoming / demo / _SETUP.1 / mission4.mdl < prev    next >
Encoding:
Text File  |  1997-12-02  |  49.8 KB  |  2,709 lines
  1. drag_coeff    0.01        
  2. gravity        2.2
  3.  
  4. ;-------------------------------------------------------
  5.  
  6. create hero "plfight"
  7.     label "plfight"
  8.     position 28317.6 -78 14188.3
  9.     forward -0.79 0 -0.61 up 0 1 0
  10.     armed_with "GREEN LASER"    rate 4
  11.     secondary_armed_with "ENERGY 1" rate 16 rounds 20
  12.     task
  13.         wait_until flag 0 set
  14.         playercontrols
  15.         position 28317.6 -78 14188.3
  16.     end
  17.  
  18.  
  19. create "mobspgun"
  20.     label "laser1"
  21.     position 23624 -553 15265.9
  22.     forward 0.8 0 0.5 up 0 1 0
  23.     armed_with "GREEN LASER" rate 3
  24.     inert
  25.  
  26. create "mobsprack"
  27.     position 23700 -524 14108.9
  28.     forward 0.5 0 0.8 up 0 1 0
  29.     armed_with "GUIDED MISSILE"    rate 32
  30.     task
  31.         slave_to "laser1"
  32.     end
  33.  
  34. create "mobspgun"
  35.     label "laser2"
  36.     position 34427.6 -1543 13849.6
  37.     forward 0.5 0 0.8 up 0 1 0
  38.     armed_with "GREEN LASER" rate 3
  39.     inert
  40.  
  41. create "mobsprack"
  42.     label "P8rack"
  43.     position 34427.6 -1514 12737.6
  44.     forward 0.5 0 0.8 up 0 1 0
  45.     armed_with "GUIDED MISSILE"    rate 32
  46. ;    task
  47. ;        slave_to "laser2"
  48. ;    end
  49.  
  50. ;-----------------small shields---------------------------
  51. createstatic "sshield"
  52. no_colide "ssgen1"
  53. die_with "ssgen1"
  54. position 29480.2 on ground 37826
  55.  
  56. createstatic "sshield"
  57. no_colide "ssgen3"
  58. die_with "ssgen3"
  59. position 40500.7 on ground 53144.5
  60.  
  61. createstatic "sshield"
  62. no_colide "ssgen4"
  63. die_with "ssgen4"
  64. position 39676.7 on ground 50949.5
  65.  
  66. createstatic "sshield"
  67. no_colide "ssgen5"
  68. die_with "ssgen5"
  69. position 38239.7 on ground 52529.5
  70.  
  71. createstatic "sshield"
  72. no_colide "ssgen6"
  73. die_with "ssgen6"
  74. position 47237 on ground 23138
  75.  
  76. createstatic "sshield"
  77. no_colide "ssgen7"
  78. die_with "ssgen7"
  79. position 48237 on ground 20938
  80.  
  81. createstatic "sshield"
  82. no_colide "ssgen8"
  83. die_with "ssgen8"
  84. position 46237 on ground 20938
  85.  
  86. ;-----------------big shields---------------------------
  87. createstatic "bshield"
  88. no_colide "bsgen1"
  89. die_with "bsgen1"
  90. position 31933.8 on ground 41342.7
  91.  
  92. createstatic "bshield"
  93. no_colide "bsgen2"
  94. die_with "bsgen4"
  95. position 31933.8 on ground 34102.7
  96.  
  97. createstatic "bshield"
  98. no_colide "bsgen3"
  99. die_with "bsgen3"
  100. position 34921.8 on ground 37720.7
  101.  
  102. createstatic "bshield"
  103. no_colide "bsgen4"
  104. die_with "bsgen2"
  105. position 20193.7 on ground 53659.2
  106.  
  107. createstatic "vbshield"
  108. no_colide "bsgen5"
  109. die_with "bsgen5"
  110. position 48847.8 on ground 53587.7
  111.  
  112. createstatic "bshield"
  113. no_colide "bsgen7"
  114. die_with "bsgen7"
  115. position 44309.5 on ground 47462.7
  116.  
  117. createstatic "bshield"
  118. no_colide "bsgen8"
  119. die_with "bsgen8"
  120. position 49081 on ground 36238.2
  121.  
  122. set_inert "bsgen5"
  123. set_inert "bsgen8"
  124.  
  125. set_inert "bsgen7"
  126. set_inert "ssgen3"
  127. set_inert "ssgen4"
  128. set_inert "ssgen5"
  129.  
  130. set_inert "ssgen6"
  131. set_inert "ssgen7"
  132. set_inert "ssgen8"
  133.  
  134. ;-------------------------------------------------------
  135. ;PHASE 1
  136. ;-------------------------------------------------------
  137.  
  138. phasestart
  139. clear_flag all
  140.  
  141. critical_group "ccentre"
  142.  
  143. phasemessage 60 60
  144. playcdslow
  145.  
  146. hud off
  147. camera
  148.     position 600 -300 -600 relative to "hero"
  149.     pointing_at "hero"
  150.     dolly 0
  151.     pause 1
  152.  
  153. procedure "P1e"
  154.     set_waypoint nearest "aland"
  155. end_procedure
  156.  
  157. procedure "P1a"
  158.     create "atank"
  159.         position 19067.7 on ground 22866.4
  160.  
  161.         towards "hero"
  162.         armed_with "ROCKET 1" rate 64
  163.         task
  164.             goto 23950.8 on ground 17849.9
  165.             do
  166.                 goto 26130.4 on ground 14266.9
  167.                 shoot "command4"
  168.                 goto 28348.1 on ground 13026.8
  169.                 shoot "command3"
  170.                 goto 27681.8 on ground 10495.8
  171.                 shoot "command1"
  172.                 goto 25091.8 on ground 11318.9
  173.                 shoot "command2"
  174.             forever
  175.         end
  176.     pause 75
  177. end_procedure terminate after 4 loops
  178.  
  179. pause 40
  180. set_flag 0
  181.  
  182. camera cockpit
  183.  
  184. #==================================
  185.  
  186. procedure "P1b"
  187.     wait_until number_of "aair"<2
  188.  
  189.     create "lfighter"
  190.         position 100 -3000 15000 relative toxz "hero"
  191.         towards "hero"
  192.         armed_with "RED LASER" rate 8
  193.         task
  194.             attack "hero"
  195.             break_task_if number_of "aland"=0
  196.             attack "command1"
  197.             attack "hero"
  198.             attack "command2"
  199.             attack "hero"
  200.             attack "command3"
  201.             attack "hero"
  202.             attack "command4"
  203.         end
  204.     pause 100
  205. end_procedure terminate after 4 loops
  206.  
  207.  
  208. procedure "P1c"
  209.     wait_until number_of "fighters"=0
  210.     create "hfighter"
  211.         position -5000 -3700 17000 relative toxz "hero"
  212.         towards "hero"
  213.         armed_with "PLASMA BOLT 1" rate 16
  214.         task
  215.             goto 0 -2000 0 relative to closest "aland"
  216.             do
  217.                 patrol
  218.                     point 0 -2000 0 relative to closest "aland"
  219.                     break_task_if distance_between me and "hero" <4000
  220.                     or number_of "aland"=0
  221.                 stop
  222.                 shoot "hero"
  223.             until number_of "aland" = 0
  224.             attack "hero"
  225.         end
  226.     pause 100
  227. do_procedure_until number_of "aland" = 0
  228.  
  229.  
  230. wait_until proc "P1a" terminated
  231. wait_until number_of "aland" = 0
  232. end_procedure "P1e"
  233.  
  234. procedure "P1e"
  235.     set_waypoint "command1"
  236.     wait_until "command1" destroyed
  237.  
  238.     set_waypoint "command2"
  239.     wait_until "command2" destroyed
  240.  
  241.     set_waypoint "command3"
  242.     wait_until "command3" destroyed
  243.  
  244.     set_waypoint "command4"
  245.     wait_until "command4" destroyed
  246.     clear_waypoint
  247. end_procedure
  248.  
  249. #==================================
  250. phasemessage 61 60
  251.  
  252. wait_until proc "P1b" terminated
  253. wait_until proc "P1c" terminated
  254.  
  255. wait_until number_of "fighters" = 0
  256. wait_until number_of "aair" = 0
  257. end_procedure "P1e"
  258. clear_waypoint
  259.  
  260. #==================================
  261. phasemessage 91 60
  262.  
  263. uncritical_group "ccentre"
  264.  
  265. pause 20
  266.  
  267. hud off
  268. camera
  269.     attached_to "hero"
  270.     position 600 -300 -600
  271.     pointing_at "hero"
  272.     dolly 1
  273.     dollyspeed 0.1%
  274. pause 80
  275.  
  276. set_inert "plfight"
  277.  
  278. ;-------------------------------------------------------
  279. ;PHASE 2
  280. ;-------------------------------------------------------
  281.  
  282. phasestart
  283. clear_flag all
  284.  
  285. phasemessage 2 60
  286.  
  287. create "hovertank"
  288.     label "P2hero"
  289.     position 24871 on ground 10309.6
  290.     forward 0.57 0 0.82 up 0 1 0
  291.     armed_with "RED LASER"    rate 4
  292.     secondary_armed_with "TRACER SHOT 1" rate 32 rounds 20
  293.  
  294.  
  295. switch_hero "P2hero"
  296.     task
  297.         wait_until flag 0 set
  298.         playercontrols
  299.             break_task_if flag 10 set
  300.     end
  301.  
  302.  
  303. create "bug"
  304.     label "P2bug"
  305.     position 27227.2 -500 14517.8
  306.     towards "hero"
  307.     armed_with "GREEN LASER"    rate 4
  308.     secondary_armed_with "DESIGNATOR" rate 128 rounds 20
  309.     inert
  310.     task
  311.         do
  312.             patrol
  313.                 point 1000 -1800 0 relative to "hero"
  314.                 break_task_if distance_between me and closest "aair" <6000
  315.             stop
  316.             shoot group "aair"
  317.         until flag 10 set
  318.         goto 0 -2000 0 relative to "hero"
  319.     end
  320.  
  321.  
  322.  
  323. create "alnadubs"
  324.     label "gun3"
  325.     position 26882.1 on ground 40742.8
  326.     forward 0 0 -1 up 0 1 0
  327.     armed_with "GREEN ENERGY LASER" rate 16
  328.     task
  329.         attack
  330.     end
  331.  
  332. create "alnadubs"
  333.     label "gun8"
  334.     position 25026.1 on ground 49973.9
  335.     forward 0 0 1 up 0 1 0
  336.     armed_with "GREEN ENERGY LASER" rate 16
  337.     task
  338.         attack
  339.     end
  340.  
  341.  
  342. hud off
  343. camera
  344.     position 600 -300 -600 relative to "hero"
  345.     pointing_at "hero"
  346. dolly 0
  347. pause 1
  348.  
  349. pause 40
  350. set_flag 0
  351.  
  352. camera cockpit
  353. #==================================
  354.  
  355. create "facraft"
  356.     position 22660.2 on ground 28148.3
  357.     towards "hero"
  358.     armed_with "RED LASER"    rate 4
  359.     task
  360.         wait_until distance_between me and "hero" < 7000
  361.         attack "hero"
  362.     end
  363.  
  364. create "facraft"
  365.     position 23689.4 on ground 22977
  366.     towards "hero"
  367.     armed_with "TRACER SHOT 1" rate 128
  368.     task
  369.         wait_until distance_between me and "hero" < 7000
  370.         attack "hero"
  371.     end
  372.  
  373.  
  374. create "facraft"
  375.     position 29410.6 on ground 23134.3
  376.     towards "hero"
  377.     armed_with "RED LASER"    rate 4
  378.     task
  379.         wait_until distance_between me and "hero" < 7000
  380.         attack "hero"
  381.     end
  382.  
  383.  
  384. procedure "P2wp"
  385.     set_waypoint nearest "aland"
  386. end_procedure
  387.  
  388.  
  389. procedure "P2a"
  390.     wait_until number_of "aair"=0
  391.     create "lfighter"
  392.         position 0 -3200 17000 relative to "hero"
  393.         towards "hero"
  394.         armed_with "RED LASER"    rate 4
  395.         task
  396.             attack "hero"
  397.         end
  398.  
  399.     pause 100
  400. end_procedure
  401.  
  402. wait_until distance_between "hero" and 26962.4 on ground 34777.2 <9000
  403. or number_of "aland"=0
  404.  
  405. procedure "P2b"
  406.     create "facraft"
  407.         position 12962.2 on ground 37364.2
  408.         towards "command1"
  409.         armed_with "RED LASER"    rate 4
  410.         task
  411.             goto 17585.1 on ground 31390.8
  412.             attack "hero"
  413.         end
  414.  
  415.     pause 150
  416. end_procedure terminate after 4 loops
  417.  
  418. wait_until proc "P2b" terminated
  419. wait_until number_of "aland" = 0
  420. end_procedure "P2wp"
  421.  
  422. phasemessage 21 60
  423.  
  424.  
  425. procedure "P2b"
  426.     set_waypoint nearest "agun"
  427. end_procedure
  428.  
  429. wait_until number_of "agun" = 0
  430. end_procedure "P2a"
  431. end_procedure "P2b"
  432. kill group "aair"
  433. clear_waypoint
  434. #==================================
  435. phasemessage 91 60
  436.  
  437. set_flag 10
  438. camera cockpit
  439. pause 60
  440.  
  441. ;-------------------------------------------------------
  442. ;PHASE 3
  443. ;-------------------------------------------------------
  444.  
  445. phasestart
  446.  
  447. clear_flag all
  448.  
  449. phasemessage 52 60
  450.  
  451. set_inert "bsgen1"
  452. set_inert "bsgen2"
  453. set_inert "bsgen3"
  454.  
  455. camera_task
  456.     hud off
  457.     cam_pos "hero"
  458.     cam_focus "P2bug"
  459.     dolly 1
  460.  
  461.     pause 150
  462.     cam_mode cockpit
  463.     set_flag 0
  464. end
  465.  
  466. switch_hero "P2bug"
  467.     task
  468.         goto 0 -3500 0 relative toxz "P2hero"
  469.             break_task_if flag 0 set
  470.         playercontrols
  471.         kill
  472.     end
  473. wait_until flag 0 set
  474. auto_aim "hero"
  475. kill "P2hero"
  476.  
  477. #==================================
  478. procedure "P3e"
  479.     wait_until "P2bld" destroyed
  480.  
  481.     camera_task
  482.         hud off
  483.         cam_pos -6000 -3500 0 attached_to "P2bld"
  484.         cam_focus "P2bld"
  485.         dolly 0
  486.         cam_goto 6000 -3500 0
  487.     end
  488.  
  489.     phasemessage 81 120
  490.  
  491.     explode group "aliens"
  492.     pause 50
  493.     explode group "aliens"
  494.     pause 50
  495.     camera cockpit         
  496. end_procedure terminate after 1 loops
  497.  
  498.  
  499. procedure "P3a"
  500.  
  501.     wait_until number_of "bomber" =0
  502.     create "lbomber"
  503.         position 10000 -3500 1000 relative toxz "pad2"
  504.         towards "pad2"
  505.         armed_with "PLASMA BOLT 1"    rate 24
  506.         task
  507.             do
  508.                 goto 0 -3500 0 relative toxz "hero"
  509.                     break_task_if distance_between me and "hero" < 3000
  510.                 shoot "hero"
  511.             forever
  512.         end
  513.     pause 75
  514. end_procedure terminate after 2 loops
  515.  
  516.  
  517. procedure "P3b"
  518.     create "lfighter"
  519.         position 2000 -9000 5000 relative toxz "pad2"
  520.         towards "pad2"
  521.         armed_with "PLASMA BOLT 3"    rate 0
  522.         task
  523.             goto 0 -4200 0 relative toxz "pad2"
  524.             do
  525.                 goto 27051.9 -3430.29 30302.5
  526.                 shoot "hero"
  527.                 goto 25602.4 -3346.02 41119.4
  528.                 shoot "hero"
  529.                 goto 32723.3 -3155.91 46495.4
  530.                 shoot "hero"
  531.                 goto 40765 -3081.51 39478.8
  532.                 shoot "hero"
  533.             forever
  534.  
  535.         end
  536.     pause 150
  537. end_procedure terminate after 4 loops
  538.  
  539.  
  540. wait_until proc "P3a" terminated
  541. wait_until number_of "aair" = 0
  542. wait_until number_of "bomber" = 0
  543. end_procedure "P3b"
  544.  
  545.  
  546. ;----------------
  547. ;-------1st pad
  548. phasemessage 62 60
  549. set_waypoint "bsgen4"
  550. wait_until "bsgen4" destroyed
  551.  
  552. phasemessage 63 60
  553. set_waypoint "pad2"
  554.  
  555. procedure "P3a"
  556.     wait_until number_of "fighters" <4
  557.     create "hfighter"
  558.         position 32110 -845 34375
  559.         towards 29449 -2943 31420
  560.         armed_with "RED LASER"    rate 4
  561.         task
  562.             goto 29449 -2943 31420
  563.             attack "hero"
  564.         end
  565.     pause 75
  566. end_procedure
  567.  
  568. wait_until "pad2" destroyed
  569. end_procedure "P3a"
  570. clear_waypoint
  571.  
  572. phasemessage 52 60
  573.  
  574. wait_until number_of "fighters"=0
  575.  
  576. ;----------------
  577. ;-------2nd pad
  578. set_volatile "bsgen1"
  579.  
  580. phasemessage 62 60
  581. set_waypoint "bsgen1"
  582. wait_until "bsgen1" destroyed
  583.  
  584. phasemessage 63 60
  585. set_waypoint "pad1"
  586.  
  587. procedure "P3a"
  588.     wait_until number_of "aair" <4
  589.     create "lfighter"
  590.         position 31867.9 -708.997 41033.6
  591.         towards 25677.8 -2929 41445.6
  592.         armed_with "RED LASER"    rate 4
  593.         task
  594.             goto 25677.8 -2929 41445.6
  595.             attack "hero"
  596.         end
  597.     pause 40
  598. end_procedure
  599.  
  600. wait_until "pad1" destroyed
  601. end_procedure "P3a"
  602. clear_waypoint
  603. phasemessage 52 60
  604. wait_until number_of "aair"=0
  605.  
  606.  
  607. ;----------------
  608. ;-------3rd pad
  609. set_volatile "bsgen3"
  610. phasemessage 62 60
  611. set_waypoint "bsgen3"
  612. wait_until "bsgen3" destroyed
  613.  
  614. phasemessage 64 60
  615. set_waypoint "pad3"
  616.  
  617. create "lfighter"
  618.     position 34681.9 -791.55 37772.7
  619.     towards 31512 -2193.67 35731
  620.     armed_with "GUIDED MISSILE"    rate 32
  621.     task
  622.         goto 31512 -2193.67 35731
  623.         attack "hero"
  624.     end
  625. pause 20
  626.  
  627. procedure "P3a"
  628.     wait_until number_of "aair" <6
  629.     create "lfighter"
  630.         position 34681.9 -791.55 37772.7
  631.         towards 31512 -2193.67 35731
  632.         armed_with "RED LASER"    rate 4
  633.         task
  634.             goto 31512 -2193.67 35731
  635.             attack "hero"
  636.         end
  637.     pause 20
  638. end_procedure
  639.  
  640. wait_until "pad3" destroyed
  641. end_procedure "P3a"
  642. clear_waypoint
  643. phasemessage 10 60
  644. wait_until number_of "aair"=0
  645.  
  646. procedure "P3a"
  647.     wait_until number_of "aair" <6
  648.     create "lfighter"
  649.         position 17000 -32000 500 relative toxz "hub1"
  650.         armed_with "RED LASER"    rate 4
  651.         task
  652.             attack "hero"
  653.         end
  654.     pause 75
  655. end_procedure
  656.  
  657. set_volatile "bsgen2"
  658. phasemessage 62 60
  659. set_waypoint "bsgen2"
  660. wait_until "bsgen2" destroyed
  661.  
  662. phasemessage 65 60
  663. set_waypoint "hub1"
  664. wait_until "hub1" destroyed
  665.  
  666. phasemessage 62 60
  667. set_waypoint "ssgen1"
  668. wait_until "ssgen1" destroyed
  669. end_procedure "P3e"
  670.  
  671. phasemessage 66 60
  672. set_waypoint "P2bld"
  673. wait_until "P2bld" destroyed
  674. clear_waypoint
  675.  
  676. phasemessage 24 60
  677.  
  678. end_procedure "P3a"
  679.  
  680. wait_until number_of "aair"=0
  681.  
  682. #==================================
  683. phasemessage 91 60
  684.  
  685. pause 20
  686.  
  687. hud off
  688. camera
  689.     attached_to "hero"
  690.     position 600 -300 -600
  691.     pointing_at "hero"
  692.     dolly 1
  693.     dollyspeed 0.1%
  694. pause 80
  695.  
  696.  
  697. ;-------------------------------------------------------
  698. ;PHASE 4
  699. ;-------------------------------------------------------
  700.  
  701. clear_flag all
  702.  
  703. phasemessage 67 120
  704. playcdfast
  705.  
  706. switch_hero "laser1"
  707.     task
  708.         wait_until flag 0 set
  709.         playercontrols
  710.     end
  711.  
  712. #==================================
  713.  
  714. create "lfighter"
  715.     label "P4alien1"
  716.     position 17000 -3200 0 relative toxz "H1"
  717.     armed_with "DESIGNATOR" rate 0
  718.     task
  719.         goto 7000 -2200 0 relative toxz "H1"
  720.         shoot "H1"
  721.         shoot "replen1"
  722.         goto -17000 -3200 0 relative toxz "H1"
  723.         kill
  724.     end
  725.  
  726. create "lfighter"
  727.     label "P4alien2"
  728.     position 17000 -3200 1500 relative toxz "H1"
  729.     armed_with "DESIGNATOR" rate 0
  730.     task
  731.         goto 3000 -2200 0 relative toxz "replen1"
  732.         shoot "replen1"
  733.         set_flag 0
  734.         goto -17000 -3200 0 relative toxz "H1"
  735.         kill
  736.     end
  737.  
  738. camera_task
  739.     hud off
  740.     cam_pos -1500 0 -1500 attached_to "P4alien1"
  741.     cam_focus "P4alien2"
  742.     dolly 0
  743.  
  744.     pause 100
  745.     cam_pos 1000 -1500 1500 attached_to "P4alien2"
  746.     cam_focus "P4alien1"
  747.     dolly 1
  748.  
  749.     pause 100
  750.  
  751.     cam_pos 0 -1000 0 relative to "hero"
  752.     cam_focus "command1"
  753.     cam_goto 7000 -1500 1000 relative to "command3"
  754. end
  755.  
  756. wait_until flag 0 set
  757. pause 150
  758.  
  759. camera
  760.     attached_to "hero"
  761.     position -600 -300 600
  762.     pointing_at "hero"
  763. dolly 0
  764. pause 40
  765.  
  766. camera cockpit
  767.  
  768. kill group "aair"
  769.  
  770. #==================================
  771. phasestart
  772. clear_flag all
  773. phasemessage 61 60
  774.  
  775. ;-------------------
  776. ;-------------wave 1
  777.  
  778. procedure "P4a"
  779.     create "lfighter"
  780.     position 18005.8 -2547.28 15095
  781.     towards "hero"
  782.     armed_with "RED LASER" rate 6
  783.     task
  784.         goto 25662.1 -2524.7 16144.9
  785.         goto 26377.9 -970.332 13115.6
  786.         shoot
  787.         goto 23453.2 -970.04 12283.5
  788.         shoot "hero"
  789.         goto 23629.6 -958.432 14836.3
  790.         attack "hero"
  791.             break_task_if vel < 2
  792.         explode
  793.     end
  794.     pause 50
  795. end_procedure terminate after 6 loops
  796.  
  797.  
  798. wait_until proc "P4a" terminated
  799. wait_until number_of "aair"<=3
  800.  
  801. ;-------------------
  802. ;-------------wave 2
  803. procedure "P4a"
  804.     create "lfighter"
  805.     position 23838.2 -160 22518.1
  806.     towards "hero"
  807.     armed_with "RED LASER" rate 6
  808.     task
  809.         goto 23795.5 -1197.95 20526.2
  810.         goto 23512.8 -1190.01 12990
  811.         goto 26952.5 -1173.41 9873.09
  812.         attack "command1"
  813.         attack "command2"
  814.         attack "command3"
  815.         attack "command4"
  816.         attack "hero"
  817.  
  818.     end
  819.     pause 50
  820. end_procedure terminate after 6 loops
  821.  
  822.  
  823. wait_until proc "P4a" terminated
  824. wait_until number_of "aair"<=3
  825.  
  826. ;-------------------
  827. ;-------------wave 3
  828.  
  829. phasemessage 49 60
  830.  
  831. procedure "P4a"
  832.     create "skimmer"
  833.     position 39016.9 on ground 7518.43
  834.     towards "hero"
  835.     armed_with "RED LASER" rate 6
  836.     task
  837.         goto 31770.9 on ground 9736.93
  838.         shoot
  839.  
  840.         goto 26688.1 on ground 13672.1
  841.         shoot "hero"
  842.         goto 25083.3 on ground 15841
  843.         shoot
  844.         goto 22046.8 on ground 20858.7
  845.         goto 17738 on ground 25989.1
  846.         kill
  847.     end
  848.     pause 50
  849. end_procedure terminate after 4 loops
  850.  
  851. create "bug"
  852.     position 18005.8 -2547.28 15095
  853.     towards "hero"
  854.     armed_with "BLUE LASER" rate 6
  855.     task
  856.         goto 26358.6 -1500 13491.8
  857.         pause 150
  858.         do
  859.             goto 29045 -1500 11323.4
  860.             shoot
  861.             goto 26358.6 -1500 13491.8
  862.             shoot
  863.         until number_of "aland"=0
  864.         attack
  865.         goto 18005.8 -2547.28 15095
  866.         kill
  867.     end
  868.  
  869.  
  870. wait_until proc "P4a" terminated
  871. wait_until number_of "aland"=0
  872.  
  873. #===============================
  874. phasemessage 67 80
  875.  
  876. create "lfighter"
  877.     label "P4badman"
  878.     position 17000 -3200 0 relative toxz "H2"
  879.     armed_with "DESIGNATOR" rate 0
  880.     inert
  881.     task
  882.         goto 3000 -2200 0 relative toxz "H2"
  883.         shoot "H2"
  884.         pause 1
  885.         set_flag 9
  886.         shoot "replen2"
  887.         goto 18005.8 -2547.28 15095
  888. ;        goto -17000 -3200 0 relative toxz "H2"
  889.         kill
  890.     end
  891.  
  892. wait_until flag 9 set
  893. pause 20
  894. set_volatile "P4badman"
  895.  
  896. wait_until number_of "aair"=0
  897.  
  898. ;-------------------
  899. ;-------------wave 4
  900. procedure "P4a"
  901.     create "lfighter"
  902.     position 17204.4 -613.22 6974.41
  903.     towards "hero"
  904.     armed_with "RED LASER" rate 6
  905.     task
  906.         goto 21011.5 -1112.41 8080.85
  907.         goto 23930.8 -1112.25 12082.2
  908.         goto 23609.7 -1110.4 17370.4
  909.         goto 27687.2 -1476.38 19280.5
  910.         attack "hero"
  911.     end
  912.     pause 50
  913. end_procedure terminate after 6 loops
  914.  
  915. wait_until proc "P4a" terminated
  916. wait_until number_of "aair"=0
  917.  
  918. ;-------------------
  919. ;-------------wave 5
  920. procedure "P4a"
  921.     create "lfighter"
  922.     position 37887.9 -1669.24 13338.5
  923.     towards "hero"
  924.     armed_with "RED LASER" rate 6
  925.     task
  926.         goto 35864.1 -2111 13519.3
  927.         goto 28705.9 -730.743 13358.9
  928.         attack "hero"
  929.     end
  930.     pause 50
  931. end_procedure terminate after 6 loops
  932.  
  933. wait_until proc "P4a" terminated
  934. wait_until number_of "aair"=0
  935.  
  936.  
  937. ;-------------------
  938. ;-------------wave 6
  939. procedure "P4a"
  940.     create "lfighter"
  941.     position 23838.2 -160 22518.1
  942.     towards "hero"
  943.     armed_with "RED LASER" rate 6
  944.     task
  945.         goto 23795.5 -1197.95 20526.2
  946.         goto 23512.8 -1190.01 12990
  947.         goto 26952.5 -1173.41 9873.09
  948.         attack "command1"
  949.         attack "command2"
  950.         attack "command3"
  951.         attack "command4"
  952.         attack "hero"
  953.  
  954.     end
  955.     pause 50
  956. end_procedure terminate after 6 loops
  957.  
  958.  
  959. wait_until proc "P4a" terminated
  960. wait_until number_of "aair"<=3
  961.  
  962.  
  963. ;-------------------
  964. ;-------------wave 7
  965.  
  966. procedure "P4a"
  967.     create "lfighter"
  968.     position 18005.8 -2547.28 15095
  969.     towards "hero"
  970.     armed_with "RED LASER" rate 6
  971.     task
  972.         goto 25662.1 -2524.7 16144.9
  973.         goto 26377.9 -970.332 13115.6
  974.         shoot
  975.         goto 23453.2 -970.04 12283.5
  976.         shoot "hero"
  977.         goto 23629.6 -958.432 14836.3
  978.         attack "hero"
  979.             break_task_if vel < 2
  980.         explode
  981.     end
  982.     pause 50
  983. end_procedure terminate after 6 loops
  984.  
  985.  
  986. wait_until proc "P4a" terminated
  987. wait_until number_of "aair"<=3
  988.  
  989.  
  990. ;-------------------
  991. ;-------------wave 8
  992. procedure "P4a"
  993.     create "lfighter"
  994.     position 37887.9 -1669.24 13338.5
  995.     towards "hero"
  996.     armed_with "RED LASER" rate 6
  997.     task
  998.         goto 35864.1 -2111 13519.3
  999.         goto 28705.9 -730.743 13358.9
  1000.         attack "hero"
  1001.     end
  1002.     pause 50
  1003. end_procedure terminate after 6 loops
  1004.  
  1005. wait_until proc "P4a" terminated
  1006. wait_until number_of "aair"=0
  1007.  
  1008.  
  1009. ;-------------------
  1010. ;-------------wave 9
  1011. procedure "P4a"
  1012.     create "lfighter"
  1013.     position 17204.4 -613.22 6974.41
  1014.     towards "hero"
  1015.     armed_with "RED LASER" rate 6
  1016.     task
  1017.         goto 21011.5 -1112.41 8080.85
  1018.         goto 23930.8 -1112.25 12082.2
  1019.         goto 23609.7 -1110.4 17370.4
  1020.         goto 27687.2 -1476.38 19280.5
  1021.         attack "hero"
  1022.     end
  1023.     pause 50
  1024. end_procedure terminate after 6 loops
  1025.  
  1026. wait_until proc "P4a" terminated
  1027. wait_until number_of "aair"=0
  1028.  
  1029.  
  1030.  
  1031. #==================================
  1032. phasemessage 91 60
  1033.  
  1034. pause 20
  1035.  
  1036. hud off
  1037. camera
  1038.     attached_to "hero"
  1039.     position 600 -300 -600
  1040.     pointing_at "hero"
  1041.     dolly 1
  1042.     dollyspeed 0.1%
  1043. pause 80
  1044.  
  1045. ;-------------------------------------------------------
  1046. ;PHASE 5
  1047. ;-------------------------------------------------------
  1048. clear_flag all
  1049. phasestart
  1050.  
  1051. set_volatile "bsgen7"
  1052. set_volatile "ssgen3"
  1053. set_volatile "ssgen4"
  1054. set_volatile "ssgen5"
  1055.  
  1056. phasemessage 15 60
  1057. playcdslow
  1058.  
  1059. create "alnadubs"
  1060.     label "gun5"
  1061.     position 42782.1 on ground 40742.8
  1062.     forward 0 0 -1 up 0 1 0
  1063.     armed_with "BLUE LASER" rate 16
  1064.     task
  1065.         attack
  1066.     end
  1067.  
  1068. create "alnadubs"
  1069.     label "gun6"
  1070.     position 43966 on ground 40633
  1071.     forward 0 0 1 up 0 1 0
  1072.     armed_with "BLUE LASER" rate 16
  1073.     task
  1074.         attack
  1075.     end
  1076.  
  1077. create "lance"
  1078.     label "P5hero"
  1079.     position 28638.6 -15 10823.3
  1080.     forward -0.58 0 0.81 up 0 1 0
  1081.     armed_with "PURPLE LASER" rate 2
  1082.     secondary_armed_with "GUIDED MISSILE" rate 32 rounds 20
  1083.     inert
  1084.  
  1085. switch_hero "P5hero"
  1086.     task
  1087.         wait_until flag 0 set
  1088.         playercontrols
  1089.     end
  1090.  
  1091. auto_aim "hero"
  1092.  
  1093. hud off
  1094. camera
  1095.     position 600 -300 -600 local to "hero"
  1096.     pointing_at "hero"
  1097.     dolly 0
  1098. pause 40
  1099. camera cockpit
  1100. set_flag 0
  1101.  
  1102. #==================================
  1103.  
  1104. create "Slowhovertank"
  1105.     label "P5ca"
  1106.     position 28780.1 on ground 16717.6
  1107.     towards 42535 on ground 30375.5
  1108.     armed_with "DESIGNATOR" rate 0
  1109.     inert
  1110.     mission_critical
  1111.     task
  1112.         goto 42535 on ground 30375.5
  1113.         goto 44032.9 on ground 41027.6
  1114.         goto 40512.6 on ground 45885.8
  1115.         shoot "bsgen7"
  1116.         #==================================
  1117.         goto 36498.5 on ground 49701.9
  1118.         shoot "ssgen4"
  1119.         shoot "ssgen5"
  1120.  
  1121.         #==================================
  1122.         goto 32536.2 on ground 55190.8
  1123.         goto 36616.2 on ground 55737.8
  1124.         goto 39239.4 on ground 55353.8
  1125.         shoot "ssgen3"
  1126.  
  1127.     end
  1128.  
  1129. create "Slowhovertank"
  1130.     position 0 0 -600 local to "P5ca"
  1131.     towards "P5ca"
  1132.     armed_with "DESIGNATOR" rate 0
  1133.     task
  1134.         goto 42535 on ground 30375.5
  1135.         goto 44032.9 on ground 41027.6
  1136.         goto 40512.6 on ground 45885.8
  1137.         shoot "bsgen7"
  1138.         #==================================
  1139.         goto 36498.5 on ground 49701.9
  1140.         shoot "ssgen4"
  1141.         shoot "ssgen5"
  1142.  
  1143.         #==================================
  1144.         goto 32536.2 on ground 55190.8
  1145.         goto 36616.2 on ground 55737.8
  1146.         goto 39239.4 on ground 55353.8
  1147.         shoot "ssgen3"
  1148.     end
  1149.  
  1150. create "Slowhovertank"
  1151.     position 0 0 -1200 local to "P5ca"
  1152.     towards "P5ca"
  1153.     armed_with "DESIGNATOR" rate 0
  1154.     task
  1155.         goto 42535 on ground 30375.5
  1156.         goto 44032.9 on ground 41027.6
  1157.         goto 40512.6 on ground 45885.8
  1158.         shoot "bsgen7"
  1159.         #==================================
  1160.         goto 36498.5 on ground 49701.9
  1161.         shoot "ssgen4"
  1162.         shoot "ssgen5"
  1163.  
  1164.         #==================================
  1165.         goto 32536.2 on ground 55190.8
  1166.         goto 36616.2 on ground 55737.8
  1167.         goto 39239.4 on ground 55353.8
  1168.         shoot "ssgen3"
  1169.     end
  1170.  
  1171.  
  1172. create "atank"
  1173.     label "P5ambush"
  1174.     position 39295.1 -878.048 30194.9
  1175.     towards "hero"
  1176.     armed_with "TRACER SHOT 1" rate 64
  1177.     task
  1178.         do
  1179.             goto -2000 0 2000 local to "P5ca"
  1180.             shoot
  1181.             goto -2000 0 -1000 local to "P5ca"
  1182.             shoot
  1183.             goto 2000 0 -1000 local to "P5ca"
  1184.             shoot
  1185.             goto 2000 0 2000 local to "P5ca"
  1186.             shoot
  1187.         forever
  1188.     end
  1189.  
  1190. create "atank"
  1191.     position 500 0 500 local to "P5ambush"
  1192.     towards "hero"
  1193.     armed_with "TRACER SHOT 1" rate 64
  1194.     task
  1195.         do
  1196.             goto 2000 0 3000 local to "P5ca"
  1197.             shoot
  1198.             goto 2000 0 -2000 local to "P5ca"
  1199.             shoot
  1200.             goto -2000 0 -2000 local to "P5ca"
  1201.             shoot
  1202.             goto -2000 0 3000 local to "P5ca"
  1203.             shoot
  1204.         forever
  1205.     end
  1206.  
  1207. create "atank"
  1208.     position 1500 0 1500 local to "P5ambush"
  1209.     towards "hero"
  1210.     armed_with "TRACER SHOT 1" rate 64
  1211.     task
  1212.         do
  1213.             goto -3000 0 4000 local to "P5ca"
  1214.             shoot
  1215.             goto -3000 0 -3000 local to "P5ca"
  1216.             shoot
  1217.             goto 3000 0 -3000 local to "P5ca"
  1218.             shoot
  1219.             goto 3000 0 4000 local to "P5ca"
  1220.             shoot
  1221.         forever
  1222.     end
  1223.  
  1224. #==================================
  1225. procedure "P5wp"
  1226.     set_waypoint nearest "aihover"
  1227. end_procedure
  1228.  
  1229. procedure "P5a"
  1230.     create "lfighter"
  1231.     position 39295.1 -878.048 30194.9
  1232.     towards "hero"
  1233.     armed_with "RED LASER" rate 8
  1234.     task
  1235.         goto 40522.4 -1897.23 28036.5
  1236. ;        goto 37358.1 -2288.97 24202.9
  1237.         attack "hero"
  1238.     end
  1239.     pause 50
  1240. end_procedure terminate after 8 loops
  1241.  
  1242. procedure "P5b"
  1243.     wait_until distance_between "P5ca" and "gun5" < 5000
  1244.     set_volatile "P5ca"
  1245. end_procedure
  1246.  
  1247.  
  1248. wait_until proc "P5a" terminated
  1249. wait_until number_of "aair"=0
  1250. wait_until number_of "aland"=0
  1251. end_procedure "P5wp"
  1252. end_procedure "P5b"
  1253. set_volatile "P5ca"
  1254.  
  1255. phasemessage 21 60
  1256.  
  1257. procedure "P5wp"
  1258.     set_waypoint nearest "agun"
  1259. end_procedure
  1260.  
  1261. wait_until number_of "agun"=0
  1262. end_procedure "P5wp"
  1263.  
  1264. clear_flag 1
  1265.  
  1266. procedure "P5a"
  1267.  
  1268.     wait_until number_of "aair"<2
  1269.     wait_until flag 1 set or "bsgen7" not destroyed
  1270.  
  1271.     create "lfighter"
  1272.         position 17000 -3200 500 relative toxz "hero"
  1273.         towards "hero"
  1274.         armed_with "RED LASER"    rate 4
  1275.         task
  1276.             attack "hero"
  1277.         end
  1278.     pause 20
  1279.     create "lfighter"
  1280.         position -17000 -3200 500 relative toxz "hero"
  1281.         towards "hero"
  1282.         armed_with "RED LASER"    rate 4
  1283.         task
  1284.             attack "hero"
  1285.         end
  1286.     pause 50
  1287.     clear_flag 1
  1288. end_procedure
  1289.  
  1290. set_flag 1
  1291. phasemessage 2 60
  1292.  
  1293.  
  1294. wait_until "bsgen7" destroyed
  1295. set_flag 1
  1296.  
  1297. phasemessage 68 60
  1298. set_waypoint "chapel1"
  1299. wait_until "chapel1" destroyed
  1300. clear_waypoint
  1301.  
  1302. wait_until "ssgen4" destroyed
  1303. set_flag 1
  1304.  
  1305. phasemessage 66 60
  1306. set_waypoint "flat2"
  1307. wait_until "flat2" destroyed
  1308. clear_waypoint
  1309.  
  1310. wait_until "ssgen5" destroyed
  1311. set_flag 1
  1312.  
  1313. phasemessage 66 60
  1314. set_waypoint "flat3"
  1315. wait_until "flat3" destroyed
  1316. clear_waypoint
  1317.  
  1318. wait_until "ssgen3" destroyed
  1319. set_flag 1
  1320.  
  1321. mission_uncritical "P5ca"
  1322.  
  1323. phasemessage 66 60
  1324. set_waypoint "flat1"
  1325. wait_until "flat1" destroyed
  1326. clear_waypoint
  1327.  
  1328. set_flag 1
  1329. pause 2
  1330.  
  1331. phasemessage 52 60
  1332.  
  1333. wait_until number_of "aair"=0
  1334. end_procedure "P5a"
  1335.  
  1336. #==================================
  1337. phasemessage 91 60
  1338.  
  1339. pause 20
  1340.  
  1341. hud off
  1342. camera
  1343.     attached_to "hero"
  1344.     position 600 -300 -600
  1345.     pointing_at "hero"
  1346.     dolly 1
  1347.     dollyspeed 0.1%
  1348. pause 80
  1349.  
  1350. ;-------------------------------------------------------
  1351. ;PHASE 6
  1352. ;-------------------------------------------------------
  1353. clear_flag all
  1354. phasestart
  1355.  
  1356. #==================
  1357. # camera cuts here
  1358. #==================
  1359.  
  1360. phasemessage 40 60
  1361. playcdfast
  1362.  
  1363. switch_hero "plfight"
  1364.     task
  1365.         secondary_armed_with "ENERGY 1" rate 16 rounds 20
  1366.  
  1367. ;        position 16450.4 -400 15524.3
  1368.         position 16450.4 -3200 15524.3
  1369.  
  1370. ;        goto 16450.4 -3200 15524.3
  1371. ;        goto 20421.2 -2800 14555.5
  1372. ;        goto 23252.5 -2800 13923.2
  1373.  
  1374.         wait_until flag 0 set
  1375.         playercontrols
  1376.     end
  1377.  
  1378. set_volatile "plfight"
  1379.  
  1380. hud off
  1381. camera
  1382.     position 600 -300 -600 local to "hero"
  1383.     pointing_at "hero"
  1384.     dolly 1
  1385.  
  1386. pause 80
  1387. camera cockpit
  1388. set_flag 0
  1389. kill "P5hero"
  1390. kill group "aihover"
  1391.  
  1392.  
  1393. #==================================
  1394.  
  1395. create "command"
  1396.     label "P6big"
  1397.     position 59696.2 -3440.08 54918.8
  1398.     armed_with "ENERGY 1" rate 2
  1399.     inert
  1400.     task
  1401.         patrol
  1402.             point 49432.4 -3800 53780.9
  1403.             point 21482.6 -3800 53904.9
  1404.             point 8672.39 -3800 45725
  1405.             point 28217.9 -3800 37727.3
  1406.             point 39510.2 -3800 20433.1
  1407.             point 34708.7 -3800 12347.9
  1408.             point 21956.1 -3800 14222.8
  1409.             point 25311 -3800 22406.9
  1410.         end
  1411.  
  1412. procedure "P6a"
  1413.     wait_until number_of "aair" <6
  1414.     create "lfighter"
  1415.         position 500 0 17000 local to "hero"
  1416.         towards "hero"
  1417.         armed_with "PLASMA BOLT 1"    rate 12
  1418.         task
  1419.             set_vel 4
  1420.             attack "hero"
  1421.                 break_task_if vel<2
  1422.             explode
  1423.         end
  1424.     pause 25
  1425. end_procedure terminate after 24 loops
  1426.  
  1427. wait_until proc "P6a" terminated
  1428. wait_until number_of "aair"=0
  1429. phasemessage 69 60
  1430. set_waypoint "P6big"
  1431.  
  1432.  
  1433. create "lance"
  1434.     label "P6ha"
  1435.     position 500 3200 -17000 relative toxz "hero"
  1436.     forward -0.58 0 0.81 up 0 1 0
  1437.     armed_with "GREEN LASER" rate 2
  1438.     inert
  1439.     task
  1440.         do
  1441.             attack group "fighters"
  1442.         until flag 2 set
  1443.  
  1444.         armed_with "DESIGNATOR"
  1445.  
  1446.         do
  1447.             goto 6000 300 6000 local to "P6big"
  1448.             shoot "P6big"
  1449.         until "P6big" destroyed
  1450.     end
  1451.  
  1452. create "lance"
  1453.     label "P6hb"
  1454.     position 5000 3200 -17000 relative toxz "hero"
  1455.     forward -0.58 0 0.81 up 0 1 0
  1456.     armed_with "GREEN LASER" rate 2
  1457.     inert
  1458.     task
  1459.         do
  1460.             goto 5000 300 5000 local to "P6big"
  1461.             shoot group "aair"
  1462.             goto 5000 300 -5000 local to "P6big"
  1463.             shoot group "aair"
  1464.             goto -5000 300 -5000 local to "P6big"
  1465.             shoot group "aair"
  1466.             goto -5000 300 5000 local to "P6big"
  1467.             shoot group "aair"
  1468.         until flag 2 set
  1469.  
  1470.         armed_with "DESIGNATOR"
  1471.  
  1472.         do
  1473.             goto -6000 300 -6000 local to "P6big"
  1474.             shoot "P6big"
  1475.         until "P6big" destroyed
  1476.  
  1477.     end
  1478.  
  1479.  
  1480. procedure "P6a"
  1481.     wait_until number_of "fighters" <6
  1482.  
  1483.     create "hfighter"
  1484.         position 17000 0 500 local to "P6big"
  1485.         towards "hero"
  1486.         armed_with "PLASMA BOLT 3"    rate 0
  1487.         task
  1488.             do
  1489.                 goto 4000 300 4000 local to "P6big"
  1490.                     break_task_if vel<2
  1491.                 shoot      
  1492.                 goto 2000 300 -2000 local to "P6big"
  1493.                     break_task_if vel<2
  1494.                 shoot
  1495.                 goto -2000 300 -2000 local to "P6big"
  1496.                     break_task_if vel<2
  1497.                 shoot
  1498.                 goto -4000 300 4000 local to "P6big"
  1499.                     break_task_if vel<2
  1500.                 shoot
  1501.             until vel <2
  1502.             explode
  1503.         end
  1504.     pause 90
  1505. end_procedure terminate after 12 loops
  1506.  
  1507. wait_until distance_between "hero" and waypoint <8000
  1508. phasemessage 70 60
  1509.  
  1510. procedure "P6b"
  1511.     wait_until number_of "aair" <6
  1512.     create "lfighter"
  1513.         position 500 0 17000 local to "hero"
  1514.         towards "hero"
  1515.         armed_with "PLASMA BOLT 1"    rate 12
  1516.         task
  1517.             set_vel 4
  1518.             attack "hero"
  1519.                 break_task_if vel<2
  1520.             explode
  1521.         end
  1522.     pause 25
  1523. end_procedure terminate after 12 loops
  1524.  
  1525.  
  1526.  
  1527. wait_until proc "P6a" terminated
  1528. wait_until proc "P6b" terminated
  1529.  
  1530. wait_until number_of "aair"=0
  1531. wait_until number_of "fighters"=0
  1532.  
  1533. set_volatile "P6big"
  1534. set_volatile "P6ha"
  1535. set_volatile "P6hb"
  1536. mission_critical "P6ha"
  1537. mission_critical "P6hb"
  1538. set_flag 2
  1539.  
  1540. phasemessage 71 120
  1541.  
  1542. wait_until "P6big" destroyed
  1543. #==================================
  1544. phasemessage 91 60
  1545.  
  1546. pause 20
  1547.  
  1548. hud off
  1549. camera
  1550.     attached_to "hero"
  1551.     position 600 -300 -600
  1552.     pointing_at "hero"
  1553.     dolly 1
  1554.     dollyspeed 0.1%
  1555. pause 80
  1556.  
  1557. ;-------------------------------------------------------
  1558. ;PHASE 7
  1559. ;-------------------------------------------------------
  1560. clear_flag all
  1561. phasestart
  1562.  
  1563. phasemessage 6 60
  1564. playcdslow
  1565.  
  1566. create "alnadubs"
  1567.     label "P7gun1"
  1568.     position 41822.6 on ground 26884.4
  1569.     forward 0 0 -1 up 0 1 0
  1570.     armed_with "GREEN ENERGY LASER"    rate 16
  1571.     task
  1572.         attack
  1573.     end
  1574.  
  1575.  
  1576. create "alnadubs"
  1577.     label "P7gun2"
  1578.     position 37559.1 on ground 29409.7
  1579.     forward 0 0 1 up 0 1 0
  1580.     armed_with "GREEN ENERGY LASER"    rate 16
  1581.     task
  1582.         attack
  1583.     end
  1584.  
  1585.  
  1586.  
  1587. create "hovercraft"
  1588.     label "P7hero"
  1589.     position 24871 on ground 10309.6
  1590.     forward 0.57 0 0.82 up 0 1 0
  1591.     armed_with "GREEN LASER"    rate 4
  1592.     secondary_armed_with "DESIGNATOR" rate 32 rounds 20
  1593.  
  1594.  
  1595.  
  1596. switch_hero "P7hero"
  1597.     task
  1598.         wait_until flag 0 set
  1599.         playercontrols
  1600.     end
  1601.  
  1602. hud off
  1603. camera
  1604.     position 600 -300 -600 local to "hero"
  1605.     pointing_at "hero"
  1606.     dolly 0
  1607.  
  1608. pause 40
  1609. camera cockpit
  1610. set_flag 0
  1611. kill "plfight"
  1612. kill "P6ha"
  1613. kill "P6hb"
  1614.  
  1615. #==================================
  1616.  
  1617. create "hovertank"
  1618.     position 28780.1 on ground 16717.6
  1619.     towards 42535 on ground 30375.5
  1620.     armed_with "TRACER SHOT 1" rate 64
  1621.     inert
  1622.     task
  1623.         wait_until flag 1 set
  1624.         goto 40522.4 on ground 28036.5
  1625.         do
  1626.             shoot "P7gun1"
  1627.         until "P7gun1" destroyed
  1628.         do
  1629.             shoot "P7gun2"
  1630.         until "P7gun2" destroyed
  1631.  
  1632.         goto 28780.1 on ground 16717.6
  1633.         kill
  1634.     end
  1635.  
  1636. create "bug"
  1637.     label "P7bug"
  1638.     position 27227.2 -500 14517.8
  1639.     towards "hero"
  1640.     armed_with "GREEN LASER"    rate 4
  1641.     inert
  1642.     task
  1643.         do
  1644.             patrol
  1645.                 point 1000 -1800 0 relative to "hero"
  1646.                 break_task_if distance_between me and closest "aair" <6000
  1647.             stop
  1648.             shoot group "aair"
  1649.         until flag 2 set
  1650.     end
  1651.  
  1652.  
  1653. create "skimmer"
  1654.     position 26125.6 on ground 24593.9
  1655.     towards "hero"
  1656.     armed_with "PURPLE LASER"    rate 4
  1657.     task
  1658.         attack "hero"
  1659.     end
  1660.  
  1661. create "facraft"
  1662.     position 38940.3 on ground 26042.2
  1663.     towards "hero"
  1664.     armed_with "PURPLE LASER"    rate 4
  1665.     task
  1666.         attack "hero"
  1667.     end
  1668.  
  1669.  
  1670. create "skimmer"
  1671.     position 32541.7 on ground 28886.7
  1672.     towards "hero"
  1673.     armed_with "PURPLE LASER"    rate 4
  1674.     task
  1675.         attack "hero"
  1676.     end
  1677.  
  1678.  
  1679. procedure "P7a"
  1680.     wait_until number_of "aair" <2
  1681.     create "lfighter"
  1682.         position 500 0 17000 local to "hero"
  1683.         towards "hero"
  1684.         armed_with "PLASMA BOLT 3"    rate 16
  1685.         task
  1686.             set_vel 4
  1687.             attack "hero"
  1688.                 break_task_if vel<2
  1689.             explode
  1690.         end
  1691.     pause 25
  1692. end_procedure
  1693.  
  1694. procedure "P7c"
  1695.     set_waypoint nearest "aland"
  1696. end_procedure
  1697.  
  1698. procedure "P7d"
  1699.     wait_until distance_between "hero" and "laser2" <500
  1700.  
  1701.     phasemessage 72 60
  1702.     set_task "laser2"
  1703.         attack
  1704.     end
  1705. end_procedure terminate after 1 loops
  1706.  
  1707. wait_until number_of "aland"=0
  1708. set_flag 1
  1709.  
  1710. procedure "P7b"
  1711.     create "skimmer"
  1712.         position 39295.1 on ground 30194.9
  1713.         towards "hero"
  1714.         armed_with "PLASMA BOLT 3"    rate 16
  1715.         task
  1716.             goto 40522.4 on ground 28036.5
  1717.             attack "hero"
  1718.         end
  1719.     pause 150
  1720. end_procedure terminate after 3 loops
  1721.  
  1722.  
  1723. wait_until proc "P7b" terminated
  1724. wait_until number_of "aland"=0
  1725. #==============================
  1726.  
  1727. end_procedure "P7c"
  1728.  
  1729. phasemessage 92 60
  1730. set_volatile "ssgen6"
  1731. set_waypoint "ssgen6"
  1732. wait_until distance_between "hero" and waypoint <4000
  1733. phasemessage 26 60
  1734.  
  1735. wait_until "ssgen6" destroyed
  1736. set_waypoint "P7b1"
  1737. wait_until "P7b1" destroyed
  1738.  
  1739. set_volatile "ssgen7"
  1740. set_waypoint "ssgen7"
  1741. wait_until "ssgen7" destroyed
  1742. set_waypoint "P7b2"
  1743. wait_until "P7b2" destroyed
  1744.  
  1745. set_volatile "ssgen8"
  1746. set_waypoint "ssgen8"
  1747. wait_until "ssgen8" destroyed
  1748. set_waypoint "P7b3"
  1749. wait_until "P7b3" destroyed
  1750.  
  1751. end_procedure "P7a"
  1752. kill group "aair"
  1753. set_flag 2
  1754. clear_waypoint
  1755.  
  1756. phasemessage 48 60
  1757.  
  1758. procedure "P7a"
  1759.     create "skimmer"
  1760.         position 39295.1 on ground 30194.9
  1761.         armed_with "PLASMA BOLT 3"    rate 16
  1762.         task
  1763.             attack "hero"
  1764.         end
  1765.     pause 150
  1766. end_procedure terminate after 3 loops
  1767.  
  1768. wait_until proc "P7a" terminated
  1769. wait_until number_of "aland" = 0
  1770.  
  1771. set_waypoint 26438 on ground 11584.6
  1772. phasemessage 73 120
  1773.  
  1774. wait_until distance_between "hero" and waypoint < 1000
  1775. clear_waypoint
  1776.  
  1777. end_procedure "P7d"
  1778.  
  1779. #==================================
  1780. phasemessage 91 60
  1781.  
  1782. pause 20
  1783.  
  1784. hud off
  1785. camera
  1786.     attached_to "hero"
  1787.     position 600 -300 -600
  1788.     pointing_at "hero"
  1789.     dolly 1
  1790.     dollyspeed 0.1%
  1791. pause 80
  1792.  
  1793. ;-------------------------------------------------------
  1794. ;PHASE 8
  1795. ;-------------------------------------------------------
  1796. clear_flag all
  1797.  
  1798. phasemessage 74 120
  1799.  
  1800. set_task "P8rack"
  1801.     slave_to "laser2"
  1802. end
  1803.  
  1804. switch_hero "laser2"
  1805.     task
  1806.         position 34427.6 -1543 13849.6
  1807.         rotate_gun towards "replen1"
  1808.         wait_until flag 0 set
  1809.         playercontrols
  1810.     end
  1811.  
  1812. create "lance"
  1813.     label "P8b-team1"
  1814.     mission_critical
  1815.     position 17000 -3200 500 relative toxz "hero"
  1816.     armed_with "RED LASER" rate 4
  1817.     secondary_armed_with "DESIGNATOR" rate 64 rounds 20
  1818.     task
  1819.         land 27320.9 on ground 13587.1
  1820.     end
  1821.  
  1822. create "lance"
  1823.     label "P8b-team2"
  1824.     mission_critical
  1825.     position 17000 -4000 3500 relative toxz "hero"
  1826.     armed_with "RED LASER" rate 8
  1827.     task
  1828.         land 27522.4 on ground 12766.9
  1829.  
  1830.     end
  1831.  
  1832. camera_task
  1833.     hud off
  1834.     cam_pos -1500 0 -1500 attached_to "P8b-team1"
  1835.     cam_focus "P8b-team2"
  1836.     dolly 0
  1837.  
  1838.     pause 100
  1839.     cam_pos 0 0 -1500 attached_to "P8b-team1"
  1840.     cam_focus "P8b-team1"
  1841.     dolly 1
  1842.  
  1843.     pause 100
  1844.     cam_pos -1500 0 -2500 attached_to "P8b-team1"
  1845.     dolly 1
  1846.  
  1847.     pause 100
  1848.  
  1849.     cam_pos 27438 on ground 11584.6
  1850.     dolly 0
  1851.  
  1852.     pause 100
  1853.     cam_focus "P8b-team2"
  1854.     dolly 1
  1855.     pause 250
  1856.     set_flag 0
  1857. end
  1858.  
  1859.  
  1860. kill "P7hero"
  1861. kill "P7bug"
  1862.  
  1863. pause 100
  1864.  
  1865. create "bug"
  1866.     label "P8-bug1"
  1867.     mission_critical
  1868.     position 17000 -4000 3500 relative toxz "hero"
  1869.     armed_with "RED LASER" rate 4
  1870.     task
  1871.         land 28143 on ground 13332.4
  1872.     end
  1873.  
  1874. create "bug"
  1875.     label "P8-bug2"
  1876.     mission_critical
  1877.     position 17000 -3200 500 relative toxz "hero"
  1878.     armed_with "RED LASER" rate 4
  1879.     secondary_armed_with "DESIGNATOR" rate 64 rounds 20
  1880.     task
  1881.         land 26994.3 on ground 12888.5
  1882.     end
  1883.  
  1884. wait_until flag 0 set
  1885.  
  1886. camera
  1887.     position 600 -300 -600 local to "hero"
  1888.     pointing_at "hero"
  1889.     dolly 0
  1890.  
  1891. pause 40
  1892. camera cockpit
  1893. set_flag 0
  1894.  
  1895. #==================================
  1896. #====wave 1
  1897. clear_flag all
  1898. phasestart
  1899.  
  1900. phasemessage 75 60
  1901.  
  1902. procedure "P8a"
  1903.     create "lfighter"
  1904.         position 15812.1 -1593.82 13237.8
  1905.         armed_with "RED LASER" rate 6
  1906.         task
  1907.             goto 18535.1 -2513.7 13798.1
  1908.             goto 25286 -1193.4 10858.4
  1909.             shoot
  1910.             goto 32152.2 -2283.1 12271.2
  1911.             goto 37794 -2562.85 13432.1
  1912.             attack
  1913.  
  1914.         end
  1915.     pause 75
  1916.  
  1917. end_procedure terminate after 3 loops
  1918.  
  1919. procedure "P8b"
  1920.     create "lfighter"
  1921.         position 13231.1 -1993.94 17753.9
  1922.         armed_with "RED LASER" rate 6
  1923.         task
  1924.             goto 19260.8 -2283.67 16735.6
  1925.             goto 25948.2 -1073.37 13593.8
  1926.             shoot
  1927.             goto 32027.2 -2383.1 14218.4
  1928.             goto 34110.8 -3193.02 18597.4
  1929.             attack
  1930.         end
  1931.     pause 75
  1932. end_procedure terminate after 3 loops
  1933.  
  1934.  
  1935. wait_until proc "P8a" terminated
  1936. wait_until proc "P8b" terminated
  1937. wait_until number_of "aair" =0
  1938.  
  1939. pause 50
  1940.  
  1941. #==================================
  1942. #====wave 2
  1943.  
  1944. procedure "P8a"
  1945.     create "lfighter"
  1946.         position 38049 -573.974 15397.7
  1947.         towards "hero"
  1948.         armed_with "PLASMA BOLT 2" rate 6
  1949.         task
  1950.             land 38049 -2300 15397.7
  1951.             shoot "hero"
  1952.             goto 38150.4 -2300 15489.7
  1953.             goto 31404 -2379.15 14251.9
  1954.             goto 28588.1 -904.273 14892.6
  1955.             goto 28147.2 -613.805 12303.4
  1956.             attack
  1957.  
  1958.         end
  1959.     pause 25
  1960.  
  1961.     create "lfighter"
  1962.         position 36049 -573.974 15397.7
  1963.         towards "hero"
  1964.         armed_with "PLASMA BOLT 2" rate 6
  1965.         task
  1966.             land 36049 -1600 15397.7
  1967.             shoot "hero"
  1968.             goto 36150.4 -2300 15489.7
  1969.             shoot "hero"
  1970.             goto 31404 -2379.15 14251.9
  1971.             goto 28588.1 -904.273 14892.6
  1972.             goto 28147.2 -613.805 12303.4
  1973.             attack
  1974.         end
  1975.     pause 25
  1976.  
  1977. end_procedure terminate after 5 loops
  1978.  
  1979. wait_until proc "P8a" terminated
  1980. wait_until number_of "aair" =0
  1981. #==================================
  1982. #====wave 3
  1983.  
  1984. procedure "P8a"
  1985.     create "lfighter"
  1986.         position 17967.1 -1502.95 8879.56
  1987.         armed_with "RED LASER" rate 6
  1988.         task
  1989.             goto 23400.7 -1525.91 8831.56
  1990.             shoot
  1991.             goto 29269.7 -1560.42 11202.8
  1992.             shoot
  1993.             goto 31317.3 -2486.77 15598
  1994.             shoot
  1995.             goto 28100.8 -2466.99 14082.7
  1996.             attack "hero"
  1997.  
  1998.         end
  1999.     pause 25
  2000.  
  2001. end_procedure terminate after 4 loops
  2002.  
  2003. procedure "P8b"
  2004.     pause 25
  2005.     create "lfighter"
  2006.         position 20095 -1490.92 3613.2
  2007.         armed_with "RED LASER" rate 6
  2008.         task
  2009.             goto 23400.7 -1525.91 8831.56
  2010.             shoot
  2011.             goto 29269.7 -1560.42 11202.8
  2012.             shoot
  2013.             goto 33744.9 -2473.03 9589.91
  2014.             shoot
  2015.             goto 30213.7 -2455.04 8853.45
  2016.             attack
  2017.  
  2018.         end
  2019. end_procedure terminate after 4 loops
  2020.  
  2021. wait_until proc "P8a" terminated
  2022. wait_until proc "P8b" terminated
  2023. wait_until number_of "aair" =0
  2024.  
  2025.  
  2026. #==================================
  2027. #====wave 4
  2028.  
  2029. procedure "P8a"
  2030.     create "lfighter"
  2031.         position 41350.2 -1007.2 8291.51
  2032.         armed_with "RED LASER" rate 6
  2033.         task
  2034.             goto 40705.9 -1811.59 8743.49
  2035.             shoot
  2036.             goto 37319.9 -2153.67 11656.5
  2037.             shoot
  2038.             goto 32353.1 -1953.11 15122.7
  2039.             goto 28092.2 -1016.93 13149
  2040.             attack
  2041.         end
  2042.     pause 25
  2043.  
  2044. end_procedure terminate after 6 loops
  2045.  
  2046.  
  2047. wait_until proc "P8a" terminated
  2048. wait_until number_of "aair" <=3
  2049.  
  2050. create "hbomber"
  2051.     label "P8mother"
  2052.     position 15935 -527 15062
  2053.     towards "hero"
  2054.     armed_with "ENERGY 1" rate 0
  2055.     task
  2056.         land 15935 -3100 15062
  2057.         do
  2058.             goto 24092.7 -3100 15484.9
  2059.             shoot
  2060.             goto 32402.1 -3100 14846.4
  2061.             shoot
  2062.             goto 29976.4 -3100 10050.1
  2063.             shoot
  2064.         forever
  2065.     end
  2066.  
  2067. camera_task
  2068.     hud off
  2069.     cam_pos 0 -3000 3000 local to "P8mother"
  2070.     cam_focus "P8mother"
  2071.  
  2072.     pause 250
  2073.     cam_pos 0 500 -3000 local to "P8mother"
  2074.     dolly 1
  2075.     dollyspeed 0.1%
  2076.  
  2077.     pause 125
  2078.     cam_mode cockpit
  2079.     phasemessage 76 60
  2080. end
  2081.  
  2082. wait_until "P8mother" destroyed
  2083. pause 50
  2084.  
  2085. #==================================
  2086. phasemessage 91 60
  2087.  
  2088. pause 20
  2089.  
  2090. hud off
  2091. camera
  2092.     attached_to "hero"
  2093.     position 600 -300 -600
  2094.     pointing_at "hero"
  2095.     dolly 1
  2096.     dollyspeed 0.1%
  2097. pause 80
  2098.  
  2099.  
  2100. ;-------------------------------------------------------
  2101. ;PHASE 9
  2102. ;-------------------------------------------------------
  2103. clear_flag all
  2104. phasestart
  2105.  
  2106. phasemessage 2 60
  2107.  
  2108. set_inert "ring1"
  2109.  
  2110.  
  2111. mission_uncritical "P8b-team1"
  2112. mission_uncritical "P8b-team2"
  2113. mission_uncritical "P8-bug1"
  2114. mission_uncritical "P8-bug2"
  2115.  
  2116. set_inert "P8b-team2"
  2117. set_inert "P8-bug2"
  2118.  
  2119.  
  2120. switch_hero "P8b-team1"
  2121.     task
  2122.         position 27320.9 on ground 13587.1
  2123.         wait_until flag 0 set
  2124.         land  27320.9 -1250 13587.1
  2125.         wait_until flag 1 set
  2126.         playercontrols
  2127.     end
  2128.  
  2129. auto_aim "hero"
  2130.  
  2131. set_task "P8-bug1"
  2132.     position 28143 on ground 13332.4
  2133.     wait_until flag 0 set
  2134.     land 28143 -1250 13332.4
  2135.         do
  2136.             patrol
  2137.                 point 3000 0 -2000 local to "hero"
  2138.                 point 2000 0 -2000 local to "hero"
  2139.                 break_task_if distance_between "P8-bug1" and closest_enemy < 3000
  2140.             stop
  2141.             shoot
  2142.         until flag 9 set
  2143.         kill
  2144. end
  2145.  
  2146. camera_task
  2147.     hud off
  2148.     set_flag 0
  2149.     cam_pos 0 -200 3000 attached_to "hero"
  2150.     cam_focus  "P8-bug1"
  2151.     cam_goto -1000 -200 -300
  2152.  
  2153.     cam_pos 500 0 -500 attached_to "hero"
  2154.     cam_focus  "hero"
  2155.     dolly 1
  2156.     dollyspeed 0.1%
  2157.  
  2158.     pause 100
  2159.     cam_mode cockpit
  2160.     set_flag 1
  2161. end
  2162.  
  2163. wait_until flag 1 set
  2164. #==================================
  2165.  
  2166. procedure "P9a"
  2167.     wait_until number_of "aair" <6
  2168.     create "lfighter"
  2169.         position 500 0 17000 local to "hero"
  2170.         towards "hero"
  2171.         armed_with "BLUE LASER"    rate 12
  2172.         task
  2173.             set_vel 4
  2174.             attack "hero"
  2175.                 break_task_if vel<2
  2176.             explode
  2177.         end
  2178.     pause 25
  2179. end_procedure terminate after 24 loops
  2180.  
  2181. wait_until proc "P9a" terminated
  2182. wait_until number_of "aair"<2
  2183.  
  2184. phasemessage 92 60
  2185. set_waypoint "bsgen8"
  2186. wait_until distance_between "hero" and waypoint < 8000
  2187. phasemessage 62 60
  2188. set_volatile "bsgen8"
  2189. wait_until "bsgen8" destroyed
  2190.  
  2191. phasemessage 65 60
  2192. set_waypoint "hub2"
  2193.  
  2194.  
  2195. procedure "P9a"
  2196.     wait_until number_of "aair" <6
  2197.     create "lfighter"
  2198.         position 500 0 17000 local to "hero"
  2199.         towards "hero"
  2200.         armed_with "BLUE LASER"    rate 12
  2201.         task
  2202.             set_vel 4
  2203.             attack "hero"
  2204.                 break_task_if vel<2
  2205.             explode
  2206.         end
  2207.     pause 25
  2208. end_procedure terminate after 12 loops
  2209.  
  2210. wait_until "hub2" destroyed
  2211. clear_waypoint
  2212. phasemessage 52 60
  2213.  
  2214.  
  2215. wait_until proc "P9a" terminated
  2216. wait_until number_of "aair"<2
  2217.  
  2218. phasemessage 62 60
  2219. set_volatile "bsgen5"
  2220. set_waypoint "bsgen5"
  2221. wait_until "bsgen5" destroyed
  2222.  
  2223. phasemessage 77 60
  2224.  
  2225. procedure "P9a"
  2226.     wait_until number_of "fighters" <9
  2227.     create "hfighter"
  2228.         position 0 -1100 0 local to "ring1"
  2229.         armed_with "BLUE LASER"    rate 12
  2230.         task
  2231.             land 0 -3500 0 local to "ring1"
  2232.             set_vel 70
  2233.             attack "hero"
  2234.                 break_task_if vel<2
  2235.             explode
  2236.         end
  2237.     
  2238.     pause 15
  2239.     wait_until number_of "fighters" <9
  2240.  
  2241.  
  2242.     create "hfighter"
  2243.         position 800 -1100 500 local to "ring1"
  2244.         towards "hero"
  2245.         armed_with "BLUE LASER"    rate 12
  2246.         task
  2247.             land 800 -3200 500 local to "ring1"
  2248.             set_vel 70
  2249.             attack "hero"
  2250.                 break_task_if vel<2
  2251.             explode
  2252.         end
  2253.  
  2254.     pause 15
  2255.     wait_until number_of "fighters" <9
  2256.  
  2257.     create "hfighter"
  2258.         position -800 -1100 -500 local to "ring1"
  2259.         armed_with "BLUE LASER"    rate 12
  2260.         task
  2261.             land -800 -2900 -500 local to "ring1"
  2262.             set_vel 70
  2263.             attack "hero"
  2264.                 break_task_if vel<2
  2265.             explode
  2266.         end
  2267.  
  2268.     pause 60
  2269.  
  2270. end_procedure terminate after 12 loops
  2271.  
  2272.  
  2273. set_waypoint "ring1"
  2274.  
  2275. pause 200
  2276. set_volatile "ring1"
  2277. phasemessage 78 60
  2278.  
  2279. wait_until "ring1" destroyed
  2280. clear_waypoint
  2281. end_procedure "P9a"
  2282.  
  2283. phasemessage 52 60
  2284.  
  2285. wait_until number_of "fighters" = 0
  2286.  
  2287. #==================================
  2288. phasemessage 91 60
  2289.  
  2290. pause 20
  2291. set_flag 9
  2292.  
  2293. hud off
  2294. camera
  2295.     attached_to "hero"
  2296.     position 600 -300 -600
  2297.     pointing_at "hero"
  2298.     dolly 1
  2299.     dollyspeed 0.1%
  2300. pause 80
  2301.  
  2302. ;-------------------------------------------------------
  2303. ;PHASE 10
  2304. ;-------------------------------------------------------
  2305. clear_flag all
  2306. playcdfast
  2307.  
  2308.  
  2309. switch_hero "P8-bug2"
  2310.     task
  2311.         position 26994.3 on ground 12888.5
  2312.         wait_until flag 0 set
  2313.         land  26994.3 -1250 12888.5
  2314.         wait_until flag 1 set
  2315.         playercontrols
  2316.     end
  2317.  
  2318. auto_aim "hero"
  2319.  
  2320. set_task "P8b-team2"
  2321.     position 27522.4 on ground 12766.9
  2322.     wait_until flag 0 set
  2323.     land 27522.4 -1250 12766.9
  2324.         do
  2325.             patrol
  2326.                 point 3000 0 -2000 local to "hero"
  2327.                 point 2000 0 -2000 local to "hero"
  2328.                 break_task_if distance_between me and closest "aliens" < 3000
  2329.             stop
  2330.             shoot
  2331.         until flag 9 set
  2332.         kill
  2333. end
  2334.  
  2335. create "alnportl-c"
  2336.     label "portal-c"
  2337.     position 18826.9 on ground 34922.5
  2338.     set_color 0 0 0
  2339.  
  2340. set_operate "portal-c" "bcloak"
  2341.  
  2342.  
  2343. camera_task
  2344.     cam_pos 0 -2075 8000 attached_to "portal-c"
  2345.     cam_focus  18826.9 -2075 34922.5
  2346.     hud off
  2347.  
  2348.     cam_goto 3000 -2075 -4000
  2349.     set_flag 0
  2350.  
  2351.     cam_pos 0 -200 3000 attached_to "hero"
  2352.     cam_focus  "P8b-team2"
  2353.     cam_goto -1000 -200 -300
  2354.  
  2355.     cam_pos 500 0 -500 attached_to "hero"
  2356.     cam_focus  "hero"
  2357.     dolly 1
  2358.     dollyspeed 0.1%
  2359.  
  2360.     pause 100
  2361.     cam_mode cockpit
  2362.     set_flag 1
  2363.  
  2364. end
  2365.  
  2366. kill "P8b-team1"
  2367.  
  2368. wait_until flag 0 set
  2369. kill "portal-c"
  2370. create "alnportl"
  2371.     label "portal"
  2372.     position 18826.9 on ground 34922.5
  2373.     inert
  2374.  
  2375. create "bug"
  2376.     label "P10-bug"
  2377.     position 17000 -3200 500 relative to "hero"
  2378.     armed_with "RED LASER" rate 8
  2379.     task
  2380.         do
  2381.             patrol
  2382.                 point 3000 0 2000 local to "hero"
  2383.                 point 2000 0 2000 local to "hero"
  2384.                 break_task_if distance_between me and closest "aliens" < 3000
  2385.             stop
  2386.             shoot
  2387.         until flag 9 set
  2388.         kill
  2389.     end
  2390.  
  2391.  
  2392. wait_until flag 1 set
  2393.  
  2394.  
  2395.  
  2396. #==================================
  2397. #phase 10.1
  2398.  
  2399. phasestart
  2400. phasemessage 52 60
  2401.  
  2402. procedure "P10a"
  2403.  
  2404.     wait_until number_of_baddies<22
  2405.     wait_until number_of "aair" <6
  2406.     create "lfighter"
  2407.         position 500 -2000 -12000 local to "hero"
  2408.         towards "hero"
  2409.         armed_with "BLUE LASER"    rate 12
  2410.         task
  2411.             set_vel 4
  2412.             attack "hero"
  2413.                 break_task_if vel<2
  2414.             explode
  2415.         end
  2416.     pause 25
  2417. end_procedure terminate after 24 loops
  2418.  
  2419. wait_until proc "P10a" terminated
  2420. wait_until number_of "aair" = 0
  2421.  
  2422. #==================================
  2423. #phase 10.2
  2424.  
  2425. camera_task
  2426.     hud off
  2427.     cam_pos 200 -2075 -4000 attached_to "portal"
  2428.     cam_focus  18826.9 -2075 34922.5
  2429.     dolly 1
  2430.     dollyspeed 1%
  2431.  
  2432.     pause 200
  2433.     cam_mode cockpit
  2434.     set_flag 3
  2435. end
  2436.  
  2437. pause 50
  2438. phasemessage 8 120
  2439.  
  2440. create "bomber-c"
  2441.     label "P10-b1"
  2442.     position 0 -1800 0 local to "portal"
  2443.     towards 0 -1800 -1000 local to "portal"
  2444.     armed_with "ENERGY 2"    rate 0
  2445.     set_color 0 0 0
  2446.     set_operate me "bcloak2"
  2447.     task
  2448.         pause 32
  2449.         do
  2450.             shoot
  2451.             goto 0 -3200 -10000 local to "portal"
  2452.             shoot
  2453.             goto 11282.7 -3200 54484
  2454.             shoot
  2455.             goto 6115.19 -3200 46747.1
  2456.             shoot
  2457.             goto 9761.33 -3200 38901.7
  2458.             shoot
  2459.             goto 14255.5 -3200 29727.2
  2460.             shoot
  2461.             goto 24398.6 -3200 28996.1
  2462.             shoot
  2463.         forever
  2464.     end
  2465. pause 10
  2466.  
  2467. startwave 0 -1800 0 local to "portal" 0
  2468. pause 70
  2469.  
  2470. set_waypoint "P10-b1"
  2471.  
  2472. wait_until flag 3 set
  2473.  
  2474. create "hfighter"
  2475.     position 0 -3200 12000 local to "P10-b1"
  2476.     towards "portal"
  2477.     armed_with "BLUE LASER"    rate 24
  2478.     task
  2479.         do
  2480.             goto 5000 0 1000 local to "P10-b1"
  2481.             break_task_if distance_between me and closest "human" < 5000
  2482.             stop
  2483.             shoot
  2484.         until "P10-b1" destroyed
  2485.         attack "hero"
  2486.     end
  2487.  
  2488. create "hfighter"
  2489.     position 1000 -3200 12000 local to "P10-b1"
  2490.     towards "portal"
  2491.     armed_with "BLUE LASER"    rate 24
  2492.     task
  2493.         do
  2494.             goto 1000 0 3000 local to "P10-b1"
  2495.             break_task_if distance_between me and closest "human" < 3000
  2496.             stop
  2497.             shoot
  2498.         until "P10-b1" destroyed
  2499.         attack "hero"
  2500.     end
  2501.  
  2502. create "hfighter"
  2503.     position 2000 -3200 12000 local to "P10-b1"
  2504.     towards "portal"
  2505.     armed_with "BLUE LASER"    rate 24
  2506.     task
  2507.         do
  2508.             goto -5000 0 -1000 local to "P10-b1"
  2509.             break_task_if distance_between me and closest "human" < 5000
  2510.             stop
  2511.             shoot
  2512.         until "P10-b1" destroyed
  2513.         attack "hero"
  2514.     end
  2515.  
  2516. create "hfighter"
  2517.     position -2000 -3200 12000 local to "P10-b1"
  2518.     towards "portal"
  2519.     armed_with "BLUE LASER"    rate 24
  2520.     task
  2521.         do
  2522.             goto -1000 0 -3000 local to "P10-b1"
  2523.             break_task_if distance_between me and closest "human" < 3000
  2524.             stop
  2525.             shoot
  2526.         until "P10-b1" destroyed
  2527.         attack "hero"
  2528.     end
  2529.  
  2530. wait_until "P10-b1" destroyed
  2531. clear_waypoint
  2532.  
  2533. wait_until number_of "fighters" = 0
  2534. #==================================
  2535. #phase 10.2
  2536.  
  2537. phasemessage 10 120
  2538.  
  2539.  
  2540. procedure "P10a"
  2541.     wait_until number_of_baddies<22
  2542.     wait_until number_of "aair" <6
  2543.  
  2544.     create "lfighter-c"
  2545.         position 0 -1800 0 local to "portal"
  2546.         towards 0 -1800 -1000 local to "portal"
  2547.         armed_with "PLASMA BOLT 2"    rate 16
  2548.         set_color 0 0 0
  2549.         set_operate me "bcloak2"
  2550.         task
  2551.             pause 16
  2552.             set_vel 70
  2553.             pause 16
  2554.             attack
  2555.                 break_task_if vel<2
  2556.             explode
  2557.         end
  2558.  
  2559.     pause 75
  2560. end_procedure
  2561.  
  2562. procedure "P10b"
  2563.     wait_until number_of_baddies<22
  2564.     wait_until number_of "fighters" <3
  2565.     create "hfighter"
  2566.         position 0 -3200 10000 local to "portal"
  2567.         armed_with "BLUE LASER"    rate 16
  2568.         task
  2569.             do
  2570.                 goto 2000 -2800 2000 local to "portal"
  2571.                 shoot
  2572.                 goto 2000 -2800 -2000 local to "portal"
  2573.                 shoot
  2574.                 goto -2000 -2800 -2000 local to "portal"
  2575.                 shoot
  2576.                 goto -2000 -2800 2000 local to "portal"
  2577.                 shoot
  2578.             forever
  2579.         end
  2580.  
  2581.     pause 75
  2582. end_procedure terminate after 8 loops
  2583.  
  2584.  
  2585. wait_until proc "P10b" terminated
  2586. wait_until number_of "fighters" = 0
  2587.  
  2588. #==================================
  2589. #phase 10.3
  2590.  
  2591. phasemessage 33 60
  2592.  
  2593. create "hbomber"
  2594.     label "P10-b2"
  2595.     position 0 -3200 17000 local to "portal"
  2596.     armed_with "ENERGY 2"    rate 0
  2597.     task
  2598.         do
  2599.             shoot
  2600.             goto 5000 -3200 1000 local to "portal"
  2601.             shoot
  2602.             goto 8000 -3200 -8000 local to "portal"
  2603.             shoot
  2604.             goto -3000 -3200 -5000 local to "portal"
  2605.             shoot
  2606.             goto -3000 -3200 8000 local to "portal"
  2607.             shoot
  2608.             goto 5000 -3200 8000 local to "portal"
  2609.             shoot
  2610.         forever
  2611.     end
  2612. pause 10
  2613.  
  2614. set_waypoint "P10-b2"
  2615. wait_until "P10-b2" destroyed
  2616.  
  2617. clear_waypoint
  2618. phasemessage 80 60
  2619. pause 400
  2620. #==================================
  2621. #phase 10.4
  2622.  
  2623. phasemessage 76 60
  2624.  
  2625. create "command"
  2626.     label "P10-b3"
  2627.     position 0 -3200 17000 local to "portal"
  2628.     armed_with "ENERGY 1"    rate 0
  2629.     task
  2630.         do
  2631.             shoot
  2632.             goto 5000 -3800 1000 local to "portal"
  2633.             shoot
  2634.             goto 8000 -3800 -8000 local to "portal"
  2635.             shoot
  2636.             goto -3000 -3800 -5000 local to "portal"
  2637.             shoot
  2638.             goto -3000 -3800 8000 local to "portal"
  2639.             shoot
  2640.             goto 5000 -3800 8000 local to "portal"
  2641.             shoot
  2642.         forever
  2643.     end
  2644. pause 10
  2645.  
  2646. set_waypoint "P10-b3"
  2647.  
  2648. procedure "P10b"
  2649.  
  2650.     wait_until number_of_baddies<22
  2651.     wait_until number_of "fighters" <6
  2652.     create "hfighter"
  2653.         position 8000 0 500 local to "P10-b3"
  2654.         towards "hero"
  2655.         armed_with "PLASMA BOLT 1"    rate 4
  2656.         task
  2657.             do
  2658.                 goto 4000 300 4000 local to "P10-b3"
  2659.                     break_task_if "P10-b3" destroyed
  2660.                 shoot      
  2661.                 goto 2000 300 -2000 local to "P10-b3"
  2662.                     break_task_if "P10-b3" destroyed
  2663.                 shoot
  2664.                 goto -2000 300 -2000 local to "P10-b3"
  2665.                     break_task_if "P10-b3" destroyed
  2666.                 shoot
  2667.                 goto -4000 300 4000 local to "P10-b3"
  2668.                     break_task_if "P10-b3" destroyed
  2669.                 shoot      
  2670.             until "P10-b3" destroyed
  2671.             attack "hero"
  2672.         end
  2673.     pause 90
  2674. end_procedure terminate after 12 loops
  2675.  
  2676. wait_until "P10-b3" destroyed
  2677. clear_waypoint
  2678. phasemessage 80 60
  2679. wait_until proc "P10b" terminated
  2680.  
  2681. wait_until number_of "fighters" =0
  2682.  
  2683.  
  2684. phasemessage 79 60
  2685. set_volatile "portal"
  2686. set_waypoint "portal"
  2687.  
  2688. wait_until "portal" destroyed
  2689. end_procedure "P10a"
  2690.  
  2691. phasemessage 80 60
  2692.  
  2693. wait_until number_of "aair" =0
  2694.  
  2695. phasemessage 90 60
  2696.  
  2697. pause 20
  2698.  
  2699. hud off
  2700. camera
  2701.     attached_to "hero"
  2702.     position 600 -300 -600
  2703.     pointing_at "hero"
  2704.     dolly 1
  2705.     dollyspeed 0.1%
  2706. pause 80
  2707. ;-------------------------------------------------------
  2708. ;END OF SCENARIO
  2709.