home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_t2_conveyorhard.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  1.9 KB  |  82 lines
  1. # Jedi Knight Cog Script
  2. #
  3. # 00_conveyor.cog
  4. #
  5. # generic conveyor belt script
  6. #
  7. # This script will control 1-8 conveyor belts moving in the same direction
  8. # and with the same velocity.  The conveyors run continuously.
  9. #
  10. # [IS]
  11. #
  12. # (C) 1997 LucasArts Entertainment Co. All Rights Reserved
  13. # ========================================================================================
  14.  
  15. symbols
  16.     message    startup
  17.      message   pulse
  18.      
  19.      flex      animspeed
  20.      
  21.      int       numcells
  22.  
  23.     vector    vec0            desc=conveyor_direction
  24.     float        speed=2.0    desc=conveyor_speed
  25.  
  26.     surface    convey0        nolink
  27.     surface    convey1        nolink
  28.     surface    convey2        nolink
  29.     surface    convey3        nolink
  30.     surface    convey4        nolink
  31.     surface    convey5        nolink
  32.     surface    convey6        nolink
  33.     surface    convey7        nolink
  34.      
  35.      surface        wall0
  36.      surface        wall1
  37.      surface        wall2
  38.      surface        wall3
  39.      surface        wall4
  40.      surface        wall5
  41.      surface        wall6
  42.      surface        wall7
  43.      surface        wall8
  44.      surface        wall9
  45.  
  46.  
  47.     int        garbage        local
  48.     int        cnt            local
  49. end
  50.  
  51. # ========================================================================================
  52.  
  53. code
  54. startup:
  55.      if (getdifficulty==2) {
  56.          for (cnt = 0; cnt<=7; cnt=cnt+1) {
  57.              if (convey0[cnt] >= 0) garbage=slidewall(convey0[cnt], vec0, speed);
  58.          }
  59.           setpulse(animspeed);
  60.           cellnumb=0;
  61.      }
  62.      return;
  63.    
  64.  
  65. pulse:
  66.      if (cellnumb==(numcells-1)) cellnumb=0;
  67.      else cellnumb=cellnumb+1;
  68.      setwallcel(wall0, cellnumb);
  69.      setwallcel(wall1, cellnumb);
  70.      setwallcel(wall2, cellnumb);
  71.      setwallcel(wall3, cellnumb);     
  72.      setwallcel(wall4, cellnumb);
  73.      setwallcel(wall5, cellnumb);
  74.      setwallcel(wall6, cellnumb);
  75.      setwallcel(wall7, cellnumb);
  76.      setwallcel(wall8, cellnumb);     
  77.      setwallcel(wall9, cellnumb);
  78.      return;
  79.  
  80. end
  81.  
  82.