home *** CD-ROM | disk | FTP | other *** search
/ Quake 'em / QUAKEEM.BIN / quake / programs / qwiz12 / armor.qc next >
Encoding:
Text File  |  1996-08-16  |  916 b   |  40 lines
  1. /*
  2.  
  3. ==============================================================================
  4.  
  5. ARMOR SPELL
  6.  
  7. ==============================================================================
  8.  
  9. */
  10.  
  11.  
  12. //--------------------------------------------------------------------
  13. // Gives 40 armor  (AC 6)
  14. //--------------------------------------------------------------------
  15. void(entity self) castarmor =
  16. {
  17.  
  18.         self.armorvalue = 40;
  19.  
  20. };
  21.  
  22.  
  23.  
  24. //--------------------------------------------------------------------
  25. // Checks if holograph should be activated
  26. //--------------------------------------------------------------------
  27. void() ArmorC = 
  28. {
  29.     if (self.ammo_cells < 10)
  30.     {
  31.         sprint(self,"cells are low\n");
  32.         return;
  33.     }
  34.       self.currentammo = self.ammo_cells = self.ammo_cells - 10;
  35.     W_SetCurrentAmmo();
  36.  
  37.     sound (self, CHAN_WEAPON, "shalrath/attack2.wav", 1, ATTN_NORM);
  38.     castarmor (self);
  39. }; 
  40.