home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_00_t_dance.cog < prev    next >
Text File  |  1998-11-04  |  2KB  |  94 lines
  1. #
  2. # Droids Cog Script
  3. #
  4. # 00_t_dance.cog
  5. #
  6. # 
  7. # Desc:   lets droids dance
  8. #
  9. #    
  10. # 4/23/98    [JP]         Created 
  11. #
  12. # <C> 1998 LucasLearningLimited.  All Rights Reserved--------------------------------------------------------------------------------
  13.  
  14.  
  15. symbols
  16.     
  17.        message    startup
  18.      message   timer
  19.      
  20.      message   activate
  21.      message   entered
  22.      message   pulse
  23.      
  24.      keyframe dance local
  25.  
  26.      sector    triggersector
  27.      sound     discowav=discobaby.wav   local
  28.      thing     ghostcamera
  29.      
  30.      surface   button1
  31.      cog       flicker
  32.      
  33.      surface   a1   linkid=2
  34.      surface   a2   linkid=2
  35.      sound     switch=swt00drswtch.wav local
  36.  
  37. end
  38.  
  39. ## Code Section
  40. code
  41.  
  42. startup:
  43.      dance = -1;
  44.      setwallcel(button1, 2);
  45.      return;
  46.   
  47. activate:
  48.      if (getwallcel(button1)==2) {
  49.           PlaySong(0, 0, 0);
  50.           setwallcel(button1, 1);
  51.           call adjoinon;
  52.           sendmessage(flicker, user1);
  53.           print("dance!");
  54.           playsoundlocal(switch, 1, 0, 0);
  55.           dance = PlayMode(getlocalplayerthing(), 17);
  56.           //dwfreezeplayer();
  57.           discochannel=playsoundlocal(discowav, 1.0, 0.0, 0x0);  
  58.           setcamerafocii(2, getlocalplayerthing(), ghostcamera); 
  59.           setcurrentcamera(2);
  60.           movetoframe(ghostcamera, 5, 4);
  61.           settimer(8);
  62.      }
  63.      return;
  64.  
  65. timer:
  66.      if (dance>=0) {
  67.           setcurrentcamera(7);
  68.           StopKey(getlocalplayerthing(), dance, 0);
  69.           dance = -1;
  70.           //dwunfreezeplayer();
  71.           stopsound(discochannel, 2); //was 5.5
  72.           setwallcel(button1, 2);
  73.           call adjoinoff;
  74.           sendmessage(flicker, user0);
  75.           ShuffleTracks(2, 3, 4, 5);
  76.      }
  77.      return;
  78.  
  79. adjoinon:
  80.      clearadjoinflags(a1, 2);
  81.      clearadjoinflags(a2, 2);
  82.      return;
  83.    
  84. adjoinoff:
  85.      setadjoinflags(a1, 2);
  86.      setadjoinflags(a2, 2);
  87.      return;
  88.      
  89.  
  90.  
  91.  
  92. end
  93.  
  94.