home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_watermove2.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  7.2 KB  |  235 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 2 (the med 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. sound               water_gush
  44.                
  45. sector              water10
  46. sector              water11
  47. sector              water12
  48. sector              water13
  49. sector              water14
  50. sector              water15
  51. sector              water16
  52. sector              water17
  53. sector              water18
  54. sector              water19
  55.  
  56. sound               ambient2=amb00tindust08.wav local
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65. end
  66.  
  67. # =======================================
  68.  
  69.  
  70. ## Code Section
  71. code 
  72. startup:
  73.      sleep(8);
  74.      clearvector=vectorset(0, 0, 0);
  75.      clearvector2=vectorset(0.4, 0.8, 1.0);
  76.      print("great googly moogly");
  77.      setsectorflags(water0, 2);  //control & drain rooms no longer submerged
  78.      setsectorflags(water1, 2);
  79.      setsectorflags(water2, 2);
  80.      setsectorflags(water3, 2);
  81.      setsectorflags(water4, 2);
  82.      setsectorflags(water5, 2);
  83.      setsectorflags(water6, 2);
  84.      setsectorflags(water7, 2);
  85.      setsectorflags(water8, 2);
  86.      setsectorflags(water9, 2);
  87.      
  88.      setsectorflags(water10, 2);
  89.      setsectorflags(water11, 2);
  90.      setsectorflags(water12, 2);
  91.      setsectorflags(water13, 2);
  92.      setsectorflags(water14, 2);
  93.      setsectorflags(water15, 2);
  94.      setsectorflags(water16, 2);
  95.      setsectorflags(water17, 2);
  96.      setsectorflags(water18, 2);
  97.      setsectorflags(water19, 2);
  98.      
  99.      setsectortint(water0, clearvector2);
  100.      setsectortint(water1, clearvector2); 
  101.      setsectortint(water2, clearvector2);
  102.      setsectortint(water3, clearvector2);
  103.      setsectortint(water4, clearvector2);
  104.      setsectortint(water5, clearvector2); 
  105.      setsectortint(water6, clearvector2);
  106.      setsectortint(water7, clearvector2);
  107.      setsectortint(water8, clearvector2);
  108.      setsectortint(water9, clearvector2);
  109.      
  110.      setsectortint(water10, clearvector2);
  111.      setsectortint(water11, clearvector2);
  112.      setsectortint(water12, clearvector2);
  113.      setsectortint(water13, clearvector2);
  114.      setsectortint(water14, clearvector2);
  115.      setsectortint(water15, clearvector2);
  116.      setsectortint(water16, clearvector2);
  117.      setsectortint(water17, clearvector2);
  118.      setsectortint(water18, clearvector2);
  119.      setsectortint(water19, clearvector2);
  120.      return;
  121.  
  122.  
  123. user1:
  124.      settimer(0.1);
  125.      setadjoinflags(water0, 2);  //i don't know what this does...
  126.      setadjoinflags(water1, 2);    //
  127.      setadjoinflags(water2, 2);
  128.      setadjoinflags(water3, 2);
  129.      
  130.      setadjoinflags(water0b, 2);
  131.      setadjoinflags(water1b, 2);
  132.      setadjoinflags(water2b, 2);
  133.      setadjoinflags(water3b, 2);
  134.      
  135.      //setfacegeomode(surface0, 0);
  136.      //setfacegeomode(surface1, 0);
  137.      //setfacegeomode(surface2, 0);
  138.      //setfacegeomode(surface3, 0);
  139.  
  140.      //setfacegeomode(surface0b, 0);
  141.      //setfacegeomode(surface1b, 0);
  142.      //setfacegeomode(surface2b, 0);
  143.      //setfacegeomode(surface3b, 0);
  144.      return;
  145.      
  146. # =========================================================
  147. timer:
  148.      print("watermove1");
  149.      clearsectorflags(water0, 2);  //control & drain rooms no longer submerged
  150.      clearsectorflags(water1, 2);
  151.      clearsectorflags(water2, 2);
  152.      clearsectorflags(water3, 2);
  153.      clearsectorflags(water4, 2);
  154.      clearsectorflags(water5, 2);
  155.      clearsectorflags(water6, 2);
  156.      clearsectorflags(water7, 2);
  157.      clearsectorflags(water8, 2);
  158.      clearsectorflags(water9, 2);
  159.      
  160.      clearsectorflags(water10, 2);
  161.      clearsectorflags(water11, 2);
  162.      clearsectorflags(water12, 2);
  163.      clearsectorflags(water13, 2);
  164.      clearsectorflags(water14, 2);
  165.      clearsectorflags(water15, 2);
  166.      clearsectorflags(water16, 2);
  167.      clearsectorflags(water17, 2);
  168.      clearsectorflags(water18, 2);
  169.      clearsectorflags(water19, 2);
  170.      
  171.      setsectortint(water0, clearvector);
  172.      setsectortint(water1, clearvector); 
  173.      setsectortint(water2, clearvector);
  174.      setsectortint(water3, clearvector);
  175.      setsectortint(water4, clearvector);
  176.      setsectortint(water5, clearvector); 
  177.      setsectortint(water6, clearvector);
  178.      setsectortint(water7, clearvector);
  179.      setsectortint(water8, clearvector);
  180.      setsectortint(water9, clearvector);
  181.     
  182.      setsectortint(water10, clearvector);
  183.      setsectortint(water11, clearvector);
  184.      setsectortint(water12, clearvector);
  185.      setsectortint(water13, clearvector);
  186.      setsectortint(water14, clearvector);
  187.      setsectortint(water15, clearvector);
  188.      setsectortint(water16, clearvector);
  189.      setsectortint(water17, clearvector);
  190.      setsectortint(water18, clearvector);
  191.      setsectortint(water19, clearvector);
  192.  
  193.      //clearadjoinflags(surface0, 2); //adjoins are no longer shown
  194.      //clearadjoinflags(surface1, 2);  //used to be 2
  195.      //clearadjoinflags(surface2, 2);
  196.      //clearadjoinflags(surface3, 2);
  197.      
  198.      setfacegeomode(surface0, 0);
  199.      setfacegeomode(surface1, 0);    // used to be 4
  200.      setfacegeomode(surface2, 0);
  201.      setfacegeomode(surface3, 0);
  202.          
  203.      //clearadjoinflags(surface0b, 2); //adjoins are no longer shown
  204.      //clearadjoinflags(surface1b, 2);      // used to be 2
  205.      //clearadjoinflags(surface2b, 2);
  206.      //clearadjoinflags(surface3b, 2);
  207.      
  208.      setfacegeomode(surface0b, 0);        // used to be 4
  209.      setfacegeomode(surface1b, 0);
  210.      setfacegeomode(surface2b, 0);
  211.      setfacegeomode(surface3b, 0);
  212.      
  213.      sectorsound(water0, ambient2, 0.6);
  214.      sectorsound(water1, ambient2, 0.6);
  215.      sectorsound(water2, ambient2, 0.6);
  216.      sectorsound(water3, ambient2, 0.6); 
  217.      sectorsound(water5, ambient2, 0.6); 
  218.      sectorsound(water6, ambient2, 0.6); 
  219.      sectorsound(water7, ambient2, 0.6); 
  220.      sectorsound(water8, ambient2, 0.6); 
  221.      sectorsound(water9, ambient2, 0.6); 
  222.      sectorsound(water10, ambient2, 0.6); 
  223.      sectorsound(water11, ambient2, 0.6); 
  224.      sectorsound(water12, ambient2, 0.6);
  225.      sectorsound(water13, ambient2, 0.6);  
  226.      sectorsound(water14, ambient2, 0.6); 
  227.      sectorsound(water15, ambient2, 0.6); 
  228.      sectorsound(water16, ambient2, 0.6); 
  229.      sectorsound(water17, ambient2, 0.6); 
  230.      sectorsound(water18, ambient2, 0.6); 
  231.      sectorsound(water19, ambient2, 0.6); 
  232.  
  233.      return;
  234.  
  235. end