home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_watermove3.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  5.1 KB  |  169 lines
  1. # Droids Cog Script
  2. #
  3. # 03_watermove.cog
  4. #
  5. # Desc:                                                                 
  6. #    Companion cog to Tanks2 cog.  When receiving message from tanks2 cog, it clears them water sectors.
  7. #    For Tank 3 (the bigest 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. message             timer
  20.  
  21. sector              water0 
  22. sector              water1
  23. sector              water2
  24. sector              water3
  25. sector              water4
  26. sector              water5
  27. sector              water6
  28. sector              water7
  29. sector              water8
  30. sector              water9
  31.              
  32.  
  33. surface             surface0
  34. surface             surface1
  35. surface             surface2
  36. surface             surface3
  37.  
  38. surface             surface0b  //bottom adjoins for water 0,1,2,3 
  39. surface             surface1b
  40. surface             surface2b
  41. surface             surface3b
  42.  
  43. vector              clearvector
  44. vector              clearvector2
  45.  
  46. sound               waterlp=wtr00tunderlp.wav local
  47.  
  48. end
  49.  
  50. # =======================================
  51.  
  52.  
  53. ## Code Section
  54. code 
  55. startup:
  56.      sleep(5);
  57.      print("what!!!");
  58.      clearvector=vectorset(0, 0, 0);
  59.      //setadjoinflags(surface0, 0);  //i don't know what this does...
  60.      //setadjoinflags(surface1, 0);      //were 2
  61.      //setadjoinflags(surface2, 0);
  62.      //setadjoinflags(surface3, 0);
  63.  
  64.      //setadjoinflags(surface0b, 0);
  65.      //setadjoinflags(surface1b, 0);
  66.      //setadjoinflags(surface2b, 0);
  67.      //setadjoinflags(surface3b, 0);
  68.           
  69.      setsectortint(water0, clearvector);
  70.      setsectortint(water1, clearvector);
  71.      setsectortint(water2, clearvector);
  72.      setsectortint(water3, clearvector);
  73.      setsectortint(water4, clearvector);
  74.      setsectortint(water5, clearvector);
  75.      setsectortint(water6, clearvector);
  76.      setsectortint(water7, clearvector);
  77.      setsectortint(water8, clearvector);
  78.      setsectortint(water9, clearvector);
  79.  
  80.  
  81.  
  82. //     clearsectorflags(water0, 2);         //clears sectors of water blue
  83. //     clearsectorflags(water1, 2);
  84. //     clearsectorflags(water2, 2);
  85. //     clearsectorflags(water3, 2);
  86. //     clearsectorflags(water4, 2);
  87. //     clearsectorflags(water5, 2);
  88. //     clearsectorflags(water6, 2);
  89. //     clearsectorflags(water7, 2);
  90. //     clearsectorflags(water8, 2);
  91. //     clearsectorflags(water9, 2);
  92.      
  93.      setfacegeomode(surface0, 0);
  94.      setfacegeomode(surface1, 0);
  95.      setfacegeomode(surface2, 0);
  96.      setfacegeomode(surface3, 0);
  97.  
  98.      setfacegeomode(surface0b, 0);
  99.      setfacegeomode(surface1b, 0);
  100.      setfacegeomode(surface2b, 0);
  101.      setfacegeomode(surface3b, 0);
  102.      
  103. //     print("water0 sectorflags are:");
  104. //     printint(getsectorflags(water0));
  105.      
  106.      return;
  107.      
  108. # =========================================================
  109. user1:
  110.      print("it's water time");
  111.      print("watermove3");
  112.      clearvector2=vectorset(0.4, 0.8, 1.0);     
  113.      setsectorflags(water0, 2);  //control & drain rooms no longer submerged
  114.      setsectorflags(water1, 2);
  115.      setsectorflags(water2, 2);
  116.      setsectorflags(water3, 2);
  117.      setsectorflags(water4, 2);
  118.      setsectorflags(water5, 2);
  119.      setsectorflags(water6, 2);
  120.      setsectorflags(water7, 2);
  121.      setsectorflags(water8, 2);
  122.      setsectorflags(water9, 2);
  123.      
  124.      setsectortint(water0, clearvector2);
  125.      setsectortint(water1, clearvector2); 
  126.      setsectortint(water2, clearvector2);
  127.      setsectortint(water3, clearvector2);
  128.      setsectortint(water4, clearvector2);
  129.      setsectortint(water5, clearvector2);
  130.      setsectortint(water6, clearvector2);
  131.      setsectortint(water7, clearvector2);
  132.      setsectortint(water8, clearvector2);
  133.      setsectortint(water9, clearvector2);
  134.  
  135.      
  136.      //clearadjoinflags(surface0, 2); //adjoins are no longer shown
  137.      //clearadjoinflags(surface1, 2);  //used to be 2
  138.      //clearadjoinflags(surface2, 2);
  139.      //clearadjoinflags(surface3, 2);
  140.      
  141.      setfacegeomode(surface0, 5);
  142.      setfacegeomode(surface1, 5);    // used to be 0
  143.      setfacegeomode(surface2, 5);
  144.      setfacegeomode(surface3, 5);
  145.          
  146.      //clearadjoinflags(surface0b, 2); //adjoins are no longer shown
  147.      //clearadjoinflags(surface1b, 2);      // used to be 2
  148.      //clearadjoinflags(surface2b, 2);
  149.      //clearadjoinflags(surface3b, 2);
  150.      
  151.      setfacegeomode(surface0b, 5);        // used to be 4 but used 0 for water2 -- now its' 4 
  152.      setfacegeomode(surface1b, 5);
  153.      setfacegeomode(surface2b, 5);
  154.      setfacegeomode(surface3b, 5);
  155.      
  156.      sectorsound(water0, waterlp, 0.5);
  157.      sectorsound(water1, waterlp, 0.5);
  158.      sectorsound(water2, waterlp, 0.5);
  159.      sectorsound(water3, waterlp, 0.5); 
  160.      sectorsound(water4, waterlp, 0.5); 
  161.      sectorsound(water5, waterlp, 0.5); 
  162.      sectorsound(water6, waterlp, 0.5); 
  163.      sectorsound(water7, waterlp, 0.5); 
  164.      sectorsound(water8, waterlp, 0.5);
  165.      sectorsound(water9, waterlp, 0.5);  
  166.  
  167.      return;
  168.  
  169. end