home *** CD-ROM | disk | FTP | other *** search
- # d_0 JawaTalk.cog
- #
- # A simple communiCog ripped off from Doug
- #
- # Desc:
- # Sucker Fool I stole it from Matt, I didn't even change
- # The variable GONK. - Love Ya, Doug
- #
- # Yeah, well I stole it back so bite me. --Matt
- # 12/08/97 DGS Stole from Matt's GonkTalk
- # 12/08/97 MST Stole back from Doug's JawaTalk
- #-----------------------------------------------------------------------------
-
- symbols
- message startup
- message arrived
- message activate
- message timer
-
- surface switch0 linkid=2
- surface switch1 linkid=2
- surface fakesurface0 linkid=2
- surface fakesurface1 linkid=2
- surface fakesurface2 linkid=2
- surface fakesurface3 linkid=2
-
- thing door
-
- end
-
-
- code
- startup:
- setthinglight(door, 1.0, 0.0);
- doorsector=getthingsector(door);
- setwallcel(switch0, 0);
- setwallcel(switch1, 0);
- return;
-
- activate:
- if (getsenderid()==2) {
- setsectoradjoins(doorsector, 1);
- setwallcel(switch0, 1);
- setwallcel(switch1, 1);
- movetoframe(door, 1, 3);
- settimer(4);
- }
- return;
-
- timer:
- movetoframe(door, 0, 3);
- return;
-
- arrived:
- if (getcurframe(door)==0) {
- setsectoradjoins(doorsector, 0);
- setwallcel(switch0, 0);
- setwallcel(switch1, 0);
- }
- return;
-
-
- end
-
-
-
-
-
-
-