home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_arrows_g.cog < prev    next >
Text File  |  1998-11-04  |  1KB  |  70 lines
  1. # Droids Cog Script
  2. #
  3. # 03_door.cog
  4. #
  5. # Generic Door Script
  6. #
  7. #         [IS]
  8. # 01/30/98    [DGS]    Added the switch
  9. # /2/15/98     [JP]      Modified for use in the Moisture Farm
  10. # ========================================================================================
  11.  
  12. symbols
  13.     message    startup            
  14.     message    entered        
  15.     message    timer                
  16.     message    pulse
  17.     message   user1
  18.      message   user2
  19.  
  20.     surface        agreen1    
  21.     surface        agreen2
  22.      surface        agreen3
  23.      
  24.     sector         pulsesector    
  25.      material       RedMat
  26.      int            numcells
  27.      
  28.           
  29.  
  30. end
  31.  
  32. # ========================================================================================
  33.  
  34. code
  35.  
  36. startup:
  37.      player=getlocalplayerthing();
  38.      cellnumb=0;
  39.      return;
  40.      
  41. entered:
  42.      print("prestoo");
  43.      setwallcel(agreen1, cellnumb);
  44.      setwallcel(agreen2, cellnumb);
  45.      setwallcel(agreen3, cellnumb);
  46.      
  47.      //setpulse(1);
  48.      return;
  49.      
  50. //pulse:
  51. //     if (cellnumb==(numcells-1)) cellnumb=0;
  52. //     else cellnumb=cellnumb+1;
  53. //     setwallcel(agreen1, cellnumb);
  54. //     setwallcel(agreen2, cellnumb);
  55. //     return;  
  56.  
  57. user1:
  58.      //setpulse(0);
  59.      //setsurfacelight(agreen1, 0, 0.5);
  60.      //setsurfacelight(agreen2, 0, 0.5);
  61.      //setwallcel(agreen1, 0);
  62.      //setwallcel(agreen2, 0);
  63.      setsurfacemat(agreen1, RedMat);
  64.      setsurfacemat(agreen2, RedMat);
  65.      setsurfacemat(agreen3, RedMat);
  66.      return;
  67.  
  68. end
  69.  
  70.