home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer 5.14 / 2000-11_-_Disc_5.14.iso / Goodies / 3DGameStudio / Adeptus / aparticl.wdl < prev    next >
Encoding:
Text File  |  2000-03-29  |  1.1 KB  |  44 lines
  1. //@
  2. # INVOKED        WDL-Script                    Project: DEMO ADEPTUS
  3. #
  4. # Auftraggeber   : Conitec GmbH
  5. #
  6. #*********************************************************************
  7. # Module        : particlel.wdl - Kundenversion
  8. # Version       : 2.0 (Made with WDL-STUDIO & Beautyfier)
  9. # Date          :  3.9.99
  10. # Responsible   : Harald Schmidt
  11. # Description   : modified template  particle.wdl
  12. # *********************************************************************
  13. //@
  14. /////////////////////////////////////////////////////////////////////////
  15. //    Adeptus particle effects
  16.  
  17. ACTION particle_fountain
  18. {
  19.     IF (MY_AGE == 0)
  20.     {
  21.         // just born?
  22.         MY_SPEED.X = RANDOM (20)-10;
  23.         MY_SPEED.Y = RANDOM (20)-10;
  24.         MY_SPEED.Z = RANDOM (10)+20;
  25.         MY_SIZE = 100;
  26.         MY_COLOR.RED = 225;
  27.         MY_COLOR.GREEN = 225;
  28.         MY_COLOR.BLUE = 230;
  29.         SET MY_MAP, scatter_map;
  30.         SET MY_FLARE,ON;
  31.         RETURN;
  32.     }
  33.     // Add gravity
  34.     MY_SPEED.Z -= scatter_gravity;
  35.     // Maybe add random term to age
  36.     //    MY_AGE += RANDOM(0.05);
  37.     IF (MY_AGE >= 60)
  38.     {
  39.         SET MY_ACTION, NULL;
  40.     }
  41. }
  42.  
  43.  
  44.