home *** CD-ROM | disk | FTP | other *** search
/ Quake 'em / QUAKEEM.BIN / quake / programs / morph2 / morph.pat < prev    next >
Encoding:
Text File  |  1996-08-22  |  87.0 KB  |  2,478 lines
  1. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/client.qc morph/client.qc
  2. --- v101qc/client.qc    Thu Jul 25 01:51:22 1996
  3. +++ morph/client.qc    Thu Aug 22 17:02:32 1996
  4. @@ -2,7 +2,7 @@
  5.  // prototypes
  6.  void () W_WeaponFrame;
  7.  void() W_SetCurrentAmmo;
  8. -void() player_pain;
  9. +void(entity attacker, float take) player_pain;
  10.  void() player_stand1;
  11.  void (vector org) spawn_tfog;
  12.  void (vector org, entity death_owner) spawn_tdeath;
  13. @@ -53,6 +53,7 @@
  14.      parm7 = self.ammo_cells;
  15.      parm8 = self.weapon;
  16.      parm9 = self.armortype * 100;
  17. +    parm10 = self.morphnum;
  18.  };
  19.  
  20.  void() SetNewParms =
  21. @@ -66,6 +67,7 @@
  22.      parm6 = 0;
  23.      parm8 = 1;
  24.      parm9 = 0;
  25. +    parm10 = 0; // Human morph
  26.  };
  27.  
  28.  void() DecodeLevelParms =
  29. @@ -85,6 +87,7 @@
  30.      self.ammo_cells = parm7;
  31.      self.weapon = parm8;
  32.      self.armortype = parm9 * 0.01;
  33. +    self.impulse =  parm10;
  34.  };
  35.  
  36.  /*
  37. @@ -468,6 +471,19 @@
  38.      self.invincible_time = 0;
  39.  
  40.      DecodeLevelParms ();
  41. +
  42. +    self._stand=SUB_Null;
  43. +    self._pain=SUB_Null;
  44. +    self._run=SUB_Null;
  45. +    self._impulse=SUB_Null;
  46. +    self._attack=SUB_Null;
  47. +    self._jump=SUB_Null;
  48. +    self._jump2=SUB_Null;
  49. +    self._can_get_p=SUB_True;
  50. +    self._killmsg=SUB_Null;
  51. +    self._killmsg2=SUB_Null;
  52. +
  53. +    self.health_modifier = 1.0;
  54.      
  55.      W_SetCurrentAmmo ();
  56.  
  57. @@ -491,6 +507,7 @@
  58.  
  59.      setmodel (self, "progs/player.mdl");
  60.      modelindex_player = self.modelindex;
  61. +    self.modelindex_morph=modelindex_player;
  62.  
  63.      setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  64.      
  65. @@ -752,6 +769,11 @@
  66.  {
  67.      local vector start, end;
  68.      
  69. +    if (self._jump != SUB_Null) { // Should be after these checks?
  70. +        self._jump();
  71. +        return;
  72. +    }
  73. +
  74.      if (self.flags & FL_WATERJUMP)
  75.          return;
  76.      
  77. @@ -788,6 +810,8 @@
  78.      self.flags = self.flags - FL_ONGROUND;    // don't stairwalk
  79.      
  80.      self.button2 = 0;
  81. +
  82. +    if(self._jump2 != SUB_Null) { self._jump2(); return; }
  83.  // player jumping sound
  84.      sound (self, CHAN_BODY, "player/plyrjmp8.wav", 1, ATTN_NORM);
  85.      self.velocity_z = self.velocity_z + 270;
  86. @@ -1015,7 +1039,7 @@
  87.          self.modelindex = modelindex_eyes;
  88.      }
  89.      else
  90. -        self.modelindex = modelindex_player;    // don't use eyes
  91. +        self.modelindex = self.modelindex_morph;    // don't use eyes
  92.  
  93.  // invincibility
  94.      if (self.invincible_finished)
  95. @@ -1266,59 +1290,64 @@
  96.              {
  97.                  attacker.frags = attacker.frags + 1;
  98.  
  99. -                rnum = attacker.weapon;
  100. -                if (rnum == IT_AXE)
  101. -                {
  102. -                    deathstring = " was ax-murdered by ";
  103. -                    deathstring2 = "\n";
  104. -                }
  105. -                if (rnum == IT_SHOTGUN)
  106. -                {
  107. -                    deathstring = " chewed on ";
  108. -                    deathstring2 = "'s boomstick\n";
  109. -                }
  110. -                if (rnum == IT_SUPER_SHOTGUN)
  111. -                {
  112. -                    deathstring = " ate 2 loads of ";
  113. -                    deathstring2 = "'s buckshot\n";
  114. -                }
  115. -                if (rnum == IT_NAILGUN)
  116. -                {
  117. -                    deathstring = " was nailed by ";
  118. -                    deathstring2 = "\n";
  119. -                }
  120. -                if (rnum == IT_SUPER_NAILGUN)
  121. -                {
  122. -                    deathstring = " was punctured by ";
  123. -                    deathstring2 = "\n";
  124. -                }
  125. -                if (rnum == IT_GRENADE_LAUNCHER)
  126. -                {
  127. -                    deathstring = " eats ";
  128. -                    deathstring2 = "'s pineapple\n";
  129. -                    if (targ.health < -40)
  130. +                if (attacker._killmsg != SUB_Null) {
  131. +                    deathstring = attacker._killmsg(targ, attacker);
  132. +                    deathstring2 = attacker._killmsg2(targ, attacker);
  133. +                } else {
  134. +                    rnum = attacker.weapon;
  135. +                    if (rnum == IT_AXE)
  136.                      {
  137. -                        deathstring = " was gibbed by ";
  138. -                        deathstring2 = "'s grenade\n";
  139. +                        deathstring = " was ax-murdered by ";
  140. +                        deathstring2 = "\n";
  141.                      }
  142. -                }
  143. -                if (rnum == IT_ROCKET_LAUNCHER)
  144. -                {
  145. -                    deathstring = " rides ";
  146. -                    deathstring2 = "'s rocket\n";
  147. -                    if (targ.health < -40)
  148. +                    if (rnum == IT_SHOTGUN)
  149.                      {
  150. -                        deathstring = " was gibbed by ";
  151. -                        deathstring2 = "'s rocket\n" ;
  152. +                        deathstring = " chewed on ";
  153. +                        deathstring2 = "'s boomstick\n";
  154. +                    }
  155. +                    if (rnum == IT_SUPER_SHOTGUN)
  156. +                    {
  157. +                        deathstring = " ate 2 loads of ";
  158. +                        deathstring2 = "'s buckshot\n";
  159. +                    }
  160. +                    if (rnum == IT_NAILGUN)
  161. +                    {
  162. +                        deathstring = " was nailed by ";
  163. +                        deathstring2 = "\n";
  164. +                    }
  165. +                    if (rnum == IT_SUPER_NAILGUN)
  166. +                    {
  167. +                        deathstring = " was punctured by ";
  168. +                        deathstring2 = "\n";
  169. +                    }
  170. +                    if (rnum == IT_GRENADE_LAUNCHER)
  171. +                    {
  172. +                        deathstring = " eats ";
  173. +                        deathstring2 = "'s pineapple\n";
  174. +                        if (targ.health < -40)
  175. +                        {
  176. +                            deathstring = " was gibbed by ";
  177. +                            deathstring2 = "'s grenade\n";
  178. +                        }
  179. +                    }
  180. +                    if (rnum == IT_ROCKET_LAUNCHER)
  181. +                    {
  182. +                        deathstring = " rides ";
  183. +                        deathstring2 = "'s rocket\n";
  184. +                        if (targ.health < -40)
  185. +                        {
  186. +                            deathstring = " was gibbed by ";
  187. +                            deathstring2 = "'s rocket\n" ;
  188. +                        }
  189. +                    }
  190. +                    if (rnum == IT_LIGHTNING)
  191. +                    {
  192. +                        deathstring = " accepts ";
  193. +                        if (attacker.waterlevel > 1)
  194. +                            deathstring2 = "'s discharge\n";
  195. +                        else
  196. +                            deathstring2 = "'s shaft\n";
  197.                      }
  198. -                }
  199. -                if (rnum == IT_LIGHTNING)
  200. -                {
  201. -                    deathstring = " accepts ";
  202. -                    if (attacker.waterlevel > 1)
  203. -                        deathstring2 = "'s discharge\n";
  204. -                    else
  205. -                        deathstring2 = "'s shaft\n";
  206.                  }
  207.                  bprint (targ.netname);
  208.                  bprint (deathstring);
  209. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/defs.qc morph/defs.qc
  210. --- v101qc/defs.qc    Thu Jul 25 01:51:22 1996
  211. +++ morph/defs.qc    Thu Aug 22 17:03:01 1996
  212. @@ -690,4 +690,16 @@
  213.  
  214.  float(entity targ, entity inflictor) CanDamage;
  215.  
  216. -
  217. +.void() _stand;
  218. +.void(entity attacker, float take) _pain;
  219. +.void() _run;
  220. +.void() _impulse;
  221. +.void() _attack;
  222. +.void() _jump;
  223. +.void() _jump2;
  224. +.float morphnum;
  225. +.float(entity what, entity you) _can_get_p;
  226. +.float modelindex_morph;
  227. +.float health_modifier;
  228. +.string(entity targ, entity attacker) _killmsg;
  229. +.string(entity targ, entity attacker) _killmsg2;
  230. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/items.qc morph/items.qc
  231. --- v101qc/items.qc    Thu Jul 25 01:51:23 1996
  232. +++ morph/items.qc    Thu Aug 15 07:46:19 1996
  233. @@ -82,15 +82,15 @@
  234.  {
  235.      if (e.health <= 0)
  236.          return 0;
  237. -    if ((!ignore) && (e.health >= other.max_health))
  238. +    if ((!ignore) && (e.health >= other.max_health * other.health_modifier))
  239.          return 0;
  240.      healamount = ceil(healamount);
  241.  
  242.      e.health = e.health + healamount;
  243. -    if ((!ignore) && (e.health >= other.max_health))
  244. -        e.health = other.max_health;
  245. +    if ((!ignore) && (e.health >= other.max_health * other.health_modifier))
  246. +        e.health = other.max_health * other.health_modifier;
  247.          
  248. -    if (e.health > 250)
  249. +    if (e.health > 2.5 * other.max_health * e.health_modifier)
  250.          e.health = 250;
  251.      return 1;
  252.  };
  253. @@ -154,11 +154,12 @@
  254.      
  255.      if (other.classname != "player")
  256.          return;
  257. +    // if (!other._can_get_p(self,other)) return; // We can always get health
  258.      
  259.      if (self.healtype == 2) // Megahealth?  Ignore max_health...
  260.      {
  261. -        if (other.health >= 250)
  262. -            return;
  263. +        //if (other.health >= 250)
  264. +        //    return;
  265.          if (!T_Heal(other, self.healamount, 1))
  266.              return;
  267.      }
  268. @@ -207,7 +208,7 @@
  269.  {
  270.      other = self.owner;
  271.      
  272. -    if (other.health > other.max_health)
  273. +    if (other.health > other.max_health * other.health_modifier)
  274.      {
  275.          other.health = other.health - 1;
  276.          self.nextthink = time + 1;
  277. @@ -243,6 +244,7 @@
  278.          return;
  279.      if (other.classname != "player")
  280.          return;
  281. +    if (!other._can_get_p(self,other)) return;
  282.  
  283.      if (self.classname == "item_armor1")
  284.      {
  285. @@ -397,6 +399,7 @@
  286.  
  287.      if (!(other.flags & FL_CLIENT))
  288.          return;
  289. +    if (!other._can_get_p(self,other)) return;
  290.  
  291.  // if the player was using his best weapon, change up to the new one if better        
  292.      stemp = self;
  293. @@ -598,11 +601,14 @@
  294.  {
  295.  local entity    stemp;
  296.  local float        best;
  297. +local float cgp;
  298.  
  299.      if (other.classname != "player")
  300.          return;
  301.      if (other.health <= 0)
  302.          return;
  303. +    cgp=other._can_get_p(self,other);
  304. +    if (!cgp) return;
  305.  
  306.  // if the player was using his best weapon, change up to the new one if better        
  307.      stemp = self;
  308. @@ -654,21 +660,21 @@
  309.  
  310.  // change to a better weapon if appropriate
  311.  
  312. -    if ( other.weapon == best )
  313. +    if ( (cgp == 1) && (other.weapon == best ))
  314.      {
  315.          stemp = self;
  316.          self = other;
  317.          self.weapon = W_BestWeapon();
  318.          W_SetCurrentAmmo ();
  319.          self = stemp;
  320. -    }
  321.  
  322.  // if changed current ammo, update it
  323. -    stemp = self;
  324. -    self = other;
  325. -    W_SetCurrentAmmo();
  326. -    self = stemp;
  327. +        stemp = self;
  328. +        self = other;
  329. +        W_SetCurrentAmmo();
  330. +        self = stemp;
  331.  
  332. +    }
  333.  // remove it in single player, or setup for respawning in deathmatch
  334.      self.model = string_null;
  335.      self.solid = SOLID_NOT;
  336. @@ -878,6 +884,7 @@
  337.          return;
  338.      if (other.items & self.items)
  339.          return;
  340. +    // if (!other._can_get_p(self,other)) return; // Always allow key getting
  341.  
  342.      sprint (other, "You got the ");
  343.      sprint (other, self.netname);
  344. @@ -1012,6 +1019,7 @@
  345.          return;
  346.      if (other.health <= 0)
  347.          return;
  348. +    // if (!other._can_get_p(self,other)) return; // Always allow rune getting
  349.  
  350.      centerprint (other, "You got the rune!");
  351.  
  352. @@ -1085,6 +1093,7 @@
  353.          return;
  354.      if (other.health <= 0)
  355.          return;
  356. +    // if (!other._can_get_p(self,other)) return; // We can always get powerups
  357.  
  358.      sprint (other, "You got the ");
  359.      sprint (other, self.netname);
  360. @@ -1232,11 +1241,14 @@
  361.      local string    s;
  362.      local    float    best;
  363.      local        entity    stemp;
  364. +    local float    cgp;
  365.      
  366.      if (other.classname != "player")
  367.          return;
  368.      if (other.health <= 0)
  369.          return;
  370. +    cgp=other._can_get_p(self,other);
  371. +    if (!cgp) return;
  372.          
  373.  // if the player was using his best weapon, change up to the new one if better        
  374.      stemp = self;
  375. @@ -1287,19 +1299,17 @@
  376.      stuffcmd (other, "bf\n");
  377.  
  378.  // change to a better weapon if appropriate
  379. -    if ( other.weapon == best )
  380. +    if ( other.weapon == best && cgp == 1)
  381.      {
  382.          stemp = self;
  383.          self = other;
  384.          self.weapon = W_BestWeapon();
  385. +        W_SetCurrentAmmo ();
  386.          self = stemp;
  387.      }
  388.  
  389.      
  390.      remove(self);
  391. -    
  392. -    self = other;
  393. -    W_SetCurrentAmmo ();
  394.  };
  395.  
  396.  /*
  397. @@ -1337,4 +1347,51 @@
  398.      
  399.      item.nextthink = time + 120;    // remove after 2 minutes
  400.      item.think = SUB_Remove;
  401. +};
  402. +
  403. +void() BackpackSolidify = {
  404. +    self.solid = SOLID_TRIGGER;
  405. +    self.touch = BackpackTouch;
  406. +    self.nextthink = time + 900; // 15 minutes
  407. +    self.think = SUB_Remove;
  408. +    setmodel (self, "progs/backpack.mdl");
  409. +    setsize (self, '-16 -16 0', '16 16 56');
  410. +};
  411. +
  412. +void() DropBackpack2 =
  413. +{
  414. +    local entity    item;
  415. +
  416. +    if (!(self.ammo_shells + self.ammo_nails + self.ammo_rockets + self.ammo_cells))
  417. +        return;    // nothing in it
  418. +
  419. +    item = spawn();
  420. +    item.origin = self.origin - '0 0 24';
  421. +    
  422. +    item.items = self.weapon;
  423. +
  424. +    item.ammo_shells = self.ammo_shells;
  425. +    item.ammo_nails = self.ammo_nails;
  426. +    item.ammo_rockets = self.ammo_rockets;
  427. +    item.ammo_cells = self.ammo_cells;
  428. +
  429. +    self.ammo_shells=0;
  430. +    self.ammo_nails=0;
  431. +    self.ammo_rockets=0;
  432. +    self.ammo_cells=0;
  433. +
  434. +    item.velocity_z = 300;
  435. +    item.velocity_x = -100 + (random() * 200);
  436. +    item.velocity_y = -100 + (random() * 200);
  437. +    
  438. +    item.flags = FL_ITEM;
  439. +    item.solid = SOLID_NOT;
  440. +    item.movetype = MOVETYPE_TOSS;
  441. +    setmodel (item, "progs/backpack.mdl");
  442. +    setsize (item, '-16 -16 0', '16 16 56');
  443. +    // item.touch = BackpackTouch;
  444. +    
  445. +    item.nextthink = time + 2;    // solidify in two seconds
  446. +    item.think = BackpackSolidify;
  447. +    item.owner = world;
  448.  };
  449. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-demon.qc morph/m-demon.qc
  450. --- v101qc/m-demon.qc    Wed Dec 31 18:00:00 1969
  451. +++ morph/m-demon.qc    Thu Aug 22 17:08:25 1996
  452. @@ -0,0 +1,171 @@
  453. +/*
  454. +==============================================================================
  455. +
  456. +DEMON
  457. +
  458. +==============================================================================
  459. +*/
  460. +
  461. +$cd /raid/quake/id1/models/demon3
  462. +$scale    0.8
  463. +$origin 0 0 24
  464. +$base base
  465. +$skin base
  466. +
  467. +$frame stand1 stand2 stand3 stand4 stand5 stand6 stand7 stand8 stand9
  468. +$frame stand10 stand11 stand12 stand13
  469. +
  470. +$frame walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8
  471. +
  472. +$frame run1 run2 run3 run4 run5 run6
  473. +
  474. +$frame leap1 leap2 leap3 leap4 leap5 leap6 leap7 leap8 leap9 leap10
  475. +$frame leap11 leap12
  476. +
  477. +$frame pain1 pain2 pain3 pain4 pain5 pain6
  478. +
  479. +$frame death1 death2 death3 death4 death5 death6 death7 death8 death9
  480. +
  481. +$frame attacka1 attacka2 attacka3 attacka4 attacka5 attacka6 attacka7 attacka8
  482. +$frame attacka9 attacka10 attacka11 attacka12 attacka13 attacka14 attacka15
  483. +
  484. +void(float side) player_demon_melee = {
  485. +        local   vector  source;
  486. +        local   vector  org;
  487. +        local   float   ldmg;
  488. +
  489. +        sound (self, CHAN_WEAPON, "weapons/ax1.wav", 1, ATTN_NORM);
  490. +
  491. +        source = self.origin + '0 0 4';
  492. +        makevectors (self.angles);
  493. +        traceline (source, source + v_forward*64, FALSE, self);
  494. +        if (!trace_ent.takedamage)
  495. +                traceline (source, source + v_forward*64 + v_right*30, FALSE, self);
  496. +        if (!trace_ent.takedamage)
  497. +                traceline (source, source + v_forward*64 - v_right*30, FALSE, self);
  498. +
  499. +        if (trace_fraction == 1.0)
  500. +                return;
  501. +
  502. +        org = trace_endpos - v_forward*4;
  503. +        if (trace_ent.takedamage)
  504. +        {
  505. +            sound (self, CHAN_WEAPON, "demon/dhit2.wav", 1, ATTN_NORM);
  506. +                ldmg = 40 + 10*random();
  507. +                T_Damage (trace_ent, self, self, ldmg);
  508. +
  509. +                SpawnMeatSpray (self.origin + v_forward*16, side * v_right);
  510. +        }
  511. +};
  512. +
  513. +void()  player_demon_attack = [$attacka1, player_demon_attack2 ] {self.attack_finished=time+1; self.view_ofs = '0 0 8';};
  514. +void()  player_demon_attack2 = [$attacka2, player_demon_attack3 ] {self.view_ofs = '0 0 16';};
  515. +void()  player_demon_attack3 = [$attacka3, player_demon_attack4 ] {self.view_ofs = '0 0 25';};
  516. +void()  player_demon_attack4 = [$attacka4, player_demon_attack5 ] {self.view_ofs = '0 0 23';};
  517. +void()  player_demon_attack5 = [$attacka5, player_demon_attack6 ] {self.view_ofs = '0 0 21'; player_demon_melee(200);};
  518. +void()  player_demon_attack6 = [$attacka6, player_demon_attack7 ] {self.view_ofs = '0 0 23';};
  519. +void()  player_demon_attack7 = [$attacka7, player_demon_attack8 ] {self.view_ofs = '0 0 24';};
  520. +void()  player_demon_attack8 = [$attacka8, player_demon_attack9 ] {self.view_ofs = '0 0 25';};
  521. +void()  player_demon_attack9 = [$attacka9, player_demon_attack10 ] {self.view_ofs = '0 0 24';};
  522. +void()  player_demon_attack10 = [$attacka10, player_demon_attack11 ] {self.view_ofs = '0 0 23';};
  523. +void()  player_demon_attack11 = [$attacka11, player_demon_attack12 ] {self.view_ofs = '0 0 21'; player_demon_melee(-200);};
  524. +void()  player_demon_attack12 = [$attacka12, player_demon_attack13 ] {self.view_ofs = '0 0 16';};
  525. +void()  player_demon_attack13 = [$attacka13, player_demon_attack14 ] {self.view_ofs = '0 0 12';};
  526. +void()  player_demon_attack14 = [$attacka14, player_demon_attack15 ] {self.view_ofs = '0 0 8';};
  527. +void()  player_demon_attack15 = [$attacka15, player_stand1 ] {self.view_ofs = '0 0 4';};
  528. +
  529. +void() player_demon_jumptouch =
  530. +{
  531. +        local float ldmg;
  532. +
  533. +        if(other.takedamage)
  534. +        {
  535. +                ldmg = 40 + 10*random();
  536. +                T_Damage(other, self, self, ldmg);
  537. +                SpawnMeatSpray (self.origin + v_forward*20,  100* v_forward);
  538. +                SpawnMeatSpray (self.origin + v_forward*20,  50* v_forward);
  539. +        }
  540. +
  541. +        self.touch = SUB_Null;
  542. +};
  543. +
  544. +void() player_demon_jump1 = [ $leap1, player_demon_jump1 ] {
  545. +        if (self.walkframe >= 12)
  546. +                self.walkframe = 11;
  547. +        self.frame = $leap1 + self.walkframe;
  548. +        self.walkframe = self.walkframe + 1;
  549. +        if (self.flags & FL_ONGROUND) {
  550. +        self.touch = SUB_Null;
  551. +                player_stand1();
  552. +    }
  553. +};
  554. +
  555. +void() player_demon_jump = {
  556. +    makevectors(self.v_angle);
  557. +    self.origin_z = self.origin_z + 1;
  558. +    self.velocity = v_forward * 800 + '0 0 350';
  559. +    sound(self, CHAN_BODY, "demon/djump.wav", 1, ATTN_NORM);
  560. +    self.touch = player_demon_jumptouch;
  561. +    player_demon_jump1();
  562. +};
  563. +
  564. +void() player_demon_stand = [ $stand1, player_stand1 ] {
  565. +    if(self.walkframe >= 13)
  566. +        self.walkframe=0;
  567. +    self.frame = $stand1 + self.walkframe;
  568. +    self.walkframe = self.walkframe + 1;
  569. +};
  570. +
  571. +void() player_demon_run = [ $run1, player_run ] {
  572. +    if(self.walkframe >= 6)
  573. +        self.walkframe = 0;
  574. +    self.frame = $run1 + self.walkframe;
  575. +    self.walkframe = self.walkframe + 1;
  576. +};
  577. +
  578. +void() player_demon_pain = [       $pain5, player_demon_pain1    ]
  579. +{
  580. +        self.walkframe = 1;
  581. +        PainSound();
  582. +        self.weaponframe = 0;
  583. +        self.frame = $pain5;
  584. +};
  585. +
  586. +void()  player_demon_pain1 =  [      $pain1, player_demon_pain1    ]
  587. +{
  588. +        if (self.walkframe >=10)
  589. +                player_stand1();
  590. +        if (self.walkframe < 6)
  591. +                self.frame = $pain5 + self.walkframe;
  592. +        else self.frame = $pain5 + (10 - self.walkframe);
  593. +        self.walkframe = self.walkframe + 1;
  594. +};
  595. +
  596. +string() player_demon_killmsg = { return " was slashed by "; };
  597. +string() player_demon_killmsg2 = { return "\n"; };
  598. +
  599. +void() player_demon_become = {
  600. +    bprint(self.netname);
  601. +    bprint(" has become a fiend.\n");
  602. +    self._stand=player_demon_stand;
  603. +    self._run=player_demon_run;    
  604. +    self._pain=player_demon_pain;
  605. +    self._jump=SUB_Null;
  606. +    self._jump2=player_demon_jump;
  607. +    self._attack=player_demon_attack;
  608. +    self._impulse=SUB_Nop;
  609. +    self._can_get_p=SUB_False;
  610. +    self._killmsg=player_demon_killmsg;
  611. +    self._killmsg2=player_demon_killmsg2;
  612. +    setmodel(self,"progs/demon.mdl");
  613. +    self.modelindex_morph=self.modelindex;
  614. +    self.weaponmodel="";
  615. +    self.view_ofs = '0 0 22';
  616. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  617. +    else setsize (self, '-16 -16 -24', '16 16 40');
  618. +    self.health = self.health * 5.00 / self.health_modifier;
  619. +    self.health_modifier = 5.00;
  620. +    makevectors(self.v_angle);
  621. +    spawn_tfog(self.origin + 20 * v_forward);
  622. +    DropBackpack2();
  623. +};
  624. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-hknigh.qc morph/m-hknigh.qc
  625. --- v101qc/m-hknigh.qc    Wed Dec 31 18:00:00 1969
  626. +++ morph/m-hknigh.qc    Thu Aug 22 17:08:29 1996
  627. @@ -0,0 +1,260 @@
  628. +/*
  629. +==============================================================================
  630. +
  631. +KNIGHT
  632. +
  633. +==============================================================================
  634. +*/
  635. +
  636. +$cd /raid/quake/id1/models/knight2
  637. +$origin 0 0 24
  638. +$base base
  639. +$skin skin
  640. +
  641. +$frame stand1 stand2 stand3 stand4 stand5 stand6 stand7 stand8 stand9
  642. +
  643. +$frame walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9
  644. +$frame walk10 walk11 walk12 walk13 walk14 walk15 walk16 walk17
  645. +$frame walk18 walk19 walk20
  646. +
  647. +$frame run1 run2 run3 run4 run5 run6 run7 run8
  648. +
  649. +$frame pain1 pain2 pain3 pain4 pain5
  650. +
  651. +$frame death1 death2 death3 death4 death5 death6 death7 death8
  652. +$frame death9 death10 death11 death12
  653. +
  654. +$frame deathb1 deathb2 deathb3 deathb4 deathb5 deathb6 deathb7 deathb8
  655. +$frame deathb9
  656. +
  657. +$frame char_a1 char_a2 char_a3 char_a4 char_a5 char_a6 char_a7 char_a8
  658. +$frame char_a9 char_a10 char_a11 char_a12 char_a13 char_a14 char_a15 char_a16
  659. +
  660. +$frame magica1 magica2 magica3 magica4 magica5 magica6 magica7 magica8
  661. +$frame magica9 magica10 magica11 magica12 magica13 magica14
  662. +
  663. +$frame magicb1 magicb2 magicb3 magicb4 magicb5 magicb6 magicb7 magicb8
  664. +$frame magicb9 magicb10 magicb11 magicb12 magicb13
  665. +
  666. +$frame char_b1 char_b2 char_b3 char_b4 char_b5 char_b6
  667. +
  668. +$frame slice1 slice2 slice3 slice4 slice5 slice6 slice7 slice8 slice9 slice10
  669. +
  670. +$frame smash1 smash2 smash3 smash4 smash5 smash6 smash7 smash8 smash9 smash10
  671. +$frame smash11
  672. +
  673. +$frame w_attack1 w_attack2 w_attack3 w_attack4 w_attack5 w_attack6 w_attack7 
  674. +$frame w_attack8 w_attack9 w_attack10 w_attack11 w_attack12 w_attack13 w_attack14
  675. +$frame w_attack15 w_attack16 w_attack17 w_attack18 w_attack19 w_attack20 
  676. +$frame w_attack21 w_attack22 
  677. +
  678. +$frame magicc1 magicc2 magicc3 magicc4 magicc5 magicc6 magicc7 magicc8
  679. +$frame magicc9 magicc10 magicc11
  680. +
  681. +void() player_hknight_stand = [ $stand1, player_stand1 ] {
  682. +    if(self.walkframe >= 9)    
  683. +        self.walkframe = 0;
  684. +    self.frame = $stand1 + self.walkframe;
  685. +    self.walkframe = self.walkframe + 1;
  686. +};
  687. +
  688. +void() player_hknight_run = [ $run1, player_run ] {
  689. +    if (self.walkframe >= 8)
  690. +        self.walkframe = 0;
  691. +    self.frame = $run1 + self.walkframe;
  692. +    self.walkframe = self.walkframe + 1;
  693. +};
  694. +
  695. +////////////////////////////////////////////
  696. +// 5 frames of pain for player_hknight, going to player_stand1
  697. +////////////////////////////////////////////
  698. +
  699. +void() player_hknight_pain1 = [ $pain1, player_hknight_pain2 ] { };
  700. +void() player_hknight_pain2 = [ $pain2, player_hknight_pain3 ] { };
  701. +void() player_hknight_pain3 = [ $pain3, player_hknight_pain4 ] { };
  702. +void() player_hknight_pain4 = [ $pain4, player_hknight_pain5 ] { };
  703. +void() player_hknight_pain5 = [ $pain5, player_stand1 ] { };
  704. +
  705. +void() player_hknight_pain = {
  706. +    if(self.pain_finished > time) return;
  707. +    self.pain_finished = time + 1;
  708. +    player_hknight_pain1();
  709. +};
  710. +
  711. +void(float offset) player_hknight_shot =
  712. +{
  713. +    local    vector    offang;
  714. +    local    vector    org, vec;
  715. +    
  716. +    offang = self.v_angle;
  717. +    offang_y = offang_y + offset * 6;
  718. +    
  719. +    makevectors (offang);
  720. +
  721. +    org = self.origin + self.mins + self.size*0.5 + v_forward * 20;
  722. +
  723. +// set missile speed
  724. +    vec = normalize (v_forward);
  725. +    vec_z = vec_z + (random() - 0.5)*0.1;
  726. +    
  727. +    launch_spike (org, vec);
  728. +    newmis.classname = "knightspike";
  729. +    setmodel (newmis, "progs/k_spike.mdl");
  730. +    setsize (newmis, VEC_ORIGIN, VEC_ORIGIN);        
  731. +    newmis.velocity = vec*300;
  732. +    sound (self, CHAN_WEAPON, "hknight/attack1.wav", 1, ATTN_NORM);
  733. +};
  734. +
  735. +void() player_hknight_sword = {
  736. +    local    vector    source;
  737. +    local    vector    org;
  738. +
  739. +    source = self.origin + '0 0 16';
  740. +    traceline (source, source + v_forward*96, FALSE, self);
  741. +    if (trace_fraction == 1.0)
  742. +        return;
  743. +    
  744. +    org = trace_endpos - v_forward*4;
  745. +
  746. +    if (trace_ent.takedamage)
  747. +    {
  748. +        trace_ent.axhitme = 1;
  749. +        SpawnBlood (org, '0 0 0', 20);
  750. +        T_Damage (trace_ent, self, self, 20);
  751. +    }
  752. +    else
  753. +    {    // hit wall
  754. +        sound (self, CHAN_WEAPON, "player/axhit2.wav", 1, ATTN_NORM);
  755. +        WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  756. +        WriteByte (MSG_BROADCAST, TE_GUNSHOT);
  757. +        WriteCoord (MSG_BROADCAST, org_x);
  758. +        WriteCoord (MSG_BROADCAST, org_y);
  759. +        WriteCoord (MSG_BROADCAST, org_z);
  760. +    }
  761. +};
  762. +////////////////////////////////////////////
  763. +// 10 frames of slice for player_hknight, going to player_stand1
  764. +////////////////////////////////////////////
  765. +
  766. +void() player_hknight_slice1 = [ $slice1, player_hknight_slice2 ] { };
  767. +void() player_hknight_slice2 = [ $slice2, player_hknight_slice3 ] { };
  768. +void() player_hknight_slice3 = [ $slice3, player_hknight_slice4 ] { };
  769. +void() player_hknight_slice4 = [ $slice4, player_hknight_slice5 ] { player_hknight_sword(); };
  770. +void() player_hknight_slice5 = [ $slice5, player_hknight_slice6 ] { };
  771. +void() player_hknight_slice6 = [ $slice6, player_hknight_slice7 ] { player_hknight_sword(); };
  772. +void() player_hknight_slice7 = [ $slice7, player_hknight_slice8 ] { };
  773. +void() player_hknight_slice8 = [ $slice8, player_hknight_slice9 ] { };
  774. +void() player_hknight_slice9 = [ $slice9, player_hknight_slice10 ] { };
  775. +void() player_hknight_slice10 = [ $slice10, player_stand1 ] { };
  776. +
  777. +////////////////////////////////////////////
  778. +// 11 frames of smash for player_hknight, going to player_stand1
  779. +////////////////////////////////////////////
  780. +
  781. +void() player_hknight_smash1 = [ $smash1, player_hknight_smash2 ] { };
  782. +void() player_hknight_smash2 = [ $smash2, player_hknight_smash3 ] { };
  783. +void() player_hknight_smash3 = [ $smash3, player_hknight_smash4 ] { };
  784. +void() player_hknight_smash4 = [ $smash4, player_hknight_smash5 ] { };
  785. +void() player_hknight_smash5 = [ $smash5, player_hknight_smash6 ] { player_hknight_sword(); };
  786. +void() player_hknight_smash6 = [ $smash6, player_hknight_smash7 ] { };
  787. +void() player_hknight_smash7 = [ $smash7, player_hknight_smash8 ] { player_hknight_sword(); };
  788. +void() player_hknight_smash8 = [ $smash8, player_hknight_smash9 ] { };
  789. +void() player_hknight_smash9 = [ $smash9, player_hknight_smash10 ] { player_hknight_sword(); };
  790. +void() player_hknight_smash10 = [ $smash10, player_hknight_smash11 ] { };
  791. +void() player_hknight_smash11 = [ $smash11, player_stand1 ] { };
  792. +
  793. +////////////////////////////////////////////
  794. +// 14 frames of magica for player_hknight, going to player_stand1
  795. +////////////////////////////////////////////
  796. +
  797. +void() player_hknight_magica1 = [ $magica1, player_hknight_magica2 ] { };
  798. +void() player_hknight_magica2 = [ $magica2, player_hknight_magica3 ] { };
  799. +void() player_hknight_magica3 = [ $magica3, player_hknight_magica4 ] { };
  800. +void() player_hknight_magica4 = [ $magica4, player_hknight_magica5 ] { };
  801. +void() player_hknight_magica5 = [ $magica5, player_hknight_magica6 ] { };
  802. +void() player_hknight_magica6 = [ $magica6, player_hknight_magica7 ] { };
  803. +void() player_hknight_magica7 = [ $magica7, player_hknight_magica8 ] { player_hknight_shot(-2);};
  804. +void() player_hknight_magica8 = [ $magica8, player_hknight_magica9 ] { player_hknight_shot(-1);};
  805. +void() player_hknight_magica9 = [ $magica9, player_hknight_magica10 ] { player_hknight_shot(0);};
  806. +void() player_hknight_magica10 = [ $magica10, player_hknight_magica11 ] { player_hknight_shot(1);};
  807. +void() player_hknight_magica11 = [ $magica11, player_hknight_magica12 ] { player_hknight_shot(2);};
  808. +void() player_hknight_magica12 = [ $magica12, player_hknight_magica13 ] { player_hknight_shot(3);};
  809. +void() player_hknight_magica13 = [ $magica13, player_hknight_magica14 ] { };
  810. +void() player_hknight_magica14 = [ $magica14, player_stand1 ] { };
  811. +
  812. +////////////////////////////////////////////
  813. +// 13 frames of magicb for player_hknight, going to player_stand1
  814. +////////////////////////////////////////////
  815. +
  816. +void() player_hknight_magicb1 = [ $magicb1, player_hknight_magicb2 ] { };
  817. +void() player_hknight_magicb2 = [ $magicb2, player_hknight_magicb3 ] { };
  818. +void() player_hknight_magicb3 = [ $magicb3, player_hknight_magicb4 ] { };
  819. +void() player_hknight_magicb4 = [ $magicb4, player_hknight_magicb5 ] { };
  820. +void() player_hknight_magicb5 = [ $magicb5, player_hknight_magicb6 ] { };
  821. +void() player_hknight_magicb6 = [ $magicb6, player_hknight_magicb7 ] { };
  822. +void() player_hknight_magicb7 = [ $magicb7, player_hknight_magicb8 ] { player_hknight_shot(2);};
  823. +void() player_hknight_magicb8 = [ $magicb8, player_hknight_magicb9 ] { player_hknight_shot(1);};
  824. +void() player_hknight_magicb9 = [ $magicb9, player_hknight_magicb10 ] { player_hknight_shot(0);};
  825. +void() player_hknight_magicb10 = [ $magicb10, player_hknight_magicb11 ] { player_hknight_shot(-1);};
  826. +void() player_hknight_magicb11 = [ $magicb11, player_hknight_magicb12 ] { player_hknight_shot(-2);};
  827. +void() player_hknight_magicb12 = [ $magicb12, player_hknight_magicb13 ] { player_hknight_shot(-3);};
  828. +void() player_hknight_magicb13 = [ $magicb13, player_stand1 ] { };
  829. +
  830. +
  831. +
  832. +void() player_hknight_attack = {
  833. +// FIXME: What about w_attack?
  834. +    self.attack_finished=time+1; // (eh, or so)
  835. +    if(self.weapon == IT_AXE) {
  836. +        // A sword attack
  837. +        sound (self, CHAN_WEAPON, "weapons/ax1.wav", 1, ATTN_NORM);
  838. +        if (random() > 0.66) player_hknight_slice1();
  839. +        else player_hknight_smash1();
  840. +    } else {
  841. +        // A magic attack
  842. +        if (random() > 0.5) player_hknight_magica1();
  843. +        else player_hknight_magicb1();
  844. +    }
  845. +};
  846. +
  847. +void() player_hknight_impulse = {
  848. +    if(self.impulse == 1) self.weapon = IT_AXE;
  849. +    else self.weapon = IT_EXTRA_WEAPON;
  850. +};
  851. +
  852. +string(entity targ, entity attacker) player_hknight_killmsg = {
  853. +    if(attacker.weapon & IT_AXE)
  854. +        return " was slashed by ";
  855. +    else
  856. +        return " was fried by ";
  857. +};
  858. +
  859. +string(entity targ, entity attacker) player_hknight_killmsg2 = {
  860. +    return ".\n";
  861. +};
  862. +
  863. +void() player_hknight_become = {
  864. +    bprint(self.netname);
  865. +    bprint(" has become a hell knight.\n");
  866. +    self._stand=player_hknight_stand;
  867. +    self._run=player_hknight_run;
  868. +    self._pain=player_hknight_pain;
  869. +    self._jump=SUB_Null; // Default player jump
  870. +    self._jump2=SUB_Null;
  871. +    self._attack=player_hknight_attack;
  872. +    self._impulse=player_hknight_impulse;
  873. +    self._can_get_p=SUB_False;
  874. +    self._killmsg=player_hknight_killmsg;
  875. +    self._killmsg2=player_hknight_killmsg2;
  876. +    setmodel(self,"progs/hknight.mdl");
  877. +    self.modelindex_morph=self.modelindex;
  878. +    self.weaponmodel="";
  879. +    self.view_ofs = '0 0 22';
  880. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  881. +    else     setsize (self, '-16 -16 -24', '16 16 40');
  882. +    self.health = self.health * 2.50 / self.health_modifier;
  883. +    self.health_modifier = 2.50;
  884. +    makevectors(self.v_angle);
  885. +    spawn_tfog(self.origin + 20 * v_forward);
  886. +    DropBackpack2();
  887. +};
  888. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-human.qc morph/m-human.qc
  889. --- v101qc/m-human.qc    Wed Dec 31 18:00:00 1969
  890. +++ morph/m-human.qc    Thu Aug 22 17:08:33 1996
  891. @@ -0,0 +1,24 @@
  892. +void() player_human_become = {
  893. +    bprint(self.netname);
  894. +    bprint(" has become a human.\n");
  895. +    self._stand=SUB_Null;
  896. +    self._run=SUB_Null;
  897. +    self._pain=SUB_Null;
  898. +    self._jump=SUB_Null;
  899. +    self._jump2=SUB_Null;
  900. +    self._attack=SUB_Null;
  901. +    self._impulse=SUB_Null;
  902. +    self.health = self.health * 1.0 / self.health_modifier;
  903. +    self.health_modifier = 1.0;
  904. +    self._can_get_p=SUB_True;
  905. +    self._killmsg=SUB_Null;
  906. +    self._killmsg2=SUB_Null;
  907. +    setmodel(self,"progs/player.mdl");
  908. +    self.weapon = W_BestWeapon ();
  909. +    W_SetCurrentAmmo ();
  910. +    self.modelindex_morph=self.modelindex;
  911. +    setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  912. +    self.view_ofs = '0 0 22';
  913. +    makevectors(self.v_angle);
  914. +    spawn_tfog(self.origin + 20 * v_forward);
  915. +};
  916. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-ogre.qc morph/m-ogre.qc
  917. --- v101qc/m-ogre.qc    Wed Dec 31 18:00:00 1969
  918. +++ morph/m-ogre.qc    Thu Aug 22 17:08:36 1996
  919. @@ -0,0 +1,235 @@
  920. +/*
  921. +==============================================================================
  922. +
  923. +OGRE
  924. +
  925. +==============================================================================
  926. +*/
  927. +
  928. +$cd /raid/quake/id1/models/ogre_c
  929. +$origin 0 0 24
  930. +$base base        
  931. +$skin base
  932. +
  933. +$frame    stand1 stand2 stand3 stand4 stand5 stand6 stand7 stand8 stand9
  934. +
  935. +$frame walk1 walk2 walk3 walk4 walk5 walk6 walk7
  936. +$frame walk8 walk9 walk10 walk11 walk12 walk13 walk14 walk15 walk16
  937. +
  938. +$frame run1 run2 run3 run4 run5 run6 run7 run8
  939. +
  940. +$frame swing1 swing2 swing3 swing4 swing5 swing6 swing7
  941. +$frame swing8 swing9 swing10 swing11 swing12 swing13 swing14
  942. +
  943. +$frame smash1 smash2 smash3 smash4 smash5 smash6 smash7
  944. +$frame smash8 smash9 smash10 smash11 smash12 smash13 smash14
  945. +
  946. +$frame shoot1 shoot2 shoot3 shoot4 shoot5 shoot6
  947. +
  948. +$frame pain1 pain2 pain3 pain4 pain5
  949. +
  950. +$frame painb1 painb2 painb3
  951. +
  952. +$frame painc1 painc2 painc3 painc4 painc5 painc6
  953. +
  954. +$frame paind1 paind2 paind3 paind4 paind5 paind6 paind7 paind8 paind9 paind10
  955. +$frame paind11 paind12 paind13 paind14 paind15 paind16
  956. +
  957. +$frame paine1 paine2 paine3 paine4 paine5 paine6 paine7 paine8 paine9 paine10
  958. +$frame paine11 paine12 paine13 paine14 paine15
  959. +
  960. +$frame death1 death2 death3 death4 death5 death6
  961. +$frame death7 death8 death9 death10 death11 death12
  962. +$frame death13 death14
  963. +
  964. +$frame bdeath1 bdeath2 bdeath3 bdeath4 bdeath5 bdeath6
  965. +$frame bdeath7 bdeath8 bdeath9 bdeath10
  966. +
  967. +$frame pull1 pull2 pull3 pull4 pull5 pull6 pull7 pull8 pull9 pull10 pull11
  968. +
  969. +void() player_ogre_stand = [ $stand1, player_stand1 ] {
  970. +    if(self.walkframe >= 9)
  971. +        self.walkframe = 0;
  972. +    self.frame = $stand1 + self.walkframe;
  973. +    self.walkframe = self.walkframe = 1;
  974. +};
  975. +
  976. +void() player_ogre_run = [ $run1, player_run ] {
  977. +    if(self.walkframe >= 8)
  978. +        self.walkframe = 0;
  979. +    self.frame = $run1 + self.walkframe;
  980. +    self.walkframe = self.walkframe + 1;
  981. +};
  982. + 
  983. +////////////////////////////////////////////
  984. +// 5 frames of pain for player_ogre, going to player_stand1
  985. +////////////////////////////////////////////
  986. +
  987. +void() player_ogre_pain1 = [ $pain1, player_ogre_pain2 ] { self.pain_finished = time + 3; sound(self, CHAN_VOICE, "ogre/ogpain1.wav", 1, ATTN_NORM); };
  988. +void() player_ogre_pain2 = [ $pain2, player_ogre_pain3 ] { };
  989. +void() player_ogre_pain3 = [ $pain3, player_ogre_pain4 ] { };
  990. +void() player_ogre_pain4 = [ $pain4, player_ogre_pain5 ] { };
  991. +void() player_ogre_pain5 = [ $pain5, player_stand1 ] { };
  992. +
  993. +void(float side) player_chainsaw =
  994. +{
  995. +local vector    delta;
  996. +local float     ldmg;
  997. +
  998. +    makevectors(self.v_angle);
  999. +
  1000. +    traceline(self.origin, self.origin + v_forward * 100, FALSE, self);
  1001. +    if(trace_fraction == 1.0)
  1002. +        return;
  1003. +    
  1004. +    if(!trace_ent.takedamage) {
  1005. +        // Clank!
  1006. +        sound (self, CHAN_WEAPON, "player/axhit2.wav", 1, ATTN_NORM);
  1007. +        return;
  1008. +    }
  1009. +        
  1010. +    ldmg = (random() + random() + random()) * 4;
  1011. +    T_Damage (trace_ent, self, self, ldmg);
  1012. +    
  1013. +    if (side)
  1014. +    {
  1015. +        makevectors (self.angles);
  1016. +        if (side == 1)
  1017. +            SpawnMeatSpray (self.origin + v_forward*16, crandom() * 100 * v_right);
  1018. +        else
  1019. +            SpawnMeatSpray (self.origin + v_forward*16, side * v_right);
  1020. +    }
  1021. +};
  1022. +
  1023. +void() player_ogre_swing1    =[    $swing1,        player_ogre_swing2    ] {
  1024. +sound (self, CHAN_WEAPON, "ogre/ogsawatk.wav", 1, ATTN_NORM);
  1025. +};
  1026. +void() player_ogre_swing2    =[    $swing2,        player_ogre_swing3    ] {};
  1027. +void() player_ogre_swing3    =[    $swing3,        player_ogre_swing4    ] {};
  1028. +void() player_ogre_swing4    =[    $swing4,        player_ogre_swing5    ] {};
  1029. +void() player_ogre_swing5    =[    $swing5,        player_ogre_swing6    ] { player_chainsaw(0);self.angles_y = self.angles_y + random()*25;};
  1030. +void() player_ogre_swing6    =[    $swing6,        player_ogre_swing7    ] {player_chainsaw(200);self.angles_y = self.angles_y + random()* 25;};
  1031. +void() player_ogre_swing7    =[    $swing7,        player_ogre_swing8    ] {player_chainsaw(0);self.angles_y = self.angles_y + random()* 25;};
  1032. +void() player_ogre_swing8    =[    $swing8,        player_ogre_swing9    ] {player_chainsaw(0);self.angles_y = self.angles_y + random()* 25;};
  1033. +void() player_ogre_swing9    =[    $swing9,        player_ogre_swing10 ] {player_chainsaw(0);self.angles_y = self.angles_y + random()* 25;};
  1034. +void() player_ogre_swing10    =[    $swing10,        player_ogre_swing11 ] {player_chainsaw(-200);self.angles_y = self.angles_y + random()* 25;};
  1035. +void() player_ogre_swing11    =[    $swing11,        player_ogre_swing12 ] {player_chainsaw(0);self.angles_y = self.angles_y + random()* 25;};
  1036. +void() player_ogre_swing12    =[    $swing12,        player_ogre_swing13 ] {};
  1037. +void() player_ogre_swing13    =[    $swing13,        player_ogre_swing14 ] {};
  1038. +void() player_ogre_swing14    =[    $swing14,        player_stand1    ] {};
  1039. +
  1040. +void() player_ogre_smash1    =[    $smash1,            player_stand1 ] {
  1041. +sound (self, CHAN_WEAPON, "ogre/ogsawatk.wav", 1, ATTN_NORM);
  1042. +};
  1043. +void() player_ogre_smash2    =[    $smash2,        player_ogre_smash3    ] {};
  1044. +void() player_ogre_smash3    =[    $smash3,        player_ogre_smash4    ] {};
  1045. +void() player_ogre_smash4    =[    $smash4,        player_ogre_smash5    ] {};
  1046. +void() player_ogre_smash5    =[    $smash5,        player_ogre_smash6    ] {};
  1047. +void() player_ogre_smash6    =[    $smash6,        player_ogre_smash7    ] { player_chainsaw(0);};
  1048. +void() player_ogre_smash7    =[    $smash7,        player_ogre_smash8    ] { player_chainsaw(0);};
  1049. +void() player_ogre_smash8    =[    $smash8,        player_ogre_smash9    ] { player_chainsaw(0);};
  1050. +void() player_ogre_smash9    =[    $smash9,        player_ogre_smash10 ] { player_chainsaw(0);};
  1051. +void() player_ogre_smash10    =[    $smash10,        player_ogre_smash11 ] {player_chainsaw(1);};
  1052. +void() player_ogre_smash11    =[    $smash11,        player_ogre_smash12 ] { player_chainsaw(0);};
  1053. +
  1054. +void() player_ogre_smash12    =[    $smash12,        player_ogre_smash13 ] {};
  1055. +void() player_ogre_smash13    =[    $smash13,        player_ogre_smash14 ] {};
  1056. +void() player_ogre_smash14    =[    $smash14,        player_stand1 ] {};
  1057. +
  1058. +////////////////////////////////////////////
  1059. +// 6 frames of shoot for player_ogre, going to player_stand1
  1060. +////////////////////////////////////////////
  1061. +
  1062. +void() player_ogre_shoot1 = [ $shoot1, player_ogre_shoot2 ] { };
  1063. +void() player_ogre_shoot2 = [ $shoot2, player_ogre_shoot3 ] { };
  1064. +void() player_ogre_shoot3 = [ $shoot3, player_ogre_shoot4 ] { W_FireGrenade();
  1065. +        if(self.ammo_rockets==0) { // When we're out, we fire reeeealllly slow
  1066. +            self.attack_finished = time + 3.0;
  1067. +            self.ammo_rockets=self.currentammo=1;
  1068. +        }
  1069. +};
  1070. +void() player_ogre_shoot4 = [ $shoot4, player_ogre_shoot5 ] { };
  1071. +void() player_ogre_shoot5 = [ $shoot5, player_ogre_shoot6 ] { };
  1072. +void() player_ogre_shoot6 = [ $shoot6, player_stand1 ] { };
  1073. +
  1074. +void() player_ogre_attack = {
  1075. +    if(self.weapon == IT_AXE) {
  1076. +//        if(random()>0.66) {
  1077. +//            self.attack_finished = time + 1.2;
  1078. +//            player_ogre_smash1();
  1079. +//        } else {
  1080. +        self.attack_finished = time + 1.0;
  1081. +        player_ogre_swing1();
  1082. +//        }
  1083. +    } else {
  1084. +        player_ogre_shoot1();
  1085. +        self.attack_finished = time + 0.8;
  1086. +        if(self.ammo_rockets==0) {
  1087. +            self.attack_finished = time + 3.0;
  1088. +            self.ammo_rockets=self.currentammo=1;
  1089. +        }
  1090. +    }
  1091. +};
  1092. +
  1093. +string(entity targ, entity attacker) player_ogre_killmsg = {
  1094. +    if(self.weapon == IT_AXE) return " was sawed to death by ";
  1095. +    else return " eats ";
  1096. +};
  1097. +    
  1098. +string(entity targ, entity attacker) player_ogre_killmsg2 = {
  1099. +    if(self.weapon == IT_AXE) return "\n";
  1100. +    else return "'s pineapple\n";
  1101. +};
  1102. +
  1103. +void() player_ogre_impulse = {
  1104. +    if(self.impulse == 1)
  1105. +        self.weapon = IT_AXE;
  1106. +    else    self.weapon = IT_GRENADE_LAUNCHER;
  1107. +};
  1108. +
  1109. +void(entity s, entity o) player_ogre_can_get_p = {
  1110. +    if(o.touch == ammo_touch && o.weapon==3) {
  1111. +        s.currentammo=s.currentammo+o.aflag;
  1112. +        if(s.currentammo>100) s.currentammo=100;
  1113. +        return 2;
  1114. +    }    
  1115. +    else if(o.touch == BackpackTouch && o.ammo_rockets) {
  1116. +        s.currentammo=s.currentammo+o.ammo_rockets;
  1117. +        if(s.currentammo>100) s.currentammo=100;
  1118. +        o.ammo_shells=o.ammo_nails=o.ammo_cells=0; // He throws 'em away
  1119. +        return 2;
  1120. +    }
  1121. +    else return 0;
  1122. +};
  1123. +
  1124. +void() player_ogre_become = {
  1125. +    local float temprockets;
  1126. +    bprint(self.netname);
  1127. +    bprint(" has become an ogre.\n");
  1128. +    self._stand=player_ogre_stand;
  1129. +    self._run=player_ogre_run;    
  1130. +    self._pain=player_ogre_pain1;
  1131. +    self._jump = SUB_Null;
  1132. +    self._jump2 = SUB_Null;
  1133. +    self._attack=player_ogre_attack;
  1134. +    self._impulse=player_ogre_impulse;
  1135. +    self._can_get_p=player_ogre_can_get_p;
  1136. +    self._killmsg=player_ogre_killmsg;
  1137. +    self._killmsg2=player_ogre_killmsg2;
  1138. +    setmodel(self,"progs/ogre.mdl");
  1139. +    self.modelindex_morph=self.modelindex;
  1140. +    self.weaponmodel="";
  1141. +    self.view_ofs = '0 0 32';
  1142. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  1143. +    else     setsize (self, '-16 -16 -24', '16 16 40');
  1144. +    self.health = self.health * 2.75 / self.health_modifier;
  1145. +    self.health_modifier = 2.75;
  1146. +    makevectors(self.v_angle);
  1147. +    spawn_tfog(self.origin + 20 * v_forward);
  1148. +    temprockets=self.ammo_rockets;
  1149. +    self.ammo_rockets=0;
  1150. +    DropBackpack2();
  1151. +    self.ammo_rockets=temprockets;
  1152. +    self.currentammo=0;
  1153. +    self.weapon=IT_AXE;
  1154. +};
  1155. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-shalra.qc morph/m-shalra.qc
  1156. --- v101qc/m-shalra.qc    Wed Dec 31 18:00:00 1969
  1157. +++ morph/m-shalra.qc    Thu Aug 22 17:12:35 1996
  1158. @@ -0,0 +1,166 @@
  1159. +/*
  1160. +==============================================================================
  1161. +
  1162. +SHAL-RATH
  1163. +
  1164. +==============================================================================
  1165. +*/
  1166. +$cd /raid/quake/id1/models/shalrath
  1167. +$origin 0 0 24
  1168. +$base base
  1169. +$skin skin
  1170. +$scale 0.7
  1171. +
  1172. +$frame attack1 attack2 attack3 attack4 attack5 attack6 attack7 attack8
  1173. +$frame attack9 attack10 attack11
  1174. +
  1175. +$frame pain1 pain2 pain3 pain4 pain5 
  1176. +
  1177. +$frame death1 death2 death3 death4 death5 death6 death7
  1178. +
  1179. +$frame    walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9 walk10
  1180. +$frame    walk11 walk12
  1181. +
  1182. +void() player_shalrath_stand = [ $walk1, player_stand1 ] { };
  1183. +void() player_shalrath_run = {
  1184. +    if(self.walkframe >= 12)
  1185. +        self.walkframe = 0;
  1186. +    self.frame = $walk1 + self.walkframe;
  1187. +    self.walkframe = self.walkframe + 1;
  1188. +};
  1189. +
  1190. +void() player_shalrath_pain1 = [ $pain1, player_shalrath_pain2 ] {sound (self, CHAN_VOICE, "shalrath/pain.wav", 1, ATTN_NORM);};
  1191. +void() player_shalrath_pain2 = [ $pain1, player_shalrath_pain3 ] {};
  1192. +void() player_shalrath_pain3 = [ $pain1, player_shalrath_pain4 ] {};
  1193. +void() player_shalrath_pain4 = [ $pain1, player_shalrath_pain5 ] {};
  1194. +void() player_shalrath_pain5 = [ $pain1, player_stand1 ] {};
  1195. +
  1196. +// void() player_shalrath_jump = { self.velocity_z=10; };
  1197. +
  1198. +void() player_ShalMissileTouch =
  1199. +{
  1200. +    if (other == self.owner)
  1201. +        return;        // don't explode on owner
  1202. +
  1203. +    if (other.classname == "monster_zombie")
  1204. +        T_Damage (other, self, self, 110);    
  1205. +    T_RadiusDamage (self, self.owner, 80, world);
  1206. +    sound (self, CHAN_WEAPON, "weapons/r_exp3.wav", 1, ATTN_NORM);
  1207. +
  1208. +    WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  1209. +    WriteByte (MSG_BROADCAST, TE_EXPLOSION);
  1210. +    WriteCoord (MSG_BROADCAST, self.origin_x);
  1211. +    WriteCoord (MSG_BROADCAST, self.origin_y);
  1212. +    WriteCoord (MSG_BROADCAST, self.origin_z);
  1213. +
  1214. +    self.velocity = '0 0 0';
  1215. +    self.touch = SUB_Null;
  1216. +    setmodel (self, "progs/s_explod.spr");
  1217. +    self.solid = SOLID_NOT;
  1218. +    s_explode1 ();
  1219. +};
  1220. +/*
  1221. +================
  1222. +player_ShalMissile
  1223. +================
  1224. +*/
  1225. +void() ShalHome;
  1226. +void() player_ShalMissile =
  1227. +{
  1228. +    local    entity     missile;
  1229. +
  1230. +    makevectors(self.v_angle);
  1231. +
  1232. +    self.effects = self.effects | EF_MUZZLEFLASH;
  1233. +    sound (self, CHAN_WEAPON, "shalrath/attack2.wav", 1, ATTN_NORM);
  1234. +
  1235. +    missile = spawn ();
  1236. +    missile.owner = self;
  1237. +
  1238. +    missile.solid = SOLID_BBOX;
  1239. +    missile.movetype = MOVETYPE_FLYMISSILE;
  1240. +    setmodel (missile, "progs/v_spike.mdl");
  1241. +
  1242. +    setsize (missile, '0 0 0', '0 0 0');        
  1243. +
  1244. +    makevectors (self.v_angle);
  1245. +    if(self.enemy.classname == "worldspawn") {
  1246. +        traceline (self.origin, self.origin + v_forward * 2048, FALSE, self);
  1247. +        self.enemy=trace_ent;
  1248. +    }
  1249. +    missile.velocity = v_forward;
  1250. +    if(self.enemy.classname == "worldspawn") {
  1251. +        missile.enemy = world;
  1252. +        //missile.velocity = v_forward;
  1253. +    } else {
  1254. +        missile.enemy = self.enemy;
  1255. +        //missile.velocity = normalize(self.enemy.origin - self.origin);
  1256. +    }
  1257. +
  1258. +    missile.velocity = missile.velocity * 400;
  1259. +    missile.angles = vectoangles(missile.velocity);
  1260. +
  1261. +    missile.origin = self.origin + '0 0 10';
  1262. +    missile.avelocity = '300 300 300';
  1263. +    missile.nextthink = 0.4 + time;
  1264. +    missile.think = ShalHome;
  1265. +    missile.touch = player_ShalMissileTouch;
  1266. +};
  1267. +
  1268. +void() player_shalrath_attack1 = [ $attack1, player_shalrath_attack2 ] {
  1269. +    local vector v;
  1270. +    sound (self, CHAN_VOICE, "shalrath/attack.wav", 1, ATTN_NORM);
  1271. +    self.attack_finished=time+1;
  1272. +    makevectors(self.v_angle);
  1273. +    v=aim(self, 2048);
  1274. +    traceline(self.origin+ self.view_ofs, self.origin+v * 2048 + self.view_ofs, FALSE, self);
  1275. +    if((trace_ent.classname != "worldspawn") && (trace_ent.takedamage & DAMAGE_AIM)) {
  1276. +        self.enemy = trace_ent;
  1277. +    } else if(self.enemy) {
  1278. +        if(!visible(self.enemy)) self.enemy=world;
  1279. +        if(!infront(self.enemy)) self.enemy=world;
  1280. +        if(self.enemy.health <=0) self.enemy=world;
  1281. +        if(self.enemy.takedamage != DAMAGE_AIM) self.enemy=world;
  1282. +    }
  1283. +};
  1284. +void() player_shalrath_attack2 = [ $attack2, player_shalrath_attack3 ] {};
  1285. +void() player_shalrath_attack3 = [ $attack4, player_shalrath_attack4 ] {};
  1286. +void() player_shalrath_attack4 = [ $attack8, player_shalrath_attack5 ] {};
  1287. +void() player_shalrath_attack5 = [ $attack10, player_stand1 ] {player_ShalMissile(); };
  1288. +    
  1289. +
  1290. +string() player_shalrath_killmsg = {
  1291. +    return " was exploded by ";
  1292. +};
  1293. +
  1294. +string() player_shalrath_killmsg2 = {
  1295. +    return ".\n";
  1296. +};
  1297. +
  1298. +void() player_shalrath_become = {
  1299. +    bprint(self.netname);
  1300. +    bprint(" has become a vore.\n");
  1301. +    self._stand=player_shalrath_stand;
  1302. +    self._run=player_shalrath_run;
  1303. +    self._pain=player_shalrath_pain1;
  1304. +    self._jump=SUB_Null;
  1305. +    self._jump2=SUB_Null;
  1306. +    self._attack=player_shalrath_attack1;
  1307. +    self._impulse=SUB_Nop;
  1308. +    self._can_get_p=SUB_False;
  1309. +    self._killmsg=player_shalrath_killmsg;
  1310. +    self._killmsg2=player_shalrath_killmsg2;
  1311. +    setmodel(self,"progs/shalrath.mdl");
  1312. +    self.modelindex_morph=self.modelindex;
  1313. +    self.weaponmodel="";
  1314. +    self.view_ofs = '0 0 22';
  1315. +    //setsize (self, VEC_HULL2_MIN, VEC_HULL2_MAX);
  1316. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  1317. +    else     setsize (self, VEC_HULL2_MIN, VEC_HULL2_MAX);
  1318. +    
  1319. +    self.health = self.health * 3.0 / self.health_modifier;
  1320. +    self.health_modifier = 3.0;
  1321. +    makevectors(self.v_angle);
  1322. +    spawn_tfog(self.origin + 20 * v_forward);
  1323. +    DropBackpack2();
  1324. +};
  1325. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-shambl.qc morph/m-shambl.qc
  1326. --- v101qc/m-shambl.qc    Wed Dec 31 18:00:00 1969
  1327. +++ morph/m-shambl.qc    Thu Aug 22 17:08:42 1996
  1328. @@ -0,0 +1,278 @@
  1329. +/*
  1330. +==============================================================================
  1331. +
  1332. +SHAMBLER
  1333. +
  1334. +==============================================================================
  1335. +*/
  1336. +
  1337. +$cd /raid/quake/id1/models/shams
  1338. +$origin 0 0 24
  1339. +$base base        
  1340. +$skin base
  1341. +
  1342. +$frame stand1 stand2 stand3 stand4 stand5 stand6 stand7 stand8 stand9
  1343. +$frame stand10 stand11 stand12 stand13 stand14 stand15 stand16 stand17
  1344. +
  1345. +$frame walk1 walk2 walk3 walk4 walk5 walk6 walk7 
  1346. +$frame walk8 walk9 walk10 walk11 walk12
  1347. +
  1348. +$frame    run1 run2 run3 run4 run5 run6
  1349. +
  1350. +$frame smash1 smash2 smash3 smash4 smash5 smash6 smash7 
  1351. +$frame smash8 smash9 smash10 smash11 smash12
  1352. +
  1353. +$frame swingr1 swingr2 swingr3 swingr4 swingr5 
  1354. +$frame swingr6 swingr7 swingr8 swingr9
  1355. +
  1356. +$frame swingl1 swingl2 swingl3 swingl4 swingl5 
  1357. +$frame swingl6 swingl7 swingl8 swingl9
  1358. +
  1359. +$frame magic1 magic2 magic3 magic4 magic5 
  1360. +$frame magic6 magic7 magic8 magic9 magic10 magic11 magic12
  1361. +
  1362. +$frame pain1 pain2 pain3 pain4 pain5 pain6
  1363. +
  1364. +$frame death1 death2 death3 death4 death5 death6 
  1365. +$frame death7 death8 death9 death10 death11
  1366. +
  1367. +void() player_shambler_stand = [ $stand1, player_stand1 ] {
  1368. +    if(self.walkframe >=  17)
  1369. +        self.walkframe = 0;
  1370. +    self.frame = $stand1 + self.walkframe;
  1371. +    self.walkframe = self.walkframe + 1;
  1372. +};
  1373. +     
  1374. +void() player_shambler_run = [ $run1, player_run ] {
  1375. +    if(self.walkframe >= 6) 
  1376. +        self.walkframe = 0;
  1377. +    self.frame = $run1 + self.walkframe;
  1378. +    self.walkframe = self.walkframe + 1;
  1379. +};
  1380. +
  1381. +////////////////////////////////////////////
  1382. +// 5 frames of pain for player_shambler, going to player_stand1
  1383. +////////////////////////////////////////////
  1384. +
  1385. +void() player_shambler_pain1 = [ $pain1, player_shambler_pain2 ] { };
  1386. +void() player_shambler_pain2 = [ $pain2, player_shambler_pain3 ] { };
  1387. +void() player_shambler_pain3 = [ $pain3, player_shambler_pain4 ] { };
  1388. +void() player_shambler_pain4 = [ $pain4, player_shambler_pain5 ] { };
  1389. +void() player_shambler_pain5 = [ $pain5, player_stand1 ] { };
  1390. +
  1391. +void(entity attacker, float damage)    player_shambler_pain =
  1392. +{
  1393. +    sound (self, CHAN_VOICE, "shambler/shurt2.wav", 1, ATTN_NORM);
  1394. +
  1395. +    if (self.health <= 0)
  1396. +        return;        // allready dying, don't go into pain frame
  1397. +
  1398. +    if (random()*400 > damage)
  1399. +        return;        // didn't flinch
  1400. +
  1401. +    if (self.pain_finished > time)
  1402. +        return;
  1403. +    self.pain_finished = time + 2;
  1404. +        
  1405. +    player_shambler_pain1 ();
  1406. +};
  1407. +
  1408. +void() player_CastLightning =
  1409. +{
  1410. +    local    vector    org, dir;
  1411. +    
  1412. +    self.effects = self.effects | EF_MUZZLEFLASH;
  1413. +
  1414. +    if(self.waterlevel > 1) {
  1415. +        T_RadiusDamage(self, self, self.health, world); /* We all die! */
  1416. +        return;
  1417. +    }
  1418. +
  1419. +    org = self.origin + '0 0 40';
  1420. +
  1421. +    makevectors (self.v_angle);
  1422. +    dir = normalize (v_forward);
  1423. +
  1424. +    traceline (org, self.origin + dir*4096, TRUE, self);
  1425. +
  1426. +    WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  1427. +    WriteByte (MSG_BROADCAST, TE_LIGHTNING1);
  1428. +    WriteEntity (MSG_BROADCAST, self);
  1429. +    WriteCoord (MSG_BROADCAST, org_x);
  1430. +    WriteCoord (MSG_BROADCAST, org_y);
  1431. +    WriteCoord (MSG_BROADCAST, org_z);
  1432. +    WriteCoord (MSG_BROADCAST, trace_endpos_x);
  1433. +    WriteCoord (MSG_BROADCAST, trace_endpos_y);
  1434. +    WriteCoord (MSG_BROADCAST, trace_endpos_z);
  1435. +
  1436. +    LightningDamage (org, trace_endpos, self, 10);
  1437. +};
  1438. +
  1439. +void() player_shambler_magic1     =[      $magic1,       player_shambler_magic2    ] {
  1440. +    sound (self, CHAN_WEAPON, "shambler/sattck1.wav", 1, ATTN_NORM);
  1441. +    self.attack_finished=time+1.1;
  1442. +};
  1443. +void() player_shambler_magic2     =[      $magic2,       player_shambler_magic3    ] {};
  1444. +void() player_shambler_magic3     =[      $magic3,       player_shambler_magic4    ] {
  1445. +    local entity o;
  1446. +    self.effects = self.effects | EF_MUZZLEFLASH;
  1447. +    self.owner = spawn();
  1448. +    o = self.owner;
  1449. +    setmodel (o, "progs/s_light.mdl");
  1450. +    setorigin (o, self.origin);
  1451. +    o.angles = self.angles;
  1452. +    o.nextthink = time + 0.7;
  1453. +    o.think = SUB_Remove;
  1454. +};
  1455. +void() player_shambler_magic4     =[      $magic4,       player_shambler_magic5    ]
  1456. +{ self.effects = self.effects | EF_MUZZLEFLASH; self.owner.frame = 1; };
  1457. +void() player_shambler_magic5     =[      $magic5,       player_shambler_magic6    ]
  1458. +{ self.effects = self.effects | EF_MUZZLEFLASH; self.owner.frame = 2; };
  1459. +void() player_shambler_magic6     =[      $magic6,       player_shambler_magic9    ] {
  1460. +    remove (self.owner);
  1461. +    player_CastLightning();
  1462. +    sound (self, CHAN_WEAPON, "shambler/sboom.wav", 1, ATTN_NORM);
  1463. +};
  1464. +void() player_shambler_magic9     =[      $magic9,       player_shambler_magic10   ]
  1465. +{player_CastLightning();};
  1466. +void() player_shambler_magic10    =[      $magic10,      player_shambler_magic11   ]
  1467. +{player_CastLightning();};
  1468. +void() player_shambler_magic11    =[      $magic11,      player_shambler_magic12   ]
  1469. +{player_CastLightning();};
  1470. +void() player_shambler_magic12    =[      $magic12,      player_stand1       ] {};
  1471. +
  1472. +void() player_shambler_swingr1;
  1473. +
  1474. +void(float side) player_ShamClaw =
  1475. +{
  1476. +
  1477. +    local    vector    source;
  1478. +    local    vector    org;
  1479. +    local float     ldmg;
  1480. +
  1481. +    sound (self, CHAN_VOICE, "shambler/smack.wav", 1, ATTN_NORM);
  1482. +
  1483. +    source = self.origin + '0 0 16';
  1484. +    traceline (source, source + v_forward*128, FALSE, self);
  1485. +    if (trace_fraction == 1.0)
  1486. +        return;
  1487. +    
  1488. +    org = trace_endpos - v_forward*4;
  1489. +
  1490. +    if (trace_ent.takedamage)
  1491. +    {
  1492. +        trace_ent.axhitme = 1;
  1493. +        SpawnBlood (org, '0 0 0', 20);
  1494. +        if (side)
  1495. +        {
  1496. +            makevectors (self.angles);
  1497. +            SpawnMeatSpray (self.origin + v_forward*16, side * v_right);
  1498. +        }
  1499. +        ldmg = (random() + random() + random()) * 20;
  1500. +        T_Damage (trace_ent, self, self, ldmg);
  1501. +    }
  1502. +    else
  1503. +    {    // hit wall
  1504. +        sound (self, CHAN_WEAPON, "player/axhit2.wav", 1, ATTN_NORM);
  1505. +        WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  1506. +        WriteByte (MSG_BROADCAST, TE_GUNSHOT);
  1507. +        WriteCoord (MSG_BROADCAST, org_x);
  1508. +        WriteCoord (MSG_BROADCAST, org_y);
  1509. +        WriteCoord (MSG_BROADCAST, org_z);
  1510. +    }
  1511. +
  1512. +};
  1513. +
  1514. +void() player_shambler_smash1     =[      $smash1,       player_shambler_smash2    ] {
  1515. +sound (self, CHAN_VOICE, "shambler/melee1.wav", 1, ATTN_NORM);
  1516. +};
  1517. +void() player_shambler_smash2     =[      $smash2,       player_shambler_smash3    ] {};
  1518. +void() player_shambler_smash3     =[      $smash3,       player_shambler_smash4    ] {};
  1519. +void() player_shambler_smash4     =[      $smash4,       player_shambler_smash5    ] {};
  1520. +void() player_shambler_smash5     =[      $smash5,       player_shambler_smash6    ] {};
  1521. +void() player_shambler_smash6     =[      $smash6,       player_shambler_smash7    ] {};
  1522. +void() player_shambler_smash7     =[      $smash7,       player_shambler_smash8    ] {};
  1523. +void() player_shambler_smash8     =[      $smash8,       player_shambler_smash9    ] {};
  1524. +void() player_shambler_smash9     =[      $smash9,       player_shambler_smash10   ] {player_ShamClaw(150); };
  1525. +void() player_shambler_smash10    =[      $smash10,      player_shambler_smash11   ] {player_ShamClaw(150);};
  1526. +void() player_shambler_smash11    =[      $smash11,      player_shambler_smash12   ] {player_ShamClaw(150);};
  1527. +void() player_shambler_smash12    =[      $smash12,      player_run       ] {};
  1528. +
  1529. +void() player_shambler_swingl1    =[      $swingl1,      player_shambler_swingl2   ] {
  1530. +sound (self, CHAN_VOICE, "shambler/melee2.wav", 1, ATTN_NORM);
  1531. +};
  1532. +void() player_shambler_swingl2 =[      $swingl2,      player_shambler_swingl3   ] {};
  1533. +void() player_shambler_swingl3 =[      $swingl3,      player_shambler_swingl4   ] {};
  1534. +void() player_shambler_swingl4 =[      $swingl4,      player_shambler_swingl5   ] {};
  1535. +void() player_shambler_swingl5 =[      $swingl5,      player_shambler_swingl6   ] {};
  1536. +void() player_shambler_swingl6 =[      $swingl6,      player_shambler_swingl7   ] {};
  1537. +void() player_shambler_swingl7 =[      $swingl7,      player_shambler_swingl8   ] { player_ShamClaw(250);};
  1538. +void() player_shambler_swingl8 =[      $swingl8,      player_shambler_swingl9   ] {};
  1539. +void() player_shambler_swingl9 =[      $swingl9,      player_run  ] {};
  1540. +
  1541. +void() player_shambler_swingr1    =[      $swingr1,      player_shambler_swingr2   ] {
  1542. +sound (self, CHAN_VOICE, "shambler/melee1.wav", 1, ATTN_NORM);
  1543. +};
  1544. +void() player_shambler_swingr2    =[      $swingr2,      player_shambler_swingr3   ] {};
  1545. +void() player_shambler_swingr3 =[      $swingr3,      player_shambler_swingr4   ] {};
  1546. +void() player_shambler_swingr4 =[      $swingr4,      player_shambler_swingr5   ] {};
  1547. +void() player_shambler_swingr5 =[      $swingr5,      player_shambler_swingr6   ] {};
  1548. +void() player_shambler_swingr6 =[      $swingr6,      player_shambler_swingr7   ] {};
  1549. +void() player_shambler_swingr7 =[      $swingr7,      player_shambler_swingr8   ] { player_ShamClaw(-250);};
  1550. +void() player_shambler_swingr8 =[      $swingr8,      player_shambler_swingr9   ] {};
  1551. +void() player_shambler_swingr9 =[      $swingr9,      player_run  ] { };
  1552. +
  1553. +void() player_shambler_attack = {
  1554. +    if(self.weapon == IT_AXE) {
  1555. +        if(random()>0.9) {
  1556. +            self.attack_finished = time + 1.1;
  1557. +            player_shambler_smash1();
  1558. +        } else if(random()>0.5) {
  1559. +            self.attack_finished = time + 0.8;
  1560. +            player_shambler_swingl1();
  1561. +        } else {
  1562. +            self.attack_finished = time + 0.8;
  1563. +            player_shambler_swingr1();
  1564. +        }
  1565. +    } else {
  1566. +        player_shambler_magic1();
  1567. +    }
  1568. +};
  1569. +
  1570. +void() player_shambler_impulse = {
  1571. +    if(self.impulse == 1) self.weapon = IT_AXE;
  1572. +    else self.weapon = IT_EXTRA_WEAPON;
  1573. +};
  1574. +
  1575. +string(entity targ, entity attacker) player_shambler_killmsg = {
  1576. +    if(attacker.weapon == IT_AXE) return " was smashed by ";
  1577. +    else return " was zapped by ";
  1578. +};
  1579. +
  1580. +string() player_shambler_killmsg2 = { return "\n"; };
  1581. +
  1582. +void() player_shambler_become = {
  1583. +    bprint(self.netname);
  1584. +    bprint(" has become a shambler.\n");
  1585. +    self._stand=player_shambler_stand;
  1586. +    self._run=player_shambler_run;
  1587. +    self._pain=player_shambler_pain1;
  1588. +    self._jump=SUB_Null;
  1589. +    self._jump2=SUB_Null;
  1590. +    self._attack=player_shambler_attack;
  1591. +    self._impulse=player_shambler_impulse;
  1592. +    self._can_get_p=SUB_False;
  1593. +    self._killmsg=player_shambler_killmsg;
  1594. +    self._killmsg2=player_shambler_killmsg2;
  1595. +    setmodel(self,"progs/shambler.mdl");
  1596. +    self.modelindex_morph=self.modelindex;
  1597. +    self.weaponmodel = "";
  1598. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  1599. +    else     setsize (self, VEC_HULL2_MIN, VEC_HULL2_MAX);
  1600. +    self.view_ofs = '0 0 32';
  1601. +    self.health = self.health * 4.0 / self.health_modifier;
  1602. +    self.health_modifier = 4.0;
  1603. +    makevectors(self.v_angle);
  1604. +    spawn_tfog(self.origin + 20 * v_forward);
  1605. +    DropBackpack2();
  1606. +};
  1607. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-template.qc morph/m-template.qc
  1608. --- v101qc/m-template.qc    Wed Dec 31 18:00:00 1969
  1609. +++ morph/m-template.qc    Thu Aug 22 17:08:45 1996
  1610. @@ -0,0 +1,81 @@
  1611. +/// This is a template for adding a new morph.
  1612. +///
  1613. +/// Complete the fields you want to change from the base player
  1614. +///
  1615. +/// Add appropriate pre-caching for any sounds/models you use in this morph
  1616. +///
  1617. +/// Then add some way (an item, impulse, or anything else) to call
  1618. +/// player_XXX_become
  1619. +///
  1620. +/// The various fields you can set are:
  1621. +/// Functions:
  1622. +///
  1623. +/// _stand:  We want to show the standing animation
  1624. +/// _run:    We want to show the running/moving animation
  1625. +///          (You could check if the vlen(self.velocity) is large or small,
  1626. +///           and show either a running animation or a walking animation,
  1627. +///           since both are present in many monsters)
  1628. +/// _pain:   We just got hurt.  Maybe show a pain animation, make a sound, ...
  1629. +/// _jump, _jump2:   Player pressed the jump button.  Checks (in water, on ground)
  1630. +///          are _not_ made before _jump is called, but are made before _jump2 is
  1631. +///          called.  _jump2 is not called if _jump is not SUB_Null.
  1632. +/// _attack: time > self.attack_finished and we are pressing fire
  1633. +///          show attack animation, fire projectiles, set self.attack_finished
  1634. +///          Maybe check self.weapon, which can be set from _impulse
  1635. +/// _impulse: An impulse command from 1..9 was pressed.  Switch  weapon or do
  1636. +///          whatever else is appropriate 
  1637. +/// _can_get_p: Return true if player can get the item, or false if not.
  1638. +///          Note that 'self' is _not_ the player in _can_get_p.
  1639. +///          SUB_True and SUB_False can be used here.
  1640. +///          Currently, morphed players can _always_ get health
  1641. +///          Return 0 for 'not get', return 1 for 'can get'.
  1642. +///          In the case of ammo, return '2' for 'get, but don't update weapon'
  1643. +///          (I should add SUB_get_powerups/SUB_get_ammo, ...
  1644. +///           Or maybe make a bitfield, FL_GET_AMMO, FL_GET_WEAPON, ... ?)
  1645. +/// _killmsg, _killmsg2: Return the message that should be printed,
  1646. +///          similarly to the code in client.qc.  Again, self is not player
  1647. +///
  1648. +/// SUB_Null means to use the default player action,
  1649. +/// SUB_Nop means that the action does nothing (such as jump for the zombie)
  1650. +///
  1651. +///
  1652. +/// Variables:
  1653. +/// modelindex_morph: setmodel to the new model for player, then
  1654. +///          self.modelindex_morph=self.modelindex
  1655. +/// weaponmode, view_ofs: regular meaning
  1656. +/// health_modifier: the amount that health should be divided by when
  1657. +///          changing to another morph.  Generally, you multiply by this
  1658. +///          same number when becoming that morph
  1659. +///
  1660. +/// Call DropBackpack2() if it is inappropriate for the player to carry
  1661. +/// ammo in his new morph
  1662. +///
  1663. +/// If it's necessary to add a new behaviours, make sure you amend 
  1664. +/// the other player_*_become() to set it back the way it was
  1665. +
  1666. +void() player_template_become = {
  1667. +    bprint(self.netname);
  1668. +    bprint(" has become a template.\n");
  1669. +
  1670. +    self._stand=player_template_stand;
  1671. +    self._run=player_template_run;    
  1672. +    self._pain=player_template_pain;
  1673. +    self._jump=player_template_jump;
  1674. +    self._jump2=player_template_jump2;
  1675. +    self._attack=player_template_attack;
  1676. +    self._impulse=player_template_impulse;
  1677. +    self._can_get_p=player_template_can_get_p;
  1678. +    self._killmsg=player_template_killmsg;
  1679. +    self._killmsg2=player_template_killmsg2;
  1680. +    setmodel(self,"progs/template.mdl");
  1681. +    self.modelindex_morph=self.modelindex;
  1682. +    self.weaponmodel="";
  1683. +    self.view_ofs = '0 0 22';
  1684. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  1685. +    else     setsize (self, '-16 -16 -24', '16 16 40');
  1686. +    self.health = self.health * 0.75 / self.health_modifier;
  1687. +    self.health_modifier = 0.75;
  1688. +    makevectors(self.v_angle);
  1689. +    spawn_tfog(self.origin + 20 * v_forward);
  1690. +    DropBackpack2();
  1691. +};
  1692. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-wizard.qc morph/m-wizard.qc
  1693. --- v101qc/m-wizard.qc    Wed Dec 31 18:00:00 1969
  1694. +++ morph/m-wizard.qc    Thu Aug 22 17:09:08 1996
  1695. @@ -0,0 +1,151 @@
  1696. +
  1697. +/*
  1698. +==============================================================================
  1699. +
  1700. +WIZARD
  1701. +
  1702. +==============================================================================
  1703. +*/
  1704. +
  1705. +$cd /raid/quake/id1/models/a_wizard
  1706. +$origin 0 0 24
  1707. +$base wizbase    
  1708. +$skin wizbase
  1709. +
  1710. +$frame hover1 hover2 hover3 hover4 hover5 hover6 hover7 hover8
  1711. +$frame hover9 hover10 hover11 hover12 hover13 hover14 hover15
  1712. +
  1713. +$frame fly1 fly2 fly3 fly4 fly5 fly6 fly7 fly8 fly9 fly10
  1714. +$frame fly11 fly12 fly13 fly14
  1715. +
  1716. +$frame attack1 attack2 attack3 attack4 attack5 attack6 attack7
  1717. +$frame attack8 attack9 attack10 attack11 attack12 attack13
  1718. +
  1719. +$frame pain1 pain2 pain3 pain4
  1720. +
  1721. +$frame death1 death2 death3 death4 death5 death6 death7 death8
  1722. +
  1723. +void() player_wizard_stand = [ $hover1, player_stand1 ] {
  1724. +    if(self.walkframe >= 15)
  1725. +        self.walkframe = 0;
  1726. +    self.frame = $hover1 + self.walkframe;
  1727. +    self.walkframe = self.walkframe + 1;
  1728. +};
  1729. +
  1730. +void() player_wizard_run = [ $fly1, player_run ] {
  1731. +    if(self.walkframe >= 14)
  1732. +        self.walkframe=0;
  1733. +    self.frame = $fly1 + self.walkframe;
  1734. +    self.walkframe = self.walkframe + 1;
  1735. +};
  1736. +
  1737. +void() player_wizard_jump = {
  1738. +    self.velocity_z = 200;
  1739. +    Wiz_idlesound();
  1740. +};
  1741. +
  1742. +////////////////////////////////////////////
  1743. +// 4 frames of pain for player_wizard, going to player_stand1
  1744. +////////////////////////////////////////////
  1745. +
  1746. +void() player_wizard_pain1 = [ $pain1, player_wizard_pain2 ] {
  1747. +    sound (self, CHAN_VOICE, "wizard/wpain.wav", 1, ATTN_NORM);
  1748. +};
  1749. +void() player_wizard_pain2 = [ $pain2, player_wizard_pain3 ] { };
  1750. +void() player_wizard_pain3 = [ $pain3, player_wizard_pain4 ] { };
  1751. +void() player_wizard_pain4 = [ $pain4, player_stand1 ] { };
  1752. +
  1753. +void() player_Wiz_FastFire = {
  1754. +    local float offset;
  1755. +    local entity missile;
  1756. +    local vector dir;
  1757. +
  1758. +    if(random()>0.75) offset=0;
  1759. +    else if(random()>0.5) offset=0-(random()*10);
  1760. +    else offset=random()*10;
  1761. +
  1762. +    dir=self.v_angle;
  1763. +    dir_y=dir_y+offset;
  1764. +
  1765. +//    self.punchangle_x = -2;
  1766. +
  1767. +    missile = spawn ();
  1768. +    missile.owner = self;
  1769. +    missile.movetype = MOVETYPE_FLYMISSILE;
  1770. +    missile.solid = SOLID_BBOX;
  1771. +        
  1772. +// set missile speed    
  1773. +
  1774. +    missile.origin = self.origin;
  1775. +    makevectors (dir);
  1776. +    // missile.velocity = aim(self, 600);
  1777. +    missile.velocity = normalize(v_forward);
  1778. +    missile.velocity = missile.velocity * 1000;
  1779. +    missile.angles = vectoangles(missile.velocity);
  1780. +    missile.classname = "wizspike";
  1781. +    setmodel(missile, "progs/w_spike.mdl");
  1782. +    setsize(missile, '0 0 0', '0 0 0');
  1783. +    missile.touch = spike_touch;
  1784. +};
  1785. +
  1786. +////////////////////////////////////////////
  1787. +// 13 frames of attack for player_wizard, going to player_stand1
  1788. +////////////////////////////////////////////
  1789. +
  1790. +/*
  1791. +void() player_wizard_attack1 = [ $attack1, player_wizard_attack2 ] { self.attack_finished = time + 1.5; };
  1792. +void() player_wizard_attack2 = [ $attack2, player_wizard_attack3 ] { };
  1793. +void() player_wizard_attack3 = [ $attack3, player_wizard_attack4 ] { };
  1794. +void() player_wizard_attack4 = [ $attack4, player_wizard_attack5 ] { };
  1795. +void() player_wizard_attack5 = [ $attack5, player_wizard_attack6 ] { };
  1796. +void() player_wizard_attack6 = [ $attack6, player_wizard_attack7 ] { };
  1797. +void() player_wizard_attack7 = [ $attack7, player_wizard_attack8 ] { };
  1798. +void() player_wizard_attack8 = [ $attack8, player_wizard_attack9 ] { };
  1799. +void() player_wizard_attack9 = [ $attack9, player_wizard_attack10 ] { };
  1800. +void() player_wizard_attack10 = [ $attack10, player_wizard_attack11 ] { };
  1801. +void() player_wizard_attack11 = [ $attack11, player_wizard_attack12 ] { sound(self, CHAN_WEAPON, "wizard/wattack.wav", 1, ATTN_NORM);};
  1802. +void() player_wizard_attack12 = [ $attack12, player_wizard_attack13 ] {player_Wiz_FastFire(-10); };
  1803. +void() player_wizard_attack13 = [ $attack13, player_stand1 ] { player_Wiz_FastFire(-10);};
  1804. +*/
  1805. +
  1806. +void() player_wizard_attack1 = [ $attack1, player_wizard_attack3 ] { self.attack_finished = time + 1.0; };
  1807. +void() player_wizard_attack2 = [ $attack3, player_wizard_attack3 ] { };
  1808. +void() player_wizard_attack3 = [ $attack5, player_wizard_attack4 ] { };
  1809. +void() player_wizard_attack4 = [ $attack7, player_wizard_attack5 ] { sound(self, CHAN_WEAPON, "wizard/wattack.wav", 1, ATTN_NORM); };
  1810. +void() player_wizard_attack5 = [ $attack9, player_wizard_attack6 ] { player_Wiz_FastFire(); };
  1811. +void() player_wizard_attack6 = [ $attack11, player_wizard_attack7 ] { player_Wiz_FastFire(); };
  1812. +void() player_wizard_attack7 = [ $attack13, player_stand1 ] { player_Wiz_FastFire();};
  1813. +
  1814. +string() player_wizard_killmsg = {
  1815. +    return " was scragged by ";
  1816. +};
  1817. +
  1818. +string() player_wizard_killmsg2 = {
  1819. +    return ".\n";
  1820. +};
  1821. +
  1822. +void() player_wizard_become = {
  1823. +    bprint(self.netname);
  1824. +    bprint(" has become a scrag.\n");
  1825. +    self._stand=player_wizard_stand;
  1826. +    self._run=player_wizard_run;
  1827. +    self._pain=player_wizard_pain1;
  1828. +    self._jump=player_wizard_jump;
  1829. +    self._jump2=player_wizard_jump;
  1830. +    self._attack=player_wizard_attack1;
  1831. +    self._impulse=SUB_Nop;
  1832. +    self._can_get_p=SUB_False;
  1833. +    self._killmsg=player_wizard_killmsg;
  1834. +    self._killmsg2=player_wizard_killmsg2;
  1835. +    setmodel(self,"progs/wizard.mdl");
  1836. +    self.modelindex_morph=self.modelindex;
  1837. +    self.weaponmodel = "";
  1838. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  1839. +    else     setsize (self, '-16 -16 -24', '16 16 40');
  1840. +    self.view_ofs = '0 0 22';
  1841. +    self.health = self.health * 2.0 / self.health_modifier;
  1842. +    self.health_modifier = 2.0;
  1843. +    makevectors(self.v_angle);
  1844. +    spawn_tfog(self.origin + 20 * v_forward);
  1845. +    DropBackpack2();
  1846. +};
  1847. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/m-zombie.qc morph/m-zombie.qc
  1848. --- v101qc/m-zombie.qc    Wed Dec 31 18:00:00 1969
  1849. +++ morph/m-zombie.qc    Thu Aug 22 17:09:17 1996
  1850. @@ -0,0 +1,347 @@
  1851. +$cd /raid/quake/id1/models/zombie
  1852. +
  1853. +$origin    0 0 24
  1854. +
  1855. +$base base
  1856. +$skin skin
  1857. +
  1858. +$frame stand1 stand2 stand3 stand4 stand5 stand6 stand7 stand8
  1859. +$frame stand9 stand10 stand11 stand12 stand13 stand14 stand15
  1860. +
  1861. +$frame walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9 walk10 walk11
  1862. +$frame walk12 walk13 walk14 walk15 walk16 walk17 walk18 walk19
  1863. +
  1864. +$frame run1 run2 run3 run4 run5 run6 run7 run8 run9 run10 run11 run12
  1865. +$frame run13 run14 run15 run16 run17 run18
  1866. +
  1867. +$frame atta1 atta2 atta3 atta4 atta5 atta6 atta7 atta8 atta9 atta10 atta11
  1868. +$frame atta12 atta13
  1869. +
  1870. +$frame attb1 attb2 attb3 attb4 attb5 attb6 attb7 attb8 attb9 attb10 attb11
  1871. +$frame attb12 attb13 attb14
  1872. +
  1873. +$frame attc1 attc2 attc3 attc4 attc5 attc6 attc7 attc8 attc9 attc10 attc11
  1874. +$frame attc12
  1875. +
  1876. +$frame paina1 paina2 paina3 paina4 paina5 paina6 paina7 paina8 paina9 paina10
  1877. +$frame paina11 paina12
  1878. +
  1879. +$frame painb1 painb2 painb3 painb4 painb5 painb6 painb7 painb8 painb9 painb10
  1880. +$frame painb11 painb12 painb13 painb14 painb15 painb16 painb17 painb18 painb19
  1881. +$frame painb20 painb21 painb22 painb23 painb24 painb25 painb26 painb27 painb28
  1882. +
  1883. +$frame painc1 painc2 painc3 painc4 painc5 painc6 painc7 painc8 painc9 painc10
  1884. +$frame painc11 painc12 painc13 painc14 painc15 painc16 painc17 painc18
  1885. +
  1886. +$frame paind1 paind2 paind3 paind4 paind5 paind6 paind7 paind8 paind9 paind10
  1887. +$frame paind11 paind12 paind13
  1888. +
  1889. +$frame paine1 paine2 paine3 paine4 paine5 paine6 paine7 paine8 paine9 paine10
  1890. +$frame paine11 paine12 paine13 paine14 paine15 paine16 paine17 paine18 paine19
  1891. +$frame paine20 paine21 paine22 paine23 paine24 paine25 paine26 paine27 paine28
  1892. +$frame paine29 paine30
  1893. +
  1894. +$frame cruc_1 cruc_2 cruc_3 cruc_4 cruc_5 cruc_6
  1895. +
  1896. +/* Morph to zombie */
  1897. +
  1898. +void() player_zombie_stand = [ $stand1, player_stand1 ] {
  1899. +    if(self.walkframe >= 15)
  1900. +        self.walkframe = 0;
  1901. +        if(self.health < 75) self.health = self.health + 1; // Zombies regenerate
  1902. +    self.frame = $stand1 + self.walkframe;
  1903. +    self.walkframe = self.walkframe + 1;
  1904. +};
  1905. +
  1906. +void() player_zombie_run = [ $run1, player_run ] {
  1907. +    if(self.walkframe >= 19)
  1908. +        self.walkframe = 0;
  1909. +    self.frame = $run1 + self.walkframe;
  1910. +    self.walkframe = self.walkframe + 1;
  1911. +};
  1912. +
  1913. +////////////////////////////////////////////
  1914. +// 12 frames of paina for player_zombie, going to stand
  1915. +////////////////////////////////////////////
  1916. +
  1917. +void() player_zombie_paina1 = [ $paina1, player_zombie_paina2 ] {self.attack_finished=time+10; self.movetype=MOVETYPE_NONE;};
  1918. +void() player_zombie_paina2 = [ $paina2, player_zombie_paina3 ] { };
  1919. +void() player_zombie_paina3 = [ $paina3, player_zombie_paina4 ] { };
  1920. +void() player_zombie_paina4 = [ $paina4, player_zombie_paina5 ] { };
  1921. +void() player_zombie_paina5 = [ $paina5, player_zombie_paina6 ] { };
  1922. +void() player_zombie_paina6 = [ $paina6, player_zombie_paina7 ] { };
  1923. +void() player_zombie_paina7 = [ $paina7, player_zombie_paina8 ] { };
  1924. +void() player_zombie_paina8 = [ $paina8, player_zombie_paina9 ] { };
  1925. +void() player_zombie_paina9 = [ $paina9, player_zombie_paina10 ] { };
  1926. +void() player_zombie_paina10 = [ $paina10, player_zombie_paina11 ] { };
  1927. +void() player_zombie_paina11 = [ $paina11, player_zombie_paina12 ] { };
  1928. +void() player_zombie_paina12 = [ $paina12, player_stand1 ] {self.attack_finished=time; self.movetype=MOVETYPE_WALK;};
  1929. +
  1930. +////////////////////////////////////////////
  1931. +// 28 frames of painb for player_zombie, going to stand
  1932. +////////////////////////////////////////////
  1933. +
  1934. +void() player_zombie_painb1 = [ $painb1, player_zombie_painb2 ] {self.attack_finished=time+10; self.movetype=MOVETYPE_NONE;};
  1935. +void() player_zombie_painb2 = [ $painb2, player_zombie_painb3 ] { };
  1936. +void() player_zombie_painb3 = [ $painb3, player_zombie_painb4 ] { };
  1937. +void() player_zombie_painb4 = [ $painb4, player_zombie_painb5 ] { };
  1938. +void() player_zombie_painb5 = [ $painb5, player_zombie_painb6 ] { };
  1939. +void() player_zombie_painb6 = [ $painb6, player_zombie_painb7 ] { };
  1940. +void() player_zombie_painb7 = [ $painb7, player_zombie_painb8 ] { };
  1941. +void() player_zombie_painb8 = [ $painb8, player_zombie_painb9 ] { };
  1942. +void() player_zombie_painb9 = [ $painb9, player_zombie_painb10 ] { };
  1943. +void() player_zombie_painb10 = [ $painb10, player_zombie_painb11 ] { };
  1944. +void() player_zombie_painb11 = [ $painb11, player_zombie_painb12 ] { };
  1945. +void() player_zombie_painb12 = [ $painb12, player_zombie_painb13 ] { };
  1946. +void() player_zombie_painb13 = [ $painb13, player_zombie_painb14 ] { };
  1947. +void() player_zombie_painb14 = [ $painb14, player_zombie_painb15 ] { };
  1948. +void() player_zombie_painb15 = [ $painb15, player_zombie_painb16 ] { };
  1949. +void() player_zombie_painb16 = [ $painb16, player_zombie_painb17 ] { };
  1950. +void() player_zombie_painb17 = [ $painb17, player_zombie_painb18 ] { };
  1951. +void() player_zombie_painb18 = [ $painb18, player_zombie_painb19 ] { };
  1952. +void() player_zombie_painb19 = [ $painb19, player_zombie_painb20 ] { };
  1953. +void() player_zombie_painb20 = [ $painb20, player_zombie_painb21 ] { };
  1954. +void() player_zombie_painb21 = [ $painb21, player_zombie_painb22 ] { };
  1955. +void() player_zombie_painb22 = [ $painb22, player_zombie_painb23 ] { };
  1956. +void() player_zombie_painb23 = [ $painb23, player_zombie_painb24 ] { };
  1957. +void() player_zombie_painb24 = [ $painb24, player_zombie_painb25 ] { };
  1958. +void() player_zombie_painb25 = [ $painb25, player_zombie_painb26 ] { };
  1959. +void() player_zombie_painb26 = [ $painb26, player_zombie_painb27 ] { };
  1960. +void() player_zombie_painb27 = [ $painb27, player_zombie_painb28 ] { };
  1961. +void() player_zombie_painb28 = [ $painb28, player_stand1 ] {self.attack_finished=time; self.movetype=MOVETYPE_WALK;};
  1962. +
  1963. +////////////////////////////////////////////
  1964. +// 18 frames of painc for player_zombie, going to stand
  1965. +////////////////////////////////////////////
  1966. +
  1967. +void() player_zombie_painc1 = [ $painc1, player_zombie_painc2 ] {self.attack_finished=time+10; self.movetype=MOVETYPE_NONE;};
  1968. +void() player_zombie_painc2 = [ $painc2, player_zombie_painc3 ] { };
  1969. +void() player_zombie_painc3 = [ $painc3, player_zombie_painc4 ] { };
  1970. +void() player_zombie_painc4 = [ $painc4, player_zombie_painc5 ] { };
  1971. +void() player_zombie_painc5 = [ $painc5, player_zombie_painc6 ] { };
  1972. +void() player_zombie_painc6 = [ $painc6, player_zombie_painc7 ] { };
  1973. +void() player_zombie_painc7 = [ $painc7, player_zombie_painc8 ] { };
  1974. +void() player_zombie_painc8 = [ $painc8, player_zombie_painc9 ] { };
  1975. +void() player_zombie_painc9 = [ $painc9, player_zombie_painc10 ] { };
  1976. +void() player_zombie_painc10 = [ $painc10, player_zombie_painc11 ] { };
  1977. +void() player_zombie_painc11 = [ $painc11, player_zombie_painc12 ] { };
  1978. +void() player_zombie_painc12 = [ $painc12, player_zombie_painc13 ] { };
  1979. +void() player_zombie_painc13 = [ $painc13, player_zombie_painc14 ] { };
  1980. +void() player_zombie_painc14 = [ $painc14, player_zombie_painc15 ] { };
  1981. +void() player_zombie_painc15 = [ $painc15, player_zombie_painc16 ] { };
  1982. +void() player_zombie_painc16 = [ $painc16, player_zombie_painc17 ] { };
  1983. +void() player_zombie_painc17 = [ $painc17, player_zombie_painc18 ] { };
  1984. +void() player_zombie_painc18 = [ $painc18, player_stand1 ] {self.attack_finished=time; self.movetype=MOVETYPE_WALK;};
  1985. +
  1986. +////////////////////////////////////////////
  1987. +// 13 frames of paind for player_zombie, going to stand
  1988. +////////////////////////////////////////////
  1989. +
  1990. +void() player_zombie_paind1 = [ $paind1, player_zombie_paind2 ] {self.attack_finished=time+10; self.movetype=MOVETYPE_NONE;};
  1991. +void() player_zombie_paind2 = [ $paind2, player_zombie_paind3 ] { };
  1992. +void() player_zombie_paind3 = [ $paind3, player_zombie_paind4 ] { };
  1993. +void() player_zombie_paind4 = [ $paind4, player_zombie_paind5 ] { };
  1994. +void() player_zombie_paind5 = [ $paind5, player_zombie_paind6 ] { };
  1995. +void() player_zombie_paind6 = [ $paind6, player_zombie_paind7 ] { };
  1996. +void() player_zombie_paind7 = [ $paind7, player_zombie_paind8 ] { };
  1997. +void() player_zombie_paind8 = [ $paind8, player_zombie_paind9 ] { };
  1998. +void() player_zombie_paind9 = [ $paind9, player_zombie_paind10 ] { };
  1999. +void() player_zombie_paind10 = [ $paind10, player_zombie_paind11 ] { };
  2000. +void() player_zombie_paind11 = [ $paind11, player_zombie_paind12 ] { };
  2001. +void() player_zombie_paind12 = [ $paind12, player_zombie_paind13 ] { };
  2002. +void() player_zombie_paind13 = [ $paind13, player_stand1 ] {self.attack_finished=time; self.movetype=MOVETYPE_WALK;};
  2003. +
  2004. +////////////////////////////////////////////
  2005. +// 30 frames of paine for player_zombie, going to stand
  2006. +////////////////////////////////////////////
  2007. +
  2008. +void() player_zombie_paine1 = [ $paine1, player_zombie_paine2 ] {self.attack_finished=time+10; self.movetype=MOVETYPE_NONE;};
  2009. +void() player_zombie_paine2 = [ $paine2, player_zombie_paine3 ] { };
  2010. +void() player_zombie_paine3 = [ $paine3, player_zombie_paine4 ] { };
  2011. +void() player_zombie_paine4 = [ $paine4, player_zombie_paine5 ] { };
  2012. +void() player_zombie_paine5 = [ $paine5, player_zombie_paine6 ] { };
  2013. +void() player_zombie_paine6 = [ $paine6, player_zombie_paine7 ] { };
  2014. +void() player_zombie_paine7 = [ $paine7, player_zombie_paine8 ] { };
  2015. +void() player_zombie_paine8 = [ $paine8, player_zombie_paine9 ] { };
  2016. +void() player_zombie_paine9 = [ $paine9, player_zombie_paine10 ] { };
  2017. +void() player_zombie_paine10 = [ $paine10, player_zombie_paine11 ] { };
  2018. +void() player_zombie_paine11 = [ $paine11, player_zombie_paine12 ] { };
  2019. +void() player_zombie_paine12 = [ $paine12, player_zombie_paine13 ] { };
  2020. +void() player_zombie_paine13 = [ $paine13, player_zombie_paine14 ] { };
  2021. +void() player_zombie_paine14 = [ $paine14, player_zombie_paine15 ] { };
  2022. +void() player_zombie_paine15 = [ $paine15, player_zombie_paine16 ] { };
  2023. +void() player_zombie_paine16 = [ $paine16, player_zombie_paine17 ] { };
  2024. +void() player_zombie_paine17 = [ $paine17, player_zombie_paine18 ] { };
  2025. +void() player_zombie_paine18 = [ $paine18, player_zombie_paine19 ] { };
  2026. +void() player_zombie_paine19 = [ $paine19, player_zombie_paine20 ] { };
  2027. +void() player_zombie_paine20 = [ $paine20, player_zombie_paine21 ] { };
  2028. +void() player_zombie_paine21 = [ $paine21, player_zombie_paine22 ] { };
  2029. +void() player_zombie_paine22 = [ $paine22, player_zombie_paine23 ] { };
  2030. +void() player_zombie_paine23 = [ $paine23, player_zombie_paine24 ] { };
  2031. +void() player_zombie_paine24 = [ $paine24, player_zombie_paine25 ] { };
  2032. +void() player_zombie_paine25 = [ $paine25, player_zombie_paine26 ] { };
  2033. +void() player_zombie_paine26 = [ $paine26, player_zombie_paine27 ] { };
  2034. +void() player_zombie_paine27 = [ $paine27, player_zombie_paine28 ] { };
  2035. +void() player_zombie_paine28 = [ $paine28, player_zombie_paine29 ] { };
  2036. +void() player_zombie_paine29 = [ $paine29, player_zombie_paine30 ] { };
  2037. +void() player_zombie_paine30 = [ $paine30, player_stand1 ] {self.attack_finished=time; self.movetype=MOVETYPE_WALK;};
  2038. +
  2039. +void(entity attacker, float take) player_zombie_pain = {
  2040. +    if(self.health < 70) self.health=70;
  2041. +    if(self.pain_finished > time) return;
  2042. +    self.pain_finished = time + 10;
  2043. +    if(random()>0.50) sound (self, CHAN_VOICE, "zombie/z_pain.wav", 1, ATTN_NORM);
  2044. +    else sound(self, CHAN_VOICE, "zombie/z_pain1.wav", 1, ATTN_NORM);
  2045. +    if(take > 60) {
  2046. +        if(random()>0.50) player_zombie_paine1();
  2047. +        else player_zombie_painb1();
  2048. +    } else {
  2049. +        if(random()>0.66) player_zombie_paina1();
  2050. +        else if(random()>0.50) player_zombie_painc1();
  2051. +        else player_zombie_paind1();
  2052. +    }
  2053. +};
  2054. +
  2055. +void() player_zombie_jump = {
  2056. +    // Zombies can't jump
  2057. +};
  2058. +
  2059. +void() player_ZombieFireGrenade =
  2060. +{
  2061. +    local    entity missile, mpuff;
  2062. +
  2063. +    sound (self, CHAN_WEAPON, "zombie/z_shot1.wav", 1, ATTN_NORM);
  2064. +
  2065. +    self.punchangle_x = -2;
  2066. +
  2067. +    missile = spawn ();
  2068. +    missile.owner = self;
  2069. +    missile.movetype = MOVETYPE_BOUNCE;
  2070. +    missile.solid = SOLID_BBOX;
  2071. +    missile.classname = "grenade";
  2072. +
  2073. +// set missile speed    
  2074. +
  2075. +    makevectors (self.v_angle);
  2076. +
  2077. +    if(self.v_angle_x)
  2078. +        missile.velocity = v_forward*600 + v_up * 200 + crandom()*v_right*10 + crandom()*v_up*10;
  2079. +    else {
  2080. +        missile.velocity = aim(self, 10000);
  2081. +        missile.velocity = missile.velocity * 600;
  2082. +        missile.velocity_z = 200;
  2083. +    }
  2084. +    
  2085. +    missile.avelocity = '3000 1000 2000';
  2086. +
  2087. +    missile.angles = vectoangles(missile.velocity);
  2088. +
  2089. +    missile.touch = ZombieGrenadeTouch;
  2090. +    
  2091. +// set missile duration
  2092. +    missile.nextthink = time + 2.5;
  2093. +    missile.think = SUB_Remove;
  2094. +
  2095. +    setmodel (missile, "progs/zom_gib.mdl");
  2096. +    setsize (missile, '0 0 0', '0 0 0');        
  2097. +    setorigin (missile, self.origin);
  2098. +};
  2099. +////////////////////////////////////////////
  2100. +// 13 frames of atta for player_zombie, going to stand
  2101. +////////////////////////////////////////////
  2102. +
  2103. +void() player_zombie_atta1 = [ $atta1, player_zombie_atta2 ] { };
  2104. +void() player_zombie_atta2 = [ $atta2, player_zombie_atta3 ] { };
  2105. +void() player_zombie_atta3 = [ $atta3, player_zombie_atta4 ] { };
  2106. +void() player_zombie_atta4 = [ $atta4, player_zombie_atta5 ] { };
  2107. +void() player_zombie_atta5 = [ $atta5, player_zombie_atta6 ] { };
  2108. +void() player_zombie_atta6 = [ $atta6, player_zombie_atta7 ] { };
  2109. +void() player_zombie_atta7 = [ $atta7, player_zombie_atta8 ] { };
  2110. +void() player_zombie_atta8 = [ $atta8, player_zombie_atta9 ] { };
  2111. +void() player_zombie_atta9 = [ $atta9, player_zombie_atta10 ] { };
  2112. +void() player_zombie_atta10 = [ $atta10, player_zombie_atta11 ] { };
  2113. +void() player_zombie_atta11 = [ $atta11, player_zombie_atta12 ] { };
  2114. +void() player_zombie_atta12 = [ $atta12, player_zombie_atta13 ] { };
  2115. +void() player_zombie_atta13 = [ $atta13, player_stand1 ] { player_ZombieFireGrenade(); self.attack_finished=time; };
  2116. +
  2117. +////////////////////////////////////////////
  2118. +// 14 frames of attb for player_zombie, going to stand
  2119. +////////////////////////////////////////////
  2120. +
  2121. +void() player_zombie_attb1 = [ $attb1, player_zombie_attb2 ] { };
  2122. +void() player_zombie_attb2 = [ $attb2, player_zombie_attb3 ] { };
  2123. +void() player_zombie_attb3 = [ $attb3, player_zombie_attb4 ] { };
  2124. +void() player_zombie_attb4 = [ $attb4, player_zombie_attb5 ] { };
  2125. +void() player_zombie_attb5 = [ $attb5, player_zombie_attb6 ] { };
  2126. +void() player_zombie_attb6 = [ $attb6, player_zombie_attb7 ] { };
  2127. +void() player_zombie_attb7 = [ $attb7, player_zombie_attb8 ] { };
  2128. +void() player_zombie_attb8 = [ $attb8, player_zombie_attb9 ] { };
  2129. +void() player_zombie_attb9 = [ $attb9, player_zombie_attb10 ] { };
  2130. +void() player_zombie_attb10 = [ $attb10, player_zombie_attb11 ] { };
  2131. +void() player_zombie_attb11 = [ $attb11, player_zombie_attb12 ] { };
  2132. +void() player_zombie_attb12 = [ $attb12, player_zombie_attb13 ] { };
  2133. +void() player_zombie_attb13 = [ $attb12, player_zombie_attb14 ] { };
  2134. +void() player_zombie_attb14 = [ $attb14, player_stand1 ] { player_ZombieFireGrenade(); self.attack_finished=time; };
  2135. +
  2136. +////////////////////////////////////////////
  2137. +// 12 frames of attc for player_zombie, going to stand
  2138. +////////////////////////////////////////////
  2139. +
  2140. +void() player_zombie_attc1 = [ $attc1, player_zombie_attc2 ] { };
  2141. +void() player_zombie_attc2 = [ $attc2, player_zombie_attc3 ] { };
  2142. +void() player_zombie_attc3 = [ $attc3, player_zombie_attc4 ] { };
  2143. +void() player_zombie_attc4 = [ $attc4, player_zombie_attc5 ] { };
  2144. +void() player_zombie_attc5 = [ $attc5, player_zombie_attc6 ] { };
  2145. +void() player_zombie_attc6 = [ $attc6, player_zombie_attc7 ] { };
  2146. +void() player_zombie_attc7 = [ $attc7, player_zombie_attc8 ] { };
  2147. +void() player_zombie_attc8 = [ $attc8, player_zombie_attc9 ] { };
  2148. +void() player_zombie_attc9 = [ $attc9, player_zombie_attc10 ] { };
  2149. +void() player_zombie_attc10 = [ $attc10, player_zombie_attc11 ] { };
  2150. +void() player_zombie_attc11 = [ $attc11, player_zombie_attc12 ] { };
  2151. +void() player_zombie_attc12 = [ $attc12, player_stand1 ] { player_ZombieFireGrenade(); self.attack_finished=time; };
  2152. +
  2153. +void() player_zombie_attack = {
  2154. +    self.attack_finished=time+10;
  2155. +    if(random()>0.66) player_zombie_atta1();
  2156. +    else if(random()>0.5) player_zombie_attb1();
  2157. +    else player_zombie_attc1();
  2158. +};
  2159. +
  2160. +void() player_zombie_impulse = {
  2161. +    // Zombie has only one weapon
  2162. +};
  2163. +
  2164. +string() player_zombie_killmsg = {
  2165. +    return " was splatted to death by ";
  2166. +};
  2167. +
  2168. +string() player_zombie_killmsg2 = {
  2169. +    return ".\n";
  2170. +};
  2171. +
  2172. +void() player_zombie_become = {
  2173. +    bprint(self.netname);
  2174. +    bprint(" has become a zombie.\n");
  2175. +    self._stand=player_zombie_stand;
  2176. +    self._run=player_zombie_run;
  2177. +    self._pain=player_zombie_pain;
  2178. +    self._jump=SUB_Nop;
  2179. +    self._jump2=SUB_Nop;
  2180. +    self._attack=player_zombie_attack;
  2181. +    self._impulse=player_zombie_impulse;
  2182. +    self._can_get_p=SUB_False;
  2183. +    self._killmsg=player_zombie_killmsg;
  2184. +    self._killmsg2=player_zombie_killmsg2;
  2185. +    setmodel(self,"progs/zombie.mdl");
  2186. +    self.modelindex_morph=self.modelindex;
  2187. +    self.weaponmodel="";
  2188. +    self.view_ofs = '0 0 22';
  2189. +    if(!deathmatch) setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  2190. +    else     setsize (self, '-16 -16 -24', '16 16 40');
  2191. +    self.health = self.health * 0.75 / self.health_modifier;
  2192. +    self.health_modifier = 0.75;
  2193. +    makevectors(self.v_angle);
  2194. +    spawn_tfog(self.origin + 20 * v_forward);
  2195. +    DropBackpack2();
  2196. +};
  2197. +
  2198. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/ogre.qc morph/ogre.qc
  2199. --- v101qc/ogre.qc    Thu Jul 25 01:51:23 1996
  2200. +++ morph/ogre.qc    Fri Aug 16 08:00:55 1996
  2201. @@ -449,6 +449,9 @@
  2202.      self.th_missile = ogre_nail1;
  2203.      self.th_pain = ogre_pain;
  2204.      
  2205. +    self.weaponmodel="progs/ogre.mdl";
  2206. +    self.weaponframe=0;
  2207. +
  2208.      walkmonster_start();
  2209.  };
  2210.  
  2211. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/player.qc morph/player.qc
  2212. --- v101qc/player.qc    Thu Jul 25 01:51:23 1996
  2213. +++ morph/player.qc    Wed Aug 14 07:45:38 1996
  2214. @@ -98,6 +98,8 @@
  2215.          return;
  2216.      }
  2217.  
  2218. +    if (self._stand != SUB_Null) { self._stand(); return; }
  2219. +
  2220.      if (self.weapon == IT_AXE)
  2221.      {
  2222.          if (self.walkframe >= 12)
  2223. @@ -122,6 +124,7 @@
  2224.          player_stand1();
  2225.          return;
  2226.      }
  2227. +    if (self._run != SUB_Null) { self._run(); return; }
  2228.  
  2229.      if (self.weapon == IT_AXE)
  2230.      {
  2231. @@ -334,8 +337,10 @@
  2232.  void()    player_axpain5 =    [    $axpain5,    player_axpain6    ] {};
  2233.  void()    player_axpain6 =    [    $axpain6,    player_run    ] {};
  2234.  
  2235. -void() player_pain =
  2236. +void(entity attacker, float take) player_pain =
  2237.  {
  2238. +    if (self._pain != SUB_Null) { self._pain(attacker, take); return; }
  2239. +
  2240.      if (self.weaponframe)
  2241.          return;
  2242.  
  2243. @@ -531,6 +536,8 @@
  2244.      self.super_damage_finished = 0;
  2245.      self.radsuit_finished = 0;
  2246.      self.modelindex = modelindex_player;    // don't use eyes
  2247. +    setmodel(self,"progs/player.mdl"); // In case he was morphed
  2248. +    setsize (self, VEC_HULL_MIN, VEC_HULL_MAX);
  2249.  
  2250.      if (deathmatch || coop)
  2251.          DropBackpack();
  2252. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/progs.src morph/progs.src
  2253. --- v101qc/progs.src    Wed Jul 31 21:15:26 1996
  2254. +++ morph/progs.src    Wed Aug 14 15:13:23 1996
  2255. @@ -33,3 +33,12 @@
  2256.  shalrath.qc        // registered
  2257.  enforcer.qc        // registered
  2258.  oldone.qc        // registered
  2259. +
  2260. +m-zombie.qc        // Morphing
  2261. +m-ogre.qc    
  2262. +m-demon.qc
  2263. +m-human.qc
  2264. +m-shalra.qc
  2265. +m-wizard.qc
  2266. +m-hknigh.qc
  2267. +m-shambl.qc
  2268. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/shalrath.qc morph/shalrath.qc
  2269. --- v101qc/shalrath.qc    Thu Jul 25 01:51:23 1996
  2270. +++ morph/shalrath.qc    Wed Aug 14 23:52:12 1996
  2271. @@ -160,18 +160,24 @@
  2272.  {
  2273.      local vector    dir, vtemp;
  2274.      vtemp = self.enemy.origin + '0 0 10';
  2275. +    if (!self.enemy) {
  2276. +        return;
  2277. +    }
  2278.      if (self.enemy.health < 1)
  2279.      {
  2280.          remove(self);
  2281.          return;
  2282.      }
  2283. +    self.nextthink = time + 0.2;
  2284. +    self.think = ShalHome;    
  2285. +    // Go where last seen if not now visible
  2286. +    // For player and nightmare real monsters
  2287. +    if (self.owner.classname == "player" || skill == 3) if(!visible(self.enemy)) return;
  2288.      dir = normalize(vtemp - self.origin);
  2289.      if (skill == 3)
  2290.          self.velocity = dir * 350;
  2291.      else
  2292.          self.velocity = dir * 250;
  2293. -    self.nextthink = time + 0.2;
  2294. -    self.think = ShalHome;    
  2295.  };
  2296.  
  2297.  void() ShalMissileTouch =
  2298. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/subs.qc morph/subs.qc
  2299. --- v101qc/subs.qc    Thu Jul 25 01:51:24 1996
  2300. +++ morph/subs.qc    Tue Aug 13 13:45:52 1996
  2301. @@ -314,3 +314,9 @@
  2302.      self.cnt = 1;
  2303.      self.think = thinkst;
  2304.  };
  2305. +
  2306. +void() SUB_Nop = // Since SUB_Null is used as 'no function'
  2307. +{ };
  2308. +
  2309. +float() SUB_True = { return 1; }; // Return a true value
  2310. +float() SUB_False = { return 0; }; // Return a false value
  2311. diff -ur --new-file -x progs.dat -x progdefs.h -x *.bak -x *~ -x *.rej -x *.cfg -x *.sav v101qc/weapons.qc morph/weapons.qc
  2312. --- v101qc/weapons.qc    Thu Jul 25 01:51:24 1996
  2313. +++ morph/weapons.qc    Thu Aug 22 17:03:53 1996
  2314. @@ -22,6 +22,112 @@
  2315.      precache_sound ("weapons/grenade.wav");    // grenade launcher
  2316.      precache_sound ("weapons/bounce.wav");        // grenade bounce
  2317.      precache_sound ("weapons/shotgn2.wav");    // super shotgun
  2318. +
  2319. +//// Zombie morph
  2320. +        precache_model ("progs/zombie.mdl");
  2321. +        precache_model ("progs/h_zombie.mdl");
  2322. +        precache_model ("progs/zom_gib.mdl");
  2323. +
  2324. +        precache_sound ("zombie/z_idle.wav");
  2325. +        precache_sound ("zombie/z_idle1.wav");
  2326. +        precache_sound ("zombie/z_shot1.wav");
  2327. +        precache_sound ("zombie/z_gib.wav");
  2328. +        precache_sound ("zombie/z_pain.wav");
  2329. +        precache_sound ("zombie/z_pain1.wav");
  2330. +        precache_sound ("zombie/z_fall.wav");
  2331. +        precache_sound ("zombie/z_miss.wav");
  2332. +        precache_sound ("zombie/z_hit.wav");
  2333. +        precache_sound ("zombie/idle_w2.wav");
  2334. +//// 
  2335. +
  2336. +//// Shalrath morph
  2337. +    precache_model2 ("progs/shalrath.mdl");
  2338. +    precache_model2 ("progs/h_shal.mdl");
  2339. +    precache_model2 ("progs/v_spike.mdl");
  2340. +    
  2341. +    precache_sound2 ("shalrath/attack.wav");
  2342. +    precache_sound2 ("shalrath/attack2.wav");
  2343. +    precache_sound2 ("shalrath/death.wav");
  2344. +    precache_sound2 ("shalrath/idle.wav");
  2345. +    precache_sound2 ("shalrath/pain.wav");
  2346. +    precache_sound2 ("shalrath/sight.wav");
  2347. +////
  2348. +
  2349. +//// Wizard morph
  2350. +    precache_model ("progs/wizard.mdl");
  2351. +    precache_model ("progs/h_wizard.mdl");
  2352. +    precache_model ("progs/w_spike.mdl");
  2353. +
  2354. +    precache_sound ("wizard/hit.wav");        // used by c code
  2355. +    precache_sound ("wizard/wattack.wav");
  2356. +    precache_sound ("wizard/wdeath.wav");
  2357. +    precache_sound ("wizard/widle1.wav");
  2358. +    precache_sound ("wizard/widle2.wav");
  2359. +    precache_sound ("wizard/wpain.wav");
  2360. +    precache_sound ("wizard/wsight.wav");
  2361. +////
  2362. +
  2363. +//// Hell knight morph
  2364. +    precache_model2 ("progs/hknight.mdl");
  2365. +    precache_model2 ("progs/k_spike.mdl");
  2366. +    precache_model2 ("progs/h_hellkn.mdl");
  2367. +
  2368. +    
  2369. +    precache_sound2 ("hknight/attack1.wav");
  2370. +    precache_sound2 ("hknight/death1.wav");
  2371. +    precache_sound2 ("hknight/pain1.wav");
  2372. +    precache_sound2 ("hknight/sight1.wav");
  2373. +    precache_sound ("hknight/hit.wav");        // used by C code, so don't sound2
  2374. +    precache_sound2 ("hknight/slash1.wav");
  2375. +    precache_sound2 ("hknight/idle.wav");
  2376. +    precache_sound2 ("hknight/grunt.wav");
  2377. +
  2378. +    precache_sound ("knight/sword1.wav");
  2379. +    precache_sound ("knight/sword2.wav");
  2380. +////
  2381. +
  2382. +//// Shambler morph
  2383. +    precache_model ("progs/shambler.mdl");
  2384. +    precache_model ("progs/s_light.mdl");
  2385. +    precache_model ("progs/h_shams.mdl");
  2386. +    precache_model ("progs/bolt.mdl");
  2387. +    
  2388. +    precache_sound ("shambler/sattck1.wav");
  2389. +    precache_sound ("shambler/sboom.wav");
  2390. +    precache_sound ("shambler/sdeath.wav");
  2391. +    precache_sound ("shambler/shurt2.wav");
  2392. +    precache_sound ("shambler/sidle.wav");
  2393. +    precache_sound ("shambler/ssight.wav");
  2394. +    precache_sound ("shambler/melee1.wav");
  2395. +    precache_sound ("shambler/melee2.wav");
  2396. +    precache_sound ("shambler/smack.wav");
  2397. +////
  2398. +
  2399. +//// Demon morph
  2400. +    precache_model ("progs/demon.mdl");
  2401. +    precache_model ("progs/h_demon.mdl");
  2402. +
  2403. +    precache_sound ("demon/ddeath.wav");
  2404. +    precache_sound ("demon/dhit2.wav");
  2405. +    precache_sound ("demon/djump.wav");
  2406. +    precache_sound ("demon/dpain1.wav");
  2407. +    precache_sound ("demon/idle1.wav");
  2408. +    precache_sound ("demon/sight2.wav");
  2409. +////
  2410. +
  2411. +//// Ogre morph
  2412. +    precache_model ("progs/ogre.mdl");
  2413. +    precache_model ("progs/h_ogre.mdl");
  2414. +    precache_model ("progs/grenade.mdl");
  2415. +
  2416. +    precache_sound ("ogre/ogdrag.wav");
  2417. +    precache_sound ("ogre/ogdth.wav");
  2418. +    precache_sound ("ogre/ogidle.wav");
  2419. +    precache_sound ("ogre/ogidle2.wav");
  2420. +    precache_sound ("ogre/ogpain1.wav");
  2421. +    precache_sound ("ogre/ogsawatk.wav");
  2422. +    precache_sound ("ogre/ogwake.wav");
  2423. +////
  2424.  };
  2425.  
  2426.  float() crandom =
  2427. @@ -884,6 +990,10 @@
  2428.  {
  2429.      local    float    r;
  2430.  
  2431. +    if (self._attack != SUB_Null) {
  2432. +        self._attack();
  2433. +        return;
  2434. +    }
  2435.      if (!W_CheckNoAmmo ())
  2436.          return;
  2437.  
  2438. @@ -1158,8 +1268,22 @@
  2439.  
  2440.  ============
  2441.  */
  2442. +void() player_zombie_become;
  2443. +void() player_shalrath_become;
  2444. +void() player_human_become;
  2445. +void() player_wizard_become;
  2446. +void() player_hknight_become;
  2447. +void() player_shambler_become;
  2448. +void() player_demon_become;
  2449. +void() player_ogre_become;
  2450. +
  2451.  void() ImpulseCommands =
  2452.  {
  2453. +    if (self.impulse >= 1 && self.impulse <= 10 && self._impulse != SUB_Null) {
  2454. +        self._impulse();
  2455. +        return;
  2456. +    }
  2457. +
  2458.      if (self.impulse >= 1 && self.impulse <= 8)
  2459.          W_ChangeWeapon ();
  2460.  
  2461. @@ -1170,6 +1294,16 @@
  2462.      if (self.impulse == 11)
  2463.          ServerflagsCommand ();
  2464.  
  2465. +    if(self.impulse > 90 && self.impulse < 98) self.morphnum=self.impulse;
  2466. +    if (self.impulse == 90) player_human_become();
  2467. +    if (self.impulse == 91) player_zombie_become();
  2468. +    if (self.impulse == 92) player_shalrath_become();
  2469. +    if (self.impulse == 93) player_wizard_become();
  2470. +    if (self.impulse == 94) player_hknight_become();
  2471. +    if (self.impulse == 95) player_shambler_become();
  2472. +    if (self.impulse == 96) player_demon_become();
  2473. +    if (self.impulse == 97) player_ogre_become();
  2474. +    
  2475.      if (self.impulse == 255)
  2476.          QuadCheat ();
  2477.          
  2478.