home *** CD-ROM | disk | FTP | other *** search
- //@
- # INVOKED WDL-Script Project: DEMO ADEPTUS
- #
- # Auftraggeber : Conitec GmbH
- #
- #*********************************************************************
- # Module : particlel.wdl - Kundenversion
- # Version : 2.0 (Made with WDL-STUDIO & Beautyfier)
- # Date : 3.9.99
- # Responsible : Harald Schmidt
- # Description : modified template particle.wdl
- # *********************************************************************
- //@
- /////////////////////////////////////////////////////////////////////////
- // Adeptus particle effects
-
- ACTION particle_fountain
- {
- IF (MY_AGE == 0)
- {
- // just born?
- MY_SPEED.X = RANDOM (20)-10;
- MY_SPEED.Y = RANDOM (20)-10;
- MY_SPEED.Z = RANDOM (10)+20;
- MY_SIZE = 100;
- MY_COLOR.RED = 225;
- MY_COLOR.GREEN = 225;
- MY_COLOR.BLUE = 230;
- SET MY_MAP, scatter_map;
- SET MY_FLARE,ON;
- RETURN;
- }
- // Add gravity
- MY_SPEED.Z -= scatter_gravity;
- // Maybe add random term to age
- // MY_AGE += RANDOM(0.05);
- IF (MY_AGE >= 60)
- {
- SET MY_ACTION, NULL;
- }
- }
-
-
-