home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_02_conveyor.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  2.3 KB  |  86 lines
  1. symbols
  2. message        startup          
  3. message        activate
  4. message        timer
  5.  
  6. surface        convA1
  7. surface        convA2
  8. surface        convA3
  9. surface        convB1
  10. surface        convB2
  11. surface        convB3
  12. surface        convB4
  13. surface        convB5
  14.  
  15. surface        moveleft       linkid=5
  16. surface        moveright       linkid=5
  17.  
  18. flex           firstspeed
  19. flex           secondspeed
  20.  
  21. vector         vector1
  22. vector         xvector1a
  23. vector         vector2
  24. vector         xvector2a
  25. end
  26.  
  27. code
  28. xbacktonormal:
  29.      call xstopanim;
  30. startup:
  31.      player=getlocalplayerthing();
  32.      setwallcel(moveleft, 1);
  33.      setwallcel(moveright, 0);
  34.      anim1=slidewall(convA1, vector1, firstspeed);
  35.      anim2=slidewall(convA2, vector1, firstspeed);
  36.      anim3=slidewall(convA3, vector1, firstspeed);
  37.      anim4=slidewall(convB1, vector2, firstspeed);
  38.      anim5=slidewall(convB2, vector2, firstspeed);
  39.      anim6=slidewall(convB3, vector2, firstspeed);
  40.      anim7=slidewall(convB4, vector2, firstspeed);
  41.      anim8=slidewall(convB5, vector2, firstspeed);
  42.      return;  
  43.      
  44. activate:
  45.      if (getsenderid()==5) {
  46.           if (getwallcel(moveleft)==0) return;
  47.           setwallcel(moveright, 1);
  48.           setwallcel(moveleft, 0);
  49.           stopanim(anim1);
  50.           stopanim(anim2);
  51.           stopanim(anim3);
  52.           stopanim(anim4);
  53.           stopanim(anim5);
  54.           stopanim(anim6);
  55.           stopanim(anim7);
  56.           stopanim(anim8);          
  57.           anim9=slidewall(convA1, xvector1a, secondspeed);
  58.           anim10=slidewall(convA2, xvector1a, secondspeed);
  59.           anim11=slidewall(convA3, xvector1a, secondspeed);
  60.           anim12=slidewall(convB1, xvector2a, secondspeed);
  61.           anim13=slidewall(convB2, xvector2a, secondspeed);
  62.           anim14=slidewall(convB3, xvector2a, secondspeed);
  63.           anim15=slidewall(convB4, xvector2a, secondspeed);
  64.           anim16=slidewall(convB5, xvector2a, secondspeed);
  65.           settimer(20);
  66.      }
  67.      return;
  68.      
  69. timer:
  70.      call xbacktonormal;
  71.      return;
  72.      
  73. xstopanim:
  74.      stopanim(anim10);
  75.      stopanim(anim11);
  76.      stopanim(anim12);
  77.      stopanim(anim13);
  78.      stopanim(anim14);
  79.      stopanim(anim15);
  80.      stopanim(anim16);
  81.      stopanim(anim17); 
  82.      return;        
  83.   
  84. end
  85.  
  86.