home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_b0_pulley_rop.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  3.4 KB  |  183 lines
  1. # Droids COG Script
  2. #
  3. # b0_Pulley_rop.cog
  4. #
  5. # Cog designed to put the struts in for the "same" part of the pulley setup.
  6. #
  7. #    user0        rope sag
  8. #    user1        rope tite
  9. # Desc:
  10. #     01/27/98 [DGS]    Created
  11. # 
  12. # ========================================================================================
  13.  
  14. symbols
  15.     message        startup
  16.     message        activate
  17.     message        arrived
  18.     message        pulse
  19.     message        user0
  20.     message        user1
  21.     message        user2
  22.     message        user3
  23.     message        user4
  24.     message        user5
  25.     message        touched
  26.     
  27.     
  28.     thing        rope1a
  29.     thing        rope1b
  30.     thing        rope1c
  31.     thing        rope1d
  32.     thing        rope1e
  33.     thing        rope1f
  34.     thing        rope1g
  35.     
  36.     thing        activator    linkid=5
  37.     thing        rope2a
  38.     thing        rope2b    linkid=1
  39.     thing        block
  40.     
  41.     cog        setup_1_cog
  42.     cog        setup_2_cog
  43.     cog        setup_3_cog
  44.     
  45.     surface        button0
  46.     
  47.     int        rock=0
  48.     int        l_color=0
  49.     int        move=10
  50.     int        say1=0
  51.     int        rot=0            local
  52.     flex        l_size=0
  53.     flex        l_speed=0.1     local      
  54. end
  55.  
  56. code
  57. startup:
  58.     print("STARTED");
  59.     
  60.     addbeam(rope1a, rope1b, 147, l_size);
  61.     addbeam(rope1b, rope1c, 147, l_size);
  62.     addbeam(rope1c, rope1d, 147, l_size);
  63.     addbeam(rope1d, rope1e, 147, l_size);
  64.     addbeam(rope1e, rope1f, 147, l_size);
  65.     addbeam(rope1f, rope1g, 147, l_size);
  66.     
  67.     
  68.     addbeam(rope2a, rope2b, 147, l_size);
  69.     //movetoframe(rope2b,1,l_speed);
  70.     rock = 1;
  71.    // movetoframe(rope2b,2,10);
  72.  
  73.     //setpulse(1);
  74.     return;
  75.  
  76. touched:
  77.     if (getsenderref() == block)
  78.         {
  79.         if ( (say1 == 0) && (getinv(getlocalplayerthing(),1) == 0) )
  80.             {
  81.             say1 = 1;
  82.             dwPlayCammySpeech(10011, "T3ca017.wav", 10, 0);
  83.             print("say1");
  84.             }
  85.         }
  86.     return;
  87.  
  88. activate:
  89.     print("const: activate");
  90.     if (getsenderid() == 5) // if the player pulled on the activator 3do
  91.         {
  92.         print("ACTIVATED!");
  93.         // send messages to all of the setups
  94.         sendmessage(setup_1_cog,user3);
  95.         sendmessage(setup_2_cog,user3);
  96.         sendmessage(setup_3_cog,user3);
  97.         }
  98.     return;
  99.  
  100.  
  101. arrived:
  102.      if ((getsenderref() == activator) && (rot ==1))
  103.         {
  104.         rotatepivot(activator,1,0.250);
  105.         }
  106.     return;
  107.  
  108. oldarrived:
  109.     if ((getsenderid() == 1) && (rock == 0))
  110.         {
  111.         movetoframe(rope2b,1 - getcurframe(rope2b),L_speed);
  112.         }
  113.         if ((getsenderid() == 1) && (rock == 1))
  114.         {
  115.         if (getcurframe(rope2b) == 2) movetoframe(rope2b,3,L_speed);
  116.                 else if (getcurframe(rope2b) == 3) movetoframe(rope2b,2,L_speed);
  117.         }
  118.     return;
  119.  
  120. rope_sag:
  121.     // This routine makes the rope sag
  122.     movetoframe(rope1b,0,0.5);
  123.         movetoframe(rope1c,0,0.9);
  124.     movetoframe(rope1d,0,1.0);
  125.     movetoframe(rope1e,0,0.9);
  126.     movetoframe(rope1f,0,0.5);
  127.         return;
  128.  
  129. rope_tite:
  130.     // This routine makes the rope tite
  131.     movetoframe(rope1b,1,0.5);
  132.         movetoframe(rope1c,1,0.9);
  133.     movetoframe(rope1d,1,1.0);
  134.     movetoframe(rope1e,1,0.9);
  135.     movetoframe(rope1f,1,0.5);
  136.         return;
  137.  
  138. user0:
  139.         call rope_sag;
  140.     return;
  141. user1:
  142.     call rope_tite;
  143.     return;
  144.     
  145. user2:
  146.     // lower rope
  147.         //movetoframe(rope2b,2,1);
  148.     rock = 1;
  149.         return;
  150.  
  151. user3:
  152.     // raise rope
  153.         //movetoframe(rope2b,1,1);
  154.     rock = 0;
  155.         return;
  156.  
  157. user4:
  158.     SetCollideType(activator,     0);     // Turn off collides for the bottom pulley 
  159.     print("ACTIVATOR");
  160.     rotatepivot(activator,1,0.250);
  161.     rot = 1;
  162.     return;
  163.  
  164. user5:
  165.     rot = 0;
  166.     SetCollideType(activator,     3);     // Turn oon collides for the bottom pulley 
  167.     return;
  168.  
  169.     
  170. pulse:
  171.            move = move - 1;
  172.     if (move == 0) 
  173.         {
  174.         move = 10;
  175.         call activate;
  176.         }
  177.     return;
  178. end
  179.  
  180.  
  181.  
  182.  
  183.