home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_ctrl_wm.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  2.3 KB  |  113 lines
  1. #
  2. #
  3.  
  4. symbols
  5. message         arrived
  6. message         user7
  7. thing                 watersurface        linkid=2
  8. #thing                 creaturedummy        
  9. #template             creature
  10. #cog                 ctrl rm  
  11. sector             sector1
  12. sector             sector2         
  13. sector             sector3
  14. sector             sector4
  15. sector             sector5 
  16. sector             sector6
  17. sector             sector7
  18. sector             sector8         
  19. sector             sector9
  20. int                 cframe                local
  21. vector             rgb                     local
  22. sound                 sound=00Underwater.wav
  23.  
  24. end
  25.  
  26. code
  27. user7:
  28.         rgb=vectorset(0.0 ,0.0, 0.0);
  29.         movetoframe(watersurface, 1, 0.5);
  30.         print("mamamia");
  31.           return;
  32.  
  33. arrived:
  34.         cframe=(getcurframe(watersurface));
  35.         if (cframe==1)
  36.             {
  37.             setsectortint(sector1,rgb);
  38.             cleaersectortint(sector2,rgb);
  39.             sectorsound(sector1, sound, 0.5);
  40.                 sectorsound(sector2, sound, 0.5);
  41.                 setsectorflags(sector1,2);
  42.             setsectorflags(sector2,2);
  43.             movetoframe(watersurface, 2, 0.5);
  44.                 }
  45.         if (cframe==2)
  46.             {
  47.                 clearsectortint(sector3,rgb);
  48.             setsectorflags(sector3,2);            
  49.             sectorsound(sector3, sound, 0.5);
  50.                 movetoframe(watersurface, 3, 0.5);
  51.            }
  52.         if (cframe==3)
  53.             {
  54.                 clearsectortint(sector4,rgb);
  55.                 setsectorflags(sector4,2);
  56.             sectorsound(sector4, sound, 0.5);
  57.                 movetoframe(watersurface, 4, 0.5);
  58.            }
  59.         if (cframe==4)
  60.             {
  61.             clearsectortint(sector5,rgb);
  62.             setsectorflags(sector5,2);
  63.             sectorsound(sector5, sound, 0.5);
  64.             movetoframe(watersurface, 5, 0.5);
  65.             }
  66.         if (cframe==5)
  67.             {
  68.             clearsectortint(sector6,rgb);
  69.             setsectorflags(sector6,2);
  70.             sectorsound(sector6, sound, 0.5);
  71.             movetoframe(watersurface, 6, 0.5);
  72.             }
  73.         if (cframe==6)
  74.             {
  75.             clearsectortint(sector7,rgb);
  76.             setsectorflags(sector7,2);
  77.             sectorsound(sector7, sound, 0.5);
  78.             movetoframe(watersurface, 7, 0.5);
  79.             }
  80.         if (cframe==7)
  81.             {
  82.             clearsectortint(sector8,rgb);
  83.             setsectorflags(sector8,2);
  84.             sectorsound(sector8, sound, 0.5);
  85.             movetoframe(watersurface, 8, 0.5);
  86.             }
  87.         if (cframe==8)
  88.             {
  89.             clearsectortint(sector9,rgb);
  90.             setsectorflags(sector9,2);
  91.             sectorsound(sector9, sound, 0.5);
  92.             movetoframe(watersurface, 9, 0.5);
  93.             }  
  94.         //else if (cframe==9)
  95.         //    {
  96.         //    sendmessage(brittaEX, user6);
  97.             //creatething(creature, creaturedummy);
  98.         //    }
  99.         return;
  100.  
  101. end
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.                 
  109.  
  110.  
  111.  
  112.  
  113.