home *** CD-ROM | disk | FTP | other *** search
/ 100 Pусских Uгр / 980121_2306.iso / SUPER3D / RAMPAGER.ZIP / REDNECK.GRP / CRICKETC.CON < prev    next >
Text File  |  1997-07-16  |  2KB  |  146 lines
  1. // The Crickets, etc.
  2. // By Arthur Attila Donavan
  3.  
  4. // Local Defines
  5. define LESSTHAN 0
  6. define GRTRTHAN 1
  7.  
  8. // Define actions
  9. action ASOUNDFX  0 1 1 1 1
  10. action ASOUNDFX1 0 1 1 1 45
  11.  
  12. // Define movements
  13. move SOUNDFXSTOP
  14.  
  15. // Define AI states
  16. ai AICRICKETS1 ASOUNDFX  SOUNDFXSTOP
  17. ai AICRICKETS2 ASOUNDFX  SOUNDFXSTOP
  18. ai AIWSCREAM1  ASOUNDFX  SOUNDFXSTOP
  19. ai AIWSCREAM2  ASOUNDFX  SOUNDFXSTOP
  20. ai AIWSCREAM3  ASOUNDFX  SOUNDFXSTOP
  21. ai AICLOCKCHM  ASOUNDFX1 SOUNDFXSTOP
  22. // ai AIJUKEBOX   ASOUNDFX  SOUNDFXSTOP
  23. ai AIVX_FINAL  ASOUNDFX1 SOUNDFXSTOP
  24.  
  25. // States (subroutines) ******************************
  26.  
  27. // Actors ********************************************
  28.  
  29. // Main code for Cricket.
  30. actor SOUNDFX 10
  31.   ifaction 0
  32.   {
  33.     ifsoundid CRICKET1
  34.     {
  35.       cstator 1
  36.       ai AICRICKETS1
  37.     }
  38.     ifsoundid CRICKET2
  39.     {
  40.       cstator 1
  41.       ai AICRICKETS1
  42.     }
  43.     else ifsoundid SCREAM_F
  44.     {
  45.       ai AIWSCREAM1
  46.     }
  47.     else ifsoundid CLOCKCHM
  48.     {
  49.       ai AICLOCKCHM
  50.       soundtagonce
  51.     }
  52. /*
  53.     else ifsoundid JUKEBOX
  54.     {
  55.       cstator 257
  56. //      cstator 32768
  57.       ai AIJUKEBOX
  58.     }
  59. */
  60.     else ifsoundid VX_FINAL
  61.     {
  62.       ai AIVX_FINAL
  63.       soundtagonce
  64.     }
  65.   } // end ifaction 0
  66.  
  67.   ifai AICRICKETS1            // Crickets
  68.   {
  69.     ifsounddist LESSTHAN
  70.       ai AICRICKETS2
  71.     else
  72.       ifrnd 32
  73.         soundtagonce
  74.   }
  75.   else ifai AICRICKETS2
  76.   {
  77.     ifsounddist LESSTHAN
  78.       nullop
  79.     else
  80.     {
  81.       ifactioncount 255
  82.         ifrnd 32
  83.           ai AICRICKETS1
  84.     }
  85.   }
  86.   else ifai AIWSCREAM1        // Woman scream - Trap
  87.   {
  88.     ifsounddist LESSTHAN
  89.       ifrnd 24
  90.         ai AIWSCREAM2
  91.   }
  92.   else ifai AIWSCREAM2        // Trapped - Play sound
  93.   {
  94.     ifactioncount 32
  95.     {
  96.       soundtagonce
  97.       ai AIWSCREAM3
  98.     }
  99.   }
  100.   else ifai AIWSCREAM3        // Wait before reset of action
  101.   {
  102.     ifsounddist GRTRTHAN
  103.       ai AIWSCREAM1
  104.   }
  105.   else ifai AICLOCKCHM
  106.   {
  107.     ifactioncount 512
  108.     {
  109.       soundtagonce
  110.       resetactioncount
  111.     }
  112.   }
  113. /*
  114.   else ifai AIJUKEBOX
  115.   {
  116.     ifactioncount 10
  117.     {
  118.       soundtagonce
  119.       resetactioncount
  120.     }
  121.     ifdead
  122.     {
  123.       stopsound JUKEBOX
  124.       killit
  125.     }
  126.   }
  127. */
  128.   else ifai AIVX_FINAL
  129.   {
  130.     ifactioncount 28
  131.       killit
  132.   }
  133.  
  134.   ifhitweapon
  135.   {
  136.     ifdead
  137.     {
  138.       ifwasweapon RADIUSEXPLOSION
  139.       {
  140.           killit
  141.       }
  142.     }
  143.   }
  144. enda
  145.  
  146.