home *** CD-ROM | disk | FTP | other *** search
- # Droids COG Script
- #
- # 03_sander.cog
- #
- # Cog designed to generate sand for the counterweight
- #
- #
- # Desc:
- # 02/03/98 [DGS] Created
- # 02/12/98 [JP] Modified to be used for the Moisture Farm level.
- # ========================================================================================
-
- symbols
- message pulse
- message user3
- message timer
-
- thing spout1
- thing spout2
- thing spout3
- thing spout4
- thing spout5
- thing spout6
- thing spout7
- thing spout8
-
-
-
-
- template large_part
- template fine_part
-
-
- int rock=0
- int l_color=0
- int move=10
- flex l_size=0
- flex l_speed=0.5 local
-
- sound watertop
- sound waterbottom
-
- end
-
- code
-
- user3: //Fill top
- setpulse(0.1);
- settimer(13);
- return;
-
-
- pulse:
- creatething(large_part, spout1);
- creatething(fine_part, spout1);
- creatething(large_part, spout2);
- creatething(fine_part, spout2);
- creatething(large_part, spout3);
- creatething(fine_part, spout3);
- creatething(large_part, spout4);
- creatething(fine_part, spout4);
- creatething(large_part, spout5);
- creatething(fine_part, spout5);
- creatething(large_part, spout5);
- creatething(fine_part, spout5);
- creatething(large_part, spout5);
- creatething(fine_part, spout5);
- creatething(large_part, spout5);
- creatething(fine_part, spout5);
-
-
-
- return;
-
- timer:
- setpulse(0);
- print("nomoreair");
- destroything(spout1);
- destroything(spout2);
- destroything(spout3);
- destroything(spout4);
- destroything(spout5);
- destroything(spout6);
- destroything(spout7);
- destroything(spout8);
-
-
-
-
- return;
-
- end
-
-
-
-
-