home *** CD-ROM | disk | FTP | other *** search
/ Hot Shareware 35 / hot35.iso / ficheros / VDUKE / DUKERAGE.ZIP / GAME.MAD < prev    next >
Text File  |  1996-08-28  |  100KB  |  3,598 lines

  1.  
  2. /*
  3. --------------------------------------------------------------------------------
  4. Duke Nukem 3D GAME.CON file.
  5. By Todd Replogle
  6. (c) 1996 3D Realms Entertainment
  7. --------------------------------------------------------------------------------
  8.  
  9.  
  10. IMPORTANT NOTICE IF YOU USE MODIFIED .CON FILES
  11.  
  12. If you are playing a MULTIPLAY game (Dukematch or Co-op) and you are
  13. using *modified* .CON files (USER.CON, GAME.CON, DEFS.CON), then each
  14. multiplayer must be using the EXACT SAME .CON files, or the game will
  15. get out of sync and/or develop interesting problems.
  16.  
  17. 3D Realms encourages you to experiment freely with the parameters
  18. contained in this file, and to share your discoveries with the rest
  19. of the world.  However, BE ADVISED that 3D Realms does NOT offer 
  20. any technical support on how to use this file or other user-modifiable 
  21. features of this game.  Do NOT call 3D Realms or Apogee Software 
  22. for advice or help with this subject.  
  23.  
  24. You make modifications to this and other files at your own risk. 
  25. It is recommended that you first make a backup copy of this, or
  26. any .CON files before making any changes.
  27.  
  28. --------------------------------------------------------------------------------
  29.  
  30. */
  31.  
  32. include DEFS.CON
  33. include USER.CON
  34.  
  35. state genericshrunkcode
  36.     ifcount 32 { ifpdistl SQUISHABLEDISTANCE pstomp }
  37.     else { sizeto 9 8 spawn FRAMEEFFECT1 }
  38. ends
  39.  
  40. move SHUTTLEVELS 16
  41.  
  42. actor SPACESHUTTLE TOUGH
  43.   //  ifmove 0 { move SHUTTLEVELS getv geth }
  44. enda
  45.  
  46. actor SATELLITE TOUGH
  47.   //  ifmove 0 { move SHUTTLEVELS getv geth }
  48.   //  ifcount 120 move SHUTTLEVELS getv geth randomangle
  49. enda
  50.  
  51. action ASHARKCRUZING 0 8 5 1 24
  52. action ASHARKFLEE    0 8 5 1 10
  53. action ASHARKATACK   0 8 5 1 6
  54. action ASHARKSHRUNK  0 8 5 1 24
  55. action ASHARKFROZEN  0 1 5 1 24
  56.  
  57. move SHARKVELS 24
  58. move SHARKFASTVELS 72
  59. move SHARKFLEEVELS 40
  60.  
  61. actor SHARK SHARKSTRENGTH ASHARKCRUZING SHARKVELS randomangle geth
  62.     ifaction ASHARKSHRUNK
  63.     {
  64.         ifcount SHRUNKDONECOUNT action ASHARKCRUZING
  65.         else ifcount SHRUNKCOUNT sizeto 24 24
  66.         else state genericshrunkcode
  67.     }
  68.     else ifaction ASHARKFROZEN
  69.     {
  70.         fall
  71.  
  72.         ifcount THAWTIME { action ASHARKFLEE getlastpal }
  73.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  74.  
  75.         ifhitweapon
  76.         {
  77.             ifwasweapon FREEZEBLAST { strength 0 break }
  78.             lotsofglass 30
  79.             sound GLASS_BREAKING
  80.             killit
  81.         }
  82.         else ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  83.         break
  84.     }
  85.     else ifaction ASHARKFLEE
  86.     {
  87.         ifcount 16 ifrnd 48 { action ASHARKCRUZING move SHARKVELS randomangle geth }
  88.     }
  89.     else ifaction ASHARKCRUZING
  90.     {
  91.         ifcansee ifcount 48 ifrnd 2 { action ASHARKATACK move SHARKFASTVELS faceplayerslow getv break }
  92.         ifcount 32 ifnotmoving
  93.         {
  94.             ifrnd 128 move SHARKVELS randomangle geth
  95.             else move SHARKFASTVELS randomangle geth
  96.         }
  97.     }
  98.     else ifaction ASHARKATACK
  99.     {
  100.         ifcount 4
  101.         {
  102.             ifpdistl 1280
  103.             {
  104.                 ifp palive ifcanshoottarget
  105.                 {
  106.                     sound DUKE_GRUNT
  107.                     palfrom 32 32
  108.                     addphealth SHARKBITESTRENGTH
  109.                 }
  110.                 action ASHARKFLEE
  111.                 move SHARKFLEEVELS fleeenemy
  112.             }
  113.         }
  114.         else ifnotmoving
  115.             { ifcount 32 { action ASHARKCRUZING move SHARKVELS randomangle geth } }
  116.         else ifcount 48 ifrnd 2
  117.             { action ASHARKCRUZING move SHARKFASTVELS randomangle geth }
  118.     }
  119.  
  120.     ifhitweapon
  121.     {
  122.         ifdead
  123.             { sound SQUISHED guts JIBS6 5 killit }
  124.         else
  125.         {
  126.             ifwasweapon SHRINKSPARK
  127.             {
  128.                 action ASHARKSHRUNK
  129.                 sound ACTOR_SHRINKING
  130.             }
  131.             else ifwasweapon FREEZEBLAST
  132.             {
  133.                 action ASHARKFROZEN
  134.                 sound SOMETHINGFROZE
  135.                 move 0
  136.             }
  137.             else move SHARKVELS randomangle geth
  138.         }
  139.     }
  140. enda
  141.  
  142.  
  143. action BLIMPWAITTORESPAWN
  144.  
  145. state blimphitstate
  146.     cstat 0
  147.     spawn FIRSTGUNSPRITE
  148.     spawn EXPLOSION2
  149.  
  150.     debris SCRAP1 40            // Weapons and ammo!
  151.     debris SCRAP2 32
  152.     debris SCRAP3 32
  153.     debris SCRAP4 32
  154.     debris SCRAP5 32
  155.  
  156.     sound PIPEBOMB_EXPLODE
  157.     ifrespawn { action BLIMPRESPAWNTIME move 0 cstat 32768 }
  158.     else killit
  159. ends
  160.  
  161. actor BLIMP 1
  162.  
  163.     ifaction BLIMPWAITTORESPAWN
  164.     {
  165.         ifcount RESPAWNACTORTIME
  166.         {
  167.             action 0
  168.             cstat 0
  169.             move 0
  170.         }
  171.         break
  172.     }
  173.  
  174.     ifhitweapon
  175.     {
  176.         ifwasweapon RADIUSEXPLOSION state blimphitstate
  177.         ifwasweapon RPG state blimphitstate
  178.         strength 1
  179.     }
  180. enda
  181.  
  182.  
  183.  
  184. state rats
  185.     ifrnd 128 spawn RAT
  186.     ifrnd 128 spawn RAT
  187.     ifrnd 128 spawn RAT
  188.     ifrnd 128 spawn RAT
  189.     ifrnd 128 spawn RAT
  190.     ifrnd 128 spawn RAT
  191.     ifrnd 128 spawn RAT
  192.     ifrnd 128 spawn RAT
  193. ends
  194.  
  195. move RESPAWN_ACTOR_FLAG
  196.  
  197. action RUBCANDENT 1 1 1 1 1
  198. action RUBCAN
  199.  
  200. actor RUBBERCAN WEAK
  201.     ifaction RUBCANDENT { ifactioncount 16 { strength 0 action RUBCAN break } }
  202.     else ifhitweapon
  203.     {
  204.         ifwasweapon RADIUSEXPLOSION { state rats ifrnd 48 spawn BURNING debris SCRAP3 12 killit }
  205.         else action RUBCANDENT
  206.     }
  207. enda
  208.  
  209. state headhitstate
  210. // Unrem the following line to involving screen tilting during
  211. // low player hitpoint damage.
  212.  
  213.  
  214. // wackplayer
  215.  
  216.  
  217. ends
  218.  
  219.  
  220. action EXPBARRELFRAME         0   2   1   1   15
  221. actor EXPLODINGBARREL 26
  222.     fall
  223.     ifaction EXPBARRELFRAME
  224.     {
  225.         ifactioncount 2
  226.         {
  227.             hitradius 1024 WEAKEST WEAK MEDIUMSTRENGTH TOUGH
  228.             spawn EXPLOSION2
  229.             debris SCRAP2 2
  230.             sound PIPEBOMB_EXPLODE
  231.             killit
  232.         }
  233.         break
  234.     }
  235.     ifsquished
  236.     {
  237.         debris SCRAP1 5
  238.         killit
  239.         break
  240.     }
  241.     ifhitweapon
  242.         action EXPBARRELFRAME
  243. enda
  244.  
  245. action BURNING_FLAME    0   12   1   1   2
  246. move BURNING_VELS 
  247.  
  248. state burningstate
  249.  
  250.     ifgapzl 16 break
  251.     ifpdistg 10240 break
  252.  
  253.     ifcount 128
  254.     {
  255.         ifspawnedby TIRE
  256.         {
  257.             ifactioncount 512
  258.             {
  259.                 sizeto 16 16
  260.                 killit
  261.             }
  262.             ifrnd 16 sizeto 64 48
  263.         }
  264.         else
  265.         {
  266.             sizeto 8 8 sizeto 8 8
  267.             ifactioncount 192 killit
  268.         }
  269.     }
  270.     else
  271.     {
  272.         ifmove 0 move BURNING_VELS
  273.  
  274.         ifspawnedby BOX
  275.             { sizeto 32 32 ifcount 32 { spawn SMALLSMOKE killit } }
  276.         else ifspawnedby TREE1 sizeto 96 96
  277.         else ifspawnedby TREE2 sizeto 96 96
  278.         else ifspawnedby APLAYER { sizeto 40 40 sizeto 40 40 }
  279.         else sizeto 52 52
  280.         ifp palive ifpdistl 844 ifrnd 32 ifcansee { soundonce DUKE_LONGTERM_PAIN addphealth -1 palfrom 24 16 }
  281.     }
  282.  
  283. ends
  284.  
  285. actor BURNING WEAK BURNING_FLAME
  286.     state burningstate
  287. enda
  288.  
  289. actor BURNING2 WEAK BURNING_FLAME
  290.     state burningstate
  291. enda
  292.  
  293. action TOILETWATERFRAMES 0 4 1 1 1
  294. actor TOILETWATER 0 TOILETWATERFRAMES
  295.     ifpdistl 8192
  296.     {
  297.         soundonce WATER_GURGLE
  298.         ifspawnedby TOILET sizeto 34 34
  299.         else
  300.         {
  301.             ifspawnedby WATERFOUNTAINBROKE
  302.                 sizeto 6 15
  303.             else ifspawnedby TOILETWATER { } else sizeto 24 32
  304.         }
  305.  
  306.         ifp palive ifpdistl RETRIEVEDISTANCE ifp pfacing ifactioncount 32
  307.             ifphealthl MAXPLAYERHEALTH ifhitspace ifcansee
  308.         {
  309.             addphealth 1
  310.             globalsound DUKE_DRINKING
  311.             resetactioncount
  312.         }
  313.     }
  314. enda
  315.  
  316. action WOODENHORSEFRAME  0   1   4
  317. action WOODENFALLFRAME  122  1   5
  318.  
  319. actor HORSEONSIDE WEAKEST cactor WOODENHORSE action WOODENFALLFRAME enda
  320. actor WOODENHORSE WEAK WOODENHORSEFRAME
  321.     fall
  322.     ifhitweapon
  323.     {
  324.         ifdead
  325.         {
  326.             debris SCRAP1 4
  327.             debris SCRAP2 3
  328.             killit
  329.         }
  330.         else action WOODENFALLFRAME
  331.     }
  332. enda
  333.  
  334. state steamcode
  335.     ifpdistl 8192 soundonce STEAM_HISSING
  336.  
  337.     ifcount 20
  338.     {
  339.         resetcount
  340.         ifp palive ifpdistl 1024
  341.         {
  342.             addphealth -1
  343.             palfrom 16 16
  344.         }
  345.     }
  346.     else
  347.     {
  348.         ifspawnedby STEAM break ifspawnedby CEILINGSTEAM break
  349.         sizeto 24 24
  350.     }
  351. ends
  352.  
  353. action STEAMFRAMES      0       5       1       1       1
  354. actor STEAM 0 STEAMFRAMES
  355.     state steamcode
  356. enda
  357.  
  358. actor CEILINGSTEAM 0 STEAMFRAMES
  359.     state steamcode
  360. enda
  361.  
  362. actor WATERBUBBLEMAKER 0 0 randomangle
  363.     ifpdistl 3084 ifrnd 24 spawn WATERBUBBLE
  364. enda
  365.  
  366. action BUBBLE
  367. action CRACKEDBUBBLE    1
  368. move BUBMOVE           -10 -36
  369. move BUBMOVEFAST           -10 -52
  370.  
  371. actor WATERBUBBLE 0 BUBBLE BUBMOVE getv geth randomangle
  372.  
  373.     ifaction CRACKEDBUBBLE
  374.     {
  375.         ifinwater ifrnd 192 killit
  376.         ifactioncount 7 killit
  377.     }
  378.     else
  379.     {
  380.         ifcount 4
  381.         {
  382.             ifrnd 192 move BUBMOVE getv geth randomangle
  383.             else move BUBMOVEFAST getv geth randomangle
  384.             resetcount
  385.         }
  386.  
  387.         ifonwater
  388.         {
  389.             iffloordistl 8 action CRACKEDBUBBLE
  390.         }
  391.         else ifactioncount 40 action CRACKEDBUBBLE
  392.     }
  393. enda
  394.  
  395.  
  396. move SMOKEVEL 8 -16
  397. move ENGINE_SMOKE 64 -64
  398. move SMOKESHOOTOUT -192
  399. action SMOKEFRAMES 0 4 1 1 10
  400. actor SMALLSMOKE 0 SMOKEFRAMES
  401.     ifmove 0
  402.     {
  403.         ifspawnedby RECON
  404.             move SMOKESHOOTOUT geth
  405.         else ifspawnedby SECTOREFFECTOR
  406.             move ENGINE_SMOKE geth getv
  407.         else move SMOKEVEL geth getv faceplayer
  408.         ifspawnedby RPG
  409.         cstat 2
  410.     }
  411.     ifpdistl 1596 ifspawnedby RPG killit
  412.     ifactioncount 4 killit
  413. enda
  414.  
  415. action BARREL_DENTING  2 2 1 1 6
  416. action BARREL_DENTED   1
  417. action BARREL_DENTED2  2
  418.  
  419. move SPAWNED_BLOOD
  420.  
  421. actor NUKEBARRELDENTED WEAK
  422.     cactor NUKEBARREL
  423.     action BARREL_DENTED
  424. enda
  425.  
  426. actor NUKEBARRELLEAKED WEAK
  427.     cactor NUKEBARREL
  428.     action BARREL_DENTED2
  429. enda
  430.  
  431. actor NUKEBARREL MEDIUMSTRENGTH
  432.     ifsquished
  433.     {
  434.         debris SCRAP1 32
  435.         spawn BLOODPOOL
  436.         spawn OOZ
  437.         killit
  438.     }
  439.     fall
  440.     ifaction BARREL_DENTING
  441.     {
  442.         ifactioncount 2
  443.         {
  444.             debris SCRAP1 10
  445.             ifrnd 2 spawn BLOODPOOL
  446.             killit
  447.         }
  448.     }
  449.     else ifhitweapon
  450.     {
  451.         ifdead
  452.         {
  453.             sound VENT_BUST
  454.  
  455.             ifrnd 128
  456.                 spawn BLOODPOOL
  457.             action BARREL_DENTING
  458.         }
  459.         else
  460.         {
  461.             ifaction 0
  462.                 action BARREL_DENTED
  463.             else ifaction BARREL_DENTED
  464.             {
  465.                 action BARREL_DENTED2
  466.                 spawn BLOODPOOL
  467.             }
  468.             else ifaction BARREL_DENTED2
  469.                 action BARREL_DENTING
  470.         }
  471.     }
  472. enda
  473.  
  474. state burningbarrelcode
  475.     fall
  476.     ifcount 32
  477.     {
  478.         resetcount
  479.         ifp palive ifpdistl 1480 ifp phigher
  480.         {
  481.             addphealth -1
  482.             palfrom 16 16
  483.             ifrnd 96 sound DUKE_LONGTERM_PAIN
  484.         }
  485.     }
  486.     ifhitweapon
  487.     {
  488.         sound VENT_BUST
  489.         debris SCRAP1 10
  490.         ifrnd 128 spawn BURNING
  491.         else spawn BURNING2
  492.         killit
  493.     }
  494. ends
  495.  
  496. actor FIREBARREL state burningbarrelcode enda
  497. actor FIREVASE state burningbarrelcode enda
  498.  
  499. action SHRINKERFRAMES 0 4 1 1 10
  500. actor SHRINKEREXPLOSION 0 SHRINKERFRAMES
  501.     ifactioncount 4 killit
  502. enda
  503.  
  504. action EXPLOSION_FRAMES 0 20 1 1  4
  505. actor EXPLOSION2 1 EXPLOSION_FRAMES
  506.     ifactioncount 20 killit
  507. enda
  508.  
  509. actor EXPLOSION2BOT 1 EXPLOSION_FRAMES
  510.     ifactioncount 20 killit
  511. enda
  512.  
  513. action FFLAME_FR 0 16 1 1 1
  514. action FFLAME 0 1 1 1 1
  515.  
  516. actor FLOORFLAME 0 FFLAME_FR
  517.         ifaction FFLAME_FR
  518.         {
  519.                 ifpdistl 1024 hitradius 1024 WEAKEST WEAKEST WEAKEST WEAKEST
  520.                 ifactioncount 16
  521.                     action FFLAME
  522.         }
  523.         ifaction FFLAME ifrnd 4
  524.         {
  525.              action FFLAME_FR
  526.              sound CAT_FIRE
  527.              resetactioncount
  528.         }
  529.  
  530. enda
  531.  
  532.  
  533.  
  534. action ASATNSPIN   0 5 1 1 4
  535. action ASATSHOOTING -10 3 5 1 40
  536. action ASATWAIT 0 1 5 1 1
  537. move TURRVEL
  538.  
  539. actor ROTATEGUN ROTTURRETSTRENGTH
  540. // ASATSHOOTING TURRVEL faceplayer
  541.  
  542.     ifaction 0
  543.     {
  544.         action ASATSHOOTING
  545.         move TURRVEL faceplayer
  546.     }
  547.     else ifaction ASATNSPIN
  548.         { ifactioncount 32 { action ASATWAIT move TURRVEL faceplayer } }
  549.     else ifaction ASATSHOOTING
  550.     {
  551.         ifactioncount 12 { ifrnd 32 action ASATWAIT }
  552.         ifcount 32 resetcount
  553.         else ifcount 16 { ifcount 17 { } else { sound PRED_ATTACK shoot FIRELASER } }
  554.         else ifcount 4 { ifcount 5 { } else { ifcansee ifcanshoottarget { sound PRED_ATTACK shoot FIRELASER } } }
  555.     }
  556.     else ifaction ASATWAIT
  557.         { ifactioncount 64 ifrnd 32 ifp palive ifcansee { action ASATSHOOTING move TURRVEL faceplayer } }
  558.     ifhitweapon { ifdead { addkills 1 sound LASERTRIP_EXPLODE debris SCRAP1 15 spawn EXPLOSION2 killit }
  559.         else { action ASATNSPIN debris SCRAP1 4 } move 0 }
  560.  
  561. enda
  562.  
  563. action RIP_F 0 8 1 1 1
  564. actor FORCERIPPLE 0 RIP_F
  565.     ifactioncount 8 killit
  566. enda
  567.  
  568. action TRANSFOWARD 0  6  1  1  2
  569. action TRANSBACK   5  6  1 -1  2
  570. actor TRANSPORTERSTAR 0 TRANSFOWARD
  571.     ifaction TRANSFOWARD
  572.     {
  573.         ifactioncount 6
  574.             action TRANSBACK
  575.     }
  576.     else
  577.         ifactioncount 6 killit
  578. enda
  579.  
  580. action BEAMFOWARD  0  4  1  1  9
  581. actor TRANSPORTERBEAM 0 BEAMFOWARD
  582.     sizeto 32 64 sizeto 32 64 sizeto 32 64
  583.     ifactioncount 4 killit
  584. enda
  585.  
  586. state getcode
  587.     ifactor ATOMICHEALTH globalsound GETATOMICHEALTH
  588.     else globalsound DUKE_GET
  589.     palfrom 16 0 32
  590.     ifrespawn
  591.     {
  592.         move RESPAWN_ACTOR_FLAG
  593.         spawn RESPAWNMARKERRED
  594.         cstat 32768
  595.     }
  596.     else killit
  597. ends
  598.  
  599. state randgetweapsnds
  600.     ifrnd 64 globalsound DUKE_GETWEAPON1
  601.     else ifrnd 96 globalsound DUKE_GETWEAPON2
  602.     else ifrnd 128 globalsound DUKE_GETWEAPON3
  603.     else ifrnd 140 globalsound DUKE_GETWEAPON4
  604.     else globalsound DUKE_GETWEAPON6
  605. ends
  606.  
  607. state getweaponcode
  608.  
  609.     state randgetweapsnds
  610.  
  611.     palfrom 32 0 32
  612.     ifgotweaponce 1 break
  613.     ifrespawn
  614.     {
  615.         move RESPAWN_ACTOR_FLAG
  616.         spawn RESPAWNMARKERRED
  617.         cstat 32768
  618.     }
  619.     else killit
  620. ends
  621.  
  622.  
  623. state respawnit
  624.     ifcount RESPAWNITEMTIME { spawn TRANSPORTERSTAR move 0 cstat 0 sound TELEPORTER }
  625. ends
  626.  
  627. state quikget
  628.     ifactor ATOMICHEALTH globalsound GETATOMICHEALTH
  629.     else globalsound DUKE_GET
  630.     palfrom 16 0 32
  631.     killit
  632. ends
  633.  
  634. state quikweaponget
  635.     state randgetweapsnds
  636.     palfrom 32 0 32
  637.     ifgotweaponce 1 break
  638.     killit
  639. ends
  640.  
  641. actor STEROIDS
  642.     fall
  643.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  644.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE
  645.         ifpinventory GET_STEROIDS STEROID_AMOUNT ifcanseetarget
  646.     {
  647.         addinventory GET_STEROIDS STEROID_AMOUNT quote 37 state getcode
  648.         ifspawnedby STEROIDS state getcode
  649.         else state quikget
  650.     }
  651. enda
  652.  
  653. actor HEATSENSOR
  654.     fall
  655.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  656.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifpinventory GET_HEATS HEAT_AMOUNT
  657.         ifcanseetarget
  658.     {
  659.         addinventory GET_HEATS HEAT_AMOUNT quote 101 state getcode
  660.         ifspawnedby HEATSENSOR state getcode
  661.         else state quikget
  662.     }
  663. enda
  664.  
  665. actor BOOTS
  666.     fall
  667.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  668.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifpinventory GET_BOOTS BOOT_AMOUNT
  669.         ifcanseetarget
  670.     {
  671.         addinventory GET_BOOTS BOOT_AMOUNT quote 6
  672.         ifspawnedby BOOTS state getcode
  673.         else state quikget
  674.     }
  675. enda
  676.  
  677. actor SHIELD
  678.     fall
  679.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  680.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifpinventory GET_SHIELD SHIELD_AMOUNT
  681.         ifcanseetarget
  682.     {
  683.         ifspawnedby PIGCOP
  684.         {
  685.             ifrnd 128 addinventory GET_SHIELD PIG_SHIELD_AMOUNT1
  686.             else addinventory GET_SHIELD PIG_SHIELD_AMOUNT2
  687.             quote 104
  688.             sound KICK_HIT palfrom 24 0 32 killit
  689.         }
  690.         else addinventory GET_SHIELD SHIELD_AMOUNT quote 38
  691.         ifspawnedby SHIELD state getcode
  692.         else state quikget
  693.     }
  694. enda
  695.  
  696. actor AIRTANK
  697.     fall
  698.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  699.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifpinventory GET_SCUBA SCUBA_AMOUNT
  700.         ifcanseetarget
  701.     {
  702.         addinventory GET_SCUBA SCUBA_AMOUNT quote 39 state getcode
  703.         ifspawnedby AIRTANK state getcode
  704.         else state quikget
  705.     }
  706. enda
  707.  
  708. action HOLODUKE_FRAMES 0 4 1 1 8
  709. actor HOLODUKE 0 HOLODUKE_FRAMES
  710.     fall
  711.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  712.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifpinventory GET_HOLODUKE HOLODUKE_AMOUNT
  713.         ifcanseetarget
  714.     {
  715.         addinventory GET_HOLODUKE HOLODUKE_AMOUNT quote 51 state getcode
  716.         ifspawnedby HOLODUKE state getcode
  717.         else state quikget
  718.     }
  719. enda
  720.  
  721. actor JETPACK
  722.     fall
  723.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  724.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifpinventory GET_JETPACK JETPACK_AMOUNT ifcanseetarget
  725.     {
  726.         addinventory GET_JETPACK JETPACK_AMOUNT quote 41 state getcode
  727.         ifspawnedby JETPACK state getcode
  728.         else state quikget
  729.     }
  730. enda
  731.  
  732. actor ACCESSCARD
  733.     fall
  734.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  735.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  736.     {
  737.         ifpinventory GET_ACCESS 0 break
  738.         addinventory GET_ACCESS 1
  739.         quote 43
  740.         state getcode
  741.     }
  742. enda
  743.  
  744. // test boss_recod
  745.  
  746.  
  747. actor AMMO
  748.     fall
  749.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  750.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifcanseetarget
  751.     {
  752.         addammo PISTOL_WEAPON PISTOLAMMOAMOUNT quote 65
  753.         ifspawnedby AMMO state getcode
  754.         else state quikget
  755.     }
  756. enda
  757.  
  758. actor FREEZEAMMO
  759.     fall
  760.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  761.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifcanseetarget
  762.     {
  763.         addammo FREEZE_WEAPON FREEZEAMMOAMOUNT quote 66
  764.         ifspawnedby FREEZEAMMO state getcode
  765.         else state quikget
  766.     }
  767. enda
  768.  
  769.  
  770.  
  771. actor SHOTGUNAMMO
  772.     fall
  773.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  774.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifcanseetarget
  775.     {
  776.         addammo SHOTGUN_WEAPON SHOTGUNAMMOAMOUNT quote 69
  777.         ifspawnedby SHOTGUNAMMO state getcode
  778.         else state quikget
  779.     }
  780. enda
  781.  
  782. actor AMMOLOTS
  783.     fall
  784.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  785.     else ifp pshrunk { } else ifp palive ifcount 6 ifpdistl RETRIEVEDISTANCE ifcanseetarget
  786.     {
  787.         addammo PISTOL_WEAPON 48 quote 65
  788.         ifspawnedby AMMOLOTS state getcode
  789.         else state quikget
  790.     }
  791. enda
  792.  
  793. actor CRYSTALAMMO
  794.     fall
  795.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  796.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  797.     {
  798.         addammo SHRINKER_WEAPON CRYSTALAMMOAMOUNT quote 78
  799.         ifspawnedby CRYSTALAMMO state getcode
  800.         else state quikget
  801.     }
  802. enda
  803.  
  804. actor BATTERYAMMO
  805.     fall
  806.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  807.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  808.     {
  809.         addammo CHAINGUN_WEAPON CHAINGUNAMMOAMOUNT quote 63
  810.         ifspawnedby BATTERYAMMO state getcode
  811.         else state quikget
  812.     }
  813. enda
  814.  
  815. actor DEVISTATORAMMO
  816.     fall
  817.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  818.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  819.     {
  820.         addammo DEVISTATOR_WEAPON DEVISTATORAMMOAMOUNT quote 14
  821.         ifspawnedby DEVISTATORAMMO state getcode
  822.         else state quikget
  823.     }
  824. enda
  825.  
  826. actor RPGAMMO
  827.     fall
  828.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  829.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  830.     {
  831.         addammo RPG_WEAPON RPGAMMOBOX quote 64
  832.         ifspawnedby RPGAMMO state getcode
  833.         else state quikget
  834.     }
  835. enda
  836.  
  837. actor HBOMBAMMO
  838.     fall
  839.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  840.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  841.     {
  842.         ifgotweaponce 0 break // ( Multiplayer (mode 3) only )
  843.  
  844.         addweapon HANDBOMB_WEAPON 1 quote 55
  845.         addammo HANDBOMB_WEAPON HANDBOMBBOX
  846.  
  847.         ifspawnedby HBOMBAMMO state getweaponcode
  848.         else state quikweaponget
  849.     }
  850. enda
  851.  
  852. actor RPGSPRITE
  853.     fall
  854.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  855.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  856.     {
  857.         ifgotweaponce 0 break // ( Multiplayer (mode 3) only )
  858.  
  859.         addweapon RPG_WEAPON RPGAMMOBOX quote 56
  860.         ifspawnedby RPGSPRITE state getweaponcode
  861.         else state quikweaponget
  862.     }
  863. enda
  864.  
  865. // 531.89 GTE.
  866. // IMA.
  867. // PO BOX 4629
  868. // Rocford ill, 61110-4629
  869. // Ms. Lee
  870.  
  871. actor SHOTGUNSPRITE
  872.     fall
  873.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  874.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  875.     {
  876.         ifspawnedby PIGCOP
  877.         {
  878.             addweapon SHOTGUN_WEAPON 0
  879.             ifrnd 64 addammo SHOTGUN_WEAPON 4
  880.             else ifrnd 64 addammo SHOTGUN_WEAPON 3
  881.             else ifrnd 64 addammo SHOTGUN_WEAPON 2
  882.             else addammo SHOTGUN_WEAPON 1
  883.         }
  884.         else
  885.         {
  886.             ifgotweaponce 0 break // Multiplayer only
  887.             addweapon SHOTGUN_WEAPON SHOTGUNAMMOAMOUNT quote 57
  888.         }
  889.         ifspawnedby SHOTGUNSPRITE state getweaponcode
  890.         else state quikweaponget
  891.     }
  892. enda
  893.  
  894.  
  895.  
  896. actor SIXPAK
  897.     fall
  898.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  899.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifphealthl MAXPLAYERHEALTH ifcanseetarget
  900.     {
  901.         addphealth 30 quote 62
  902.         ifspawnedby SIXPAK state getcode
  903.         else state quikget
  904.     }
  905. enda
  906.  
  907. actor COLA
  908.     fall
  909.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  910.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifphealthl MAXPLAYERHEALTH // ifcanseetarget
  911.     {
  912.         addphealth 10 quote 61
  913.         ifspawnedby COLA state getcode
  914.         else state quikget
  915.     }
  916. enda
  917.  
  918. actor ATOMICHEALTH
  919.     fall
  920.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  921.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  922.         ifphealthl MAXPLAYERATOMICHEALTH
  923.     {
  924.         addphealth 50 quote 19
  925.         ifspawnedby ATOMICHEALTH state getcode
  926.         else state quikget
  927.     }
  928. enda
  929.  
  930.  
  931.  
  932.  
  933. actor FIRSTAID
  934.     fall
  935.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  936.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6
  937.         ifpinventory GET_FIRSTAID FIRSTAID_AMOUNT ifcanseetarget
  938.     {
  939.         addinventory GET_FIRSTAID FIRSTAID_AMOUNT quote 3
  940.  
  941.         ifspawnedby FIRSTAID state getcode
  942.         else state quikget
  943.     }
  944. enda
  945.  
  946.  
  947. actor FIRSTGUNSPRITE
  948.     fall
  949.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  950.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  951.     {
  952.         ifgotweaponce 0 break
  953.  
  954.         addweapon PISTOL_WEAPON 48
  955.         ifspawnedby FIRSTGUNSPRITE state getweaponcode
  956.         else state quikweaponget
  957.     }
  958. enda
  959.  
  960.  
  961. actor TRIPBOMBSPRITE
  962.     fall
  963.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  964.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  965.     {
  966.         ifgotweaponce 0 break
  967.  
  968.         addweapon TRIPBOMB_WEAPON 1
  969.         quote 58
  970.         ifspawnedby TRIPBOMBSPRITE state getweaponcode
  971.         else state quikweaponget
  972.     }
  973. enda
  974.  
  975. actor CHAINGUNSPRITE
  976.     fall
  977.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  978.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  979.     {
  980.         ifgotweaponce 0 break
  981.  
  982.         addweapon CHAINGUN_WEAPON 50 quote 54
  983.         ifspawnedby CHAINGUNSPRITE state getweaponcode
  984.         else state quikweaponget
  985.     }
  986. enda
  987.  
  988.  
  989.  
  990. actor SHRINKERSPRITE
  991.     fall
  992.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  993.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  994.     {
  995.         ifgotweaponce 0 break
  996.  
  997.         addweapon SHRINKER_WEAPON 10 quote 60
  998.         ifspawnedby SHRINKERSPRITE state getweaponcode
  999.         else state quikweaponget
  1000.     }
  1001. enda
  1002.  
  1003. actor FREEZESPRITE
  1004.     fall
  1005.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  1006.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  1007.     {
  1008.         ifgotweaponce 0 break
  1009.  
  1010.         addweapon FREEZE_WEAPON FREEZEAMMOAMOUNT quote 59
  1011.         ifspawnedby FREEZESPRITE state getweaponcode
  1012.         else state quikweaponget
  1013.     }
  1014. enda
  1015.  
  1016. actor DEVISTATORSPRITE
  1017.     fall
  1018.     ifmove RESPAWN_ACTOR_FLAG state respawnit
  1019.     else ifp pshrunk { } else ifp palive ifpdistl RETRIEVEDISTANCE ifcount 6 ifcanseetarget
  1020.     {
  1021.         ifgotweaponce 0 break // ( Multiplayer (mode 3) only )
  1022.  
  1023.         addweapon DEVISTATOR_WEAPON DEVISTATORAMMOAMOUNT quote 87
  1024.         ifspawnedby DEVISTATORSPRITE state getweaponcode
  1025.         else state quikweaponget
  1026.     }
  1027. enda
  1028.  
  1029.  
  1030. state firestate
  1031.  
  1032.     ifgapzl 16 break
  1033.     ifinwater killit
  1034.  
  1035.     ifp palive ifpdistl 844 ifrnd 32 ifcansee { soundonce DUKE_LONGTERM_PAIN addphealth -1 palfrom 32 32 }
  1036.  
  1037.     ifactor FIRE ifspawnedby FIRE break
  1038.     else ifactor FIRE2 ifspawnedby FIRE2 break
  1039.  
  1040.     iffloordistl 128
  1041.     {
  1042.         ifcount 32 sizeto 8 8
  1043.         ifcount 64 killit
  1044.     }
  1045.     else killit
  1046.  
  1047. ends
  1048.  
  1049. action FIRE_FRAMES     -1 14 1 1 1
  1050. move FIREVELS
  1051. actor FIRE WEAK FIRE_FRAMES FIREVELS state firestate enda
  1052. actor FIRE2 WEAK FIRE_FRAMES FIREVELS state firestate enda
  1053.  
  1054. actor FECES
  1055.     ifcount 24
  1056.     {
  1057.         ifpdistl RETRIEVEDISTANCE
  1058.         {
  1059.             soundonce DUKE_STEPONFECES
  1060.             sound STEPNIT
  1061.  
  1062.             spawn BLOODPOOL   // Will be brown
  1063.             killit
  1064.         }
  1065.     }
  1066.     else sizeto 32 32
  1067. enda
  1068.  
  1069. state drop_ammo ifrnd SPAWNAMMOODDS spawn AMMO ends
  1070. state drop_battery ifrnd SPAWNAMMOODDS spawn BATTERYAMMO ends
  1071. state drop_sgshells ifrnd SPAWNAMMOODDS spawn SHOTGUNAMMO ends
  1072. state drop_shotgun ifrnd SPAWNAMMOODDS spawn SHOTGUNSPRITE ends
  1073. state drop_chaingun
  1074.     ifrnd SPAWNAMMOODDS
  1075.     {
  1076.         ifrnd 32 spawn CHAINGUNSPRITE
  1077.         else spawn BATTERYAMMO
  1078.     }
  1079. ends
  1080.  
  1081. state jib_sounds
  1082.     ifrnd SWEARFREQUENCY
  1083.     {
  1084.         ifrnd 16 globalsound JIBBED_ACTOR1
  1085.         else ifrnd 16 globalsound JIBBED_ACTOR2
  1086.         else ifrnd 16 globalsound JIBBED_ACTOR3
  1087.         else ifrnd 16 globalsound JIBBED_ACTOR5
  1088.         else ifrnd 16 globalsound JIBBED_ACTOR6
  1089.         else ifrnd 16 globalsound JIBBED_ACTOR10
  1090.         else ifrnd 16 globalsound JIBBED_ACTOR7
  1091.         else ifrnd 16 globalsound JIBBED_ACTOR4
  1092.         else ifrnd 16 globalsound JIBBED_ACTOR8
  1093.         else ifrnd 16 globalsound JIBBED_ACTOR13
  1094.         else ifrnd 16 globalsound JIBBED_ACTOR9
  1095.         else ifrnd 16 globalsound JIBBED_ACTOR11
  1096.         else ifrnd 16 globalsound JIBBED_ACTOR12
  1097.     }
  1098. ends
  1099.  
  1100. state standard_jibs
  1101.     guts JIBS2 1
  1102.     guts JIBS3 2
  1103.     guts JIBS4 3
  1104.     guts JIBS5 2
  1105.     guts JIBS6 3
  1106.     ifrnd 4 { guts JIBS1 1 spawn BLOODPOOL }               // spine
  1107.     state jib_sounds
  1108. ends
  1109.  
  1110. action FEMSHRUNK
  1111. action FEMFROZEN1 1
  1112. action FEMFROZEN2
  1113. action FEMDANCE1 19 1 1 1 16
  1114. action FEMDANCE3 19 1 1 1 26
  1115.  
  1116. action FEMDANCE2 20 2 1 1 10
  1117. action FEMANIMATE
  1118.  
  1119. state femcode
  1120.  
  1121.     ifactor NAKED1 { } else ifactor FEM6 { } else
  1122.     {
  1123.         fall
  1124.         ifactor BLOODYPOLE ifhitweapon ifdead
  1125.             { state standard_jibs killit }
  1126.     }
  1127.  
  1128.     ifaction FEMSHRUNK
  1129.     {
  1130.         ifcount SHRUNKDONECOUNT action FEMANIMATE
  1131.         else ifcount SHRUNKCOUNT sizeto 40 40
  1132.         else state genericshrunkcode
  1133.     }
  1134.     else ifaction FEMDANCE1 { ifactioncount 2 action FEMDANCE2 }
  1135.     else ifaction FEMDANCE2 { ifactioncount 8 action FEMDANCE3 }
  1136.     else ifaction FEMDANCE3 { ifactioncount 2 action FEMANIMATE }
  1137.     else ifaction FEMFROZEN1
  1138.     {
  1139.         ifcount THAWTIME { action FEMANIMATE getlastpal }
  1140.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  1141.  
  1142.         ifhitweapon
  1143.         {
  1144.             ifwasweapon FREEZEBLAST { strength 0 break }
  1145.             lotsofglass 30
  1146.             sound GLASS_BREAKING
  1147.             respawnhitag
  1148.             ifrnd 84 spawn BLOODPOOL
  1149.             killit
  1150.         }
  1151.         else ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  1152.         break
  1153.     }
  1154.     else ifaction FEMFROZEN2
  1155.     {
  1156.         ifcount THAWTIME { action FEMANIMATE getlastpal }
  1157.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  1158.  
  1159.         ifhitweapon
  1160.         {
  1161.             ifwasweapon FREEZEBLAST { strength 0 break }
  1162.             lotsofglass 30
  1163.  
  1164.             sound GLASS_BREAKING
  1165.             ifrnd 84 spawn BLOODPOOL
  1166.             respawnhitag
  1167.  
  1168.             ifrnd 128 sound DUKE_HIT_STRIPPER1
  1169.             else sound DUKE_HIT_STRIPPER2
  1170.  
  1171.             killit
  1172.         }
  1173.         else ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  1174.         break
  1175.     }
  1176.  
  1177.     ifhitweapon
  1178.     {
  1179.         ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING count 0 action FEMSHRUNK break }
  1180.  
  1181.         ifdead
  1182.         {
  1183.             ifwasweapon FREEZEBLAST
  1184.             {
  1185.                 ifaction FEMSHRUNK break
  1186.  
  1187.                 ifactor NAKED1 action FEMFROZEN2
  1188.                 else ifactor FEM5 action FEMFROZEN2
  1189.                 else ifactor FEM6 action FEMFROZEN2
  1190.                 else ifactor FEM8 action FEMFROZEN2
  1191.                 else ifactor FEM9 action FEMFROZEN2
  1192.                 else ifactor PODFEM1 action FEMFROZEN2
  1193.                 else action FEMFROZEN1
  1194.  
  1195.                 move 0
  1196.                 spritepal 1
  1197.                 strength 0
  1198.  
  1199.                 sound SOMETHINGFROZE
  1200.  
  1201.                 break
  1202.             }
  1203.  
  1204.             ifrnd 128 sound DUKE_HIT_STRIPPER1
  1205.             else sound DUKE_HIT_STRIPPER2
  1206.  
  1207.             respawnhitag
  1208.             state standard_jibs
  1209.  
  1210.             shoot BLOODSPLAT1
  1211.             shoot BLOODSPLAT2
  1212.             shoot BLOODSPLAT3
  1213.             shoot BLOODSPLAT4
  1214.             spawn BLOODPOOL
  1215.  
  1216.             ifactor FEM1 money 5
  1217.             else ifactor FEM2 { money 7 cactor BARBROKE cstat 0 }
  1218.             else ifactor FEM3 money 4
  1219.             else ifactor FEM7 money 8
  1220.  
  1221.             ifactor FEM5 { strength TOUGH cactor BLOODYPOLE }
  1222.             else ifactor FEM6 { cstat 0 cactor FEM6PAD }
  1223.             else ifactor FEM8 { strength TOUGH cactor BLOODYPOLE }
  1224.             else
  1225.             {
  1226.                 spritepal 6
  1227.                 soundonce LADY_SCREAM
  1228.                 ifactor NAKED1 debris SCRAP3 18
  1229.                 else ifactor PODFEM1 debris SCRAP3 18
  1230.                 killit
  1231.             }
  1232.         }
  1233.         else
  1234.         {
  1235.             sound SQUISHED
  1236.             guts JIBS6 1
  1237.             ifactor FEM8 break
  1238.             soundonce LADY_SCREAM
  1239.         }
  1240.     }
  1241. ends
  1242.  
  1243. state killme
  1244.     ifp pfacing ifpdistl 1280 ifhitspace soundonce KILLME
  1245. ends
  1246.  
  1247. state tipme
  1248.     ifp pfacing ifpdistl 1280 ifhitspace
  1249.     {
  1250.         tip
  1251.         ifrnd 128 soundonce DUKE_TIP1
  1252.         else soundonce DUKE_TIP2
  1253.         ifactor FEM1 action FEMDANCE1
  1254.     }
  1255. ends
  1256.  
  1257. actor FEM1 TOUGH FEMANIMATE state tipme state femcode enda
  1258. actor FEM2 TOUGH FEMANIMATE state tipme state femcode enda
  1259. actor FEM3 TOUGH FEMANIMATE state tipme state femcode enda
  1260. actor FEM4 TOUGH FEMANIMATE state femcode enda
  1261. actor FEM5 TOUGH FEMANIMATE state killme state femcode enda
  1262. actor FEM6 TOUGH FEMANIMATE state killme state femcode enda
  1263. actor FEM7 TOUGH FEMANIMATE state tipme state femcode enda
  1264. actor FEM8 TOUGH FEMANIMATE state femcode enda
  1265. actor FEM9 TOUGH FEMANIMATE state femcode enda
  1266. actor NAKED1 TOUGH FEMANIMATE state killme state femcode enda
  1267. actor PODFEM1 TOUGH FEMANIMATE state killme state femcode enda
  1268. actor BLOODYPOLE TOUGH state femcode enda
  1269.  
  1270. actor STATUEFLASH fall // state statuehit
  1271.     ifcount 32 cactor STATUE
  1272. enda
  1273.  
  1274. actor STATUE fall
  1275.     ifp pfacing ifpdistl 1280 ifhitspace { cactor STATUEFLASH move 0 }
  1276. enda
  1277.  
  1278. actor MIKE
  1279.     ifp pfacing ifpdistl 1280 ifhitspace mikesnd
  1280. enda
  1281.  
  1282. state troop_body_jibs
  1283.     ifrnd 64 guts HEADJIB1 1
  1284.     ifrnd 64 guts LEGJIB1 2
  1285.     ifrnd 64 guts ARMJIB1 1
  1286.     ifrnd 48 spawn BLOODPOOL
  1287. ends
  1288.  
  1289. state liz_body_jibs
  1290. ifrnd 64 guts LIZMANHEAD1 1
  1291.     ifrnd 64 guts LIZMANLEG1 2
  1292.     ifrnd 64 guts LIZMANARM1 1
  1293.     ifrnd 48 spawn BLOODPOOL
  1294. ends
  1295.  
  1296. state delete_enemy killit ends
  1297.  
  1298.  
  1299. action BLOODFRAMES 0 4 1 1 15
  1300. actor BLOOD 0 BLOODFRAMES
  1301.     sizeto 72 72 sizeto 72 72 sizeto 72 72
  1302.     ifpdistg 3144 killit
  1303.     ifactioncount 4 killit
  1304. enda
  1305.  
  1306. action EGGOPEN1 1 1 1 1 4
  1307. action EGGOPEN2 2 1 1 1 4
  1308. action EGGOPEN3 2 1 1 1 4
  1309. action EGGWAIT  0
  1310. action EGGFROZEN 1
  1311. action EGGSHRUNK 1
  1312.  
  1313. actor EGG TOUGH
  1314.     ifaction 0
  1315.     {
  1316.         ifcount 64
  1317.         {
  1318.             ifrnd 128 { action EGGWAIT move 0 }
  1319.             else
  1320.             {
  1321.                 sound SLIM_HATCH
  1322.                 action EGGOPEN1
  1323.             }
  1324.         }
  1325.     }
  1326.     else ifaction EGGOPEN1 ifactioncount 4 action EGGOPEN2
  1327.     else ifaction EGGOPEN2 ifactioncount 4 { spawn GREENSLIME action EGGOPEN3 }
  1328.     else ifaction EGGSHRUNK
  1329.     {
  1330.         ifcount SHRUNKDONECOUNT action EGGOPEN2
  1331.         else ifcount SHRUNKCOUNT sizeto 48 40
  1332.         else state genericshrunkcode
  1333.     }
  1334.     else ifaction EGGFROZEN
  1335.     {
  1336.         ifcount THAWTIME { action 0 getlastpal }
  1337.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  1338.  
  1339.         ifhitweapon
  1340.         {
  1341.             ifwasweapon FREEZEBLAST { strength 0 break }
  1342.             lotsofglass 30
  1343.  
  1344.             sound GLASS_BREAKING
  1345.             ifrnd 84 spawn BLOODPOOL
  1346.  
  1347.             addkills 1
  1348.             killit
  1349.         }
  1350.  
  1351.         // ifp pducking
  1352.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  1353.  
  1354.         break
  1355.     }
  1356.  
  1357.     ifhitweapon
  1358.     {
  1359.         ifwasweapon SHRINKSPARK { move 0 sound ACTOR_SHRINKING action EGGSHRUNK break }
  1360.  
  1361.         ifdead
  1362.         {
  1363.             ifwasweapon FREEZEBLAST
  1364.                 { sound SOMETHINGFROZE spritepal 1 move 0 action EGGFROZEN strength 0 break }
  1365.  
  1366.             addkills 1
  1367.  
  1368.             sound SQUISHED
  1369.  
  1370.             state standard_jibs
  1371.             state delete_enemy
  1372.         }
  1373.     }
  1374.     else ifaction EGGWAIT
  1375.     {
  1376.         ifcount 512 ifrnd 2
  1377.         {
  1378.             ifaction EGGSHRUNK break
  1379.             sound SLIM_HATCH
  1380.             action EGGOPEN1
  1381.         }
  1382.     }
  1383.  
  1384. enda
  1385.  
  1386. actor KNEE KNEE_WEAPON_STRENGTH enda
  1387. actor SPIT SPIT_WEAPON_STRENGTH enda
  1388. actor CHAINGUN CHAINGUN_WEAPON_STRENGTH enda
  1389. actor SHOTGUN SHOTGUN_WEAPON_STRENGTH enda
  1390. actor FIRELASER FIRELASER_WEAPON_STRENGTH enda
  1391. actor HEAVYHBOMB HANDBOMB_WEAPON_STRENGTH enda
  1392. actor BOUNCEMINE BOUNCEMINE_WEAPON_STRENGTH enda
  1393. actor MORTER MORTER_WEAPON_STRENGTH enda
  1394. actor SHRINKSPARK SHRINKER_WEAPON_STRENGTH enda
  1395. actor RPG RPG_WEAPON_STRENGTH enda
  1396. actor FREEZEBLAST FREEZETHROWER_WEAPON_STRENGTH enda
  1397. actor DEVISTATORBLAST FREEZETHROWER_WEAPON_STRENGTH enda
  1398. actor COOLEXPLOSION1 COOL_EXPLOSION_STRENGTH enda
  1399. actor TRIPBOMB TRIPBOMB_STRENGTH enda
  1400.  
  1401. action WEAP2FRAMES 0  4  1  1  6
  1402. actor SHOTSPARK1 PISTOL_WEAPON_STRENGTH WEAP2FRAMES
  1403.     ifdead killit
  1404.     ifactioncount 4 killit
  1405.     else
  1406.     {
  1407.         ifactioncount 3 { ifinwater spawn WATERBUBBLE }
  1408.         else ifcount 2 { } else ifonwater spawn WATERSPLASH2
  1409.     }
  1410. enda
  1411.  
  1412. state standard_pjibs
  1413.     guts JIBS1 1
  1414.     guts JIBS3 2
  1415.     guts JIBS4 1
  1416.     guts JIBS5 1
  1417.     guts JIBS6 2
  1418.     guts DUKETORSO 1
  1419.     guts DUKELEG 2
  1420.     guts DUKEGUN 1
  1421.     ifrnd 16 money 1
  1422. ends
  1423.  
  1424. move DUKENOTMOVING
  1425. state handle_dead_dukes
  1426.     fall
  1427.     ifmove 0     // 1st time initializiation...
  1428.     {
  1429.         ifrnd 128 cstat 4
  1430.         else cstat 0
  1431.         move DUKENOTMOVING
  1432.     }
  1433.  
  1434.     ifsquished
  1435.     {
  1436.         sound SQUISHED
  1437.         spawn OOZ
  1438.         killit
  1439.     }
  1440.     else ifcount 1024 ifpdistg 4096 killit
  1441.     else
  1442.     {
  1443.         strength 0
  1444.         ifhitweapon ifwasweapon RADIUSEXPLOSION
  1445.         {
  1446.             state standard_jibs
  1447.             killit
  1448.         }
  1449.     }
  1450. ends
  1451.  
  1452. action PLYINGFRAMES 0 1 0 1 1
  1453. actor DUKELYINGDEAD 0 PLYINGFRAMES
  1454.     state handle_dead_dukes
  1455. enda
  1456.  
  1457. action PSTAND       0   1   5   1    1
  1458. action PEXPLODE     106   5   1   1   10
  1459. action PEXPLODEAD   113   1   1
  1460.  
  1461. action PJPHOUVER    15   1   5   1
  1462. action PWALK        20   4   5   1   16
  1463. action PRUN         20   4   5   1   10
  1464. action PWALKBACK    45   4   5  -1   16
  1465. action PRUNBACK     45   4   5  -1   10
  1466. action PJUMPING     50   4   5   1   30
  1467. action PFALLING     65   1   5
  1468. action PDUCKING     86   1   5
  1469. action PCRAWLING    86   3   5   1   20
  1470. action PAKICKING    40   2   5   1   25
  1471. action PFLINTCHING  106  1   1   1   10
  1472. action PTHROWNBACK  106  5   1   1   18
  1473. action PFROZEN       20  1   5
  1474. action PLYINGDEAD   113  1   1
  1475.  
  1476. action PSWIMMINGGO   375   1   5   1   10
  1477. action PSWIMMING     375   4   5   1   13
  1478. action PSWIMMINGWAIT 395   1   5   1   13
  1479. action PTREDWATER    395   2   5   1   17
  1480.  
  1481. move PSTOPED
  1482. move PSHRINKING // used as a var only
  1483.  
  1484. state check_dead_thrown_back
  1485.     ifdead
  1486.     {
  1487.         strength 0
  1488.         action PTHROWNBACK
  1489.     }
  1490. ends
  1491.  
  1492. state check_pstandard
  1493.     ifp pwalking action PWALK
  1494.     else ifp pkicking action PAKICKING
  1495.     else ifp pwalkingback action PWALKBACK
  1496.     else ifp prunning action PRUN
  1497.     else ifp prunningback action PRUNBACK
  1498.     else ifp pjumping
  1499.         action PJUMPING
  1500.     else ifp pducking action PDUCKING
  1501. ends
  1502.  
  1503. state random_wall_jibs
  1504.     ifrnd 96 shoot BLOODSPLAT1
  1505.     ifrnd 96 shoot BLOODSPLAT2
  1506.     ifrnd 96 shoot BLOODSPLAT3
  1507.     ifrnd 96 shoot BLOODSPLAT4
  1508.     ifrnd 96 shoot BLOODSPLAT1
  1509. ends
  1510.  
  1511. actor APLAYER 100 PSTAND 0 0
  1512.  
  1513.     ifaction 0 action PSTAND
  1514.     ifdead
  1515.     {
  1516.         ifsquished palfrom 32 63 63 63
  1517.         else fall
  1518.  
  1519.         ifactioncount 7 { move 0 } else ifactioncount 6
  1520.         {
  1521.             ifmultiplayer { }
  1522.             else
  1523.             {
  1524.                 ifrnd 32 sound DUKE_KILLED5
  1525.                 else ifrnd 32 sound DUKE_KILLED3
  1526.                 else ifrnd 32 sound DUKE_KILLED1
  1527.                 else ifrnd 32 sound DUKE_KILLED2
  1528.             }
  1529.         }
  1530.  
  1531.         ifaction PLYINGDEAD
  1532.         {
  1533.             ifactioncount 3 move PSTOPED
  1534.             quote 13
  1535.             ifhitspace
  1536.             {
  1537.                 action PSTAND
  1538.                 spawn DUKELYINGDEAD
  1539.                 resetplayer
  1540.             }
  1541.             break
  1542.         }
  1543.         else ifaction PTHROWNBACK
  1544.         {
  1545.             ifactioncount 5
  1546.             {
  1547.                 spawn BLOODPOOL
  1548.                 action PLYINGDEAD
  1549.             }
  1550.             else ifactioncount 1 move 0
  1551.             break
  1552.         }
  1553.         else ifaction PFROZEN
  1554.         {
  1555.             cstat 257
  1556.  
  1557.             palfrom 16 0 0 24
  1558.  
  1559.             ifhitweapon
  1560.             {
  1561.                 ifwasweapon FREEZEBLAST break
  1562.                 lotsofglass 60
  1563.                 ifrnd 84 spawn BLOODPOOL
  1564.  
  1565.                 getlastpal
  1566.                 sound GLASS_BREAKING
  1567.                 spawn ATOMICHEALTH
  1568.                 cstat 32768
  1569.                 action PLYINGDEAD
  1570.                 break
  1571.             }
  1572.  
  1573.             ifactioncount THAWTIME { getlastpal strength 1 move 0 action PSTAND }
  1574.             else ifactioncount FROZENDRIPTIME { ifrnd 32 spawn WATERDRIP }
  1575.  
  1576.             ifp pfacing   // assumes some other player
  1577.                 ifpdistl FROZENQUICKKICKDIST pkick
  1578.  
  1579.             break
  1580.         }
  1581.         else ifaction PEXPLODEAD
  1582.         {
  1583.             quote 13
  1584.             ifhitspace
  1585.             {
  1586.                 action PSTAND
  1587.                 resetplayer
  1588.             }
  1589.             break
  1590.         }
  1591.         else ifaction PEXPLODE
  1592.         {
  1593.             ifactioncount 5
  1594.             {
  1595.                 action PEXPLODEAD
  1596.                 spawn BLOODPOOL
  1597.             }
  1598.             break
  1599.         }
  1600.  
  1601.         else ifp pshrunk
  1602.         {
  1603.             state standard_pjibs
  1604.             spawn BLOODPOOL
  1605.  
  1606.             sound SQUISHED
  1607.             sound DUKE_DEAD
  1608.  
  1609.             cstat 32768                 // Hide the sprite
  1610.  
  1611.             action PLYINGDEAD
  1612.         }
  1613.  
  1614.         else
  1615.         {
  1616.             ifinwater
  1617.             {
  1618.                 action PLYINGDEAD
  1619.                 spawn WATERBUBBLE
  1620.                 spawn WATERBUBBLE
  1621.             }
  1622.             else
  1623.             {
  1624.                 action PEXPLODE
  1625.                 state standard_pjibs
  1626.                 cstat 32768
  1627.                 sound SQUISHED
  1628.                 sound DUKE_DEAD
  1629.             }
  1630.         }
  1631.         break
  1632.     }
  1633.  
  1634.     ifsquished
  1635.     {
  1636.         strength -1
  1637.         sound SQUISHED
  1638.         spawn OOZ
  1639.         break
  1640.     }
  1641.  
  1642.     ifp ponsteroids
  1643.     {
  1644.         spritepal 19 
  1645.         cstat 0
  1646.         sizeto 60 52
  1647.         soundonce DUKE_HARTBEAT
  1648.  
  1649.     }
  1650.         else
  1651.     
  1652.     {
  1653.         sizeto 42 36
  1654.         spritepal 0
  1655.         cstat 256
  1656.  
  1657.     }
  1658.     
  1659.     {
  1660.         ifp pstanding { }
  1661.         else spawn FRAMEEFFECT1
  1662.     }
  1663.  
  1664.     ifmove PSHRINKING
  1665.     {
  1666.         ifcount 32
  1667.         {
  1668.             ifcount SHRUNKDONECOUNT move 0
  1669.             else ifcount SHRUNKCOUNT
  1670.             {
  1671.                 sizeto 42 36
  1672.                 ifgapzl 24
  1673.                 {
  1674.                     strength 0
  1675.                     sound SQUISHED
  1676.                     palfrom 48 64
  1677.                     break
  1678.                 }
  1679.             }
  1680.             else ifp ponsteroids count SHRUNKCOUNT
  1681.         }
  1682.         else
  1683.         {
  1684.             ifp ponsteroids count SHRUNKCOUNT
  1685.             else { sizeto 8 9 spawn FRAMEEFFECT1 }
  1686.         }
  1687.     }
  1688.  
  1689.     else ifhitweapon
  1690.     {
  1691.         ifdead { ifmultiplayer sound DUKE_KILLED4 }
  1692.         else
  1693.         {
  1694.             ifmultiplayer
  1695.             {
  1696.                 ifphealthl YELLHURTSOUNDSTRENGTHMP
  1697.                 {
  1698.                     ifrnd 64 sound DUKE_LONGTERM_PAIN2
  1699.                     else ifrnd 64 sound DUKE_LONGTERM_PAIN3
  1700.                     else ifrnd 64 sound DUKE_LONGTERM_PAIN4
  1701.                     else sound DUKE_DEAD
  1702.                 }
  1703.                 else
  1704.                 {
  1705.                     ifrnd 64 sound DUKE_LONGTERM_PAIN5
  1706.                     else ifrnd 64 sound DUKE_LONGTERM_PAIN6
  1707.                     else ifrnd 64 sound DUKE_LONGTERM_PAIN7
  1708.                     else sound DUKE_LONGTERM_PAIN8
  1709.                 }
  1710.             }
  1711.             else
  1712.             {
  1713.                 ifphealthl YELLHURTSOUNDSTRENGTH
  1714.                 {
  1715.                     ifrnd 74 sound DUKE_LONGTERM_PAIN2
  1716.                     else ifrnd 8 sound DUKE_LONGTERM_PAIN3
  1717.                     else sound DUKE_LONGTERM_PAIN4
  1718.                 }
  1719.                 ifrnd 128 sound DUKE_LONGTERM_PAIN
  1720.             }
  1721.         }
  1722.         ifstrength TOUGH
  1723.         {
  1724.             state headhitstate
  1725.             sound DUKE_GRUNT
  1726.             ifp pstanding action PFLINTCHING
  1727.         }
  1728.  
  1729.         ifwasweapon RPG
  1730.         {
  1731.             ifrnd 32 spawn BLOOD
  1732.             ifdead state standard_pjibs
  1733.             palfrom 48 52
  1734.             break
  1735.         }
  1736.         ifwasweapon RADIUSEXPLOSION
  1737.         {
  1738.             ifrnd 32 spawn BLOOD
  1739.             ifdead state standard_pjibs
  1740.             palfrom 48 52
  1741.             break
  1742.         }
  1743.         ifwasweapon FIREEXT
  1744.         {
  1745.             ifrnd 32 spawn BLOOD
  1746.             ifdead state standard_pjibs
  1747.             palfrom 48 52
  1748.             break
  1749.         }
  1750.  
  1751.         ifwasweapon SHRINKSPARK
  1752.         {
  1753.             palfrom 48 0 48
  1754.             move PSHRINKING // used as a var only.
  1755.             sound ACTOR_SHRINKING
  1756.             break
  1757.         }
  1758.  
  1759.         ifwasweapon SHOTSPARK1 palfrom 24 48
  1760.         else ifwasweapon FREEZEBLAST
  1761.         {
  1762.             palfrom 48 0 0 48
  1763.             ifdead { sound SOMETHINGFROZE spritepal 1 action PFROZEN break }
  1764.         }
  1765.         else ifwasweapon COOLEXPLOSION1 palfrom 48 48 0 48
  1766.         else ifwasweapon KNEE palfrom 16 32
  1767.         else ifwasweapon FIRELASER palfrom 32 32
  1768.         state check_dead_thrown_back
  1769.         state random_wall_jibs
  1770.  
  1771.         break
  1772.     }
  1773.  
  1774.     ifaction PFLINTCHING
  1775.     {
  1776.         ifactioncount 2 action PSTAND
  1777.         break
  1778.     }
  1779.  
  1780.     ifinwater
  1781.     {
  1782.         ifaction PTREDWATER
  1783.         {
  1784.             ifp pwalking prunning action PSWIMMINGGO
  1785.         }
  1786.         else ifp pstanding pwalkingback prunningback action PTREDWATER
  1787.         else
  1788.         {
  1789.             ifaction PSWIMMING
  1790.             {
  1791.                 ifrnd 4 spawn WATERBUBBLE
  1792.                 ifactioncount 4
  1793.                     action PSWIMMINGWAIT
  1794.             }
  1795.             else ifaction PSWIMMINGWAIT
  1796.             {
  1797.                 ifactioncount 2
  1798.                     action PSWIMMINGGO
  1799.             }
  1800.             else ifaction PSWIMMINGGO
  1801.             {
  1802.                 ifactioncount 2
  1803.                     action PSWIMMING
  1804.             }
  1805.             else action PTREDWATER
  1806.         }
  1807.  
  1808.         ifrnd 4 spawn WATERBUBBLE // For effect
  1809.  
  1810.         break
  1811.     }
  1812.     else ifp pjetpack
  1813.     {
  1814.         ifaction PJPHOUVER
  1815.         {
  1816.             ifactioncount 4
  1817.                 resetactioncount
  1818.         }
  1819.         else action PJPHOUVER
  1820.         break
  1821.     }
  1822.     else
  1823.     {
  1824.         ifaction PTREDWATER action PSTAND
  1825.         ifaction PSWIMMING action PSTAND
  1826.         ifaction PSWIMMINGWAIT action PSTAND
  1827.         ifaction PSWIMMINGGO action PSTAND
  1828.         ifaction PJPHOUVER action PFALLING
  1829.     }
  1830.  
  1831.     ifaction PFALLING
  1832.     {
  1833.         ifp ponground
  1834.             action PSTAND
  1835.         else
  1836.         {
  1837.             ifp pfalling break
  1838.             else state check_pstandard
  1839.         }
  1840.     }
  1841.  
  1842.     ifaction PDUCKING
  1843.     {
  1844.         ifgapzl 48
  1845.         {
  1846.             ifp pwalking pwalkingback prunning prunningback action PCRAWLING
  1847.         }
  1848.         else ifp pducking
  1849.         {
  1850.             ifp pwalking pwalkingback prunning prunningback action PCRAWLING
  1851.         }
  1852.         else
  1853.         {
  1854.             ifp pstanding action PSTAND
  1855.             else state check_pstandard
  1856.         }
  1857.     }
  1858.  
  1859.     else ifaction PCRAWLING
  1860.     {
  1861.         ifgapzl 48
  1862.         {
  1863.             ifp pstanding action PCRAWLING
  1864.         }
  1865.         else ifp pducking
  1866.         {
  1867.             ifp pstanding action PDUCKING
  1868.         }
  1869.         else
  1870.         {
  1871.             ifp pstanding action PSTAND
  1872.             else state check_pstandard
  1873.         }
  1874.     }
  1875.     else ifgapzl 48 action PDUCKING
  1876.  
  1877.     else ifaction PJUMPING
  1878.     {
  1879.         ifp ponground action PSTAND
  1880.         else ifactioncount 4 ifp pfalling action PFALLING
  1881.     }
  1882.  
  1883.     ifp pfalling action PFALLING
  1884.     else ifaction PSTAND state check_pstandard
  1885.     else ifaction PAKICKING
  1886.     {
  1887.         ifactioncount 2 action PSTAND
  1888.         break
  1889.     }
  1890.     else ifaction PWALK
  1891.     {
  1892.         ifp pfalling action PFALLING
  1893.         else ifp pstanding action PSTAND
  1894.         else ifp prunning action PRUN
  1895.         else ifp pwalkingback action PWALKBACK
  1896.         else ifp prunningback action PRUNBACK
  1897.         else ifp pjumping
  1898.             action PJUMPING
  1899.         else ifp pducking action PDUCKING
  1900.     }
  1901.  
  1902.     else ifaction PRUN
  1903.     {
  1904.         ifp pstanding action PSTAND
  1905.         else ifp pwalking action PWALK
  1906.         else ifp pwalkingback action PWALKBACK
  1907.         else ifp prunningback action PRUNBACK
  1908.         else ifp pjumping
  1909.             action PJUMPING
  1910.         else ifp pducking action PDUCKING
  1911.     }
  1912.  
  1913.     else ifaction PWALKBACK
  1914.     {
  1915.         ifp pstanding action PSTAND
  1916.         else ifp pwalking action PWALK
  1917.         else ifp prunning action PRUN
  1918.         else ifp prunningback action PRUNBACK
  1919.         else ifp pjumping
  1920.             action PJUMPING
  1921.         else ifp pducking action PDUCKING
  1922.     }
  1923.  
  1924.     else ifaction PRUNBACK
  1925.     {
  1926.         ifp pstanding action PSTAND
  1927.         else ifp pwalking action PWALK
  1928.         else ifp prunning action PRUN
  1929.         else ifp pwalkingback action PWALKBACK
  1930.         else ifp pjumping
  1931.             action PJUMPING
  1932.         else ifp pducking action PDUCKING
  1933.     }
  1934. enda
  1935.  
  1936. actor ORGANTIC TURRETSTRENGTH
  1937.     ifcount 48 resetcount
  1938.     else { ifcount 32 sizeto 32 32 }
  1939.     else ifcount 16 { sizeto 48 18 ifpdistl 2048 { sound TURR_ATTACK addphealth -2 palfrom 32 16 } }
  1940.     ifhitweapon { ifdead { addkills 1 sound TURR_DYING guts JIBS5 10 state delete_enemy } sound TURR_PAIN break }
  1941.     ifrnd 1 soundonce TURR_ROAM
  1942. enda
  1943.  
  1944. state rf
  1945.     ifrnd 128 cstat 4
  1946.     else cstat 0
  1947. ends
  1948.  
  1949.  
  1950. //
  1951. //
  1952. //      TROOP/LIZTROOP CODE
  1953. //
  1954. //
  1955.  
  1956. action ATROOPSTAND       0    1    5    1    1
  1957. action ATROOPSTAYSTAND  -2    1    5    1    1
  1958. action ATROOPWALKING     0    4    5    1   12
  1959. action ATROOPWALKINGBACK 15   4    5   -1   12
  1960. action ATROOPRUNNING     0    4    5    1    8
  1961. action ATROOPSHOOT      35    1    5    1   30
  1962. action ATROOPJETPACK    40    1    5    1    1
  1963. action ATROOPJETPACKILL 40    2    5    1   50
  1964. action ATROOPFLINTCH    50    1    1    1    6
  1965. action ATROOPDYING      50    5    1    1   16
  1966. action ATROOPDEAD       54
  1967. action ATROOPPLAYDEAD   54
  1968. action ATROOPSUFFERDEAD 58    2    1   -4   24
  1969. action ATROOPSUFFERING  59    2    1    1   21
  1970. action ATROOPDUCK       64    1    5    1    3
  1971. action ATROOPDUCKSHOOT  64    2    5    1   25
  1972. action ATROOPABOUTHIDE  74    1    1    1   25
  1973. action ATROOPHIDE       79    1    1    1   25
  1974. action ATROOPREAPPEAR   74    1    1    1   25
  1975. action ATROOPFROZEN      0    1    5
  1976.  
  1977. move TROOPWALKVELS 72
  1978. move TROOPWALKVELSBACK -72
  1979. move TROOPJETPACKVELS 64 -84
  1980. move TROOPJETPACKILLVELS 192 -38
  1981. move TROOPRUNVELS 108
  1982. move TROOPSTOPPED
  1983. move DONTGETUP
  1984. move SHRUNKVELS 32
  1985.  
  1986. ai AITROOPSEEKENEMY  ATROOPWALKING   TROOPWALKVELS seekplayer
  1987. ai AITROOPSEEKPLAYER ATROOPWALKING   TROOPWALKVELS seekplayer
  1988. ai AITROOPFLEEING    ATROOPWALKING   TROOPWALKVELS fleeenemy
  1989. ai AITROOPFLEEINGBACK ATROOPWALKINGBACK   TROOPWALKVELSBACK faceplayer
  1990. ai AITROOPDODGE      ATROOPWALKING   TROOPRUNVELS  dodgebullet
  1991. ai AITROOPSHOOTING   ATROOPSHOOT     TROOPSTOPPED  faceplayer
  1992. ai AITROOPDUCKING    ATROOPDUCK      TROOPSTOPPED  faceplayer
  1993. ai AITROOPJETPACK    ATROOPJETPACK   TROOPJETPACKVELS seekplayer
  1994. ai AITROOPSHRUNK     ATROOPWALKING   SHRUNKVELS fleeenemy
  1995. ai AITROOPHIDE       ATROOPABOUTHIDE TROOPSTOPPED faceplayer
  1996.  
  1997. state troophidestate
  1998.     ifaction ATROOPREAPPEAR
  1999.     {
  2000.         ifactioncount 2 { sound TELEPORTER ai AITROOPSHOOTING cstat 257 }
  2001.         else { sizeto 41 40 sizeto 41 40 sizeto 41 40 sizeto 41 40 spawn FRAMEEFFECT1 }
  2002.     }
  2003.     else ifaction ATROOPWALKING
  2004.     {
  2005.         ifpdistl 2448 ifpdistg 1024
  2006.         {
  2007.             ifceilingdistl 48 break
  2008.             ifp pfacing break
  2009.  
  2010.             ifgapzl 64 { } else ifawayfromwall { spawn TRANSPORTERSTAR action ATROOPREAPPEAR move 0 break }
  2011.         }
  2012.     }
  2013.     else ifaction ATROOPHIDE
  2014.     {
  2015.         ifactioncount 2
  2016.         {
  2017.             spawn TRANSPORTERSTAR
  2018.             sound TELEPORTER
  2019.             action ATROOPWALKING move TROOPWALKVELS faceplayer
  2020.             cstat 32768
  2021.         }
  2022.         else
  2023.         {
  2024.             sizeto 0 40
  2025.             sizeto 0 40
  2026.             sizeto 0 40
  2027.             sizeto 0 40
  2028.             spawn FRAMEEFFECT1
  2029.         }
  2030.     }
  2031.     else ifaction ATROOPABOUTHIDE ifactioncount 2 { action ATROOPHIDE cstat 0 }
  2032. ends
  2033.  
  2034.  
  2035. state troopgunnashoot
  2036.     ifp palive
  2037.     {
  2038.         ifpdistl 1024 ai AITROOPSHOOTING
  2039.         else ifactornotstayput
  2040.         {
  2041.             ifactioncount 12 ifrnd 16 ifcanshoottarget
  2042.             {
  2043.                 ifspritepal 21 ifrnd 4 ifpdistg 4096 ai AITROOPHIDE
  2044.                 else
  2045.                 {
  2046.                     ifpdistl 1100 ai AITROOPFLEEING
  2047.                     else
  2048.                     {
  2049.                         ifpdistl 4096 ifcansee ifcanshoottarget ai AITROOPSHOOTING
  2050.                         else { move TROOPRUNVELS seekplayer action ATROOPRUNNING }
  2051.                     }
  2052.                 }
  2053.             }
  2054.         }
  2055.         else ifcount 26 ifrnd 32 ai AITROOPSHOOTING
  2056.     }
  2057. ends
  2058.  
  2059. state troopseekstate
  2060.     state troopgunnashoot
  2061.     ifinwater { ai AITROOPJETPACK break }
  2062.     ifcansee
  2063.     {
  2064.         ifmove TROOPRUNVELS ifpdistl 1596 ai AITROOPDUCKING
  2065.         ifp phigher { ifceilingdistl 128 { } else ifactornotstayput ai AITROOPJETPACK break }
  2066.         else ifrnd 2
  2067.         {
  2068.             ifspritepal 21 ifpdistg 1596 { ai AITROOPHIDE break }
  2069.             ifbulletnear { ifrnd 128 ai AITROOPDODGE else ai AITROOPDUCKING break }
  2070.         }
  2071.     }
  2072.     ifnotmoving { ifrnd 32 operate else ifcount 32 ifp palive ifcansee ifcanshoottarget ai AITROOPSHOOTING }
  2073.     ifrnd 1
  2074.     {
  2075.         ifrnd 128 soundonce PRED_ROAM
  2076.         else soundonce PRED_ROAM2
  2077.     }
  2078. ends
  2079.  
  2080. state troopduckstate
  2081.     ifaction ATROOPDUCK
  2082.         { ifactioncount 8 { ifp palive { ifrnd 128 action ATROOPDUCKSHOOT } else ifmove DONTGETUP break else ai AITROOPSEEKPLAYER } }
  2083.     else ifaction ATROOPDUCKSHOOT
  2084.     {
  2085.         ifcount 64
  2086.         {
  2087.             ifmove DONTGETUP resetcount
  2088.             else
  2089.             {
  2090.                 ifpdistl 1100
  2091.                     ai AITROOPFLEEING
  2092.                 else ai AITROOPSEEKPLAYER
  2093.             }
  2094.         }
  2095.         else ifactioncount 2 { ifcanshoottarget { sound PRED_ATTACK resetactioncount shoot FIRELASER } else ai AITROOPSEEKPLAYER }
  2096.     }
  2097. ends
  2098.  
  2099. state troopshootstate
  2100.     ifactioncount 2
  2101.     {
  2102.         ifcanshoottarget
  2103.         {
  2104.             shoot FIRELASER sound PRED_ATTACK resetactioncount
  2105.             ifrnd 128 ai AITROOPSEEKPLAYER
  2106.             ifcount 24
  2107.             {
  2108.                 ifrnd 96 ifpdistg 2048 ai AITROOPSEEKPLAYER
  2109.                 else
  2110.                 {
  2111.                     ifpdistg 1596 ai AITROOPFLEEING
  2112.                     else ai AITROOPFLEEINGBACK
  2113.                 }
  2114.             }
  2115.         }
  2116.         else ai AITROOPSEEKPLAYER
  2117.     }
  2118. ends
  2119.  
  2120. state troopfleestate
  2121.     ifactioncount 7
  2122.     {
  2123.         ifpdistg 3084 { ai AITROOPSEEKPLAYER break }
  2124.         else ifrnd 32 ifp palive ifcansee ifcanshoottarget { ifrnd 128 ai AITROOPDUCKING else ai AITROOPSHOOTING break }
  2125.     }
  2126.     ifnotmoving
  2127.     {
  2128.         ifrnd 32 operate else ifcount 32 ifp palive ifcansee ifcanshoottarget
  2129.             { ifrnd 128 ai AITROOPSHOOTING else ai AITROOPDUCKING }
  2130.     }
  2131. ends
  2132.  
  2133. state troopdying
  2134.     iffloordistl 32 { ifactioncount 5 { cstat 0 iffloordistl 8 sound THUD ifrnd 64 spawn BLOODPOOL state rf strength 0 move TROOPSTOPPED action ATROOPDEAD } break }
  2135.     else { state rf move 0 action ATROOPDYING }
  2136. ends
  2137.  
  2138. state checktroophit
  2139.     ifaction ATROOPSUFFERING { stopsound LIZARD_BEG sound PRED_DYING cstat 0 strength 0 action ATROOPSUFFERDEAD break }
  2140.     ifdead
  2141.     {
  2142.         ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action ATROOPFROZEN strength 0 break }
  2143.  
  2144.         state drop_ammo
  2145.         state random_wall_jibs
  2146.         addkills 1
  2147.  
  2148.         ifwasweapon RPG { sound SQUISHED state troop_body_jibs state standard_jibs state delete_enemy }
  2149.         else ifwasweapon RADIUSEXPLOSION { sound SQUISHED state troop_body_jibs state standard_jibs state delete_enemy }
  2150.         else { sound PRED_DYING ifrnd 32 iffloordistl 32 { sound LIZARD_BEG spawn BLOODPOOL strength 0 move 0 action ATROOPSUFFERING break } action ATROOPDYING break }
  2151.     }
  2152.     else
  2153.     {
  2154.         state random_wall_jibs
  2155.         sound PRED_PAIN
  2156.         ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AITROOPSHRUNK }
  2157.         else iffloordistl 32 ifrnd 96 action ATROOPFLINTCH
  2158.     }
  2159. ends
  2160.  
  2161. state troopjetpackstate
  2162.     ifaction ATROOPJETPACKILL
  2163.     {
  2164.         ifcansee ifactioncount 2
  2165.         {
  2166.             resetactioncount
  2167.             sound PRED_ATTACK
  2168.             shoot FIRELASER
  2169.         }
  2170.  
  2171.         ifp phigher ai AITROOPJETPACK
  2172.         else ifinwater ai AITROOPJETPACK
  2173.         else ifcount 26 iffloordistl 32 ai AITROOPSEEKPLAYER
  2174.     }
  2175.     else ifcount 48 ifcansee
  2176.         { action ATROOPJETPACKILL move TROOPJETPACKILLVELS seekplayer }
  2177. ends
  2178.  
  2179. state checksquished
  2180.     ifsquished { addkills 1 sound SQUISHED state standard_jibs spawn OOZ state delete_enemy }
  2181. ends
  2182.  
  2183. state troopsufferingstate
  2184.     ifactioncount 2
  2185.     {
  2186.         ifrnd 16 spawn WATERDRIP
  2187.         ifactioncount 14 { stopsound LIZARD_BEG cstat 0 strength 0 action ATROOPSUFFERDEAD break }
  2188.     }
  2189. ends
  2190.  
  2191. state troopshrunkstate
  2192.     ifcount SHRUNKDONECOUNT ai AITROOPSEEKENEMY
  2193.     else ifcount SHRUNKCOUNT sizeto 48 40
  2194.     else state genericshrunkcode
  2195. ends
  2196.  
  2197. state troopcode fall
  2198.     ifinwater ifrnd 1 spawn WATERBUBBLE
  2199.     ifaction ATROOPSTAND { ifrnd 192 ai AITROOPSHOOTING else ai AITROOPSEEKPLAYER }
  2200.     else ifaction ATROOPFROZEN
  2201.     {
  2202.         ifcount THAWTIME { ai AITROOPSEEKENEMY getlastpal }
  2203.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  2204.         ifhitweapon
  2205.         {
  2206.             ifwasweapon FREEZEBLAST { strength 0 break }
  2207.             addkills 1
  2208.  
  2209.             ifrnd 84 spawn BLOODPOOL
  2210.             lotsofglass 30
  2211.             sound GLASS_BREAKING
  2212.             killit
  2213.         }
  2214.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  2215.         break
  2216.     }
  2217.     else ifaction ATROOPPLAYDEAD
  2218.     {
  2219.         ifhitweapon
  2220.         {
  2221.             ifwasweapon RADIUSEXPLOSION { sound SQUISHED state troop_body_jibs state standard_jibs state delete_enemy }
  2222.             break
  2223.         }
  2224.         else state checksquished
  2225.  
  2226.         ifcount PLAYDEADTIME { addkills -1 soundonce PRED_ROAM cstat 257 strength 1 ai AITROOPSHOOTING }
  2227.         else ifp pfacing resetcount
  2228.  
  2229.         break
  2230.     }
  2231.     else ifaction ATROOPDEAD
  2232.     {
  2233.         strength 0
  2234.         ifrespawn ifcount RESPAWNACTORTIME { spawn TRANSPORTERSTAR cstat 257 strength TROOPSTRENGTH ai AITROOPSEEKENEMY }
  2235.         ifhitweapon
  2236.         {
  2237.             ifwasweapon RADIUSEXPLOSION { sound SQUISHED state troop_body_jibs state standard_jibs state delete_enemy }
  2238.             break
  2239.         }
  2240.         else state checksquished
  2241.         break
  2242.     }
  2243.     else ifaction ATROOPSUFFERDEAD
  2244.     {
  2245.         ifactioncount 2
  2246.         {
  2247.             ifrnd 64 { resetcount action ATROOPPLAYDEAD }
  2248.             else { soundonce PRED_DYING action ATROOPDEAD }
  2249.         }
  2250.     }
  2251.     else ifaction ATROOPDYING { state troopdying break }
  2252.     else ifaction ATROOPSUFFERING
  2253.         { state troopsufferingstate ifhitweapon state checktroophit break }
  2254.     else ifaction ATROOPFLINTCH { ifactioncount 4 ai AITROOPSEEKENEMY }
  2255.     else
  2256.     {
  2257.         ifai AITROOPSEEKPLAYER state troopseekstate
  2258.         else ifai AITROOPJETPACK
  2259.         {
  2260.             state troopjetpackstate
  2261.             ifinwater { } else soundonce DUKE_JETPACK_IDLE
  2262.         }
  2263.         else ifai AITROOPSEEKENEMY state troopseekstate
  2264.         else ifai AITROOPSHOOTING state troopshootstate
  2265.         else ifai AITROOPFLEEING state troopfleestate
  2266.         else ifai AITROOPFLEEINGBACK state troopfleestate
  2267.         else ifai AITROOPDODGE state troopseekstate
  2268.         else ifai AITROOPDUCKING state troopduckstate
  2269.         else ifai AITROOPSHRUNK state troopshrunkstate
  2270.         else ifai AITROOPHIDE { state troophidestate break }
  2271.     }
  2272.  
  2273.     ifhitweapon state checktroophit else state checksquished
  2274. ends
  2275.  
  2276.  
  2277. actor LIZTROOPJETPACK TROOPSTRENGTH ai AITROOPJETPACK cactor LIZTROOP enda
  2278. actor LIZTROOPDUCKING TROOPSTRENGTH
  2279.     ai AITROOPDUCKING cactor LIZTROOP
  2280.     ifgapzl 48 move DONTGETUP
  2281. enda
  2282.  
  2283. actor LIZTROOPSHOOT TROOPSTRENGTH ATROOPSTAND ai AITROOPSHOOTING cactor LIZTROOP enda
  2284. actor LIZTROOPSTAYPUT TROOPSTRENGTH ATROOPSTAYSTAND ai AITROOPSEEKPLAYER cactor LIZTROOP enda
  2285. actor LIZTROOPRUNNING TROOPSTRENGTH ATROOPSTAND ai AITROOPSEEKPLAYER cactor LIZTROOP enda
  2286. actor LIZTROOPONTOILET TROOPSTRENGTH ifcount 24 { sound FLUSH_TOILET operate ai AITROOPSEEKPLAYER cactor LIZTROOP } enda
  2287. actor LIZTROOP TROOPSTRENGTH ATROOPSTAND state troopcode enda
  2288.  
  2289. action ALIZWALKING       0     4    5    1    15
  2290. action ALIZRUNNING       0     4    5    1    11
  2291. action ALIZTHINK         20    2    5    1    40
  2292. action ALIZSCREAM        30    1    5    1    2
  2293. action ALIZJUMP          45    3    5    1    20
  2294. action ALIZFALL          55
  2295. action ALIZSHOOTING      70    2    5    1    7
  2296. action ALIZDYING         60    6    1    1    15
  2297. action ALIZLYINGDEAD     65    1
  2298. action ALIZFROZEN         0    1    5
  2299.  
  2300. move LIZWALKVEL 72
  2301. move LIZRUNVEL 192
  2302. move LIZJUMPVEL 184
  2303. move LIZSTOP
  2304.  
  2305. ai AILIZGETENEMY ALIZWALKING LIZWALKVEL seekplayer
  2306. ai AILIZDODGE ALIZRUNNING LIZRUNVEL dodgebullet
  2307. ai AILIZCHARGEENEMY ALIZRUNNING LIZRUNVEL seekplayer
  2308. ai AILIZFLEENEMY ALIZWALKING LIZWALKVEL fleeenemy
  2309. ai AILIZSHOOTENEMY ALIZSHOOTING LIZSTOP faceplayer
  2310. ai AILIZJUMPENEMY ALIZJUMP LIZJUMPVEL jumptoplayer
  2311. ai AILIZTHINK ALIZTHINK LIZSTOP faceplayerslow
  2312. ai AILIZSHRUNK ALIZWALKING SHRUNKVELS fleeenemy
  2313. ai AILIZSPIT ALIZSCREAM LIZSTOP faceplayerslow
  2314. ai AILIZDYING ALIZDYING LIZSTOP faceplayer
  2315.  
  2316. state lizseekstate
  2317.  
  2318.     ifactornotstayput
  2319.     {
  2320.         ifcansee ifp palive ifpdistl 2048 ifcount 16 ifcanshoottarget { ai AILIZSHOOTENEMY break }
  2321.         ifai AILIZCHARGEENEMY
  2322.         {
  2323.             ifcount 72 ifcanshoottarget { ai AILIZSHOOTENEMY break }
  2324.             ifp phigher ifpdistg 2048 ifrnd 6 { ai AILIZJUMPENEMY break }
  2325.         }
  2326.         else ifpdistg 4096 { ifrnd 92 { ifcount 48 ifcanshoottarget ai AILIZSHOOTENEMY } else ifcount 24 { ai AILIZCHARGEENEMY break } }
  2327.  
  2328.         iffloordistl 16 { ifcount 48 ifnotmoving ifcansee { ai AILIZJUMPENEMY break } }
  2329.         else { ifpdistg 1280 ai AILIZJUMPENEMY break }
  2330.  
  2331.         ifrnd 4 ifnotmoving operate
  2332.         else ifrnd 1 ifbulletnear
  2333.         {
  2334.             ifgapzl 128 ai AILIZDODGE
  2335.             else ifactornotstayput { ifrnd 32 ai AILIZJUMPENEMY else ai AILIZDODGE }
  2336.         }
  2337.     }
  2338.     else
  2339.     {
  2340.         ifactioncount 16 { ifp palive ifrnd 32 ifcansee ifcanshoottarget ai AILIZSHOOTENEMY }
  2341.         ifcount 16 ifrnd 32 move LIZWALKVEL randomangle geth
  2342.     }
  2343.  
  2344. ends
  2345.  
  2346. state lizshrunkstate
  2347.     ifcount SHRUNKDONECOUNT ai AILIZGETENEMY
  2348.     else ifcount SHRUNKCOUNT sizeto 48 40
  2349.     else state genericshrunkcode
  2350. ends
  2351.  
  2352. state lizfleestate
  2353.     ifcount 16 { ifrnd 48 ifp palive ifcansee ai AILIZSPIT }
  2354.     else { iffloordistl 16 { } else ai AILIZGETENEMY break }
  2355. ends
  2356.  
  2357. state lizthinkstate
  2358.     ifrnd 8 soundonce CAPT_ROAM
  2359.     ifactioncount 3
  2360.     {
  2361.         ifrnd 32 ifp palive ifcansee ai AILIZSPIT
  2362.         else ifrnd 96 ai AILIZGETENEMY
  2363.     }
  2364.     else ifactioncount 2 ifrnd 1 spawn FECES
  2365.     ifrnd 1 ifbulletnear
  2366.     {
  2367.         ifgapzl 96 ai AILIZDODGE
  2368.         else { ifrnd 128 ai AILIZJUMPENEMY else ai AILIZDODGE }
  2369.     }
  2370. ends
  2371.  
  2372. state lizshootstate
  2373.     ifcount 20 ifrnd 8
  2374.     {
  2375.         ifcansee ifpdistl 2048 { ifrnd 128 ai AILIZFLEENEMY break }
  2376.         ifrnd 80 ai AILIZTHINK else ai AILIZGETENEMY
  2377.     }
  2378.     ifactioncount 2
  2379.     {
  2380.         ifcansee
  2381.         {
  2382.             ifcanshoottarget { sound CAPT_ATTACK shoot SHOTSPARK1 resetactioncount }
  2383.             else ai AILIZTHINK
  2384.         }
  2385.         else ai AILIZGETENEMY
  2386.     }
  2387. ends
  2388.  
  2389. state checklizhit
  2390.     spawn BLOOD
  2391.     ifai AILIZSHRUNK
  2392.         { addkills 1 sound SQUISHED state standard_jibs state delete_enemy }
  2393.     ifdead
  2394.     {
  2395.         ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action ALIZFROZEN strength 0 break }
  2396.  
  2397.         state drop_chaingun
  2398.         addkills 1
  2399.  
  2400.         ifwasweapon RPG { sound SQUISHED state liz_body_jibs state standard_jibs state delete_enemy }
  2401.         else ifwasweapon RADIUSEXPLOSION { sound SQUISHED state liz_body_jibs state standard_jibs state delete_enemy }
  2402.         else { state rf ai AILIZDYING ifrnd 64 spawn BLOODPOOL }
  2403.         sound CAPT_DYING
  2404.     }
  2405.     else
  2406.     {
  2407.         sound CAPT_PAIN
  2408.         ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AILIZSHRUNK break }
  2409.         state random_wall_jibs
  2410.         ifp palive ifcansee ifcanshoottarget { ai AILIZSHOOTENEMY break }
  2411.     }
  2412. ends
  2413.  
  2414. state lizjumpstate
  2415.     ifaction ALIZFALL { iffloordistl 16 ai AILIZGETENEMY }
  2416.     else ifactioncount 3 action ALIZFALL
  2417. ends
  2418.  
  2419. state lizdyingstate
  2420.     ifaction ALIZLYINGDEAD
  2421.     {
  2422.         strength 0
  2423.         ifhitweapon ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy }
  2424.         ifcount RESPAWNACTORTIME ifrespawn
  2425.         {
  2426.             spawn TRANSPORTERSTAR cstat 257 strength LIZSTRENGTH ai AILIZGETENEMY
  2427.         }
  2428.     }
  2429.     else ifai AILIZDYING ifactioncount 6 { iffloordistl 8 sound THUD move LIZSTOP action ALIZLYINGDEAD }
  2430. ends
  2431.  
  2432. state lizdodgestate
  2433.     ifcount 13 ai AILIZGETENEMY
  2434. ends
  2435.  
  2436. actor LIZMANSTAYPUT LIZSTRENGTH ai AILIZGETENEMY cactor LIZMAN enda
  2437. actor LIZMANSPITTING LIZSTRENGTH ai AILIZSPIT cactor LIZMAN enda
  2438. actor LIZMANJUMP LIZSTRENGTH ai AILIZJUMPENEMY cactor LIZMAN enda
  2439.  
  2440. actor LIZMAN LIZSTRENGTH fall
  2441.     state checksquished
  2442.     ifai 0 ai AILIZGETENEMY
  2443.     else ifaction ALIZLYINGDEAD { fall state lizdyingstate break }
  2444.     else ifaction ALIZFROZEN
  2445.     {
  2446.         ifcount THAWTIME { ai AILIZGETENEMY getlastpal }
  2447.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  2448.  
  2449.         ifhitweapon
  2450.         {
  2451.             ifwasweapon FREEZEBLAST { strength 0 break }
  2452.             addkills 1
  2453.  
  2454.             ifrnd 84 spawn BLOODPOOL
  2455.             lotsofglass 30
  2456.             sound GLASS_BREAKING
  2457.             killit
  2458.         }
  2459.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  2460.         break
  2461.     }
  2462.     else ifai AILIZJUMPENEMY state lizjumpstate
  2463.     else
  2464.     {
  2465.         fall
  2466.         ifai AILIZGETENEMY state lizseekstate
  2467.         else ifai AILIZCHARGEENEMY state lizseekstate
  2468.         else ifai AILIZDODGE state lizdodgestate
  2469.         else ifai AILIZSHOOTENEMY state lizshootstate
  2470.         else ifai AILIZFLEENEMY state lizfleestate
  2471.         else ifai AILIZTHINK state lizthinkstate
  2472.         else ifai AILIZSHRUNK state lizshrunkstate
  2473.         else ifai AILIZDYING state lizdyingstate
  2474.         else ifai AILIZSPIT
  2475.             { ifcount 26 ai AILIZGETENEMY else ifcount 18 ifrnd 96 { shoot SPIT sound LIZARD_SPIT } }
  2476.     }
  2477.  
  2478.     ifai AILIZSHRUNK break
  2479.     ifhitweapon state checklizhit
  2480. enda
  2481.  
  2482. action DRONEFRAMES     0   1   7   1   1
  2483. action DRONESCREAM     0   1   7   1   1
  2484. move DRONERUNVELS 128 64
  2485. move DRONERUNUPVELS 128 -64
  2486. move DRONEBULLVELS 252 -64
  2487. move DRONEBACKWARDS -64 -64
  2488. move DRONERISE 32 -32
  2489. move DRONESTOPPED -16
  2490.  
  2491. ai AIDRONEGETE DRONESCREAM DRONERUNVELS faceplayerslow getv
  2492. ai AIDRONEWAIT DRONEFRAMES DRONESTOPPED faceplayerslow
  2493. ai AIDRONEGETUP DRONESCREAM DRONERUNUPVELS faceplayer getv
  2494. ai AIDRONEPULLBACK DRONEFRAMES DRONEBACKWARDS faceplayerslow
  2495. ai AIDRONEHIT DRONESCREAM DRONEBACKWARDS faceplayer
  2496. ai AIDRONESHRUNK DRONEFRAMES SHRUNKVELS fleeenemy
  2497. ai AIDRONEDODGE DRONEFRAMES DRONEBULLVELS dodgebullet geth
  2498. ai AIDRONEDODGEUP DRONEFRAMES DRONERISE getv geth
  2499.  
  2500. state checkdronehitstate
  2501.  
  2502.     ifdead
  2503.     {
  2504.         addkills 1
  2505.         debris SCRAP1 8
  2506.         debris SCRAP2 4
  2507.         debris SCRAP3 7
  2508.         spawn EXPLOSION2
  2509.         sound RPG_EXPLODE
  2510.         hitradius 2048 15 20 25 30
  2511.         killit
  2512.     }
  2513.     else
  2514.     {
  2515.         sound DRON_PAIN
  2516.         ifbulletnear
  2517.         {
  2518.             ifceilingdistl 64 ifrnd 48 ai AIDRONEDODGE
  2519.             ai AIDRONEDODGEUP
  2520.         }
  2521.         else ai AIDRONEGETE
  2522.     }
  2523. ends
  2524.  
  2525. state droneshrunkstate
  2526.     ifcount 24 state delete_enemy
  2527.     else sizeto 1 1
  2528. ends
  2529.  
  2530. state checkdronenearplayer
  2531.  
  2532.     ifp palive ifpdistl 1596
  2533.     {
  2534.         ifcount 8
  2535.         {
  2536.             addkills 1
  2537.             sound DRON_ATTACK2
  2538.             debris SCRAP1 8
  2539.             debris SCRAP2 4
  2540.             debris SCRAP3 7
  2541.             spawn EXPLOSION2
  2542.             sound RPG_EXPLODE
  2543.             hitradius 2048 15 20 25 30
  2544.             killit
  2545.         }
  2546.         else ifcount 3 { } else sound LASERTRIP_ARMING
  2547.     }
  2548.  
  2549. ends
  2550.  
  2551. state dronegetstate
  2552.     ifrnd 192
  2553.     {
  2554.         ifcansee
  2555.         {
  2556.             ifbulletnear { ai AIDRONEDODGE break }
  2557.             ifmove DRONEBULLVELS
  2558.             {
  2559.                 ifcount 64 ai AIDRONEPULLBACK
  2560.                 else ifnotmoving ifcount 16 ai AIDRONEPULLBACK
  2561.             }
  2562.             else ifcount 32
  2563.             {
  2564.                 ifp phigher move DRONEBULLVELS geth getv
  2565.                 else move DRONEBULLVELS geth
  2566.             }
  2567.         }
  2568.         else ifrnd 1 operate
  2569.     }
  2570. ends
  2571.  
  2572. state dronedodgestate
  2573.     ifai AIDRONEDODGEUP
  2574.     {
  2575.        ifcount 8 ai AIDRONEGETE
  2576.        else ifnotmoving ai AIDRONEGETE
  2577.     }
  2578.     else
  2579.     {
  2580.         ifcount 8 ai AIDRONEGETE
  2581.         else ifnotmoving ai AIDRONEGETE
  2582.     }
  2583. ends
  2584.  
  2585. actor DRONE DRONESTRENGTH
  2586.     state checksquished
  2587.     state checkdronenearplayer
  2588.  
  2589.     ifrnd 2 fall
  2590.     else soundonce DRON_JETSND
  2591.  
  2592.     ifaction 0 ai AIDRONEGETE
  2593.  
  2594.     else ifai AIDRONEWAIT
  2595.     {
  2596.         ifactioncount 4 ifrnd 16
  2597.             ifcansee { sound DRON_ATTACK1 ifp phigher ai AIDRONEGETUP else ai AIDRONEGETE }
  2598.     }
  2599.     else ifai AIDRONEGETE state dronegetstate
  2600.     else ifai AIDRONEGETUP state dronegetstate
  2601.     else ifai AIDRONEPULLBACK { ifcount 32 ai AIDRONEWAIT }
  2602.     else ifai AIDRONEHIT { ifcount 8 ai AIDRONEWAIT }
  2603.     else ifai AIDRONESHRUNK state droneshrunkstate
  2604.     else ifai AIDRONEDODGE state dronedodgestate
  2605.     else ifai AIDRONEDODGEUP state dronedodgestate
  2606.  
  2607.     ifhitweapon state checkdronehitstate
  2608.  
  2609.     ifrnd 1 soundonce DRON_ROAM
  2610.  
  2611. enda
  2612.  
  2613.  
  2614.  
  2615. action AOCTAWALK        0   3   5   1   15
  2616. action AOCTASTAND       0   1   5   1   15
  2617. action AOCTASCRATCH     0   4   5   1   15
  2618. action AOCTAHIT        30   1   1   1   10
  2619. action AOCTASHOOT      20   1   5   1   10
  2620. action AOCTADYING      30   8   1   1   17
  2621. action AOCTADEAD       38   1   1   1    1
  2622. action AOCTAFROZEN      0   1   5
  2623.  
  2624. move OCTAWALKVELS 96 -30
  2625. move OCTAUPVELS 96 -70
  2626. move OCTASTOPPED 0 -30
  2627. move OCTAINWATER 96 24
  2628.  
  2629. ai AIOCTAGETENEMY AOCTAWALK OCTAWALKVELS seekplayer
  2630. ai AIOCTASHOOTENEMY AOCTASHOOT OCTASTOPPED faceplayer
  2631. ai AIOCTASCRATCHENEMY AOCTASCRATCH OCTASTOPPED faceplayer
  2632. ai AIOCTAHIT AOCTAHIT OCTASTOPPED faceplayer
  2633. ai AIOCTASHRUNK AOCTAWALK SHRUNKVELS faceplayer
  2634. ai AIOCTADYING AOCTADYING OCTASTOPPED faceplayer
  2635.  
  2636. state octagetenemystate
  2637.  
  2638.     ifcansee
  2639.     {
  2640.         ifactioncount 32 { ifrnd 48 ifcanshoottarget { sound OCTA_ATTACK1 ai AIOCTASHOOTENEMY break } }
  2641.         else ifpdistl 1280 ai AIOCTASCRATCHENEMY
  2642.     }
  2643.  
  2644. ends
  2645.  
  2646. state octascratchenemystate
  2647.     ifpdistg 1280 ai AIOCTAGETENEMY
  2648.     else ifcount 32 { resetcount sound OCTA_ATTACK2 palfrom 8 32 addphealth OCTASCRATCHINGPLAYER }
  2649. ends
  2650.  
  2651. state octashootenemystate
  2652.     ifcount 25 { ifcount 27 ai AIOCTAGETENEMY }
  2653.     else ifcount 24 shoot COOLEXPLOSION1
  2654.     else ifactioncount 6 resetactioncount
  2655. ends
  2656.  
  2657. state checkoctahitstate
  2658.     ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AIOCTASHRUNK }
  2659.     else
  2660.     {
  2661.         ifdead
  2662.         {
  2663.             ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action AOCTAFROZEN strength 0 break }
  2664.  
  2665.             addkills 1
  2666.             ifwasweapon RPG { sound SQUISHED state standard_jibs state delete_enemy }
  2667.             else ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy }
  2668.             else { state rf ai AIOCTADYING }
  2669.             sound OCTA_DYING
  2670.         }
  2671.         else
  2672.         {
  2673.             ifwasweapon RPG
  2674.             {
  2675.                 sound OCTA_DYING
  2676.                 addkills 1
  2677.                 state standard_jibs
  2678.                 killit
  2679.             }
  2680.             sound OCTA_PAIN spawn BLOOD
  2681.             ifrnd 64 ai AIOCTAHIT
  2682.  
  2683.         }
  2684.     }
  2685.     state random_wall_jibs
  2686. ends
  2687.  
  2688. state octashrunkstate
  2689.     ifcount SHRUNKDONECOUNT ai AILIZGETENEMY
  2690.     else ifcount SHRUNKCOUNT sizeto 48 40
  2691.     else state genericshrunkcode
  2692. ends
  2693.  
  2694. state octadyingstate
  2695.     ifactioncount 8 { ifrnd 64 spawn BLOODPOOL move OCTASTOPPED action AOCTADEAD break }
  2696.     else ifactioncount 5 { } else ifactioncount 4 iffloordistl 8 sound THUD
  2697. ends
  2698.  
  2699. actor OCTABRAINSTAYPUT OCTASTRENGTH ai AIOCTAGETENEMY cactor OCTABRAIN enda
  2700.  
  2701. actor OCTABRAIN OCTASTRENGTH fall
  2702.  
  2703.     state checksquished
  2704.  
  2705.     ifai 0 ai AIOCTAGETENEMY
  2706.     else ifaction AOCTADEAD
  2707.     {
  2708.         strength 0
  2709.         ifcount RESPAWNACTORTIME ifrespawn
  2710.             { addkills -1 spawn TRANSPORTERSTAR cstat 257 strength OCTASTRENGTH ai AIOCTAGETENEMY }
  2711.         ifhitweapon ifwasweapon RADIUSEXPLOSION { state standard_jibs killit }
  2712.         break
  2713.     }
  2714.     else ifaction AOCTAFROZEN
  2715.     {
  2716.         ifcount THAWTIME { ai AIOCTAGETENEMY getlastpal }
  2717.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  2718.  
  2719.         ifhitweapon
  2720.         {
  2721.             addkills 1
  2722.             ifwasweapon FREEZEBLAST { strength 0 break }
  2723.  
  2724.             lotsofglass 30
  2725.             ifrnd 84 spawn BLOODPOOL
  2726.             sound GLASS_BREAKING
  2727.             killit
  2728.         }
  2729.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  2730.         break
  2731.     }
  2732.     else
  2733.     {
  2734.         ifrnd 1 soundonce OCTA_ROAM
  2735.  
  2736.         ifai AIOCTAGETENEMY state octagetenemystate
  2737.         else ifai AIOCTAHIT { ifcount 8 ai AIOCTASHOOTENEMY }
  2738.         else ifai AIOCTADYING { state octadyingstate break }
  2739.         else ifai AIOCTASCRATCHENEMY state octascratchenemystate
  2740.         else ifai AIOCTASHOOTENEMY state octashootenemystate
  2741.         else ifai AIOCTASHRUNK state octashrunkstate
  2742.  
  2743.         ifmove OCTAUPVELS { } else ifp phigher move OCTAUPVELS seekplayer
  2744.         else ifmove OCTAINWATER { } else ifinwater move OCTAINWATER seekplayer
  2745.  
  2746.         ifhitweapon state checkoctahitstate
  2747.     }
  2748. enda
  2749.  
  2750. action APIGWALK         0  4 5 1 20
  2751. action APIGRUN          0  4 5 1 11
  2752. action APIGSHOOT        30 2 5 1 58
  2753. action APIGCOCK         25 1 5 1 16
  2754. action APIGSTAND        30 1 5 1 1
  2755. action APIGDIVE         40 2 5 1 40
  2756. action APIGDIVESHOOT    45 2 5 1 58
  2757. action APIGDYING        55 5 1 1 15
  2758. action APIGHIT          55 1 1 1 10
  2759. action APIGDEAD         60 1 1 1 1
  2760. action APIGFROZEN        0 1 5
  2761.  
  2762. move PIGWALKVELS 72
  2763. move PIGRUNVELS 108
  2764. move PIGSTOPPED
  2765.  
  2766. ai AIPIGSEEKENEMY APIGWALK PIGWALKVELS seekplayer
  2767. ai AIPIGSHOOTENEMY APIGSHOOT PIGSTOPPED faceplayer
  2768. ai AIPIGFLEEENEMY APIGWALK PIGWALKVELS fleeenemy
  2769. ai AIPIGSHOOT APIGSHOOT PIGSTOPPED faceplayer
  2770. ai AIPIGDODGE APIGRUN PIGRUNVELS dodgebullet
  2771. ai AIPIGCHARGE APIGRUN PIGRUNVELS seekplayer
  2772. ai AIPIGDIVING APIGDIVE PIGSTOPPED faceplayer
  2773. ai AIPIGDYING APIGDYING PIGSTOPPED faceplayer
  2774. ai AIPIGSHRINK APIGWALK SHRUNKVELS fleeenemy
  2775. ai AIPIGHIT APIGHIT PIGSTOPPED faceplayer
  2776.  
  2777. state pigseekenemystate
  2778.  
  2779.     ifai AIPIGCHARGE
  2780.     {
  2781.         ifcansee ifpdistl 3084
  2782.         {
  2783.             ifnotmoving ai AIPIGSEEKENEMY
  2784.             else ai AIPIGDIVING
  2785.         }
  2786.         break
  2787.     }
  2788.     else iffloordistl 32
  2789.     {
  2790.         ifpdistg 4096 { ifactornotstayput ai AIPIGCHARGE }
  2791.         ifrnd 8 { ifbulletnear ai AIPIGDODGE }
  2792.     }
  2793.  
  2794.     ifrnd 128 ifcansee
  2795.     {
  2796.         ifai AIPIGDODGE { ifcount 32 ai AIPIGCHARGE break }
  2797.         iffloordistl 32
  2798.         {
  2799.             ifpdistl 1024 ifp palive ifcanshoottarget
  2800.                 { ai AIPIGSHOOTENEMY break }
  2801.             ifcount 48 { ifrnd 8 ifp palive ifcanshoottarget { ifrnd 192 ai AIPIGSHOOTENEMY else ai AIPIGDIVING break } }
  2802.         }
  2803.     }
  2804. ends
  2805.  
  2806.  
  2807. state pigshootenemystate
  2808. //    ifcansee
  2809.     {
  2810.         ifcount 12 { } else ifcount 11
  2811.         {
  2812.             ifcanshoottarget { sound PIG_ATTACK shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN }
  2813.             else ai AIPIGSEEKENEMY
  2814.         }
  2815.         ifcount 25 { } else ifcount 24 { action APIGCOCK sound SHOTGUN_COCK }
  2816.         ifcount 48 { } else ifcount 47
  2817.         {
  2818.             ifcanshoottarget { sound PIG_ATTACK shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN }
  2819.             else ai AIPIGSEEKENEMY
  2820.         }
  2821.         ifcount 60 { } else ifcount 59 { action APIGCOCK sound SHOTGUN_COCK }
  2822.         ifcount 72
  2823.         {
  2824.             ifrnd 64 resetcount
  2825.             else
  2826.             {
  2827.                 ifpdistl 768 ai AIPIGFLEEENEMY
  2828.                 else ai AIPIGSEEKENEMY
  2829.             }
  2830.         }
  2831.         ifaction APIGCOCK ifactioncount 2 action APIGSHOOT
  2832.     }
  2833.     else ai AIPIGSEEKENEMY
  2834. ends
  2835.  
  2836. state pigfleeenemystate
  2837.     ifactioncount 8 ai AIPIGSEEKENEMY
  2838.     else ifnotmoving ai AIPIGSEEKENEMY
  2839. ends
  2840.  
  2841. state pigdivestate
  2842.     ifaction APIGDIVESHOOT
  2843.     {
  2844.         ifcansee
  2845.         {
  2846.             ifcount 12 { } else ifcount 11
  2847.             {
  2848.                 ifcanshoottarget { sound PIG_ATTACK shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN }
  2849.                 else ai AIPIGSEEKENEMY
  2850.             }
  2851.             ifcount 25 { } else ifcount 24 { sound SHOTGUN_COCK }
  2852.             ifcount 48 { } else ifcount 47
  2853.             {
  2854.                 ifcanshoottarget { sound PIG_ATTACK shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN shoot SHOTGUN }
  2855.                 else ai AIPIGSEEKENEMY
  2856.             }
  2857.             ifcount 60 { } else ifcount 59
  2858.             {
  2859.                 sound SHOTGUN_COCK
  2860.                 ifgapzl 32 ai AIPIGDIVING
  2861.                 else
  2862.                 {
  2863.                     ifpdistl 4096 ai AIPIGFLEEENEMY
  2864.                     else ai AIPIGSEEKENEMY
  2865.                 }
  2866.             }
  2867.         }
  2868.         else ifgapzl 32 ai AIPIGDIVING else ai AIPIGSEEKENEMY
  2869.     }
  2870.     else ifactioncount 2 ifp palive { resetcount action APIGDIVESHOOT }
  2871. ends
  2872.  
  2873. state checkpighitstate
  2874.     spawn BLOOD
  2875.     ifdead
  2876.     {
  2877.         state random_wall_jibs
  2878.         ifrnd 16 spawn SHIELD else state drop_shotgun
  2879.         ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action APIGFROZEN strength 0 break }
  2880.  
  2881.         addkills 1
  2882.         ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy }
  2883.         else ifwasweapon RPG { sound SQUISHED state standard_jibs state delete_enemy }
  2884.         ai AIPIGDYING sound PIG_DYING
  2885.     }
  2886.     else
  2887.     {
  2888.         sound PIG_PAIN
  2889.         state random_wall_jibs
  2890.  
  2891.         ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AIPIGSHRINK }
  2892.         else ifrnd 64 ai AIPIGHIT
  2893.         else ifrnd 64 ai AIPIGSHOOTENEMY
  2894.         else ifrnd 64 { ai AIPIGDIVING action APIGDIVESHOOT }
  2895.     }
  2896. ends
  2897.  
  2898. state pigshrinkstate
  2899.     ifcount SHRUNKDONECOUNT ai AIPIGSEEKENEMY
  2900.     else ifcount SHRUNKCOUNT sizeto 48 40
  2901.     else state genericshrunkcode
  2902. ends
  2903.  
  2904. state pigdyingstate
  2905.     ifactioncount 5 { ifrnd 64 spawn BLOODPOOL state rf iffloordistl 8 sound THUD action APIGDEAD move PIGSTOPPED break }
  2906. ends
  2907.  
  2908.  
  2909.  
  2910. actor PIGCOPDIVE PIGCOPSTRENGTH ai AIPIGDIVING action APIGDIVESHOOT cactor PIGCOP enda
  2911. actor PIGCOPSTAYPUT PIGCOPSTRENGTH ai AIPIGSEEKENEMY cactor PIGCOP enda
  2912. actor PIGCOP PIGCOPSTRENGTH APIGSTAND fall
  2913.     state checksquished
  2914.     ifaction APIGSTAND ai AIPIGSEEKENEMY
  2915.     else ifaction APIGDEAD
  2916.     {
  2917.         ifrespawn ifcount RESPAWNACTORTIME
  2918.             { spawn TRANSPORTERSTAR cstat 257 strength PIGCOPSTRENGTH ai AIPIGSEEKENEMY }
  2919.         else { strength 0 ifhitweapon ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy } break }
  2920.     }
  2921.     else ifaction APIGFROZEN
  2922.     {
  2923.         ifcount THAWTIME { ai AIPIGSEEKENEMY getlastpal }
  2924.         else ifcount FROZENDRIPTIME ifrnd 8 spawn WATERDRIP
  2925.  
  2926.         ifhitweapon
  2927.         {
  2928.             ifwasweapon FREEZEBLAST { strength 0 break }
  2929.             addkills 1
  2930.  
  2931.             lotsofglass 30
  2932.             ifrnd 84 spawn BLOODPOOL
  2933.             sound GLASS_BREAKING
  2934.             killit
  2935.         }
  2936.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  2937.         break
  2938.     }
  2939.     else ifai AIPIGDYING state pigdyingstate
  2940.     else ifai AIPIGHIT { ifactioncount 3 ai AIPIGSEEKENEMY }
  2941.     else ifai AIPIGSHRINK state pigshrinkstate
  2942.     else
  2943.     {
  2944.         ifai AIPIGSEEKENEMY state pigseekenemystate
  2945.         else ifai AIPIGDODGE state pigseekenemystate
  2946.         else ifai AIPIGSHOOTENEMY state pigshootenemystate
  2947.         else ifai AIPIGFLEEENEMY state pigfleeenemystate
  2948.         else ifai AIPIGDIVING state pigdivestate
  2949.         else ifai AIPIGCHARGE state pigseekenemystate
  2950.         ifhitweapon state checkpighitstate
  2951.         ifrnd 1
  2952.         {
  2953.             ifrnd 32 soundonce PIG_ROAM
  2954.             else ifrnd 64 soundonce PIG_ROAM2
  2955.             else soundonce PIG_ROAM3
  2956.         }
  2957.     }
  2958. enda
  2959.  
  2960.  
  2961.  
  2962.  
  2963. action ABOSS1WALK                0  4  5  1  12
  2964. action ABOSS1FROZEN              30 1  5
  2965. action ABOSS1RUN                 0  6  5  1  5
  2966. action ABOSS1SHOOT               30 2  5  1  4
  2967. action ABOSS1LOB                 40 2  5  1  35
  2968. action ABOSS1DYING              50 5  1  1  50
  2969. action BOSS1FLINTCH             50 1  1  1  1
  2970. action ABOSS1DEAD               55
  2971.  
  2972. move PALBOSS1SHRUNKRUNVELS 32
  2973. move PALBOSS1RUNVELS 128
  2974. move BOSS1WALKVELS 208
  2975. move BOSS1RUNVELS 296
  2976. move BOSS1STOPPED
  2977.  
  2978. ai AIBOSS1SEEKENEMY ABOSS1WALK BOSS1WALKVELS seekplayer
  2979. ai AIBOSS1RUNENEMY ABOSS1RUN BOSS1RUNVELS faceplayer
  2980. ai AIBOSS1SHOOTENEMY ABOSS1SHOOT BOSS1STOPPED faceplayer
  2981. ai AIBOSS1LOBBED ABOSS1LOB BOSS1STOPPED faceplayer // faceplayersmart
  2982. ai AIBOSS1DYING ABOSS1DYING BOSS1STOPPED faceplayer
  2983. ai AIBOSS1PALSHRINK ABOSS1WALK PALBOSS1SHRUNKRUNVELS furthestdir
  2984.  
  2985. state boss1palshrunkstate
  2986.     ifcount SHRUNKDONECOUNT ai AITROOPSEEKENEMY
  2987.     else ifcount SHRUNKCOUNT sizeto 40 40
  2988.     else state genericshrunkcode
  2989. ends
  2990.  
  2991. state checkboss1seekstate
  2992.     ai AIBOSS1SEEKENEMY
  2993.     ifspritepal 0 { } else     // a fake way of doing a ifspritepal NOT.
  2994.         move PALBOSS1RUNVELS seekplayer
  2995. ends
  2996.  
  2997. state boss1runenemystate
  2998.     ifpdistl 2048 { ifp palive ai AIBOSS1SHOOTENEMY break }
  2999.     else ifcansee { ifactioncount 6 { ifcanshoottarget { resetactioncount sound BOS1_WALK } else ai AIBOSS1SEEKENEMY } }
  3000.     else ai AIBOSS1SEEKENEMY
  3001. ends
  3002.  
  3003. state boss1seekenemystate
  3004.     ifrnd 2 soundonce BOS1_ROAM
  3005.     else ifactioncount 6 { resetactioncount sound BOS1_WALK }
  3006.  
  3007.     ifpdistl 2548 ifp palive { ai AIBOSS1SHOOTENEMY break }
  3008.  
  3009.     ifcansee ifcount 32
  3010.     {
  3011.         ifrnd 32 { ifp palive ifcanshoottarget ai AIBOSS1SHOOTENEMY }
  3012.         else ifpdistg 2548 ifrnd 192
  3013.             ifcanshoottarget
  3014.             {
  3015.                 ifrnd 64
  3016.                 {
  3017.                     ai AIBOSS1RUNENEMY
  3018.                     ifspritepal 0 { } else move PALBOSS1RUNVELS seekplayer
  3019.                 }
  3020.                 else ai AIBOSS1LOBBED
  3021.             }
  3022.     }
  3023.  
  3024. ends
  3025.  
  3026. state boss1dyingstate
  3027.   ifaction ABOSS1DEAD
  3028.   {
  3029.       ifspritepal 0 break
  3030.       ifrespawn ifcount RESPAWNACTORTIME
  3031.           { spawn TRANSPORTERSTAR cstat 257 strength PIGCOPSTRENGTH state checkboss1seekstate }
  3032.       else { strength 0 ifhitweapon ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy } break }
  3033.   }
  3034.   ifactioncount 5 { iffloordistl 8 sound THUD action ABOSS1DEAD cstat 0 ifspritepal 0 endofgame 52 }
  3035. ends
  3036.  
  3037. state boss1lobbedstate
  3038.     ifcansee
  3039.     {
  3040.         ifactioncount 2
  3041.         {
  3042.             resetactioncount
  3043.             sound BOS1_ATTACK2
  3044.             shoot MORTER
  3045.         }
  3046.         else ifcount 64 ifrnd 16 state checkboss1seekstate
  3047.     }
  3048.     else state checkboss1seekstate
  3049. ends
  3050.  
  3051. state boss1shootenemy
  3052.     ifcount 72 state checkboss1seekstate
  3053.     else ifaction ABOSS1SHOOT ifactioncount 2
  3054.     {
  3055.         sound BOS1_ATTACK1
  3056.         shoot SHOTSPARK1
  3057.         shoot SHOTSPARK1
  3058.         shoot SHOTSPARK1
  3059.         shoot SHOTSPARK1
  3060.         shoot SHOTSPARK1
  3061.         shoot SHOTSPARK1
  3062.         resetactioncount
  3063.     }
  3064. ends
  3065.  
  3066. state checkboss1hitstate
  3067.     ifrnd 2 spawn BLOODPOOL
  3068.     ifdead
  3069.     {
  3070.         ifspritepal 0 globalsound DUKE_TALKTOBOSSFALL
  3071.         else
  3072.         {
  3073.             ifrnd 64 globalsound DUKE_TALKTOBOSSFALL
  3074.             ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action ABOSS1FROZEN strength 0 break }
  3075.         }
  3076.  
  3077.         sound BOS1_DYING
  3078.  
  3079.         addkills 1
  3080.         ai AIBOSS1DYING
  3081.     }
  3082.     else
  3083.     {
  3084.         ifrnd 32 { action BOSS1FLINTCH move 0 }
  3085.  
  3086.         ifspritepal 0 { }
  3087.         else ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AIBOSS1PALSHRINK break }
  3088.  
  3089.         soundonce BOS1_PAIN
  3090.  
  3091.         debris SCRAP1 1
  3092.         guts JIBS6 1
  3093.     }
  3094. ends
  3095.  
  3096. state boss1code
  3097.  
  3098.     ifaction ABOSS1FROZEN
  3099.     {
  3100.         ifcount THAWTIME { ai AIBOSS1SEEKENEMY spritepal 21 }
  3101.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  3102.  
  3103.         ifhitweapon
  3104.         {
  3105.             ifwasweapon FREEZEBLAST { strength 0 break }
  3106.             addkills 1
  3107.             lotsofglass 30
  3108.  
  3109.             ifrnd 84 spawn BLOODPOOL
  3110.             sound GLASS_BREAKING
  3111.             killit
  3112.         }
  3113.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  3114.         break
  3115.     }
  3116.     ifai 0 { ifspritepal 0 ai AIBOSS1RUNENEMY else { strength BOSS1PALSTRENGTH ai AIBOSS1SHOOTENEMY } }
  3117.     else ifaction BOSS1FLINTCH { ifactioncount 3 ai AIBOSS1SHOOTENEMY }
  3118.     else ifai AIBOSS1SEEKENEMY state boss1seekenemystate
  3119.     else ifai AIBOSS1RUNENEMY state boss1runenemystate
  3120.     else ifai AIBOSS1SHOOTENEMY state boss1shootenemy
  3121.     else ifai AIBOSS1LOBBED state boss1lobbedstate
  3122.     else ifai AIBOSS1PALSHRINK state boss1palshrunkstate
  3123.  
  3124.     ifai AIBOSS1DYING state boss1dyingstate
  3125.     else
  3126.     {
  3127.         ifhitweapon state checkboss1hitstate
  3128.         else ifp palive ifspritepal 0 ifpdistl 1280 { addphealth -1000 palfrom 63 63 }
  3129.     }
  3130. ends
  3131.  
  3132. actor BOSS1STAYPUT BOSS1STRENGTH cactor BOSS1 enda
  3133. actor BOSS1 BOSS1STRENGTH fall state boss1code enda
  3134.  
  3135.  
  3136. action ABOSS2WALK                0  4  5  1  30
  3137. action ABOSS2FROZEN              0  1  5
  3138. action ABOSS2RUN                 0  4  5  1  15
  3139. action ABOSS2SHOOT               20 2  5  1  15
  3140. action ABOSS2LOB                 30 2  5  1  105
  3141. action ABOSS2DYING              40 8  1  1  35
  3142. action BOSS2FLINTCH             40 1  1  1  1
  3143. action ABOSS2DEAD               48
  3144.  
  3145. move PALBOSS2SHRUNKRUNVELS 32
  3146. move PALBOSS2RUNVELS 84
  3147. move BOSS2WALKVELS 192
  3148. move BOSS2RUNVELS 256
  3149. move BOSS2STOPPED
  3150.  
  3151. ai AIBOSS2SEEKENEMY ABOSS2WALK BOSS2WALKVELS seekplayer
  3152. ai AIBOSS2RUNENEMY ABOSS2RUN BOSS2RUNVELS faceplayer
  3153. ai AIBOSS2SHOOTENEMY ABOSS2SHOOT BOSS2STOPPED faceplayer
  3154. ai AIBOSS2LOBBED ABOSS2LOB BOSS2STOPPED faceplayer
  3155. ai AIBOSS2DYING ABOSS2DYING BOSS2STOPPED faceplayer
  3156. ai AIBOSS2PALSHRINK ABOSS2WALK PALBOSS2SHRUNKRUNVELS furthestdir
  3157.  
  3158. state boss2palshrunkstate
  3159.     ifcount SHRUNKDONECOUNT ai AITROOPSEEKENEMY
  3160.     else ifcount SHRUNKCOUNT sizeto 40 40
  3161.     else state genericshrunkcode
  3162. ends
  3163.  
  3164. state checkboss2seekstate
  3165.     ai AIBOSS2SEEKENEMY
  3166.     ifspritepal 0 { } else     // a fake way of doing a ifspritepal NOT.
  3167.         move PALBOSS2RUNVELS seekplayer
  3168. ends
  3169.  
  3170. state boss2runenemystate
  3171.     ifcansee
  3172.     {
  3173.         ifactioncount 3 { ifcanshoottarget { resetactioncount sound BOS1_WALK } else ai AIBOSS2SEEKENEMY }
  3174.         ifcount 48 ifrnd 2 { ifp palive { sound BOS2_ATTACK ai AIBOSS2SHOOTENEMY } break }
  3175.     }
  3176.     else ai AIBOSS2SEEKENEMY
  3177. ends
  3178.  
  3179. state boss2seekenemystate
  3180.     ifrnd 2 soundonce BOS2_ROAM
  3181.     else ifactioncount 3 { resetactioncount sound BOS1_WALK }
  3182.  
  3183.     ifcansee ifcount 32 ifp palive ifrnd 48 ifcanshoottarget
  3184.     {
  3185.         ifrnd 64 ifpdistg 4096
  3186.         {
  3187.             ai AIBOSS2RUNENEMY
  3188.             ifspritepal 0 { }
  3189.             else move PALBOSS2RUNVELS seekplayer
  3190.             break
  3191.         }
  3192.  
  3193.         ifpdistl 10240 { ifrnd 128 { sound BOS2_ATTACK ai AIBOSS2LOBBED } }
  3194.         else { sound BOS2_ATTACK ai AIBOSS2SHOOTENEMY }
  3195.     }
  3196. ends
  3197.  
  3198. state boss2dyingstate
  3199.   ifaction ABOSS2DEAD
  3200.   {
  3201.       ifspritepal 0 break
  3202.       ifrespawn ifcount RESPAWNACTORTIME
  3203.           { spawn TRANSPORTERSTAR cstat 257 strength PIGCOPSTRENGTH state checkboss2seekstate }
  3204.       else { strength 0 ifhitweapon ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy } break }
  3205.   }
  3206.   ifactioncount 8 { iffloordistl 8 sound THUD action ABOSS2DEAD cstat 0 ifspritepal 0 endofgame 52 }
  3207. ends
  3208.  
  3209. state boss2lobbedstate
  3210.     ifcansee
  3211.     {
  3212.         ifactioncount 2 resetactioncount
  3213.         else ifactioncount 1 { ifrnd 128 shoot COOLEXPLOSION1 }
  3214.         else ifcount 64 ifrnd 16 state checkboss2seekstate
  3215.     }
  3216.     else state checkboss2seekstate
  3217. ends
  3218.  
  3219. state boss2shootenemy
  3220.     ifcount 72 state checkboss2seekstate
  3221.     else ifaction ABOSS2SHOOT ifactioncount 2
  3222.     {
  3223.         shoot RPG
  3224.         resetactioncount
  3225.     }
  3226. ends
  3227.  
  3228. state checkboss2hitstate
  3229.     ifrnd 2 spawn BLOODPOOL
  3230.     ifdead
  3231.     {
  3232.         ifspritepal 0 globalsound DUKE_TALKTOBOSSFALL
  3233.         else
  3234.         {
  3235.             ifrnd 64 globalsound DUKE_TALKTOBOSSFALL
  3236.             ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action ABOSS2FROZEN strength 0 break }
  3237.         }
  3238.  
  3239.         sound BOS2_DYING
  3240.  
  3241.         addkills 1
  3242.  
  3243.         ai AIBOSS2DYING
  3244.     }
  3245.     else
  3246.     {
  3247.         ifrnd 144
  3248.         {
  3249.             ifrnd 32 { action BOSS2FLINTCH move 0 }
  3250.             else { sound BOS2_ATTACK ai AIBOSS2SHOOTENEMY }
  3251.         }
  3252.  
  3253.         ifspritepal 0 { }
  3254.         else ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AIBOSS2PALSHRINK break }
  3255.  
  3256.         soundonce BOS2_PAIN
  3257.  
  3258.         debris SCRAP1 1
  3259.         guts JIBS6 1
  3260.     }
  3261. ends
  3262.  
  3263. state boss2code
  3264.  
  3265.     ifaction ABOSS2FROZEN
  3266.     {
  3267.         ifcount THAWTIME { ai AIBOSS2SEEKENEMY spritepal 21 }
  3268.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  3269.  
  3270.         ifhitweapon
  3271.         {
  3272.             ifwasweapon FREEZEBLAST { strength 0 break }
  3273.             addkills 1
  3274.  
  3275.             lotsofglass 30
  3276.             sound GLASS_BREAKING
  3277.             ifrnd 84 spawn BLOODPOOL
  3278.             killit
  3279.         }
  3280.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  3281.         break
  3282.     }
  3283.     ifai 0 { ifspritepal 0 ai AIBOSS2RUNENEMY else { strength 1 { sound BOS2_ATTACK ai AIBOSS2SHOOTENEMY } } }
  3284.     else ifaction BOSS2FLINTCH { ifactioncount 3 ai AIBOSS2SEEKENEMY }
  3285.     else ifai AIBOSS2SEEKENEMY state boss2seekenemystate
  3286.     else ifai AIBOSS2RUNENEMY state boss2runenemystate
  3287.     else ifai AIBOSS2SHOOTENEMY state boss2shootenemy
  3288.     else ifai AIBOSS2LOBBED state boss2lobbedstate
  3289.     else ifai AIBOSS2PALSHRINK state boss2palshrunkstate
  3290.  
  3291.     ifai AIBOSS2DYING state boss2dyingstate
  3292.     else
  3293.     {
  3294.         ifhitweapon state checkboss2hitstate
  3295.         else ifp palive ifspritepal 0 ifpdistl 1280 { addphealth -1000 palfrom 63 63 }
  3296.     }
  3297.  
  3298.  
  3299. ends
  3300.  
  3301. actor BOSS2 BOSS2STRENGTH fall state boss2code enda
  3302.  
  3303.  
  3304. action ABOSS3WALK                0  4  5  1  30
  3305. action ABOSS3FROZEN              0  1  5
  3306. action ABOSS3RUN                 0  4  5  1  15
  3307. action ABOSS3LOB                20 4  5  1  50
  3308. action ABOSS3LOBBING            30 2  5  1  15
  3309. action ABOSS3DYING              40 8  1  1  20
  3310. action BOSS3FLINTCH             40 1  1  1  1
  3311. action ABOSS3DEAD               48
  3312.  
  3313. move PALBOSS3SHRUNKRUNVELS 32
  3314. move PALBOSS3RUNVELS 84
  3315. move BOSS3WALKVELS 208
  3316. move BOSS3RUNVELS 270
  3317. move BOSS3STOPPED
  3318.  
  3319. ai AIBOSS3SEEKENEMY ABOSS3WALK BOSS3WALKVELS seekplayer
  3320. ai AIBOSS3RUNENEMY ABOSS3RUN BOSS3RUNVELS faceplayerslow
  3321. ai AIBOSS3LOBENEMY ABOSS3LOB BOSS3STOPPED faceplayer
  3322. ai AIBOSS3DYING ABOSS3DYING BOSS3STOPPED faceplayer
  3323. ai AIBOSS3PALSHRINK ABOSS3WALK PALBOSS3SHRUNKRUNVELS faceplayer
  3324.  
  3325. state boss3palshrunkstate
  3326.     ifcount SHRUNKDONECOUNT ai AITROOPSEEKENEMY
  3327.     else ifcount SHRUNKCOUNT sizeto 40 40
  3328.     else state genericshrunkcode
  3329. ends
  3330.  
  3331. state checkboss3seekstate
  3332.     ai AIBOSS3SEEKENEMY
  3333.     ifspritepal 0 { } else     // a fake way of doing a ifspritepal NOT.
  3334.         move PALBOSS3RUNVELS seekplayer
  3335. ends
  3336.  
  3337. state boss3runenemystate
  3338.     ifcansee { ifactioncount 3 { ifcanshoottarget { resetactioncount sound BOS1_WALK } else ai AIBOSS3SEEKENEMY } }
  3339.     else ai AIBOSS3SEEKENEMY
  3340. ends
  3341.  
  3342. state boss3seekenemystate
  3343.     ifrnd 2 soundonce BOS3_ROAM
  3344.     else ifactioncount 3 { resetactioncount sound BOS1_WALK }
  3345.  
  3346.     ifcansee ifcount 32 ifrnd 48 ifcanshoottarget
  3347.     {
  3348.         ifrnd 64
  3349.             ifpdistg 4096
  3350.             {
  3351.                 ai AIBOSS3RUNENEMY
  3352.                 ifspritepal 0 break
  3353.                 move PALBOSS3RUNVELS seekplayer
  3354.                 break
  3355.             }
  3356.  
  3357.         ifp palive
  3358.             ai AIBOSS3LOBENEMY
  3359.     }
  3360. ends
  3361.  
  3362. state boss3dyingstate
  3363.   ifaction ABOSS3DEAD
  3364.   {
  3365.       ifspritepal 0 break
  3366.       ifrespawn ifcount RESPAWNACTORTIME
  3367.           { spawn TRANSPORTERSTAR cstat 257 strength PIGCOPSTRENGTH state checkboss3seekstate }
  3368.       else { strength 0 ifhitweapon ifwasweapon RADIUSEXPLOSION { sound SQUISHED state standard_jibs state delete_enemy } break }
  3369.   }
  3370.   ifactioncount 8 { iffloordistl 8 sound THUD action ABOSS3DEAD cstat 0 ifspritepal 0 endofgame 52 }
  3371. ends
  3372.  
  3373. state boss3lobbedstate
  3374.     ifcansee
  3375.     {
  3376.         ifaction ABOSS3LOBBING
  3377.             ifactioncount 2
  3378.         {
  3379.             shoot RPG
  3380.             resetactioncount
  3381.             ifrnd 8 ai AIBOSS3SEEKENEMY
  3382.         }
  3383.  
  3384.         ifactioncount 3 { action ABOSS3LOBBING resetcount }
  3385.     }
  3386.     else state checkboss3seekstate
  3387. ends
  3388.  
  3389. state checkboss3hitstate
  3390.     ifrnd 2 spawn BLOODPOOL
  3391.     ifdead
  3392.     {
  3393.         ifspritepal 0 globalsound DUKE_TALKTOBOSSFALL
  3394.         else
  3395.         {
  3396.             ifrnd 64 globalsound DUKE_TALKTOBOSSFALL
  3397.             ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action ABOSS3FROZEN strength 0 break }
  3398.         }
  3399.  
  3400.         addkills 1
  3401.         ai AIBOSS3DYING
  3402.  
  3403.         sound BOS3_DYING
  3404.         sound JIBBED_ACTOR9
  3405.  
  3406.     }
  3407.     else
  3408.     {
  3409.         ifrnd 32 { action BOSS3FLINTCH move 0 }
  3410.  
  3411.         ifspritepal 0 { }
  3412.         else ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AIBOSS3PALSHRINK break }
  3413.  
  3414.         soundonce BOS3_PAIN
  3415.  
  3416.         debris SCRAP1 1
  3417.         guts JIBS6 1
  3418.     }
  3419. ends
  3420.  
  3421. state boss3code
  3422.  
  3423.     ifaction ABOSS3FROZEN
  3424.     {
  3425.         ifhitweapon
  3426.         {
  3427.             ifwasweapon FREEZEBLAST { strength 0 break }
  3428.  
  3429.             addkills 1
  3430.             lotsofglass 30
  3431.  
  3432.             ifrnd 84 spawn BLOODPOOL
  3433.             sound GLASS_BREAKING
  3434.             killit
  3435.         }
  3436.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  3437.         break
  3438.     }
  3439.     ifai 0 { ifspritepal 0 ai AIBOSS3RUNENEMY else { strength 1 ai AIBOSS3LOBENEMY } }
  3440.     else ifaction BOSS3FLINTCH { ifactioncount 3 ai AIBOSS3SEEKENEMY }
  3441.     else ifai AIBOSS3SEEKENEMY state boss3seekenemystate
  3442.     else ifai AIBOSS3RUNENEMY state boss3runenemystate
  3443.     else ifai AIBOSS3LOBENEMY state boss3lobbedstate
  3444.     else ifai AIBOSS3PALSHRINK state boss3palshrunkstate
  3445.  
  3446.     ifai AIBOSS3DYING state boss3dyingstate
  3447.     else
  3448.     {
  3449.         ifhitweapon state checkboss3hitstate
  3450.         else ifp palive ifspritepal 0 ifpdistl 1280 { addphealth -1000 palfrom 63 63 }
  3451.     }
  3452. ends
  3453.  
  3454. actor BOSS3 BOSS3STRENGTH fall state boss3code enda
  3455.  
  3456.  
  3457. action ACOMMBREETH  0  3  5  1  40
  3458. action ACOMMFROZEN  0  1  5
  3459. action ACOMMSPIN   -5  1  5  1  12
  3460. action ACOMMGET     0  3  5  1  30
  3461. action ACOMMSHOOT  20  1  5   1 35
  3462. action ACOMMABOUTTOSHOOT 20 1 5 1 30
  3463. action ACOMMDYING  30  8  1  1  12
  3464. action ACOMMDEAD   38  1  1  1  1
  3465.  
  3466.  
  3467. move COMMGETUPVELS 128 -64
  3468. move COMMGETVELS 128 64
  3469. move COMMSLOW 64 24
  3470. move COMMSTOPPED
  3471.  
  3472. ai AICOMMWAIT ACOMMBREETH COMMSTOPPED faceplayerslow
  3473. ai AICOMMGET ACOMMGET COMMGETVELS seekplayer
  3474. ai AICOMMSHOOT ACOMMSHOOT COMMSTOPPED faceplayerslow
  3475. ai AICOMMABOUTTOSHOOT ACOMMABOUTTOSHOOT COMMSTOPPED faceplayerslow
  3476. ai AICOMMSPIN ACOMMSPIN COMMGETVELS spin
  3477. ai AICOMMDYING ACOMMDYING COMMSTOPPED faceplayer
  3478. ai AICOMMSHRUNK ACOMMGET COMMSLOW furthestdir
  3479.  
  3480. state checkcommhitstate
  3481.  
  3482.     ifhitweapon
  3483.     {
  3484.  
  3485.         guts JIBS6 2
  3486.  
  3487.         ifdead
  3488.         {
  3489.             ifwasweapon FREEZEBLAST { sound SOMETHINGFROZE spritepal 1 move 0 action ACOMMFROZEN strength 0 break }
  3490.  
  3491.             addkills 1
  3492.  
  3493.             ifwasweapon RADIUSEXPLOSION { spawn BLOODPOOL sound SQUISHED state standard_jibs state delete_enemy }
  3494.             else ifwasweapon RPG { sound SQUISHED spawn BLOODPOOL state standard_jibs state delete_enemy }
  3495.  
  3496.             sound COMM_DYING
  3497.             ai AICOMMDYING
  3498.         }
  3499.         else
  3500.         {
  3501.             soundonce COMM_PAIN
  3502.             ifwasweapon SHRINKSPARK { sound ACTOR_SHRINKING ai AICOMMSHRUNK }
  3503.             else ifrnd 24 ai AICOMMABOUTTOSHOOT
  3504.         }
  3505.     }
  3506. ends
  3507.  
  3508. actor COMMANDERSTAYPUT COMMANDERSTRENGTH cactor COMMANDER ai AICOMMABOUTTOSHOOT enda
  3509. actor COMMANDER COMMANDERSTRENGTH
  3510.  
  3511.     state checksquished
  3512.  
  3513.     ifaction ACOMMFROZEN
  3514.     {
  3515.         fall
  3516.  
  3517.         ifcount THAWTIME { getlastpal ai AICOMMWAIT }
  3518.         else ifcount FROZENDRIPTIME { ifactioncount 26 { spawn WATERDRIP resetactioncount } }
  3519.  
  3520.         ifhitweapon
  3521.         {
  3522.             ifwasweapon FREEZEBLAST { strength 0 break }
  3523.             addkills 1
  3524.  
  3525.             ifrnd 84 spawn BLOODPOOL
  3526.             lotsofglass 30
  3527.             sound GLASS_BREAKING
  3528.             killit
  3529.         }
  3530.         ifp pfacing ifpdistl FROZENQUICKKICKDIST pkick
  3531.         break
  3532.     }
  3533.     ifai 0 ai AICOMMSHOOT
  3534.     else ifai AICOMMWAIT { ifcount 20 { ifcansee { ifcanshoottarget { ifrnd 96 ai AICOMMGET else ai AICOMMABOUTTOSHOOT } } else ai AICOMMGET } }
  3535.     else ifai AICOMMABOUTTOSHOOT
  3536.     {
  3537.         ifactioncount 2 { ifcansee ai AICOMMSHOOT else { ai AICOMMGET break } }
  3538.         soundonce COMM_ATTACK
  3539.     }
  3540.     else ifai AICOMMSHOOT
  3541.     {
  3542.         ifcanshoottarget
  3543.         {
  3544.             ifcount 24 ifrnd 16 ai AICOMMWAIT
  3545.             ifactioncount 2 { shoot RPG resetactioncount }
  3546.         }
  3547.         else ai AICOMMGET
  3548.     }
  3549.     else ifai AICOMMSHRUNK
  3550.     {
  3551.         ifcount SHRUNKDONECOUNT ai AICOMMGET
  3552.         else ifcount SHRUNKCOUNT sizeto 48 40
  3553.         else state genericshrunkcode
  3554.     }
  3555.     else ifai AICOMMGET
  3556.     {
  3557.         ifnotmoving ifrnd 4 operate
  3558.         ifpdistl 1024 ifp palive { sound COMM_SPIN ai AICOMMSPIN break }
  3559.  
  3560.         ifcansee
  3561.         {
  3562.             ifp phigher move COMMGETUPVELS getv geth faceplayer
  3563.             else move COMMGETVELS getv geth faceplayer
  3564.         }
  3565.         ifactioncount 8 ifrnd 2 ai AICOMMABOUTTOSHOOT
  3566.     }
  3567.     else ifai AICOMMSPIN
  3568.     {
  3569.         soundonce COMM_SPIN
  3570.         ifcount 16
  3571.         {
  3572.             ifpdistl 1280 { addphealth CAPTSPINNINGPLAYER sound DUKE_GRUNT palfrom 32 16 resetcount }
  3573.             else ifpdistg 2300 ai AICOMMWAIT
  3574.         }
  3575.         ifactioncount 52 ai AICOMMWAIT
  3576.         ifnotmoving ifrnd 32 operate
  3577.     }
  3578.  
  3579.     ifai AICOMMDYING
  3580.     {
  3581.         fall
  3582.         strength 0
  3583.  
  3584.         ifhitweapon ifwasweapon RADIUSEXPLOSION
  3585.             { sound SQUISHED spawn BLOODPOOL state standard_jibs state delete_enemy }
  3586.  
  3587.         ifaction ACOMMDYING
  3588.             ifactioncount 8 { iffloordistl 8 sound THUD cstat 0 action ACOMMDEAD }
  3589.     }
  3590.     else
  3591.     {
  3592.         ifrnd 2 soundonce COMM_ROAM
  3593.         state checkcommhitstate
  3594.     }
  3595. enda
  3596.  
  3597.  
  3598.