home *** CD-ROM | disk | FTP | other *** search
/ Quaaake Level & Editor 2 / Quaaake_2.iso / Quake / vbot / SRC.ZIP / BOTAI.QC < prev    next >
Encoding:
Text File  |  1996-09-24  |  19.1 KB  |  584 lines
  1. // Think that there are two components to a position.  If I can find
  2. // the x,y component, I can make it move forward if the x,y hasn't changed.
  3.  
  4. // Changed frames for walking
  5. // Added more gibbage
  6.  
  7. /*
  8. ==============================================================================
  9.                                                         
  10. BG BOT AI
  11.  
  12. ==============================================================================
  13. */
  14.  
  15. // Prototypes
  16.  
  17. float   ()                                              BotFindTarget;
  18. float   ()                                              BotFindStuff;
  19. void    ()                                              bot_ai_stand;
  20. void    (entity attacker, float damage)                 bot_pain;
  21. void    ()                                              bot_die;
  22. void    ()                                              BotFoundTarget;
  23. void    ()                                              BotHuntTarget;
  24. void    ()                                              BotFoundStuff;
  25. void    ()                                              BotHuntStuff;
  26. void    (float dist)                                    bot_ai_walk;
  27. void    (float dist)                                    bot_ai_run;
  28. void    (float dist)                                    bot_ai_stuff;
  29. void    ()                                              BotSelfDeActivate;
  30. void    ()                                              spike_touch; 
  31. // Frame macros
  32.  
  33. $cd /raid/quake/id1/models/player_4
  34. $origin 0 -6 24
  35. $base base        
  36. $skin skin
  37.  
  38. $frame axrun1 axrun2 axrun3 axrun4 axrun5 axrun6
  39.  
  40. $frame rockrun6 rockrun5 rockrun4 rockrun3 rockrun2 rockrun1
  41.  
  42. //
  43. // standing
  44. //
  45. $frame stand1 stand2 stand3 stand4 stand5
  46.  
  47. $frame axstnd1 axstnd2 axstnd3 axstnd4 axstnd5 axstnd6
  48. $frame axstnd7 axstnd8 axstnd9 axstnd10 axstnd11 axstnd12
  49.  
  50.  
  51. //
  52. // pain
  53. //
  54. $frame axpain1 axpain2 axpain3 axpain4 axpain5 axpain6
  55.  
  56. $frame pain1 pain2 pain3 pain4 pain5 pain6
  57.  
  58.  
  59. //
  60. // death
  61. //
  62.  
  63. $frame axdeth1 axdeth2 axdeth3 axdeth4 axdeth5 axdeth6
  64. $frame axdeth7 axdeth8 axdeth9
  65.  
  66. $frame deatha1 deatha2 deatha3 deatha4 deatha5 deatha6 deatha7 deatha8
  67. $frame deatha9 deatha10 deatha11
  68.  
  69. $frame deathb1 deathb2 deathb3 deathb4 deathb5 deathb6 deathb7 deathb8
  70. $frame deathb9
  71.  
  72. $frame deathc1 deathc2 deathc3 deathc4 deathc5 deathc6 deathc7 deathc8
  73. $frame deathc9 deathc10 deathc11 deathc12 deathc13 deathc14 deathc15
  74.  
  75. $frame deathd1 deathd2 deathd3 deathd4 deathd5 deathd6 deathd7
  76. $frame deathd8 deathd9
  77.  
  78. $frame deathe1 deathe2 deathe3 deathe4 deathe5 deathe6 deathe7
  79. $frame deathe8 deathe9
  80.  
  81. //
  82. // attacks
  83. //
  84.  
  85. $frame axatt1 axatt2 axatt3 axatt4 axatt5 axatt6
  86.  
  87. $frame stand1 stand2 stand3 stand4 stand5
  88.  
  89. $frame stand1 stand2 stand3 stand4 stand5
  90.  
  91. $frame rockatt1 rockatt2 rockatt3 rockatt4 rockatt5 rockatt6
  92.  
  93. $frame stand1 stand2 stand3 stand4 stand5
  94.  
  95. $frame stand1 stand2 stand3 stand4 stand5
  96.  
  97. $frame stand1 stand2 stand3 stand4 stand5
  98.  
  99. $frame stand1 stand2 stand3 stand4 stand5
  100.  
  101. $frame stand1 stand2 stand3 stand4 stand5
  102.  
  103. void()    bot_stand1    =[    $stand1,    bot_stand2    ] {bot_ai_stand();};
  104. void()    bot_stand2    =[    $stand2,    bot_stand3    ] {bot_ai_stand();};
  105. void()    bot_stand3    =[    $stand3,    bot_stand4    ] {bot_ai_stand();};
  106. void()    bot_stand4    =[    $stand4,    bot_stand5    ] {bot_ai_stand();};
  107. void()  bot_stand5      =[      $stand5,        bot_stand1      ] {bot_ai_stand();};
  108.  
  109. void()  bot_walk1       =[      $axrun1,        bot_walk2       ] {bot_ai_walk(14);};
  110. void()  bot_walk2       =[      $axrun2,        bot_walk3       ] {bot_ai_walk(12);};
  111. void()  bot_walk3       =[      $axrun3,        bot_walk4       ] {bot_ai_walk(15);};
  112. void()  bot_walk4       =[      $axrun4,        bot_walk5       ] {bot_ai_walk(10);};
  113. void()  bot_walk5       =[      $axrun5,        bot_walk6       ] {bot_ai_walk(19);};
  114. void()  bot_walk6       =[      $axrun6,        bot_walk7       ] {bot_ai_walk(14);};
  115. void()  bot_walk7       =[      $axrun1,        bot_walk8       ] {bot_ai_walk(13);};
  116. void()  bot_walk8       =[      $axrun2,        bot_walk9       ] {bot_ai_walk(17);};
  117. void()  bot_walk9       =[      $axrun3,        bot_walk10      ] {bot_ai_walk(12);};
  118. void()  bot_walk10      =[      $axrun4,        bot_walk11      ] {bot_ai_walk(20);};
  119. void()  bot_walk11      =[      $axrun5,        bot_walk12      ] {bot_ai_walk(10);};
  120. void()  bot_walk12      =[      $axrun6,        bot_walk1      ] {bot_ai_walk(14);};
  121.  
  122. /*
  123. void()  bot_run1        =[      $rockrun1,        bot_run2        ] {bot_ai_run(18);};
  124. void()  bot_run2        =[      $rockrun2,        bot_run3        ] {bot_ai_run(14);};
  125. void()  bot_run3        =[      $rockrun3,        bot_run4        ] {bot_ai_run(9);};
  126. void()  bot_run4        =[      $rockrun4,        bot_run5        ] {bot_ai_run(12);};
  127. void()  bot_run5        =[      $rockrun5,        bot_run6        ] {bot_ai_run(14);};
  128. void()  bot_run6        =[      $rockrun6,        bot_run1        ] {bot_ai_run(20);};
  129. */  // old one
  130.  
  131. void()  bot_run1        =[      $axrun1,        bot_run2        ] {bot_ai_run(18);};
  132. void()  bot_run2        =[      $axrun2,        bot_run3        ] {bot_ai_run(14);};
  133. void()  bot_run3        =[      $axrun3,        bot_run4        ] {bot_ai_run(9);};
  134. void()  bot_run4        =[      $axrun4,        bot_run5        ] {bot_ai_run(12);};
  135. void()  bot_run5        =[      $axrun5,        bot_run6        ] {bot_ai_run(14);};
  136. void()  bot_run6        =[      $axrun6,        bot_run1        ] {bot_ai_run(20);};
  137.  
  138. void()  bot_stuff1        =[      $axrun1,        bot_stuff2        ] {bot_ai_stuff(18);};
  139. void()  bot_stuff2        =[      $axrun2,        bot_stuff3        ] {bot_ai_stuff(14);};
  140. void()  bot_stuff3        =[      $axrun3,        bot_stuff4        ] {bot_ai_stuff(7);};
  141. void()  bot_stuff4        =[      $axrun4,        bot_stuff5        ] {bot_ai_stuff(12);};
  142. void()  bot_stuff5        =[      $axrun5,        bot_stuff6        ] {bot_ai_stuff(14);};
  143. void()  bot_stuff6        =[      $axrun6,        bot_walk1         ] {bot_ai_stuff(11);};
  144.  
  145. void()  bot_atk1        =[      $axatt1,       bot_atk2        ] {ai_face();};
  146. void()  bot_atk2        =[      $axatt2,       bot_atk3        ] {ai_face();};
  147. void()  bot_atk3        =[      $axatt3,       bot_atk4        ] {ai_face();};
  148. void()  bot_atk4        =[      $axatt4,       bot_atk5        ] {}; //{bot_attack();};
  149. void()  bot_atk5        =[      $axatt5,       bot_atk6        ] {ai_face();};
  150. void()  bot_atk6        =[      $axatt6,       bot_run1        ]
  151. {
  152.     ai_face();
  153. //        BotCheckRefire (bot_atk1);
  154. };
  155.  
  156. void()  bot_pain1      =[      $axpain1   ,        bot_pain2      ] {};
  157. void()  bot_pain2      =[      $axpain2   ,        bot_pain3      ] {};
  158. void()  bot_pain3      =[      $axpain4   ,        bot_pain4      ] {ai_painforward(2);};
  159. void()  bot_pain4      =[      $axpain3   ,        bot_pain5      ] {};
  160. void()  bot_pain5      =[      $axpain4   ,        bot_pain6      ] {ai_pain(1);};
  161. void()  bot_pain6      =[      $axpain6   ,        bot_run1       ] {};
  162.  
  163. void()  bot_die1        =[      $axdeth1,        bot_die2        ] {};
  164. void()  bot_die2        =[      $axdeth2,        bot_die3        ] {};
  165. void()  bot_die3        =[      $axdeth3,        bot_die4        ]
  166. {
  167.     self.solid = SOLID_NOT;
  168.     DropBackpack();
  169. };
  170. void()  bot_die4        =[      $axdeth4,       bot_die5        ] {ai_forward(14);};
  171. void()  bot_die5        =[      $axdeth5,       bot_die6        ] {ai_forward(2);};
  172. void()  bot_die6        =[      $axdeth6,       bot_die7        ] {};
  173. void()  bot_die7        =[      $axdeth7,       bot_die8        ] {};
  174. void()  bot_die8        =[      $axdeth8,       bot_die9        ] {};
  175. void()  bot_die9        =[      $axdeth9,       bot_die10       ] {};
  176. void()  bot_die10       =[      $axdeth9,      bot_die11       ] {};
  177. void()  bot_die11       =[      $axdeth9,      bot_die11       ] {BotSelfDeActivate();};
  178.  
  179. void()  bot_fdie1       =[      $axdeth1,       bot_fdie2       ] {};
  180. void()  bot_fdie2       =[      $axdeth2,       bot_fdie3       ] {};
  181. void()  bot_fdie3       =[      $axdeth3,       bot_fdie4       ] 
  182. {
  183.     self.solid = SOLID_NOT;
  184.     DropBackpack();
  185. };
  186. void()  bot_fdie4       =[      $axdeth4,       bot_fdie5       ] {};
  187. void()  bot_fdie5       =[      $axdeth5,       bot_fdie6       ] {};
  188. void()  bot_fdie6       =[      $axdeth6,       bot_fdie7       ] {};
  189. void()  bot_fdie7       =[      $axdeth7,       bot_fdie8       ] {};
  190. void()  bot_fdie8       =[      $axdeth8,       bot_fdie9       ] {};
  191. void()  bot_fdie9       =[      $axdeth9,       bot_fdie9       ] {BotSelfDeActivate();};
  192.  
  193. void() BotJump =
  194. {       local  float  r;
  195.          if (self.flags & FL_ONGROUND)
  196.         {
  197. // Code ala David Wiedenmann THANK YOU!!!!!!!!
  198.     self.flags=self.flags-(self.flags & FL_ONGROUND);
  199. // next line is for horizontal
  200.     r = random();
  201.     
  202.         if (r < 0.25) 
  203.         self.velocity=self.velocity+(v_forward* -150);
  204.      else 
  205.         self.velocity=self.velocity+(v_forward* 150);
  206. // next line is for vertical
  207.         self.velocity_z=self.velocity_z+275;
  208.         self.velocity_y=self.velocity_y+100;
  209. //        sound(self,CHAN_BODY,"player/plyrjmp8.wav",1,ATTN_NORM);
  210. }
  211. };
  212.  
  213. // Thanks to WACko for CheckJump!
  214. void()  CheckJump =
  215. {
  216.     self.lastpos=self.origin;
  217.         movetogoal (1);
  218.     if (self.lastpos == self.origin) BotJump();
  219.  
  220. };
  221. float() BotFindTarget =
  222. {
  223.  
  224.  
  225.         local entity head, selected;
  226.     local float dist;
  227.         dist = 1500;    // awareness radius of bot, increasing it slows down game
  228.     selected = world;
  229.  
  230.     head = findradius(self.origin, 1500);
  231.     while(head)
  232.         {       if (head.classname == "player")
  233. //                if (((deathmatch) && (!(head.flags & FL_NOTARGET) && ((head.flags & FL_CLIENT) || (head.flags & FL_MONSTER)))) ||
  234. //                 ((!deathmatch) && (!(head.flags & FL_NOTARGET) && (head.flags & FL_MONSTER))))
  235. //                if (((teamplay) &&  (head.team != self.team)) || (!teamplay))
  236.                 if ((head.health > 1) && (head != self))
  237.                 if (!(head.items & IT_INVISIBILITY))
  238.                 if (visible(head))
  239.                 if (trace_plane_dist < dist)
  240.                 if ((head.health > 0) && (head !=self))
  241.                    {
  242.                         selected = head;
  243.                         dist = trace_plane_dist;
  244.                    }
  245.         head = head.chain;
  246.     }
  247.     self.enemy = selected;
  248.         
  249.     if (self.enemy == world)
  250.         return FALSE;
  251.         else
  252.         {
  253.         BotFoundTarget();
  254.         return TRUE;
  255.     }
  256.  
  257. };
  258.  
  259. // BG Bot - begin hack to check for items
  260. float() BotFindStuff =
  261. {
  262.         local entity head, selected;
  263.     local float dist;
  264.         dist = 50; 
  265.     selected = world;
  266.  
  267.         head = findradius(self.origin, 50);
  268.     while(head)
  269.     {
  270.                 if ((head.classname == "weapon_supernailgun") ||
  271.                    (head.classname == "weapon_supershotgun") || 
  272.                    (head.classname == "weapon_rocketlauncher") || 
  273.                    (head.classname == "weapon_nailgun") ||
  274.                    (head.classname == "backpack") ||
  275.                    ((self.ammo_shells < 100) && (head.classname == "botshells")) ||
  276.                    ((self.ammo_nails < 200) && (head.classname == "botnails")) ||
  277.                    ((self.ammo_rockets < 100) && (head.classname == "botrock")) ||
  278.                    (head.classname == "item_armor1") ||
  279.                    (head.classname == "item_armor2") ||
  280.                    (head.classname == "item_armorInv") ||
  281.                    ((head.healtype == 1) && (self.health < 100)) ||
  282.                    ((head.healtype == 2) && (self.health < 100))) 
  283.                 if (visible(head))
  284.                 if (trace_plane_dist < dist)
  285.                    {
  286.                         selected = head;
  287.                         dist = trace_plane_dist;
  288.                    }
  289.         head = head.chain;
  290.     }
  291.         self.stuff = selected;
  292.         
  293.         if (self.stuff == world)
  294.         return FALSE;
  295.         else
  296.         {
  297.                 BotFoundStuff();
  298.         return TRUE;
  299.     }
  300. };
  301. // BG Bot - end hack to check for items
  302.  
  303. //=============================================================
  304. // bot_ai_stand - bot stands in place until target acquired,
  305. // and starts to walk if pausetime has expired
  306. //=============================================================
  307. void() bot_ai_stand =
  308. {
  309.         if (BotFindTarget ())
  310.                 return;
  311.     
  312.         if (BotFindStuff ())
  313.                 return;
  314.  
  315.         self.th_walk ();
  316. };
  317.  
  318.  
  319. //=============================================================
  320. // bot_pain
  321. //=============================================================
  322. void(entity attacker, float damage)    bot_pain =
  323. {
  324.     local float r;
  325.     local entity oldself;
  326.  
  327.         r = rint((random() * 5) + 1);
  328.     if (self.pain_finished > time)
  329.         return;
  330.  
  331.     
  332.         if (r == 1)
  333.                 sound (self, CHAN_VOICE, "player/pain1.wav", 1, ATTN_NORM);
  334.         else if (r == 2)
  335.                 sound (self, CHAN_VOICE, "player/pain2.wav", 1, ATTN_NORM);
  336.         else if (r == 3)
  337.                 sound (self, CHAN_VOICE, "player/pain3.wav", 1, ATTN_NORM);
  338.         else if (r == 4)
  339.                 sound (self, CHAN_VOICE, "player/pain4.wav", 1, ATTN_NORM);
  340.         else if (r == 5)
  341.                 sound (self, CHAN_VOICE, "player/pain5.wav", 1, ATTN_NORM);
  342.     else
  343.                 sound (self, CHAN_VOICE, "player/pain6.wav", 1, ATTN_NORM);
  344.  
  345.         self.pain_finished = time + 1;
  346.         bot_pain1 ();
  347.  
  348. };
  349.  
  350. //=============================================================
  351. // bot_die
  352. //=============================================================
  353. void() bot_die =
  354. {
  355.         local string blah;
  356.         blah = ftos(self.frags);
  357.  
  358.         if (deathmatch)
  359.         {
  360.                 bprint(self.netname);
  361.                 bprint(" ");
  362.                 bprint("died with");
  363.                 bprint(" ");
  364.                 bprint(blah);
  365.                 bprint(" ");
  366.                 if (self.frags == 1)
  367.                         bprint("frag!\n");
  368.                 else
  369.                         bprint("frags!\n");
  370.         }
  371.  
  372.         if (self.health < -40)
  373.     {
  374.         GibPlayer ();
  375.                 if (deathmatch)
  376.                         botrespawn();
  377.         return;
  378.     }
  379.         
  380.         sound (self, CHAN_VOICE, "player/death1.wav", 1, ATTN_NORM);
  381.     if (random() > 0.5)
  382.         bot_die1 ();
  383.     else
  384.         bot_fdie1 ();
  385.         
  386. // death frame sequence includes bot deactivation    
  387. };
  388.  
  389. //=============================================================
  390. // BotTarget
  391. //=============================================================
  392. void() BotHuntTarget =
  393. {
  394.     self.goalentity = self.enemy;
  395.     self.think = self.th_run;
  396.     self.ideal_yaw = vectoyaw(self.enemy.origin - self.origin);
  397.     self.nextthink = time + 0.1;
  398.         SUB_AttackFinished (0.1);       // wait a while before first attack
  399. };
  400.  
  401. //=============================================================
  402. // BotHuntStuff - Look for items
  403. //=============================================================
  404. void() BotHuntStuff =
  405. {
  406.         self.goalentity = self.stuff;
  407.         self.think = self.th_stuff;
  408.     if (CheckAnyAttack ())
  409.                 return;                            
  410.         self.ideal_yaw = vectoyaw(self.stuff.origin - self.origin);
  411.     self.nextthink = time + 0.1;
  412. };
  413.  
  414.  
  415. //=============================================================
  416. // BotFoundTarget
  417. //=============================================================
  418. void() BotFoundTarget =
  419. {
  420.     local float f_dist;
  421.     local string s_dist;
  422.     f_dist = vlen (self.enemy.origin - self.origin);
  423.     s_dist = ftos (f_dist);
  424.  
  425.     self.show_hostile = time + 1;        // wake up other monsters
  426.     
  427.     BotHuntTarget ();
  428. };
  429.  
  430. //=============================================================
  431. // BotFoundStuff - Items
  432. //=============================================================
  433. void() BotFoundStuff =
  434. {
  435.         local float f_dist;
  436.         local string s_dist;
  437.         f_dist = vlen (self.stuff.origin - self.origin);
  438.         s_dist = ftos (f_dist);
  439.  
  440.         BotHuntStuff ();
  441. };
  442.  
  443.  
  444. //=============================================================
  445. // bot_ai_walk - bot is walking, looking for enemies
  446. //=============================================================
  447. void(float dist) bot_ai_walk =
  448. {
  449.         if (BotFindTarget ())
  450.                 return;
  451.  
  452.         if (BotFindStuff ())
  453.         return;
  454.         traceline (self.origin, self.origin + '0 20 0', FALSE, self);
  455.         if (trace_plane_dist < 0.02)
  456.         {
  457.                 self.angles_y = self.angles_y - 11.5;
  458.         }
  459.     CheckJump();
  460.     self.lastpos=self.origin;
  461.         movetogoal (dist);
  462. };
  463.  
  464.  
  465. //=============================================================
  466. // bot_ai_run - still needs a little work
  467. //=============================================================
  468. void(float dist) bot_ai_run =
  469. {
  470.         local   float   r,f,rs;
  471.     local    vector    delta;
  472.     local    float    axis;
  473.     local    float    direct, ang_rint, ang_floor, ang_ceil;
  474.     
  475.     movedist = dist;
  476.  
  477.     if (self.enemy.health <= 0)
  478.     {
  479.         self.enemy = world;
  480.         if (self.oldenemy.health > 0)
  481.         {
  482.             self.enemy = self.oldenemy;
  483.             BotHuntTarget ();
  484.         }
  485.         else
  486.         {
  487.             if (BotFindTarget())
  488.                 return;
  489.             else
  490.             {
  491.                 self.th_walk ();
  492.                 return;
  493.             }
  494.         }
  495.     }
  496.  
  497.     enemy_vis = visible(self.enemy);
  498.     if (enemy_vis)
  499.                 self.search_time = time+15;  // used to be +5
  500.  
  501.     enemy_infront = infront(self.enemy);
  502.     enemy_range = range(self.enemy);
  503.     enemy_yaw = vectoyaw(self.enemy.origin - self.origin);
  504.     
  505.     if (self.attack_state == AS_MISSILE)
  506.     {
  507.         ai_run_missile ();
  508.         return;
  509.     if (self.lastpos == self.origin) BotJump();
  510.  
  511.     }
  512.  
  513. //        if (CheckAnyAttack ())
  514. //                return;
  515.  
  516.     r = random();
  517.     
  518.         if (r < 0.05)
  519.     { 
  520.         BotJump();
  521.     }
  522.     if (self.watertype == CONTENT_LAVA)
  523.           {
  524.                 bot_die();
  525.           }
  526.     if (self.attack_state == AS_SLIDING)
  527.     {
  528.         ai_run_slide ();
  529.         return;
  530.  
  531.     }
  532.  
  533.         rs = rint((random() * 400) + 1);
  534.  
  535.             if (rs ==1) 
  536.              sound(self,CHAN_BODY,"noshoot.wav",1,ATTN_NORM);
  537.              if (rs ==2)
  538.              sound(self,CHAN_BODY,"agh1.wav",1,ATTN_NORM);
  539.              if (rs ==3)
  540.              sound(self,CHAN_BODY,"agh2.wav",1,ATTN_NORM);
  541.              if (rs ==4)
  542.              sound(self,CHAN_BODY,"runaway.wav",1,ATTN_NORM);
  543.              if (rs ==5)
  544.              sound(self,CHAN_BODY,"helpme.wav",1,ATTN_NORM);
  545.  
  546.  
  547.     CheckJump();
  548.     movetogoal (dist);        // done in C code...
  549. };
  550.  
  551. //=============================================================
  552. // bot_ai_stuff - crappy hack
  553. //=============================================================
  554. void(float dist) bot_ai_stuff =
  555. {
  556.         local   vector  delta;
  557.         local   float   axis;
  558.         local   float   direct, ang_rint, ang_floor, ang_ceil;
  559.     
  560.     movedist = dist;
  561.  
  562.         enemy_vis = visible(self.stuff);
  563.         if (enemy_vis)
  564.         self.search_time = time + 5;
  565.  
  566.         enemy_infront = infront(self.stuff);
  567.         enemy_range = range(self.stuff);
  568.         enemy_yaw = vectoyaw(self.stuff.origin - self.origin);
  569.         
  570.     movetogoal (dist);        // done in C code...
  571. };
  572.  
  573.  
  574. //=============================================================
  575. // BotSelfDeActivate - Bot deactivates itself
  576. //=============================================================
  577. void () BotSelfDeActivate =
  578. {
  579.         self.solid = SOLID_NOT;
  580.         self.deadflag = DEAD_DEAD;
  581.         if (deathmatch)
  582.                 botrespawn();
  583. };
  584.