home *** CD-ROM | disk | FTP | other *** search
/ Classic Fond 52 / ClassicFond52.iso / GAMES / DROIDW.RAR / DWCD.GOB / mission_cog_03_env_ctrlrm.cog < prev    next >
Encoding:
Text File  |  1998-11-04  |  1.5 KB  |  81 lines
  1. # DroidWorks
  2. # 03_env_ctrlrm.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. #
  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.  
  36. end
  37.  
  38. # ========================================================================================
  39.  
  40. code
  41. startup:
  42.     set = (rand()*amount);
  43.     if (set < 1)
  44.         {
  45.                 print("Rand: 0");
  46.         // Keep thing 0
  47.         act_thing = thing0;
  48.         destroything(thing1);
  49.                 destroything(thing2);
  50.         }
  51.     else if ( set < 2)
  52.         {
  53.                 print("Rand: 2");
  54.         // keep thing 1
  55.                 destroything(thing0);
  56.                 act_thing = thing1;
  57.         destroything(thing2);
  58.         }
  59.         else if ( set < 3)
  60.         {
  61.                 print("Rand: 3");
  62.         // Keep thing 2
  63.                 destroything(thing0);
  64.                 destroything(thing1);
  65.                 act_thing = thing2;
  66.         }
  67.     return;
  68.  
  69. pulse:
  70.        call startup;
  71.        printflex(set);
  72.        return;
  73.  
  74. taken:
  75.         SetInvAvailable(getlocalplayerthing(), inv_number, 1);
  76.     ChangeInv(getlocalplayerthing(), inv_number, 1);
  77.     destroything(act_thing);
  78.     return;
  79.  
  80. end
  81.