home *** CD-ROM | disk | FTP | other *** search
/ Quaker's Paradise / Quakers_Paradise.iso / div / sacrfce / source / head.qc < prev    next >
Encoding:
Text File  |  1997-06-20  |  22.4 KB  |  566 lines
  1. /* =========================
  2.    ||Headers for functions||
  3.    ========================= */
  4.  
  5. void (vector flame_pos) PlaceFlame;
  6. void (vector reward_pos) SacReward;
  7. void () ModelSelect;
  8.  
  9. /* =======================================
  10.    || Function Called when head touched ||
  11.    ======================================= */
  12.  
  13. void () Head_Touch =
  14. {
  15.         local string text;
  16.  
  17.         if (other.classname == "player")
  18.         {
  19.                 //Checks if the player can carry any more heads...
  20.                 if (other.heads >= 5)
  21.                 {
  22.                         sprint (other , "You cannot carry any more heads\n");
  23.                         return;
  24.                 } else {
  25.                         //Tallies the neccesary heads <sp>
  26.                         if (self.classname == "monster_dog")
  27.                         {
  28.                                 other.dog = other.dog + 1;
  29.                                 CurrentHead = "dog";
  30.                         }
  31.                         else if (self.classname == "monster_ogre")
  32.                         {
  33.                                 other.ogre = other.ogre + 1;
  34.                                 CurrentHead = "ogre";
  35.                         }
  36.                         else if (self.classname == "monster_demon1")
  37.                         {
  38.                                 other.demon = other.demon + 1;
  39.                                 CurrentHead = "demon";
  40.                         }
  41.                         else if (self.classname == "monster_shambler")
  42.                         {
  43.                                 other.shambler = other.shambler + 1;
  44.                                 CurrentHead = "shambler";
  45.                         }
  46.                         else if (self.classname == "monster_knight")
  47.                         {
  48.                                 other.knight = other.knight + 1;
  49.                                 CurrentHead = "knight";
  50.                         }
  51.                         else if (self.classname == "monster_army")
  52.                         {
  53.                                 other.army = other.army + 1;
  54.                                 CurrentHead = "army";
  55.                         }
  56.                         else if (self.classname == "monster_wizard")
  57.                         {
  58.                                 other.wizard = other.wizard + 1;
  59.                                 CurrentHead = "wizard";
  60.                         }
  61.                         else if (self.classname == "monster_zombie")
  62.                         {
  63.                                 other.zombie = other.zombie + 1;
  64.                                 CurrentHead = "zombie";
  65.                         }
  66.                         else if (self.classname == "monster_hell_knight")
  67.                         {
  68.                                 other.hellknight = other.hellknight + 1;
  69.                                 CurrentHead = "hellknight";
  70.                         }
  71.                         else if (self.classname == "monster_shalrath")
  72.                         {
  73.                                 other.shalrath = other.shalrath + 1;
  74.                                 CurrentHead = "shalrath";
  75.                         }
  76.                         else if (self.classname == "monster_enforcer")
  77.                         {
  78.                                 other.enforcer = other.enforcer + 1;
  79.                                 CurrentHead = "enforcer";
  80.                         }
  81.  
  82.                         else other.player = other.player + 1;
  83.                         
  84.                         //Makes grand total more
  85.                         other.heads = other.heads + 1;
  86.                         stuffcmd (other, "bf\n");
  87.                         sprint (other, "You've picked up a head\n");
  88.                         remove(self);
  89.                 }
  90.         }
  91. };
  92.  
  93. /* =============================================
  94.    || Function called when head is sacrificed ||
  95.    ============================================= */
  96.  
  97. void() SacrificeHead =
  98. {
  99.         local vector vel;
  100.  
  101.         //Calls function to place flames in pentagram shape
  102.         PlaceFlame (self.origin + '0 30 16');
  103.         PlaceFlame (self.origin + '28 9 16');
  104.         PlaceFlame (self.origin + '12 -26 16');
  105.         PlaceFlame (self.origin + '-12 -26 16');
  106.         PlaceFlame (self.origin + '-28 9 16');
  107.  
  108.         //Item respawn sound for reward 
  109.         sound (self, CHAN_VOICE, "items/itembk2.wav", 1, ATTN_NORM);
  110.  
  111.         //Decides what reward should be given for sacrifice
  112.         SacReward (self.origin);
  113.  
  114.         //Spawns some blood spray for effect
  115.         vel = '0 0 150';
  116.         particle (self.origin+vel*0.01,vel,69,150);
  117.         vel = '0 0 120';
  118.         particle (self.origin+vel*0.01,vel,73,200);
  119.  
  120.         remove(self);
  121. };
  122.  
  123. /* =========================================
  124.    || Function called when head is thrown ||
  125.    ========================================= */
  126.  
  127. void () TossHead =
  128. {
  129.         //Selects which head model to throw
  130.         ModelSelect();
  131.  
  132.  
  133.         //Checks whether you have any of that specific head available
  134.         if (GotHead == 0) {
  135.                 sprint (self, "You don't have any ");
  136.                 sprint (self, CurrentHead);
  137.                 sprint (self, " heads to sacrifice.\n");
  138.                 return;
  139.         } else { if (GotHead == 1) {
  140.  
  141.                 //If you have, creates new entity of that specific head
  142.                 local entity item;
  143.       
  144.                 item = spawn ();
  145.                 item.owner = self;
  146.                 item.movetype = MOVETYPE_BOUNCE; 
  147.                 item.solid = SOLID_NOT; 
  148.  
  149.                 //Direction and speed of head when thrown
  150.                 if (self.v_angle_x)
  151.                         item.velocity = v_forward*300 + v_up * 100 + crandom()*v_right*10 + crandom()*v_up*10; 
  152.                 else { 
  153.                         item.velocity = aim(self, 10000); 
  154.                         item.velocity = item.velocity * 300; 
  155.                         item.velocity_z = 100; 
  156.                 } 
  157.  
  158.                 item.avelocity = '300 300 300' * crandom() + '10 20 50' * crandom();
  159.  
  160.                 item.angles = vectoangles(item.velocity); 
  161.          
  162.                 //Play chant sound (ripped from Heretic)
  163.                 sound (self, CHAN_VOICE, "wizsit.wav", 1, ATTN_NORM);
  164.                 item.nextthink = time + 3;
  165.                 item.think = SacrificeHead;
  166.  
  167.                 //Sets model of head 
  168.                 setmodel(item, HeadModel);
  169.  
  170.                 setsize (item, '-16 -16 0', '16 16 56');
  171.                 setorigin (item, self.origin); 
  172.  
  173.                 //Makes the amount of heads you have 1 less
  174.                 self.heads = self.heads - 1;
  175.         }
  176.     }
  177. };      
  178. /* ======================================================
  179.    || Fucntion called by impulse command to throw head ||
  180.    ====================================================== */
  181.  
  182. void() W_FireHead = 
  183. { 
  184.         // Checks if you have any heads to sacrifice        
  185.         if (self.heads == 0) {
  186.                 sprint (self, "You have no heads to sacrifice\n");
  187.                 return;
  188.         } else {
  189.                 //Then throws the head
  190.                 TossHead();
  191.         }
  192. };
  193. /* =================================================
  194.    || Function to spawn flame in certian position ||
  195.    ================================================= */
  196.  
  197. void (vector flame_pos) PlaceFlame =
  198. {
  199.         //Spawns a flame entity
  200.         local entity flame;
  201.  
  202.         flame = spawn ();
  203.         flame.owner = self;
  204.         flame.movetype = MOVETYPE_NONE;
  205.         flame.solid = SOLID_NOT;
  206.  
  207.         setmodel (flame, "progs/flame2.mdl"); 
  208.         setsize (flame, '-2 -2 0', '2 2 16');
  209.         setorigin (flame, flame_pos); 
  210.  
  211.         flame.effects = EF_DIMLIGHT;
  212.  
  213.         flame.nextthink = time + 10 + crandom();
  214.         flame.think = SUB_Remove;
  215.  
  216. };
  217. /* ==========================================
  218.    || Function to cycle forward thru heads ||
  219.    ========================================== */
  220.  
  221. void () HeadCycleForward =
  222. {
  223.         //See above for description
  224.         local string Head;
  225.  
  226.         if (self.heads == 0)
  227.         {
  228.                sprint (self, "You have no heads\n");
  229.                return;
  230.         } else {
  231.                 if (CurrentHead == "dog")
  232.                         CurrentHead = "army";
  233.                 else if (CurrentHead == "army")
  234.                         CurrentHead = "enforcer";
  235.                 else if (CurrentHead == "enforcer")
  236.                         CurrentHead = "ogre";
  237.                 else if (CurrentHead == "ogre")
  238.                         CurrentHead = "knight";
  239.                 else if (CurrentHead == "knight")
  240.                         CurrentHead = "wizard";
  241.                 else if (CurrentHead == "wizard")
  242.                         CurrentHead = "zombie";
  243.                 else if (CurrentHead == "zombie")
  244.                         CurrentHead = "demon";
  245.                 else if (CurrentHead == "demon")
  246.                         CurrentHead = "hellknight";
  247.                 else if (CurrentHead == "hellknight")
  248.                         CurrentHead = "shalrath";
  249.                 else if (CurrentHead == "shalrath")
  250.                         CurrentHead = "shambler";
  251.                 else if (CurrentHead == "shambler")
  252.                         CurrentHead = "dog";
  253.         }
  254.         sprint (self, CurrentHead);
  255.         sprint (self, "\n");
  256. };
  257.  
  258. /* ==========================================
  259.    || Function to cycle backward thru heads ||
  260.    ========================================== */
  261.  
  262. void () HeadCycleBack =
  263. {
  264.         //See above for description
  265.         local string Head;
  266.  
  267.         if (self.heads == 0)
  268.         {
  269.                sprint (self, "You have no heads\n");
  270.                return;
  271.         } else {
  272.                 if (CurrentHead == "dog")
  273.                         CurrentHead = "shambler";
  274.                 else if (CurrentHead == "shambler")
  275.                         CurrentHead = "shalrath";
  276.                 else if (CurrentHead == "shalrath")
  277.                         CurrentHead = "hellknight";
  278.                 else if (CurrentHead == "hellknight")
  279.                         CurrentHead = "demon";
  280.                 else if (CurrentHead == "demon")
  281.                         CurrentHead = "zombie";
  282.                 else if (CurrentHead == "zombie")
  283.                         CurrentHead = "wizzard";
  284.                 else if (CurrentHead == "wizzard")
  285.                         CurrentHead = "knight";
  286.                 else if (CurrentHead == "knight")
  287.                         CurrentHead = "ogre";
  288.                 else if (CurrentHead == "ogre")
  289.                         CurrentHead = "enforcer";
  290.                 else if (CurrentHead == "enforcer")
  291.                         CurrentHead = "army";
  292.                 else if (CurrentHead == "army")
  293.                         CurrentHead = "dog";
  294.         }
  295.         sprint (self, CurrentHead);
  296.         sprint (self, "\n");
  297. };
  298.  
  299. /* ======================================================
  300.    || Function that selects the model of head to throw ||
  301.    ====================================================== */
  302.  
  303. void () ModelSelect =
  304. {
  305.         //Checks what current selected head is, and chooses appropriate model
  306.         if (CurrentHead == "dog") {
  307.                 if (self.dog > 0) {
  308.                         GotHead = 1;
  309.                         HeadModel = "progs/h_dog.mdl";
  310.                         self.dog = self.dog - 1;
  311.                         RewardType = 1;
  312.                 } else {
  313.                         GotHead = 0;
  314.                 }
  315.         }
  316.         else if (CurrentHead == "army") {
  317.                 if (self.army > 0) {
  318.                         GotHead = 1;
  319.                         HeadModel = "progs/h_guard.mdl";
  320.                         self.army = self.army - 1;
  321.                         RewardType = 1;
  322.                 } else {
  323.                         GotHead = 0;
  324.                 }
  325.         }
  326.         else if (CurrentHead == "enforcer") {
  327.                 if (self.enforcer > 0) {
  328.                         GotHead = 1;
  329.                         HeadModel = "progs/h_mega.mdl";
  330.                         self.enforcer = self.enforcer - 1;
  331.                         RewardType = 1;
  332.                 } else {
  333.                         GotHead = 0;
  334.                 }
  335.         }
  336.         else if (CurrentHead == "ogre") {
  337.                 if (self.ogre > 0) {
  338.                         GotHead = 1;
  339.                         HeadModel = "progs/h_ogre.mdl";
  340.                         self.ogre = self.ogre - 1;
  341.                         RewardType = 2;
  342.                 } else {
  343.                         GotHead = 0;
  344.                 }
  345.         }
  346.         else if (CurrentHead == "knight") {
  347.                 if (self.knight > 0) {
  348.                         GotHead = 1;
  349.                         HeadModel = "progs/h_knight.mdl";
  350.                         self.knight = self.knight - 1;
  351.                         RewardType = 1;
  352.                 } else {
  353.                         GotHead = 0;
  354.                 }
  355.         }
  356.         else if (CurrentHead == "wizard") {
  357.                 if (self.wizard > 0) {
  358.                         GotHead = 1;
  359.                         HeadModel = "progs/h_wizard.mdl";
  360.                         self.wizard = self.wizard - 1;
  361.                         RewardType = 1;        
  362.                 } else {
  363.                         GotHead = 0;
  364.                 }
  365.         }
  366.         else if (CurrentHead == "zombie") {
  367.                 if (self.zombie > 0) {
  368.                         GotHead = 1;
  369.                         HeadModel = "progs/h_zombie.mdl";
  370.                         self.zombie = self.zombie - 1;
  371.                         RewardType = 1;        
  372.                 } else {
  373.                         GotHead = 0;
  374.                 }
  375.         }
  376.         else if (CurrentHead == "demon") {
  377.                 if (self.demon > 0) {
  378.                         GotHead = 1;
  379.                         HeadModel = "progs/h_demon.mdl";
  380.                         self.demon = self.demon - 1;
  381.                         RewardType = 2;        
  382.                 } else {
  383.                         GotHead = 0;
  384.                 }
  385.         }
  386.         else if (CurrentHead == "hellknight") {
  387.                 if (self.hellknight > 0) {
  388.                         GotHead = 1;
  389.                         HeadModel = "progs/h_hellkn.mdl";
  390.                         self.hellknight = self.hellknight - 1;
  391.                         RewardType = 2;        
  392.                 } else {
  393.                         GotHead = 0;
  394.                 }
  395.         }
  396.         else if (CurrentHead == "shalrath") {
  397.                 if (self.shalrath > 0) {
  398.                         GotHead = 1;
  399.                         HeadModel = "progs/h_shal.mdl";
  400.                         self.shalrath = self.shalrath - 1;
  401.                         RewardType = 3;        
  402.                 } else {
  403.                         GotHead = 0;
  404.                 }
  405.         }
  406.         else if (CurrentHead == "shambler") {
  407.                 if (self.shambler > 0) {
  408.                         GotHead = 1;
  409.                         HeadModel = "progs/h_shams.mdl";
  410.                         self.shambler = self.shambler - 1;
  411.                         RewardType = 3;
  412.                 } else {
  413.                         GotHead = 0;
  414.                 }
  415.         }
  416. };                        
  417. // Blah blah blah, this is sooooo boring commenting code...
  418.  
  419. /* ==============================================================
  420.    || This is the function that decides what reward you get... ||
  421.    ============================================================== */
  422.  
  423. void (vector reward_pos) SacReward =
  424. {
  425.         local entity reward;
  426.         local float randomreward;
  427.  
  428.         //Random number generated to decide on reward...
  429.         randomreward = crandom();
  430.         
  431.         //There are three reward types. 1,2,3 (Doi)
  432.         //1 being least and 3 most. This gives reward accorfin to random
  433.         //number and reward type...
  434.  
  435.         if (RewardType == 1) { //reward 1 = health15 and armor1
  436.                 if (randomreward < 0.5) {
  437.                         reward = spawn (); //health15
  438.                         reward.owner = self;
  439.                         reward.movetype = MOVETYPE_NONE;
  440.                         reward.solid = SOLID_TRIGGER;
  441.                         reward.touch = health_touch;
  442.  
  443.                         setmodel (reward, "maps/b_bh10.bsp");
  444.                         setsize (reward, '-2 -2 0', '2 2 16');
  445.                         setorigin (reward, reward_pos - '14 14 0');
  446.                         reward.noise = "items/r_item1.wav";
  447.                         reward.healamount = 15;
  448.                         reward.healtype = 0;
  449.                 } else if (randomreward < 1) {
  450.                         reward = spawn (); // armor1
  451.                         reward.owner = self;
  452.                         reward.movetype = MOVETYPE_NONE;
  453.                         reward.solid = SOLID_TRIGGER;
  454.                         reward.touch = armor_touch;
  455.                         setsize (reward, '-2 -2 0', '2 2 16');
  456.                         setorigin (reward, reward_pos);
  457.                         reward.classname = "item_armor1";
  458.  
  459.                         setmodel (reward, "progs/armor.mdl");
  460.                         reward.skin = 0;
  461.                 }
  462.         } else if (RewardType == 2) { //reward 2 = health25 and armor2
  463.                 if (randomreward < 0.5) {
  464.                         reward = spawn (); // health25
  465.                         reward.owner = self;
  466.                         reward.movetype = MOVETYPE_NONE;
  467.                         reward.solid = SOLID_TRIGGER;
  468.                         reward.touch = health_touch;
  469.                         setsize (reward, '-2 -2 0', '2 2 16');
  470.                         setorigin (reward, reward_pos - '14 14 0');
  471.         
  472.                         setmodel(reward, "maps/b_bh25.bsp");
  473.                         reward.noise = "items/health1.wav";
  474.                         reward.healamount = 25;
  475.                         reward.healtype = 1;
  476.                 } else if (randomreward < 1) {
  477.                         reward = spawn (); // armor2
  478.                         reward.owner = self;
  479.                         reward.movetype = MOVETYPE_NONE;
  480.                         reward.solid = SOLID_TRIGGER;
  481.                         reward.touch = armor_touch;
  482.                         setsize (reward, '-2 -2 0', '2 2 16');
  483.                         setorigin (reward, reward_pos);
  484.                         reward.classname = "item_armor2";
  485.  
  486.                         setmodel (reward, "progs/armor.mdl");
  487.                         reward.skin = 1;
  488.                 }                                
  489.         } else if (RewardType == 3) { //reward 3 = health100, armorInv,
  490.                                       //Invulnerbality, Invisibility and Quad  
  491.                 if (randomreward < 0.2) {
  492.                         reward.touch = powerup_touch; //Invulnerbality
  493.                         reward = spawn ();
  494.                         reward.owner = self;
  495.                         reward.movetype = MOVETYPE_NONE;
  496.                         reward.solid = SOLID_TRIGGER;
  497.         
  498.                         reward.noise = "items/protect.wav";
  499.                         setmodel (reward, "progs/invulner.mdl");
  500.                         reward.netname = "Pentagram of Protection";
  501.                         reward.items = IT_INVULNERABILITY;
  502.                         setsize (self, '-16 -16 -24', '16 16 32');
  503.                         reward.classname = "item_artifact_invulnerability";
  504.                         setorigin (reward, reward_pos);
  505.                 } else if (randomreward < 0.4) {
  506.                         reward = spawn (); //Invisibility
  507.                         reward.owner = self;
  508.                         reward.movetype = MOVETYPE_NONE;
  509.                         reward.solid = SOLID_TRIGGER;
  510.  
  511.                         reward.touch = powerup_touch; //Invisibility
  512.                         reward.noise = "items/inv1.wav";
  513.                         setmodel (reward, "progs/invisibl.mdl");
  514.                         reward.netname = "Ring of Shadows";
  515.                         reward.items = IT_INVISIBILITY;
  516.                         setsize (reward, '-16 -16 -24', '16 16 32');
  517.                         reward.classname = "item_artifact_invisibility";
  518.                         setorigin (reward, reward_pos);
  519.                 } else if (randomreward < 0.6) {
  520.                         reward = spawn (); //Quaddamage
  521.                         reward.owner = self;
  522.                         reward.movetype = MOVETYPE_NONE;
  523.                         reward.solid = SOLID_TRIGGER;
  524.  
  525.                         reward.touch = powerup_touch; 
  526.                         reward.noise = "items/damage.wav";
  527.                         setmodel (reward, "progs/quaddama.mdl");
  528.                         reward.netname = "Quad Damage";
  529.                         reward.items = IT_QUAD;
  530.                         setsize (reward, '-16 -16 -24', '16 16 32');
  531.                         reward.classname = "item_artifact_super_damage";
  532.                         setorigin (reward, reward_pos);
  533.                 } else if (randomreward < 0.8) {
  534.                         reward = spawn (); // armorInv
  535.                         reward.owner = self;
  536.                         reward.movetype = MOVETYPE_NONE;
  537.                         reward.solid = SOLID_TRIGGER;
  538.                         reward.touch = armor_touch;
  539.                         setsize (reward, '-2 -2 0', '2 2 16');
  540.                         setorigin (reward, reward_pos);
  541.                         reward.classname = "item_armorInv";
  542.  
  543.                         setmodel (reward, "progs/armor.mdl");
  544.                         reward.skin = 2; 
  545.  
  546.                 } else if (randomreward < 1) {
  547.                         reward = spawn (); // megahealth
  548.                         reward.owner = self;
  549.                         reward.movetype = MOVETYPE_NONE;
  550.                         reward.solid = SOLID_TRIGGER;
  551.                         reward.touch = health_touch;
  552.                         setsize (reward, '-2 -2 0', '2 2 16');
  553.                         setorigin (reward, reward_pos - '14 14 0');
  554.         
  555.                         setmodel(reward, "maps/b_bh100.bsp");
  556.                         reward.noise = "items/r_item2.wav";
  557.                         reward.healamount = 100;
  558.                         reward.healtype = 2;
  559.                 }
  560.         }
  561. };
  562.  
  563. // Sacrifice-o-head code, written, concieved and all that mumbo jumbo
  564. // by Broken, aka Ilden Webber, from South Africa. Not that it
  565. // changes anything, but now you know. 
  566.