home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_00_t_inv_pickup.cog < prev    next >
Text File  |  1998-11-04  |  2KB  |  85 lines
  1. # DroidWorks
  2. # 03_env_tanks.cog
  3. #
  4. # 
  5. #
  6. # Battery is in inventory bin 16
  7. # Power is in inventory bin 20
  8. #
  9. # Script handles random enviroment object for the gear level. It also handles 
  10. # the pick-up for right now, although I might change that later on. 
  11. #
  12. # Set the inv_number to what bin you want it added to.
  13. # Set amount var to how many things you have attached.
  14. #  
  15. # [01/16/98] DGS    Created
  16. # [01/26/98] DGS    Added code to make it random
  17. # [01/29/98] JP     Modified to work in the Moisture Farm Level
  18.  
  19. symbols
  20.  
  21. thing    thing0
  22. thing    thing1
  23. thing    thing2
  24.  
  25.  
  26. message    taken
  27. message    startup
  28. message pulse
  29.  
  30. int    amount=0
  31. flex    set=0.0
  32. int    inv_number=0
  33. int    act_thing
  34.  
  35. sound     pickup=nrginventory.wav local
  36.  
  37. end
  38.  
  39. # ========================================================================================
  40.  
  41. code
  42. startup:
  43.     set = (rand()*amount);
  44.     if (set < 1)
  45.         {
  46.                 print("Rand: 0");
  47.         // Keep thing 0
  48.         act_thing = thing0;
  49.         destroything(thing1);
  50.                 destroything(thing2);
  51.         }
  52.     else if ( set < 2)
  53.         {
  54.                 print("Rand: 2");
  55.         // keep thing 1
  56.                 destroything(thing0);
  57.                 act_thing = thing1;
  58.         destroything(thing2);
  59.         }
  60.         else if ( set < 3)
  61.         {
  62.                 print("Rand: 3");
  63.         // Keep thing 2
  64.                 destroything(thing0);
  65.                 destroything(thing1);
  66.                 act_thing = thing2;
  67.         }
  68.     return;
  69.  
  70. pulse:
  71.        call startup;
  72.        printflex(set);
  73.        return;
  74.  
  75. taken:
  76.         SetInvAvailable(getlocalplayerthing(), inv_number, 1);
  77.     ChangeInv(getlocalplayerthing(), inv_number, 1);
  78.     destroything(act_thing);
  79.      dwplaycammyspeech(16150, "TGCA027.wav", 5, 2);
  80.      playsoundlocal(pickup, 1, 0, 0);
  81.      dwflashinventory();
  82.      return;
  83.  
  84. end
  85.