1 
2 #include "g_local.h"
3 #include "bot.h"
4 typedef struct
5 {
6 	char	*name;
7 	void	(*spawn)(edict_t *ent);
8 } spawn_t;
9 
10 
11 void SP_item_health (edict_t *self);
12 void SP_item_health_small (edict_t *self);
13 void SP_item_health_large (edict_t *self);
14 void SP_item_health_mega (edict_t *self);
15 
16 void SP_info_player_start (edict_t *ent);
17 void SP_info_player_deathmatch (edict_t *ent);
18 void SP_info_player_coop (edict_t *ent);
19 void SP_info_player_intermission (edict_t *ent);
20 
21 void SP_func_plat (edict_t *ent);
22 void SP_func_rotating (edict_t *ent);
23 void SP_func_button (edict_t *ent);
24 void SP_func_door (edict_t *ent);
25 void SP_func_door_secret (edict_t *ent);
26 void SP_func_door_rotating (edict_t *ent);
27 void SP_func_water (edict_t *ent);
28 void SP_func_train (edict_t *ent);
29 void SP_func_conveyor (edict_t *self);
30 void SP_func_wall (edict_t *self);
31 void SP_func_object (edict_t *self);
32 void SP_func_explosive (edict_t *self);
33 void SP_func_timer (edict_t *self);
34 void SP_func_areaportal (edict_t *ent);
35 void SP_func_clock (edict_t *ent);
36 void SP_func_killbox (edict_t *ent);
37 
38 void SP_trigger_always (edict_t *ent);
39 void SP_trigger_once (edict_t *ent);
40 void SP_trigger_multiple (edict_t *ent);
41 void SP_trigger_relay (edict_t *ent);
42 void SP_trigger_push (edict_t *ent);
43 void SP_trigger_hurt (edict_t *ent);
44 void SP_trigger_key (edict_t *ent);
45 void SP_trigger_counter (edict_t *ent);
46 void SP_trigger_elevator (edict_t *ent);
47 void SP_trigger_gravity (edict_t *ent);
48 void SP_trigger_monsterjump (edict_t *ent);
49 
50 void SP_target_temp_entity (edict_t *ent);
51 void SP_target_speaker (edict_t *ent);
52 void SP_target_explosion (edict_t *ent);
53 void SP_target_changelevel (edict_t *ent);
54 void SP_target_secret (edict_t *ent);
55 void SP_target_goal (edict_t *ent);
56 void SP_target_splash (edict_t *ent);
57 void SP_target_spawner (edict_t *ent);
58 void SP_target_blaster (edict_t *ent);
59 void SP_target_crosslevel_trigger (edict_t *ent);
60 void SP_target_crosslevel_target (edict_t *ent);
61 void SP_target_laser (edict_t *self);
62 void SP_target_help (edict_t *ent);
63 void SP_target_actor (edict_t *ent);
64 void SP_target_lightramp (edict_t *self);
65 void SP_target_earthquake (edict_t *ent);
66 void SP_target_character (edict_t *ent);
67 void SP_target_string (edict_t *ent);
68 
69 void SP_worldspawn (edict_t *ent);
70 void SP_viewthing (edict_t *ent);
71 
72 void SP_light (edict_t *self);
73 void SP_light_mine1 (edict_t *ent);
74 void SP_light_mine2 (edict_t *ent);
75 void SP_info_null (edict_t *self);
76 void SP_info_notnull (edict_t *self);
77 void SP_path_corner (edict_t *self);
78 void SP_point_combat (edict_t *self);
79 
80 void SP_misc_explobox (edict_t *self);
81 void SP_misc_banner (edict_t *self);
82 void SP_misc_satellite_dish (edict_t *self);
83 void SP_misc_actor (edict_t *self);
84 void SP_misc_gib_arm (edict_t *self);
85 void SP_misc_gib_leg (edict_t *self);
86 void SP_misc_gib_head (edict_t *self);
87 void SP_misc_insane (edict_t *self);
88 void SP_misc_deadsoldier (edict_t *self);
89 void SP_misc_viper (edict_t *self);
90 void SP_misc_viper_bomb (edict_t *self);
91 void SP_misc_bigviper (edict_t *self);
92 void SP_misc_strogg_ship (edict_t *self);
93 void SP_misc_teleporter (edict_t *self);
94 void SP_misc_teleporter_dest (edict_t *self);
95 void SP_misc_blackhole (edict_t *self);
96 void SP_misc_eastertank (edict_t *self);
97 void SP_misc_easterchick (edict_t *self);
98 void SP_misc_easterchick2 (edict_t *self);
99 
100 void SP_monster_berserk (edict_t *self);
101 void SP_monster_gladiator (edict_t *self);
102 void SP_monster_gunner (edict_t *self);
103 void SP_monster_infantry (edict_t *self);
104 void SP_monster_soldier_light (edict_t *self);
105 void SP_monster_soldier (edict_t *self);
106 void SP_monster_soldier_ss (edict_t *self);
107 void SP_monster_tank (edict_t *self);
108 void SP_monster_medic (edict_t *self);
109 void SP_monster_flipper (edict_t *self);
110 void SP_monster_chick (edict_t *self);
111 void SP_monster_parasite (edict_t *self);
112 void SP_monster_flyer (edict_t *self);
113 void SP_monster_brain (edict_t *self);
114 void SP_monster_floater (edict_t *self);
115 void SP_monster_hover (edict_t *self);
116 void SP_monster_mutant (edict_t *self);
117 void SP_monster_supertank (edict_t *self);
118 void SP_monster_boss2 (edict_t *self);
119 void SP_monster_jorg (edict_t *self);
120 void SP_monster_boss3_stand (edict_t *self);
121 
122 void SP_monster_commander_body (edict_t *self);
123 
124 void SP_turret_breach (edict_t *self);
125 void SP_turret_base (edict_t *self);
126 void SP_turret_driver (edict_t *self);
127 
128 // RAFAEL 14-APR-98
129 void SP_monster_soldier_hypergun (edict_t *self);
130 void SP_monster_soldier_lasergun (edict_t *self);
131 void SP_monster_soldier_ripper (edict_t *self);
132 void SP_monster_fixbot (edict_t *self);
133 void SP_monster_gekk (edict_t *self);
134 void SP_monster_chick_heat (edict_t *self);
135 void SP_monster_gladb (edict_t *self);
136 void SP_monster_boss5 (edict_t *self);
137 void SP_rotating_light (edict_t *self);
138 void SP_object_repair (edict_t *self);
139 void SP_misc_crashviper (edict_t *ent);
140 void SP_misc_viper_missile (edict_t *self);
141 void SP_misc_amb4 (edict_t *ent);
142 void SP_target_mal_laser (edict_t *ent);
143 void SP_misc_transport (edict_t *ent);
144 // END 14-APR-98
145 
146 void SP_misc_nuke (edict_t *ent);
147 
148 spawn_t	spawns[] = {
149 	{"item_health", SP_item_health},
150 	{"item_health_small", SP_item_health_small},
151 	{"item_health_large", SP_item_health_large},
152 	{"item_health_mega", SP_item_health_mega},
153 
154 	{"info_player_start", SP_info_player_start},
155 	{"info_player_deathmatch", SP_info_player_deathmatch},
156 	{"info_player_coop", SP_info_player_coop},
157 	{"info_player_intermission", SP_info_player_intermission},
158 //ZOID
159 	{"info_player_team1", SP_info_player_team1},
160 	{"info_player_team2", SP_info_player_team2},
161 //ZOID
162 
163 	{"func_plat", SP_func_plat},
164 	{"func_button", SP_func_button},
165 	{"func_door", SP_func_door},
166 	{"func_door_secret", SP_func_door_secret},
167 	{"func_door_rotating", SP_func_door_rotating},
168 	{"func_rotating", SP_func_rotating},
169 	{"func_train", SP_func_train},
170 	{"func_water", SP_func_water},
171 	{"func_conveyor", SP_func_conveyor},
172 	{"func_areaportal", SP_func_areaportal},
173 	{"func_clock", SP_func_clock},
174 	{"func_wall", SP_func_wall},
175 	{"func_object", SP_func_object},
176 	{"func_timer", SP_func_timer},
177 	{"func_explosive", SP_func_explosive},
178 	{"func_killbox", SP_func_killbox},
179 
180 	// RAFAEL
181 	{"func_object_repair", SP_object_repair},
182 	{"rotating_light", SP_rotating_light},
183 
184 	{"trigger_always", SP_trigger_always},
185 	{"trigger_once", SP_trigger_once},
186 	{"trigger_multiple", SP_trigger_multiple},
187 	{"trigger_relay", SP_trigger_relay},
188 	{"trigger_push", SP_trigger_push},
189 	{"trigger_hurt", SP_trigger_hurt},
190 	{"trigger_key", SP_trigger_key},
191 	{"trigger_counter", SP_trigger_counter},
192 	{"trigger_elevator", SP_trigger_elevator},
193 	{"trigger_gravity", SP_trigger_gravity},
194 	{"trigger_monsterjump", SP_trigger_monsterjump},
195 
196 	{"target_temp_entity", SP_target_temp_entity},
197 	{"target_speaker", SP_target_speaker},
198 	{"target_explosion", SP_target_explosion},
199 	{"target_changelevel", SP_target_changelevel},
200 	{"target_secret", SP_target_secret},
201 	{"target_goal", SP_target_goal},
202 	{"target_splash", SP_target_splash},
203 	{"target_spawner", SP_target_spawner},
204 	{"target_blaster", SP_target_blaster},
205 	{"target_crosslevel_trigger", SP_target_crosslevel_trigger},
206 	{"target_crosslevel_target", SP_target_crosslevel_target},
207 	{"target_laser", SP_target_laser},
208 	{"target_help", SP_target_help},
209 #if 0 // remove monster code
210 	{"target_actor", SP_target_actor},
211 #endif
212 	{"target_lightramp", SP_target_lightramp},
213 	{"target_earthquake", SP_target_earthquake},
214 	{"target_character", SP_target_character},
215 	{"target_string", SP_target_string},
216 
217 	// RAFAEL 15-APR-98
218 	{"target_mal_laser", SP_target_mal_laser},
219 
220 	{"worldspawn", SP_worldspawn},
221 	{"viewthing", SP_viewthing},
222 
223 	{"light", SP_light},
224 	{"light_mine1", SP_light_mine1},
225 	{"light_mine2", SP_light_mine2},
226 	{"info_null", SP_info_null},
227 	{"func_group", SP_info_null},
228 	{"info_notnull", SP_info_notnull},
229 	{"path_corner", SP_path_corner},
230 	{"point_combat", SP_point_combat},
231 
232 	{"misc_explobox", SP_misc_explobox},
233 	{"misc_banner", SP_misc_banner},
234 //ZOID
235 	{"misc_ctf_banner", SP_misc_ctf_banner},
236 	{"misc_ctf_small_banner", SP_misc_ctf_small_banner},
237 //ZOID
238 	{"misc_satellite_dish", SP_misc_satellite_dish},
239 #if 0 // remove monster code
240 	{"misc_actor", SP_misc_actor},
241 #endif
242 	{"misc_gib_arm", SP_misc_gib_arm},
243 	{"misc_gib_leg", SP_misc_gib_leg},
244 	{"misc_gib_head", SP_misc_gib_head},
245 #if 0 // remove monster code
246 	{"misc_insane", SP_misc_insane},
247 #endif
248 	{"misc_deadsoldier", SP_misc_deadsoldier},
249 	{"misc_viper", SP_misc_viper},
250 	{"misc_viper_bomb", SP_misc_viper_bomb},
251 	{"misc_bigviper", SP_misc_bigviper},
252 	{"misc_strogg_ship", SP_misc_strogg_ship},
253 	{"misc_teleporter", SP_misc_teleporter},
254 	{"misc_teleporter_dest", SP_misc_teleporter_dest},
255 //ZOID
256 	{"trigger_teleport", SP_trigger_teleport},
257 	{"info_teleport_destination", SP_info_teleport_destination},
258 //ZOID
259 	{"misc_blackhole", SP_misc_blackhole},
260 	{"misc_eastertank", SP_misc_eastertank},
261 	{"misc_easterchick", SP_misc_easterchick},
262 	{"misc_easterchick2", SP_misc_easterchick2},
263 
264 	// RAFAEL
265 //	{"misc_crashviper", SP_misc_crashviper},
266 //	{"misc_viper_missile", SP_misc_viper_missile},
267 	{"misc_amb4", SP_misc_amb4},
268 	// RAFAEL 17-APR-98
269 	{"misc_transport", SP_misc_transport},
270 	// END 17-APR-98
271 	// RAFAEL 12-MAY-98
272 	{"misc_nuke", SP_misc_nuke},
273 
274 #if 0 // remove monster code
275 	{"monster_berserk", SP_monster_berserk},
276 	{"monster_gladiator", SP_monster_gladiator},
277 	{"monster_gunner", SP_monster_gunner},
278 	{"monster_infantry", SP_monster_infantry},
279 	{"monster_soldier_light", SP_monster_soldier_light},
280 	{"monster_soldier", SP_monster_soldier},
281 	{"monster_soldier_ss", SP_monster_soldier_ss},
282 	{"monster_tank", SP_monster_tank},
283 	{"monster_tank_commander", SP_monster_tank},
284 	{"monster_medic", SP_monster_medic},
285 	{"monster_flipper", SP_monster_flipper},
286 	{"monster_chick", SP_monster_chick},
287 	{"monster_parasite", SP_monster_parasite},
288 	{"monster_flyer", SP_monster_flyer},
289 	{"monster_brain", SP_monster_brain},
290 	{"monster_floater", SP_monster_floater},
291 	{"monster_hover", SP_monster_hover},
292 	{"monster_mutant", SP_monster_mutant},
293 	{"monster_supertank", SP_monster_supertank},
294 	{"monster_boss2", SP_monster_boss2},
295 	{"monster_boss3_stand", SP_monster_boss3_stand},
296 	{"monster_jorg", SP_monster_jorg},
297 
298 	{"monster_commander_body", SP_monster_commander_body},
299 
300 	{"turret_breach", SP_turret_breach},
301 	{"turret_base", SP_turret_base},
302 	{"turret_driver", SP_turret_driver},
303 #endif
304 
305 	{NULL, NULL}
306 };
307 
308 /*
309 ===============
310 ED_CallSpawn
311 
312 Finds the spawn function for the entity and calls it
313 ===============
314 */
ED_CallSpawn(edict_t * ent)315 void ED_CallSpawn (edict_t *ent)
316 {
317 	spawn_t	*s;
318 	gitem_t	*item;
319 	int		i;
320 
321 	if (!ent->classname)
322 	{
323 		gi.dprintf ("ED_CallSpawn: NULL classname\n");
324 		return;
325 	}
326 
327 	// check item spawn functions
328 	for (i=0,item=itemlist ; i<game.num_items ; i++,item++)
329 	{
330 		if (!item->classname)
331 			continue;
332 		if (!strcmp(item->classname, ent->classname))
333 		{	// found it
334 			SpawnItem (ent, item);
335 //ponko
336 			if     (!strcmp(ent->classname,"weapon_shotgun"))		mpindex[WEAP_SHOTGUN] = i;
337 			else if(!strcmp(ent->classname,"weapon_supershotgun"))	mpindex[WEAP_SUPERSHOTGUN] = i;
338 			else if(!strcmp(ent->classname,"weapon_machinegun"))	mpindex[WEAP_MACHINEGUN] = i;
339 			else if(!strcmp(ent->classname,"weapon_chaingun"))		mpindex[WEAP_CHAINGUN] = i;
340 			else if(!strcmp(ent->classname,"ammo_grenades"))		mpindex[WEAP_GRENADES] = i;
341 			else if(!strcmp(ent->classname,"weapon_grenadelauncher"))	mpindex[WEAP_GRENADELAUNCHER] = i;
342 			else if(!strcmp(ent->classname,"weapon_rocketlauncher"))	mpindex[WEAP_ROCKETLAUNCHER] = i;
343 			else if(!strcmp(ent->classname,"weapon_hyperblaster"))	mpindex[WEAP_HYPERBLASTER] = i;
344 			else if(!strcmp(ent->classname,"weapon_boomer"))		mpindex[WEAP_BOOMER] = i;
345 			else if(!strcmp(ent->classname,"weapon_railgun"))		mpindex[WEAP_RAILGUN] = i;
346 			else if(!strcmp(ent->classname,"weapon_phalanx"))		mpindex[WEAP_PHALANX] = i;
347 			else if(!strcmp(ent->classname,"weapon_bfg"))			mpindex[WEAP_BFG] = i;
348 			else if(!strcmp(ent->classname,"item_quad"))			mpindex[MPI_QUAD] = i;
349 			else if(!strcmp(ent->classname,"item_invulnerability"))	mpindex[MPI_PENTA] = i;
350 			else if(!strcmp(ent->classname,"item_quadfire"))		mpindex[MPI_QUADF] = i;
351 //ponko
352 			return;
353 		}
354 	}
355 
356 	// check normal spawn functions
357 	for (s=spawns ; s->name ; s++)
358 	{
359 		if (!strcmp(s->name, ent->classname))
360 		{	// found it
361 			s->spawn (ent);
362 			return;
363 		}
364 	}
365 //	gi.dprintf ("%s doesn't have a spawn function\n", ent->classname);
366 }
367 
368 /*
369 =============
370 ED_NewString
371 =============
372 */
ED_NewString(char * string)373 char *ED_NewString (char *string)
374 {
375 	char	*newb, *new_p;
376 	int		i,l;
377 
378 	l = strlen(string) + 1;
379 
380 	newb = gi.TagMalloc (l, TAG_LEVEL);
381 
382 	new_p = newb;
383 
384 	for (i=0 ; i< l ; i++)
385 	{
386 		if (string[i] == '\\' && i < l-1)
387 		{
388 			i++;
389 			if (string[i] == 'n')
390 				*new_p++ = '\n';
391 			else
392 				*new_p++ = '\\';
393 		}
394 		else
395 			*new_p++ = string[i];
396 	}
397 
398 	return newb;
399 }
400 
401 
402 
403 
404 /*
405 ===============
406 ED_ParseField
407 
408 Takes a key/value pair and sets the binary values
409 in an edict
410 ===============
411 */
ED_ParseField(char * key,char * value,edict_t * ent)412 void ED_ParseField (char *key, char *value, edict_t *ent)
413 {
414 	field_t	*f;
415 	byte	*b;
416 	float	v;
417 	vec3_t	vec;
418 
419 	for (f=fields ; f->name ; f++)
420 	{
421 		if (!Q_stricmp(f->name, key))
422 		{	// found it
423 			if (f->flags & FFL_SPAWNTEMP)
424 				b = (byte *)&st;
425 			else
426 				b = (byte *)ent;
427 
428 			switch (f->type)
429 			{
430 			case F_LSTRING:
431 				*(char **)(b+f->ofs) = ED_NewString (value);
432 				break;
433 			case F_VECTOR:
434 				sscanf (value, "%f %f %f", &vec[0], &vec[1], &vec[2]);
435 				((float *)(b+f->ofs))[0] = vec[0];
436 				((float *)(b+f->ofs))[1] = vec[1];
437 				((float *)(b+f->ofs))[2] = vec[2];
438 				break;
439 			case F_INT:
440 				*(int *)(b+f->ofs) = atoi(value);
441 				break;
442 			case F_FLOAT:
443 				*(float *)(b+f->ofs) = atof(value);
444 				break;
445 			case F_ANGLEHACK:
446 				v = atof(value);
447 				((float *)(b+f->ofs))[0] = 0;
448 				((float *)(b+f->ofs))[1] = v;
449 				((float *)(b+f->ofs))[2] = 0;
450 				break;
451 			case F_IGNORE:
452 				break;
453 			}
454 			return;
455 		}
456 	}
457 //	gi.dprintf ("%s is not a field %s\n", key,ent->classname);
458 }
459 
460 /*
461 ====================
462 ED_ParseEdict
463 
464 Parses an edict out of the given string, returning the new position
465 ed should be a properly initialized empty edict.
466 ====================
467 */
ED_ParseEdict(char * data,edict_t * ent)468 char *ED_ParseEdict (char *data, edict_t *ent)
469 {
470 	qboolean	init;
471 	char		keyname[256];
472 	char		*com_token;
473 
474 	init = false;
475 	memset (&st, 0, sizeof(st));
476 
477 // go through all the dictionary pairs
478 	while (1)
479 	{
480 	// parse key
481 		com_token = COM_Parse (&data);
482 		if (com_token[0] == '}')
483 			break;
484 		if (!data)
485 			gi.error ("ED_ParseEntity: EOF without closing brace");
486 
487 		strncpy (keyname, com_token, sizeof(keyname)-1);
488 
489 	// parse value
490 		com_token = COM_Parse (&data);
491 		if (!data)
492 			gi.error ("ED_ParseEntity: EOF without closing brace");
493 
494 		if (com_token[0] == '}')
495 			gi.error ("ED_ParseEntity: closing brace without data");
496 
497 		init = true;
498 
499 	// keynames with a leading underscore are used for utility comments,
500 	// and are immediately discarded by quake
501 		if (keyname[0] == '_')
502 			continue;
503 
504 		ED_ParseField (keyname, com_token, ent);
505 	}
506 
507 	if (!init)
508 		memset (ent, 0, sizeof(*ent));
509 
510 	return data;
511 }
512 
513 
514 /*
515 ================
516 G_FindTeams
517 
518 Chain together all entities with a matching team field.
519 
520 All but the first will have the FL_TEAMSLAVE flag set.
521 All but the last will have the teamchain field set to the next one
522 ================
523 */
G_FindTeams(void)524 void G_FindTeams (void)
525 {
526 	edict_t	*e, *e2, *chain;
527 	int		i, j;
528 	int		c, c2;
529 
530 	c = 0;
531 	c2 = 0;
532 	for (i=1, e=g_edicts+i ; i < globals.num_edicts ; i++,e++)
533 	{
534 		if (!e->inuse)
535 			continue;
536 		if (!e->team)
537 			continue;
538 		if (e->flags & FL_TEAMSLAVE)
539 			continue;
540 		chain = e;
541 		e->teammaster = e;
542 		c++;
543 		c2++;
544 		for (j=i+1, e2=e+1 ; j < globals.num_edicts ; j++,e2++)
545 		{
546 			if (!e2->inuse)
547 				continue;
548 			if (!e2->team)
549 				continue;
550 			if (e2->flags & FL_TEAMSLAVE)
551 				continue;
552 			if (!strcmp(e->team, e2->team))
553 			{
554 				c2++;
555 				chain->teamchain = e2;
556 				e2->teammaster = e;
557 				chain = e2;
558 				e2->flags |= FL_TEAMSLAVE;
559 			}
560 		}
561 	}
562 
563 	gi.dprintf ("%i teams with %i entities\n", c, c2);
564 }
565 
566 
567 /*
568 ================
569 G_FindTrainTeam
570 
571 Chain together all entities with a matching team field.
572 
573 All but the last will have the teamchain field set to the next one
574 ================
575 */
G_FindTrainTeam()576 void G_FindTrainTeam()
577 {
578 	edict_t	*teamlist[MAX_EDICTS + 1];
579 	edict_t	*e,*t,*p;
580 
581 	qboolean	findteam;
582 	char	*currtarget,*currtargetname;
583 	char	*targethist[MAX_EDICTS];
584 	int		lc,i,j,k;
585 	int		loopindex;
586 
587 	e = &g_edicts[(int)maxclients->value+1];
588 	for ( i=maxclients->value+1 ; i<globals.num_edicts ; i++, e++)
589 	{
590 		if(e->inuse && e->classname)
591 		{
592 			if(!Q_stricmp(e->classname,"path_corner") && e->targetname && e->target)
593 			{
594 //		orgtarget = e->target;		//terminal
595 //		orgtargetname = e->targetname;
596 				currtarget = e->target;			//target
597 				currtargetname = e->targetname;	//targetname
598 				lc = 0;
599 
600 				memset(&teamlist,0,sizeof(teamlist));
601 				memset(&targethist,0,sizeof(targethist));
602 				findteam = false;
603 
604 				loopindex = 0;
605 				targethist[0] = e->targetname;
606 
607 				while(lc < MAX_EDICTS)
608 				{
609 					t = &g_edicts[(int)maxclients->value+1];
610 					for ( j=maxclients->value+1 ; j<globals.num_edicts ; j++, t++)
611 					{
612 						if(t->inuse && t->classname)
613 						{
614 							if(!Q_stricmp(t->classname,"func_train")
615 								&& !Q_stricmp(t->target,currtargetname)
616 								&& t->trainteam == NULL)
617 							{
618 								for(k = 0;k < lc; k++)
619 								{
620 									if(teamlist[k] == t) break;
621 								}
622 								if(k == lc )
623 								{
624 									teamlist[lc] = t;
625 									lc++;
626 								}
627 							}
628 						}
629 					}
630 					p = G_PickTarget(currtarget);
631 					if(!p) break;
632 					currtarget = p->target;
633 					currtargetname = p->targetname;
634 					if(!p->target) break;
635 					for(k = 0;k < loopindex;k++)
636 					{
637 						if(!Q_stricmp(targethist[k],currtargetname)) break;
638 					}
639 					if(k < loopindex)
640 					{
641 						findteam = true;
642 						break;
643 					}
644 					targethist[loopindex] = currtargetname;
645 					loopindex++;
646 					/*if(!Q_stricmp(currtarget,orgtargetname))
647 					{
648 						findteam = true;
649 						break;
650 					}*/
651 				}
652 				if(findteam && lc > 0)
653 				{
654 					gi.dprintf("%i train chaining founded.\n",lc);
655 					for(k = 0;k < lc; k++)
656 					{
657 						if(teamlist[k + 1] == NULL)
658 						{
659 							teamlist[k]->trainteam = teamlist[0];
660 							break;
661 						}
662 						teamlist[k]->trainteam = teamlist[k + 1];
663 					}
664 				}
665 			}
666 		}
667 	}
668 }
669 /*
670 ================
671 G_FindItemLink
672 
673 
674 
675 
676 ================
677 */
678 
679 
G_FindItemLink()680 void G_FindItemLink()
681 {
682 	int i,j,k;
683 
684 	if(CurrentIndex <= 0) return;
685 
686 	//search
687 	for(i = 0;i < CurrentIndex;i++)
688 	{
689 		if(Route[i].state == GRS_ITEMS)
690 		{
691 			for(j = 0;j < CurrentIndex;j++)
692 			{
693 				//found!!
694 				if(j != i && Route[i].ent == Route[j].ent)
695 				{
696 					for(k = 0;k < (MAXLINKPOD - (ctf->value != 0));k++)
697 					{
698 						//search blanked index
699 						if(!Route[i].linkpod[k])
700 						{
701 							Route[i].linkpod[k] = j;
702 							break;
703 						}
704 					}
705 				}
706 			}
707 		}
708 	}
709 }
710 
711 
712 /*
713 ================
714 RTJump_Chk
715 ================
716 */
717 
RTJump_Chk(vec3_t apos,vec3_t tpos)718 qboolean RTJump_Chk(vec3_t apos,vec3_t tpos)
719 {
720 	float	x,l,grav,vel,ypos,yori;
721 	vec3_t	v,vv;
722 	int		mf = false;
723 
724 	grav = 1.0 * sv_gravity->value * FRAMETIME;
725 
726 	vel = VEL_BOT_JUMP;
727 	yori = apos[2];
728 	ypos = tpos[2];
729 
730 	VectorSubtract(tpos,apos,v);
731 
732 	for(x = 1;x <= FALLCHK_LOOPMAX * 2 ;++x )
733 	{
734 		vel -= grav;
735 		yori += vel * FRAMETIME;
736 
737 		if(vel > 0)
738 		{
739 			if(mf == false)
740 			{
741 				if(ypos < yori) mf = 2;
742 			}
743 		}
744 		else if(x > 1)
745 		{
746 			if(mf == false)
747 			{
748 				if(ypos < yori) mf = 2;
749 			}
750 
751 			else if(mf == 2)
752 			{
753 				if(ypos >= yori)
754 				{
755 						mf = true;
756 						break;
757 				}
758 			}
759 		}
760 	}
761 	VectorCopy(v,vv);
762 	vv[2] = 0;
763 
764 	l = VectorLength(vv);
765 
766 	if(x > 1) l = l / (x - 1);
767 	if(l < MOVE_SPD_RUN && mf == true)
768 	{
769 		return true;
770 	}
771 	return false;
772 }
773 
774 /*
775 ================
776 G_FindRouteLink
777 ================
778 */
G_FindRouteLink(edict_t * ent)779 void G_FindRouteLink(edict_t *ent)
780 {
781 	trace_t	rs_trace;
782 
783 	gitem_t		*item;
784 	qboolean	tpbool;
785 
786 	int i,j,k,l,total = 0;
787 	vec3_t	v,vv;
788 	float	x;
789 
790 
791 	//������������
792 	if(!ctf->value && zigmode->value == 1)
793 	{
794 		item = FindItem("Zig Flag");
795 		SelectSpawnPoint (ent, v, vv);
796 	//	VectorCopy (v, ent->s.origin);
797 		if(ZIGDrop_Flag(ent,zflag_item))
798 		{
799 			VectorCopy (v, zflag_ent->s.origin);
800 		}
801 		//ZIGDrop_Flag(ent,item);
802 		zigflag_spawn = 2;
803 	}
804 gi.dprintf("Linking routes...\n");
805 
806 	//get JumpMax
807 	if(JumpMax == 0)
808 	{
809 		x = VEL_BOT_JUMP - ent->gravity * sv_gravity->value * FRAMETIME;
810 		JumpMax = 0;
811 		while(1)
812 		{
813 			JumpMax += x * FRAMETIME;
814 			x -= ent->gravity * sv_gravity->value * FRAMETIME;
815 			if( x < 0 ) break;
816 		}
817 	}
818 
819 	//search
820 	for(i = 0;i < CurrentIndex;i++)
821 	{
822 		if(Route[i].state == GRS_NORMAL)
823 		{
824 			for(j = 0;j < CurrentIndex;j++)
825 			{
826 				if(abs(i - j) <= 50 || j == i || Route[j].state != GRS_NORMAL) continue;
827 
828 				VectorSubtract(Route[j].Pt,Route[i].Pt,v);
829 				if(v[2] > JumpMax || v[2] < -500) continue;
830 				v[2] = 0;
831 				if(VectorLength(v) > 200) continue;
832 
833 				if(fabs(v[2]) > 20 || VectorLength(v) > 64)
834 				{
835 					if(!RTJump_Chk(Route[i].Pt,Route[j].Pt))
836 									continue;
837 				}
838 
839 				tpbool = false;
840 				for(l = -5;l < 6;l++)
841 				{
842 					if( (i + l) < 0 || (i + l) >= CurrentIndex) continue;
843 					for(k = 0;k < (MAXLINKPOD - (ctf->value != 0));k++)
844 					{
845 						//search blanked index
846 						if(!Route[i + l].linkpod[k]) break;
847 						if(abs(Route[i + l].linkpod[k] - j) < 50)
848 						{
849 							tpbool = true;
850 							break;
851 						}
852 					}
853 					if(tpbool) break;
854 				}
855 				if(tpbool) continue;
856 
857 //				VectorSubtract(Route[j].Pt,Route[i].Pt,v);
858 
859 				rs_trace = gi.trace(Route[j].Pt,NULL,NULL,Route[i].Pt,ent,MASK_SOLID);
860 				//found!!
861 				if(!rs_trace.startsolid && !rs_trace.allsolid && rs_trace.fraction == 1.0)
862 				{
863 					for(k = 0;k < (MAXLINKPOD - (ctf->value != 0));k++)
864 					{
865 						//search blanked index
866 						if(!Route[i].linkpod[k])
867 						{
868 							Route[i].linkpod[k] = j;
869 							total++;
870 							break;
871 						}
872 					}
873 				}
874 			}
875 		}
876 	}
877 //gi.dprintf("yare!!!!!!!\n");
878 	if(ctf->value && bot_team_flag1 && bot_team_flag2)
879 	{
880 		j = 0;
881 		k = 0;
882 		//search
883 		for(i = (CurrentIndex - 1);i >= 0 ;i--)
884 		{
885 			if(Route[i].state < GRS_ITEMS)
886 			{
887 				if(Route[i].state == GRS_REDFLAG || Route[i].state == GRS_BLUEFLAG)
888 				{
889 					if(Route[i].ent == bot_team_flag1){ j = FOR_FLAG1; k = i;}
890 					else if(Route[i].ent == bot_team_flag2) {j = FOR_FLAG2;k = i;}
891 				}
892 
893 				if(j == FOR_FLAG1)		Route[i].linkpod[MAXLINKPOD - 1] = (CTF_FLAG1_FLAG | k);
894 				else if(j == FOR_FLAG2)	Route[i].linkpod[MAXLINKPOD - 1] = (CTF_FLAG2_FLAG | k);
895 				else Route[i].linkpod[MAXLINKPOD - 1] = 0;
896 			}
897 		}
898 	}
899 
900 gi.dprintf("Total %i linking done.\n",total);
901 	G_FreeEdict (ent);
902 }
903 
904 /*
905 ================
906 G_SpawnRouteLink
907 ================
908 */
G_SpawnRouteLink()909 void G_SpawnRouteLink()
910 {
911 	edict_t *e;
912 
913 	if(CurrentIndex <= 0) return;
914 
915 	e = G_Spawn();
916 
917 	e->nextthink = level.time + FRAMETIME * 2;
918 	e->think = G_FindRouteLink;
919 }
920 
921 /*
922 ==============
923 SpawnEntities
924 
925 Creates a server's entity / program execution context by
926 parsing textual entity definitions out of an ent file.
927 ==============
928 */
929 //void SetBotFlag1(edict_t *ent);	//�`�[��1�̊�
930 //void SetBotFlag2(edict_t *ent);  //�`�[��2�̊�
931 
932 //void CTFSetupNavSpawn();	//�i�r�̐ݒu
SpawnEntities(char * mapname,char * entities,char * spawnpoint)933 void SpawnEntities (char *mapname, char *entities, char *spawnpoint)
934 {
935 	edict_t		*ent;
936 	int			inhibit;
937 	char		*com_token;
938 	int			i;
939 	float		skill_level;
940 
941 	int			laser = 0;
942 //ponko
943 	memset(mpindex,0,sizeof(mpindex));	//target item index
944 	memset(LaserIndex,0,sizeof(LaserIndex));
945 //ponko
946 
947 	skill_level = floor (skill->value);
948 	if (skill_level < 0)
949 		skill_level = 0;
950 	if (skill_level > 4)
951 		skill_level = 4;
952 	if (skill->value != skill_level)
953 		gi.cvar_forceset("skill", va("%f", skill_level));
954 
955 	SaveClientData ();
956 
957 	gi.FreeTags (TAG_LEVEL);
958 
959 	memset (&level, 0, sizeof(level));
960 	memset (g_edicts, 0, game.maxentities * sizeof (g_edicts[0]));
961 
962 	strncpy (level.mapname, mapname, sizeof(level.mapname)-1);
963 	strncpy (game.spawnpoint, spawnpoint, sizeof(game.spawnpoint)-1);
964 
965 	// set client fields on player ents
966 	for (i=0 ; i<game.maxclients ; i++)
967 		g_edicts[i+1].client = game.clients + i;
968 
969 	ent = NULL;
970 	inhibit = 0;
971 
972 // parse ents
973 	while (1)
974 	{
975 		// parse the opening brace
976 		com_token = COM_Parse (&entities);
977 		if (!entities)
978 			break;
979 		if (com_token[0] != '{')
980 			gi.error ("ED_LoadFromFile: found %s when expecting {",com_token);
981 
982 		if (!ent)
983 			ent = g_edicts;
984 		else
985 			ent = G_Spawn ();
986 		entities = ED_ParseEdict (entities, ent);
987 
988 		// remove things (except the world) from different skill levels or deathmatch
989 		if (ent != g_edicts)
990 		{
991 			if (deathmatch->value)
992 			{
993 				if ( ent->spawnflags & SPAWNFLAG_NOT_DEATHMATCH )
994 				{
995 					G_FreeEdict (ent);
996 					inhibit++;
997 					continue;
998 				}
999 			}
1000 			else
1001 			{
1002 				if ( /* ((coop->value) && (ent->spawnflags & SPAWNFLAG_NOT_COOP)) || */
1003 					((skill->value == 0) && (ent->spawnflags & SPAWNFLAG_NOT_EASY)) ||
1004 					((skill->value == 1) && (ent->spawnflags & SPAWNFLAG_NOT_MEDIUM)) ||
1005 					(((skill->value == 2) || (skill->value == 3)) && (ent->spawnflags & SPAWNFLAG_NOT_HARD))
1006 					)
1007 					{
1008 						G_FreeEdict (ent);
1009 						inhibit++;
1010 						continue;
1011 					}
1012 			}
1013 
1014 			ent->spawnflags &= ~(SPAWNFLAG_NOT_EASY|SPAWNFLAG_NOT_MEDIUM|SPAWNFLAG_NOT_HARD|SPAWNFLAG_NOT_COOP|SPAWNFLAG_NOT_DEATHMATCH);
1015 		}
1016 
1017 		ED_CallSpawn (ent);
1018 //laser index
1019 		if (Q_stricmp(ent->classname, "target_laser") == 0)
1020 		{
1021 			if(laser < MAX_LASERINDEX) LaserIndex[laser++] = ent;
1022 		}
1023 //PON-CTF
1024 	if(ent->solid == SOLID_TRIGGER && ctf->value && chedit->value) ent->moveinfo.speed = 0;
1025 	if (Q_stricmp(ent->classname, "item_flag_team1") == 0) bot_team_flag1 = ent;
1026 	else if (Q_stricmp(ent->classname, "item_flag_team2") == 0) bot_team_flag2 = ent;
1027 //PON-CTF
1028 	}
1029 
1030 	gi.dprintf ("%i entities inhibited\n", inhibit);
1031 
1032 	G_FindTeams ();
1033 
1034 	PlayerTrail_Init ();
1035 
1036 	//func_train�̃����N
1037 	G_FindTrainTeam();
1038 
1039 
1040 //ZOID
1041 	CTFSetupTechSpawn();
1042 
1043 //ZOID
1044 
1045 //ponko
1046 	CTFSetupNavSpawn();	//�i�r�̐ݒu
1047 	if(!chedit->value) G_FindItemLink();	//�A�C�e���̃����N(�ʏ펞�̂�)
1048 
1049 	G_SpawnRouteLink();
1050 
1051 	if(zigmode->value == 1) zigflag_spawn = 1;
1052 	else zigflag_spawn = 0;
1053 	//���̃A�C�e���A�h���X�擾
1054 	zflag_item =  FindItem("Zig Flag");
1055 	zflag_ent = NULL;		//������
1056 //	if(CurrentIndex > 0)
1057 //ponko
1058 
1059 	ctfjob_update = level.time;
1060 }
1061 
1062 
1063 //===================================================================
1064 
1065 #if 0
1066 	// cursor positioning
1067 	xl <value>
1068 	xr <value>
1069 	yb <value>
1070 	yt <value>
1071 	xv <value>
1072 	yv <value>
1073 
1074 	// drawing
1075 	statpic <name>
1076 	pic <stat>
1077 	num <fieldwidth> <stat>
1078 	string <stat>
1079 
1080 	// control
1081 	if <stat>
1082 	ifeq <stat> <value>
1083 	ifbit <stat> <value>
1084 	endif
1085 
1086 #endif
1087 
1088 char *single_statusbar =
1089 "yb	-24 "
1090 
1091 // health
1092 "xv	0 "
1093 "hnum "
1094 "xv	50 "
1095 "pic 0 "
1096 
1097 // ammo
1098 "if 2 "
1099 "	xv	100 "
1100 "	anum "
1101 "	xv	150 "
1102 "	pic 2 "
1103 "endif "
1104 
1105 // armor
1106 "if 4 "
1107 "	xv	200 "
1108 "	rnum "
1109 "	xv	250 "
1110 "	pic 4 "
1111 "endif "
1112 
1113 // selected item
1114 "if 6 "
1115 "	xv	296 "
1116 "	pic 6 "
1117 "endif "
1118 
1119 "yb	-50 "
1120 
1121 // picked up item
1122 "if 7 "
1123 "	xv	0 "
1124 "	pic 7 "
1125 "	xv	26 "
1126 "	yb	-42 "
1127 "	stat_string 8 "
1128 "	yb	-50 "
1129 "endif "
1130 
1131 // timer
1132 "if 9 "
1133 "	xv	262 "
1134 "	num	2	10 "
1135 "	xv	296 "
1136 "	pic	9 "
1137 "endif "
1138 
1139 //  help / weapon icon
1140 "if 11 "
1141 "	xv	148 "
1142 "	pic	11 "
1143 "endif "
1144 ;
1145 
1146 char *dm_statusbar =
1147 "yb	-24 "
1148 
1149 // health
1150 "xv	0 "
1151 "hnum "
1152 "xv	50 "
1153 "pic 0 "
1154 
1155 // ammo
1156 "if 2 "
1157 "	xv	100 "
1158 "	anum "
1159 "	xv	150 "
1160 "	pic 2 "
1161 "endif "
1162 
1163 // armor
1164 "if 4 "
1165 "	xv	200 "
1166 "	rnum "
1167 "	xv	250 "
1168 "	pic 4 "
1169 "endif "
1170 
1171 // selected item
1172 "if 6 "
1173 "	xv	296 "
1174 "	pic 6 "
1175 "endif "
1176 
1177 "yb	-50 "
1178 
1179 // picked up item
1180 "if 7 "
1181 "	xv	0 "
1182 "	pic 7 "
1183 "	xv	26 "
1184 "	yb	-42 "
1185 "	stat_string 8 "
1186 "	yb	-50 "
1187 "endif "
1188 
1189 // timer
1190 "if 9 "
1191 "	xv	246 "
1192 "	num	2	10 "
1193 "	xv	296 "
1194 "	pic	9 "
1195 "endif "
1196 
1197 //  help / weapon icon
1198 "if 11 "
1199 "	xv	148 "
1200 "	pic	11 "
1201 "endif "
1202 
1203 //  frags
1204 "xr	-50 "
1205 "yt 2 "
1206 "num 3 14 "
1207 
1208 //sight
1209 "if 31 "
1210 "   xv 96 "
1211 "   yv 56 "
1212 "   pic 31 "
1213 "endif"
1214 ;
1215 
1216 
1217 /*QUAKED worldspawn (0 0 0) ?
1218 
1219 Only used for the world.
1220 "sky"	environment map name
1221 "skyaxis"	vector axis for rotating sky
1222 "skyrotate"	speed of rotation in degrees/second
1223 "sounds"	music cd track number
1224 "gravity"	800 is default gravity
1225 "message"	text to print at user logon
1226 */
SP_worldspawn(edict_t * ent)1227 void SP_worldspawn (edict_t *ent)
1228 {
1229 	ent->movetype = MOVETYPE_PUSH;
1230 	ent->solid = SOLID_BSP;
1231 	ent->inuse = true;			// since the world doesn't use G_Spawn()
1232 	ent->s.modelindex = 1;		// world model is always index 1
1233 
1234 	//---------------
1235 
1236 	// reserve some spots for dead player bodies
1237 	InitBodyQue ();
1238 
1239 	// set configstrings for items
1240 	SetItemNames ();
1241 
1242 	if (st.nextmap)
1243 		strcpy (level.nextmap, st.nextmap);
1244 
1245 	// make some data visible to the server
1246 
1247 	if (ent->message && ent->message[0])
1248 	{
1249 		gi.configstring (CS_NAME, ent->message);
1250 		strncpy (level.level_name, ent->message, sizeof(level.level_name));
1251 	}
1252 	else
1253 		strncpy (level.level_name, level.mapname, sizeof(level.level_name));
1254 
1255 	if (st.sky && st.sky[0])
1256 		gi.configstring (CS_SKY, st.sky);
1257 	else
1258 		gi.configstring (CS_SKY, "unit1_");
1259 
1260 	gi.configstring (CS_SKYROTATE, va("%f", st.skyrotate) );
1261 
1262 	gi.configstring (CS_SKYAXIS, va("%f %f %f",
1263 		st.skyaxis[0], st.skyaxis[1], st.skyaxis[2]) );
1264 
1265 	gi.configstring (CS_CDTRACK, va("%i", ent->sounds) );
1266 
1267 	gi.configstring (CS_MAXCLIENTS, va("%i", (int)(maxclients->value) ) );
1268 
1269 	// status bar program
1270 	if (deathmatch->value)
1271 //ZOID
1272 		if (ctf->value) {
1273 			gi.configstring (CS_STATUSBAR, ctf_statusbar);
1274 			//precaches
1275 			gi.imageindex("sbfctf1");
1276 			gi.imageindex("sbfctf2");
1277 //			gi.imageindex("ctfsb1");
1278 //			gi.imageindex("ctfsb2");
1279 			gi.imageindex("i_ctf1");
1280 			gi.imageindex("i_ctf2");
1281 			gi.imageindex("i_ctf1d");
1282 			gi.imageindex("i_ctf2d");
1283 			gi.imageindex("i_ctf1t");
1284 			gi.imageindex("i_ctf2t");
1285 			gi.imageindex("i_ctfj");
1286 
1287 /*			if(ctf->value == 2)
1288 			{
1289 				gi.modelindex("models/weapons/v_hook/tris.md2");
1290 				gi.soundindex("weapons/grapple/grhit.wav");
1291 				gi.soundindex("weapons/grapple/grpull.wav");
1292 				gi.soundindex("weapons/grapple/grfire.wav");
1293 			}*/
1294 		} else
1295 //ZOID
1296 		gi.configstring (CS_STATUSBAR, dm_statusbar);
1297 	else
1298 		gi.configstring (CS_STATUSBAR, single_statusbar);
1299 
1300 	//---------------
1301 
1302 
1303 	// help icon for statusbar
1304 	gi.imageindex ("i_help");
1305 	level.pic_health = gi.imageindex ("i_health");
1306 	gi.imageindex ("help");
1307 	gi.imageindex ("field_3");
1308 
1309 	if (!st.gravity)
1310 		gi.cvar_set("sv_gravity", "800");
1311 	else
1312 		gi.cvar_set("sv_gravity", st.gravity);
1313 
1314 	snd_fry = gi.soundindex ("player/fry.wav");	// standing in lava / slime
1315 
1316 	PrecacheItem (FindItem ("Blaster"));
1317 
1318 	gi.soundindex ("player/lava1.wav");
1319 	gi.soundindex ("player/lava2.wav");
1320 
1321 	gi.soundindex ("misc/pc_up.wav");
1322 	gi.soundindex ("misc/talk1.wav");
1323 
1324 	gi.soundindex ("misc/udeath.wav");
1325 
1326 	// gibs
1327 	gi.soundindex ("items/respawn1.wav");
1328 
1329 	// sexed sounds
1330 	gi.soundindex ("*death1.wav");
1331 	gi.soundindex ("*death2.wav");
1332 	gi.soundindex ("*death3.wav");
1333 	gi.soundindex ("*death4.wav");
1334 	gi.soundindex ("*fall1.wav");
1335 	gi.soundindex ("*fall2.wav");
1336 	gi.soundindex ("*gurp1.wav");		// drowning damage
1337 	gi.soundindex ("*gurp2.wav");
1338 	gi.soundindex ("*jump1.wav");		// player jump
1339 	gi.soundindex ("*pain25_1.wav");
1340 	gi.soundindex ("*pain25_2.wav");
1341 	gi.soundindex ("*pain50_1.wav");
1342 	gi.soundindex ("*pain50_2.wav");
1343 	gi.soundindex ("*pain75_1.wav");
1344 	gi.soundindex ("*pain75_2.wav");
1345 	gi.soundindex ("*pain100_1.wav");
1346 	gi.soundindex ("*pain100_2.wav");
1347 
1348 /*	if (coop->value || deathmatch->value)
1349 	{*/
1350 		gi.modelindex ("#w_blaster.md2");
1351 		gi.modelindex ("#w_shotgun.md2");
1352 		gi.modelindex ("#w_sshotgun.md2");
1353 		gi.modelindex ("#w_machinegun.md2");
1354 		gi.modelindex ("#w_chaingun.md2");
1355 		gi.modelindex ("#a_grenades.md2");
1356 		gi.modelindex ("#w_glauncher.md2");
1357 		gi.modelindex ("#w_rlauncher.md2");
1358 		gi.modelindex ("#w_hyperblaster.md2");
1359 		gi.modelindex ("#w_railgun.md2");
1360 		gi.modelindex ("#w_bfg.md2");
1361 
1362 		gi.modelindex ("#w_phalanx.md2");
1363 		gi.modelindex ("#w_ripper.md2");
1364 //	}
1365 
1366 
1367 	//-------------------
1368 
1369 	gi.soundindex ("player/gasp1.wav");		// gasping for air
1370 	gi.soundindex ("player/gasp2.wav");		// head breaking surface, not gasping
1371 
1372 	gi.soundindex ("player/watr_in.wav");	// feet hitting water
1373 	gi.soundindex ("player/watr_out.wav");	// feet leaving water
1374 
1375 	gi.soundindex ("player/watr_un.wav");	// head going underwater
1376 
1377 	gi.soundindex ("player/u_breath1.wav");
1378 	gi.soundindex ("player/u_breath2.wav");
1379 
1380 	gi.soundindex ("items/pkup.wav");		// bonus item pickup
1381 	gi.soundindex ("world/land.wav");		// landing thud
1382 	gi.soundindex ("misc/h2ohit1.wav");		// landing splash
1383 
1384 	gi.soundindex ("items/damage.wav");
1385 	gi.soundindex ("items/protect.wav");
1386 	gi.soundindex ("items/protect4.wav");
1387 	gi.soundindex ("weapons/noammo.wav");
1388 
1389 	gi.soundindex ("infantry/inflies1.wav");
1390 
1391 	sm_meat_index = gi.modelindex ("models/objects/gibs/sm_meat/tris.md2");
1392 	gi.modelindex ("models/objects/gibs/arm/tris.md2");
1393 	gi.modelindex ("models/objects/gibs/bone/tris.md2");
1394 	gi.modelindex ("models/objects/gibs/bone2/tris.md2");
1395 	gi.modelindex ("models/objects/gibs/chest/tris.md2");
1396 	skullindex = gi.modelindex ("models/objects/gibs/skull/tris.md2");
1397 	headindex = gi.modelindex ("models/objects/gibs/head2/tris.md2");
1398 
1399 //
1400 // Setup light animation tables. 'a' is total darkness, 'z' is doublebright.
1401 //
1402 
1403 	// 0 normal
1404 	gi.configstring(CS_LIGHTS+0, "m");
1405 
1406 	// 1 FLICKER (first variety)
1407 	gi.configstring(CS_LIGHTS+1, "mmnmmommommnonmmonqnmmo");
1408 
1409 	// 2 SLOW STRONG PULSE
1410 	gi.configstring(CS_LIGHTS+2, "abcdefghijklmnopqrstuvwxyzyxwvutsrqponmlkjihgfedcba");
1411 
1412 	// 3 CANDLE (first variety)
1413 	gi.configstring(CS_LIGHTS+3, "mmmmmaaaaammmmmaaaaaabcdefgabcdefg");
1414 
1415 	// 4 FAST STROBE
1416 	gi.configstring(CS_LIGHTS+4, "mamamamamama");
1417 
1418 	// 5 GENTLE PULSE 1
1419 	gi.configstring(CS_LIGHTS+5,"jklmnopqrstuvwxyzyxwvutsrqponmlkj");
1420 
1421 	// 6 FLICKER (second variety)
1422 	gi.configstring(CS_LIGHTS+6, "nmonqnmomnmomomno");
1423 
1424 	// 7 CANDLE (second variety)
1425 	gi.configstring(CS_LIGHTS+7, "mmmaaaabcdefgmmmmaaaammmaamm");
1426 
1427 	// 8 CANDLE (third variety)
1428 	gi.configstring(CS_LIGHTS+8, "mmmaaammmaaammmabcdefaaaammmmabcdefmmmaaaa");
1429 
1430 	// 9 SLOW STROBE (fourth variety)
1431 	gi.configstring(CS_LIGHTS+9, "aaaaaaaazzzzzzzz");
1432 
1433 	// 10 FLUORESCENT FLICKER
1434 	gi.configstring(CS_LIGHTS+10, "mmamammmmammamamaaamammma");
1435 
1436 	// 11 SLOW PULSE NOT FADE TO BLACK
1437 	gi.configstring(CS_LIGHTS+11, "abcdefghijklmnopqrrqponmlkjihgfedcba");
1438 
1439 	// styles 32-62 are assigned by the light program for switchable lights
1440 
1441 	// 63 testing
1442 	gi.configstring(CS_LIGHTS+63, "a");
1443 
1444 //----------------------------------------------
1445 
1446 
1447 	//pre searched items
1448 	Fdi_GRAPPLE			= FindItem ("Grapple");
1449 	Fdi_BLASTER			= FindItem ("Blaster");
1450 	Fdi_SHOTGUN			= FindItem ("Shotgun");
1451 	Fdi_SUPERSHOTGUN	= FindItem ("Super Shotgun");
1452 	Fdi_MACHINEGUN		= FindItem ("Machinegun");
1453 	Fdi_CHAINGUN		= FindItem ("Chaingun");
1454 	Fdi_GRENADES		= FindItem ("Grenades");
1455 	Fdi_GRENADELAUNCHER	= FindItem ("Grenade Launcher");
1456 	Fdi_ROCKETLAUNCHER	= FindItem ("Rocket Launcher");
1457 	Fdi_HYPERBLASTER	= FindItem ("HyperBlaster");
1458 	Fdi_RAILGUN			= FindItem ("Railgun");
1459 	Fdi_BFG				= FindItem ("BFG10K");
1460 	Fdi_PHALANX			= FindItem ("Phalanx");
1461 	Fdi_BOOMER			= FindItem ("Ionripper");
1462 	Fdi_TRAP			= FindItem ("Trap");
1463 
1464 	Fdi_SHELLS			= FindItem ("Shells");
1465 	Fdi_BULLETS			= FindItem ("Bullets");
1466 	Fdi_CELLS			= FindItem ("Cells");
1467 	Fdi_ROCKETS			= FindItem ("Rockets");
1468 	Fdi_SLUGS			= FindItem ("Slugs");
1469 	Fdi_MAGSLUGS		= FindItem ("Mag Slug");
1470 
1471 	memset(ExplIndex,0,sizeof(ExplIndex));
1472 }
1473 
1474 
1475