home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_watermove1.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  3.1 KB  |  110 lines
  1. # Droids Cog Script
  2. #
  3. # 03_watermove.cog
  4. #
  5. # Desc:                                                                 
  6. #    Companion cog to Tanks cog.  When receiving message from tanks cog, it clears them water sectors.
  7. #    For Tank 1 (the small one)
  8. #
  9. # 2/18/98  [JP]     Created
  10. #  
  11. # (C) 1998 LucasLearningLimited. All Rights Reserved
  12.  
  13.  
  14.  
  15. symbols                     
  16. message             startup
  17. message             arrived
  18. message             user1
  19.  
  20. sector              water0 
  21. sector              water1
  22. sector              water2
  23. sector              water3
  24. sector              water4
  25. sector              water5
  26. sector              water6             
  27.  
  28. surface             surface0
  29. surface             surface1
  30. surface             surface2
  31. surface             surface3
  32.  
  33. surface             surfaceb  //bottom adjoins for water 0,1,2,3 
  34. surface             surfaceb
  35. surface             surfaceb
  36. surface             surfaceb
  37.  
  38. sound               water_gush
  39.                
  40. end
  41.  
  42. # =======================================
  43.  
  44.  
  45. ## Code Section
  46. code 
  47.  
  48. startup:
  49.      setadjoinflags(water0, 2);  //i don't know what this does...
  50.      setadjoinflags(water1, 2);
  51.      setadjoinflags(water2, 2);
  52.      setadjoinflags(water3, 2);
  53.  
  54.      setadjoinflags(water0b, 2);
  55.      setadjoinflags(water1b, 2);
  56.      setadjoinflags(water2b, 2);
  57.      setadjoinflags(water3b, 2);
  58.      
  59.      //setfacegeomode(surface0, 0);
  60.      //setfacegeomode(surface1, 0);
  61.      //setfacegeomode(surface2, 0);
  62.      //setfacegeomode(surface3, 0);
  63.  
  64.      //setfacegeomode(surface0b, 0);
  65.      //setfacegeomode(surface1b, 0);
  66.      //setfacegeomode(surface2b, 0);
  67.      //setfacegeomode(surface3b, 0);
  68.      return;
  69.      
  70. # =========================================================
  71. user1:
  72.      print("watermove1");
  73.      clearsectorflags(water0, 2);  //control & drain rooms no longer submerged
  74.      clearsectorflags(water1, 2);
  75.      clearsectorflags(water2, 2);
  76.      clearsectorflags(water3, 2);
  77.      clearsectorflags(water4, 2);
  78.      clearsectorflags(water5, 2);
  79.      clearsectorflags(water6, 2);
  80.      setsectortint(water0, clearvector);
  81.      setsectortint(water1, clearvector); 
  82.      setsectortint(water2, clearvector);
  83.      setsectortint(water3, clearvector);
  84.      setsectortint(water4, clearvector);
  85.      setsectortint(water5, clearvector); 
  86.      setsectortint(water6, clearvector);
  87.      
  88.      
  89.      clearadjoinflags(surface0, 2); //adjoins are no longer shown
  90.      clearadjoinflags(surface1, 2);
  91.      clearadjoinflags(surface2, 2);
  92.      clearadjoinflags(surface3, 2);
  93.      
  94.      setfacegeomode(surface0, 4);
  95.      setfacegeomode(surface1, 4);
  96.      setfacegeomode(surface2, 4);
  97.      setfacegeomode(surface3, 4);
  98.          
  99.      clearadjoinflags(surface0b, 2); //adjoins are no longer shown
  100.      clearadjoinflags(surface1b, 2);
  101.      clearadjoinflags(surface2b, 2);
  102.      clearadjoinflags(surface3b, 2);
  103.      
  104.      setfacegeomode(surface0b, 4);
  105.      setfacegeomode(surface1b, 4);
  106.      setfacegeomode(surface2b, 4);
  107.      setfacegeomode(surface3b, 4);
  108.      return;
  109.  
  110. end