home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_tanks_activate.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  2.0 KB  |  89 lines
  1. # DroidWorks
  2. # 03_tanks_activate.cog
  3. #
  4. # This cog sends a message to 03_tanks.cog when the motor's been activated. 
  5. #
  6. #
  7. # [01/20/98] DGS    Created
  8. # {01/29/98] JP     Modified to be used in the Moisture Farm Level.
  9. #
  10. symbols
  11.  
  12. message        startup
  13. message        activate
  14. message        timer
  15. message        user3
  16. message        pulse
  17.  
  18. cog             tanks_cog
  19. cog            tanks2button //to tanks2button
  20.  
  21. surface        button
  22. sound          sw1=swt00drswtch.wav local
  23. sound          no=swt00twghtmax.wav local
  24.  
  25. cog            arrowsred
  26.  
  27. end
  28.  
  29. # ========================================================================================
  30.  
  31. code
  32. startup:
  33.      print("start me up");
  34.      setwallcel(button, 1); //it's operational
  35.      topbuttonworks=1;
  36.      setpulse(0.7);
  37.      return;
  38.  
  39. activate:
  40.     // send message to 03_Tanks_cog telling it the switch has been hit.
  41.         if (topbuttonworks == 0)
  42.           {
  43.           print("notyettop");
  44.           playsoundlocal(no, 1, 0, 0);
  45.           //play
  46.           }
  47.           
  48.         else if (topbuttonworks == 1)
  49.           {
  50.           sendmessage(tanks_cog, user0);
  51.           playsoundlocal(sw1, 1, 0, 0);
  52.           setwallcel(button, 2);
  53.           print("foo"); //[ok]
  54.           settimer(1);
  55.           }
  56.        
  57.      return;
  58.  
  59. user3:  
  60.      // tanks solution reached, so this button becomes inaccessible    
  61.         print("user3");     //[didn't make it]
  62.         setwallcel(button, 0);
  63.         sendmessage(tanks2button, user2);
  64.         sendmessage(arrowsred, user2);
  65.         topbuttonworks=0;
  66.         print("tanks2button, user2");
  67.         setpulse(0);
  68.         return; 
  69.  
  70. timer:  
  71.      if (topbuttonworks == 0)
  72.           {
  73.           setwallcel(button, 0);
  74.           }
  75.           
  76.      else if (topbuttonworks == 1)
  77.           {
  78.           setwallcel(button, 1);
  79.           }     
  80.      
  81.         return;
  82.         
  83. pulse:
  84.      curcel=getwallcel(button);     //the blinkin' thing
  85.      setwallcel(button, 1-curcel);
  86.      return;
  87.              
  88. end
  89.