home *** CD-ROM | disk | FTP | other *** search
- #standard type magnetic tram cog.
- #don't forget to set blocking walls to "no move"
- symbols
- message user0
- message arrived
- message startup
- message pulse
- message timer
-
- thing camera linkid=1
-
- thing proj0
- thing proj1
- thing proj2
- thing proj3
- thing proj4
- thing proj5
-
- thing ghosttarget linkid=2
-
- flex color1=1 local
- flex color2=2 local
- flex color3=3 local
- flex color4=4 local
- flex color5=1 local
- flex color6=2 local
-
- flex radius=0.03 local
-
- cog fortresscamcog
- cog ramplightscog
-
- template ADroidT
- keyframe walkdancekey
- thing ADroidG
-
- end
-
- ## Code Section
- code
- //startup:
- user0:
- print("startup");
- curframe=1;
- time=1;
- setpulse(3.5);
- sendmessage(ramplightscog, user0);
- setcamerafocii(2, ghosttarget, camera);
- setcurrentcamera(2);
- player=getlocalplayerthing();
- sleep(2);
- addlaser(proj0, color1, radius);
- addlaser(proj1, color2, radius);
- addlaser(proj2, color3, radius);
- addlaser(proj3, color4, radius);
- addlaser(proj4, color5, radius);
- addlaser(proj5, color6, radius);
- sleep(1);
- rotatepivot(proj0, curframe, time);
- rotatepivot(proj1, curframe, time);
- rotatepivot(proj2, curframe, time);
- rotatepivot(proj3, curframe, time);
- rotatepivot(proj4, curframe, time);
- rotatepivot(proj5, curframe, time);
-
- sleep(1);
- // movetoframe(camera, 1, 3);
- movetoframe(ghosttarget, 1, 3);
- return;
-
- arrived:
- if (getsenderid()==1) {
- dwplaycharacterspeech("tsr004", "fmad004.wav");
- dwcleardialog();
- sleep(5);
- print("sending message to fortress cam");
- sendmessage(fortresscamcog, user0);
- }
- else if (getsenderid()==2) {
- movetoframe(camera, 1, 3);
- dwplaycammyspeech(16005, "fmca005.wav", 20, 2);
- }
- else {
- curframe=1-curframe;
- rotatepivot(proj0, curframe, time);
- rotatepivot(proj1, curframe, time);
- rotatepivot(proj2, curframe, time);
- rotatepivot(proj3, curframe, time);
- rotatepivot(proj4, curframe, time);
- rotatepivot(proj5, curframe, time);
-
- }
- return;
-
- pulse:
- playkey( (creatething(ADroidT, ADroidG)), walkdancekey, 1, 0);
- return;
-
-
- end
-
-
-