1 void info_player_start (void)
\r
3 if (self.allowteams != "")
\r
5 if (self.allowteams == "blue")
\r
7 if (self.allowteams == "red")
\r
9 if (!self.goal_state)
\r
10 self.goal_state = 1;
\r
18 self.classname = "info_player_deathmatch";
\r
22 void info_player_deathmatch (void)
\r
27 Find Team Spawn Point (NexTF!)
\r
30 entity (float team_num) FindTeamSpawnPoint =
\r
33 local entity at_spot;
\r
34 local float spot_found;
\r
35 local float attempts;
\r
37 if ((team_num == 1))
\r
39 spot = lastspawn_team1;
\r
43 attempts = (attempts + 1);
\r
44 spot = find (spot, team_str_home, "ts1");
\r
45 if ((spot == world))
\r
47 spot = find (world, team_str_home, "ts1");
\r
49 if ((spot == world))
\r
53 at_spot = findradius (spot.origin, 40);
\r
55 while ((at_spot != world))
\r
57 if (((at_spot.classname == "player") && (at_spot.deadflag == 0)))
\r
61 at_spot = at_spot.chain;
\r
63 if (!Activated (spot, self))
\r
67 if ((spot_found || (attempts >= 30)))
\r
69 lastspawn_team1 = spot;
\r
76 if ((team_num == 2))
\r
78 spot = lastspawn_team2;
\r
82 attempts = (attempts + 1);
\r
83 spot = find (spot, team_str_home, "ts2");
\r
84 if ((spot == world))
\r
86 spot = find (world, team_str_home, "ts2");
\r
88 if ((spot == world))
\r
92 at_spot = findradius (spot.origin, 40);
\r
94 while ((at_spot != world))
\r
96 if (((at_spot.classname == "player") && (at_spot.deadflag == 0)))
\r
100 at_spot = at_spot.chain;
\r
102 if (!Activated (spot, self))
\r
106 if ((spot_found || (attempts >= 30)))
\r
108 lastspawn_team2 = spot;
\r
115 if ((team_num == 3))
\r
117 spot = lastspawn_team3;
\r
121 attempts = (attempts + 1);
\r
122 spot = find (spot, team_str_home, "ts3");
\r
123 if ((spot == world))
\r
125 spot = find (world, team_str_home, "ts3");
\r
127 if ((spot == world))
\r
131 at_spot = findradius (spot.origin, 40);
\r
133 while ((at_spot != world))
\r
135 if (((at_spot.classname == "player") && (at_spot.deadflag == 0)))
\r
139 at_spot = at_spot.chain;
\r
141 if (!Activated (spot, self))
\r
145 if ((spot_found || (attempts >= 30)))
\r
147 lastspawn_team3 = spot;
\r
154 if ((team_num == 4))
\r
156 spot = lastspawn_team4;
\r
160 attempts = (attempts + 1);
\r
161 spot = find (spot, team_str_home, "ts4");
\r
162 if ((spot == world))
\r
164 spot = find (world, team_str_home, "ts4");
\r
166 if ((spot == world))
\r
170 at_spot = findradius (spot.origin, 40);
\r
172 while ((at_spot != world))
\r
174 if (((at_spot.classname == "player") && (at_spot.deadflag == 0)))
\r
178 at_spot = at_spot.chain;
\r
180 if (!Activated (spot, self))
\r
184 if ((spot_found || (attempts >= 30)))
\r
186 lastspawn_team4 = spot;
\r
201 Finds a point to respawn
\r
204 entity () SelectSpawnPoint =
\r
207 local entity at_spot;
\r
208 local float spot_found;
\r
209 local float attempts;
\r
211 if (self.team_no < 1)
\r
213 // self.origin_z = self.origin_z + 30;
\r
214 self.current_menu = MENU_NEED_TN;
\r
216 stuffcmd(self, "alias menu_showteamselect \"set scmenu_directmenu TeamSelect; togglemenu\"\n");
\r
217 stuffcmd(self, "set scmenu_directmenu TeamSelect; togglemenu\n");
\r
219 stuffcmd(self, "alias classmenu \"impulse 73\"\n");
\r
220 // spot = find (world, classname, "item_tfgoal");
\r
223 self.is_dead = 0; //TEMP
\r
225 if ((self.team_no != 0))
\r
227 spot = FindTeamSpawnPoint (self.team_no);
\r
228 if ((spot != world))
\r
235 lastspawn = find (lastspawn, classname, "info_player_coop");
\r
236 if ((lastspawn == world))
\r
238 lastspawn = find (world, classname, "info_player_coop");
\r
240 if ((lastspawn != world))
\r
242 return (lastspawn);
\r
249 spot = find (lastspawn, classname, "info_player_deathmatch");
\r
250 if ((spot == world))
\r
252 spot = find (world, classname, "info_player_deathmatch");
\r
255 while (((spot != world) && (attempts < 100)))
\r
257 attempts = (attempts + 1);
\r
258 at_spot = findradius (spot.origin, 40);
\r
262 if (((at_spot.classname == "player") && (at_spot.deadflag == 0)))
\r
266 at_spot = at_spot.chain;
\r
268 if ((spot_found || (attempts >= 10)))
\r
273 spot = find (spot, classname, "info_player_deathmatch");
\r
274 if ((spot == world))
\r
276 spot = find (world, classname, "info_player_deathmatch");
\r
283 spot = find (world, classname, "info_player_start2");
\r
289 spot = find (world, classname, "info_player_start");
\r
292 spot = find (world, is_converted_goal, "yes");
\r
296 spot = find (world, classname, "info_tfgoal");
\r
300 error ("PutClientInServer: no info_player_start on level\n");
\r
305 /*entity SelectSpawnPoint (void) // Old, non-tf code
\r
307 local entity spot, thing;
\r
308 local float pcount;
\r
310 spot = find (world, classname, "testplayerstart");
\r
317 spot = find(spot, classname, "info_player_deathmatch");
\r
320 if (spot == lastspawn)
\r
323 thing = findradius(spot.origin, 70);
\r
326 if (thing.classname == "player")
\r
327 pcount = pcount + 1;
\r
328 thing = thing.chain;
\r
338 spot = find (world, classname, "info_player_start");
\r
340 error ("PutClientInServer: no info_player_start on level");
\r
349 Checks if the argument string can be a valid playermodel.
\r
350 Returns a valid one in doubt.
\r
353 string CheckPlayerModel(string playermodel) {
\r
354 if( substring(playermodel,0,13) != "models/class/") playermodel = "models/class/scout.zym";
\r
356 /* Possible Fixme: Check if server can open the model?
\r
357 This would kill custom models, however. */
\r
359 return playermodel;
\r
367 Called when a client spawns in the server
\r
370 void PutClientInServer (void)
\r
374 if (self.team_no < 1)
\r
378 self.flags = FL_CLIENT;
\r
379 self.takedamage = DAMAGE_AIM;
\r
381 self.health = cvar("g_balance_health_start");
\r
382 self.max_health = cvar("g_balance_health_stable");
\r
383 self.armorvalue = cvar("g_balance_armor_start");
\r
384 self.max_armor = self.armorvalue;
\r
385 self.damageforcescale = 2;
\r
386 self.death_time = 0;
\r
387 self.dead_time = 0;
\r
388 self.dead_frame = 0;
\r
389 self.die_frame = 0;
\r
392 self.fade_time = 0;
\r
393 self.pain_frame = 0;
\r
394 self.pain_finished = 0;
\r
395 self.strength_finished = 0;
\r
396 self.invincible_finished = 0;
\r
397 //self.speed_finished = 0;
\r
398 //self.slowmo_finished = 0;
\r
399 // players have no think function
\r
400 self.think = SUB_Null;
\r
401 self.nextthink = 0;
\r
404 spot = SelectSpawnPoint();
\r
405 // setorigin (self, spot.origin + '0 0 1' * (1 - self.mins_z + 24));
\r
406 setorigin (self, spot.origin + '-2 0 4' * (1 - self.mins_z + 24));
\r
407 self.angles_y = self.angles_y + 180;
\r
410 if (self.playerclass < 1)
\r
412 stuffcmd(self, "set scmenu_directmenu ClassSelect; togglemenu\n");
\r
416 // fixme: are these the right teams & colors?
\r
417 /*if(self.team == 5) // Wazat -- I'm using TeamFortress_TeamSet for this now
\r
421 if(self.team == 14)
\r
429 if(self.team == 13)
\r
436 // spot = SelectSpawnPoint (); // moved down
\r
437 self.classname = "player";
\r
438 self.movetype = MOVETYPE_WALK;
\r
439 self.solid = SOLID_SLIDEBOX;
\r
440 self.flags = FL_CLIENT;
\r
441 self.takedamage = DAMAGE_AIM;
\r
443 self.health = cvar("g_balance_health_start");
\r
444 self.max_health = cvar("g_balance_health_stable");
\r
445 self.armorvalue = cvar("g_balance_armor_start");
\r
446 self.max_armor = self.armorvalue;
\r
447 self.damageforcescale = 2;
\r
448 self.death_time = 0;
\r
449 self.dead_time = 0;
\r
450 self.dead_frame = 0;
\r
451 self.die_frame = 0;
\r
454 self.fade_time = 0;
\r
455 self.pain_frame = 0;
\r
456 self.pain_finished = 0;
\r
457 self.strength_finished = 0;
\r
458 self.invincible_finished = 0;
\r
459 //self.speed_finished = 0;
\r
460 //self.slowmo_finished = 0;
\r
461 // players have no think function
\r
462 self.think = SUB_Null;
\r
463 self.nextthink = 0;
\r
466 //self.wpn5 = 0; // not carrying an extra weapon
\r
467 ResetExtraWeapon(); // not carrying an extra weapon
\r
469 DelayHealthRegen(self);
\r
470 DelayArmorRegen(self);
\r
471 DelayHealthRot(self);
\r
472 DelayArmorRot(self);
\r
475 self.special_active = 0;
\r
476 self.special_time = 0;
\r
478 self.grenade_time = 0;
\r
480 if(self.onfire != world)
\r
481 remove(self.onfire);
\r
482 self.onfire = world;
\r
483 self.flame_heat = 0;
\r
484 self.flame_heat_time = 0;
\r
486 self.poison_damage = 0;
\r
487 self.poison_rate = 0;
\r
489 self.is_feigning = 0;
\r
490 self.current_menu = 0;
\r
492 // if the player is supposed to change model (and hence class) on respawn, do it.
\r
493 if(self.change_mdl_on_respawn != "")
\r
495 self.playermodel = self.change_mdl_on_respawn;
\r
496 //strunzone(self.change_mdl_on_respawn); // can't unzone or it'll crash later
\r
498 // set the class. If he changed classes while dead it will take effect now.
\r
499 oldcl = self.class;
\r
500 self.class = GetPlayerClass();
\r
501 Do_TFClass_Conversion();
\r
502 ChangeClass((oldcl != self.class), FALSE);
\r
506 self.deadflag = DEAD_NO;
\r
508 spot = SelectSpawnPoint (); // maybe temp
\r
509 self.angles = spot.angles;
\r
510 self.fixangle = TRUE; // turn this way immediately
\r
511 self.velocity = '0 0 0';
\r
512 self.avelocity = '0 0 0';
\r
513 self.punchangle = '0 0 0';
\r
514 self.punchvector = '0 0 0';
\r
516 self.viewzoom = 0.6;
\r
519 self.playermodel = CheckPlayerModel(self.playermodel);
\r
521 precache_model (self.playermodel);
\r
522 setmodel (self, self.playermodel);
\r
523 self.skin = stof(self.playerskin);
\r
524 self.mdl = strzone(self.playermodel);
\r
526 self.crouch = FALSE;
\r
527 self.view_ofs = PL_VIEW_OFS;
\r
528 setsize (self, PL_MIN, PL_MAX);
\r
529 setorigin (self, spot.origin + '0 0 1' * (1 - self.mins_z - 24));
\r
530 // don't reset back to last position, even if new position is stuck in solid
\r
531 self.oldorigin = self.origin;
\r
533 // self.items = IT_LASER | IT_UZI| IT_SHOTGUN | IT_GRENADE_LAUNCHER | IT_ELECTRO | IT_CRYLINK | IT_NEX | IT_HAGAR | IT_ROCKET_LAUNCHER;
\r
534 // self.weapon = IT_UZI;
\r
537 // fixme: move this to Become<Class> code
\r
538 /* self.items = IT_WEP1 | IT_WEP2 | IT_WEP3 | IT_WEP4;
\r
540 self.switchweapon = IT_WEP2;
\r
541 self.ammo_shells = 50;
\r
542 self.ammo_nails = 0;
\r
543 self.ammo_rockets = 0;
\r
544 self.ammo_cells = 0;*/
\r
546 if (cvar("g_fullbrightplayers") == 1)
\r
547 self.effects = EF_FULLBRIGHT;
\r
549 self.event_damage = PlayerDamage;
\r
551 self.statdraintime = time + 5;
\r
552 self.button0 = self.button1 = self.button2 = self.button3 = 0;
\r
558 CL_SpawnWeaponentity();
\r
559 self.weaponentity.alpha = self.exteriorweaponentity.alpha = 0;
\r
560 self.weaponentity.colormod = '0 0 0';
\r
561 self.weaponentity.scale = 0;
\r
563 //stuffcmd(self, "chase_active 0");
\r
571 void SetNewParms (void)
\r
581 void SetChangeParms (void)
\r
590 Called when a client types 'kill' in the console
\r
593 void ClientKill (void)
\r
595 Damage(self, self, self, 100000, DEATH_KILL, self.origin, '0 0 0');
\r
602 Called when a client connects to the server
\r
605 void ClientConnect (void)
\r
607 //ClientInRankings();
\r
608 bprint ("^4",self.netname);
\r
609 bprint (" connected\n");
\r
610 stuffcmd(self, strcat("exec maps/", mapname, ".cfg\n"));
\r
611 // send prediction settings to the client
\r
612 stuffcmd(self, strcat("cl_movement_maxspeed ", ftos(cvar("sv_maxspeed")), "\n"));
\r
613 stuffcmd(self, strcat("cl_movement_maxairspeed ", ftos(cvar("sv_maxairspeed")), "\n"));
\r
614 stuffcmd(self, strcat("cl_movement_accelerate ", ftos(cvar("sv_accelerate")), "\n"));
\r
615 stuffcmd(self, strcat("cl_movement_friction ", ftos(cvar("sv_friction")), "\n"));
\r
616 stuffcmd(self, strcat("cl_movement_stopspeed ", ftos(cvar("sv_stopspeed")), "\n"));
\r
617 stuffcmd(self, strcat("cl_movement_jumpvelocity ", ftos(cvar("g_balance_jumpheight")), "\n"));
\r
618 stuffcmd(self, strcat("cl_movement_stepheight ", ftos(cvar("sv_stepheight")), "\n"));
\r
619 stuffcmd(self, strcat("cl_movement_edgefriction 0\n"));
\r
620 // TEMP FOR TESTING PURPOSES!
\r
621 //teamplay = 21?TeamFortress;
\r
622 DecodeLevelParms ();
\r
623 //cvar_set ("teamplay", "21?TeamFortress");
\r
624 // teamplay = cvar ("teamplay");
\r
626 /* joinorder = joinorder + 1; // old temp autoteam, but now we have a menu instead :P
\r
627 if (joinorder == 1 || joinorder == 3 || joinorder == 5 || joinorder == 7)
\r
628 TeamFortress_TeamSet (1);
\r
630 TeamFortress_TeamSet (2);
\r
638 Called when a client disconnects from the server
\r
641 .entity chatbubbleentity;
\r
642 void ClientDisconnect (void)
\r
644 //ClientDisconnected();
\r
645 self.has_disconnected = 1;
\r
646 bprint ("^4",self.netname);
\r
647 bprint (" disconnected\n");
\r
649 if (self.chatbubbleentity)
\r
651 remove (self.chatbubbleentity);
\r
652 self.chatbubbleentity = world;
\r
655 if (self.teambubble_friendly)
\r
657 remove (self.teambubble_friendly);
\r
658 self.teambubble_friendly = world;
\r
660 if (self.teambubble_needhealth)
\r
662 remove (self.teambubble_needhealth);
\r
663 self.teambubble_needhealth = world;
\r
667 .entity chatbubbleentity;
\r
669 void() ChatBubbleThink =
\r
671 self.nextthink = time;
\r
672 if (!self.owner.modelindex || self.owner.chatbubbleentity != self)
\r
677 setorigin(self, self.owner.origin + '0 0 15' + self.owner.maxs_z * '0 0 1');
\r
678 if (self.owner.buttonchat)
\r
681 self.effects = EF_NODRAW;
\r
684 void() UpdateChatBubble =
\r
686 if (!self.modelindex)
\r
688 // spawn a chatbubble entity if needed
\r
689 if (!self.chatbubbleentity)
\r
691 self.chatbubbleentity = spawn();
\r
692 self.chatbubbleentity.owner = self;
\r
693 self.chatbubbleentity.think = ChatBubbleThink;
\r
694 self.chatbubbleentity.nextthink = time;
\r
695 setmodel(self.chatbubbleentity, "models/misc/chatbubble.spr");
\r
696 setorigin(self.chatbubbleentity, self.origin + '0 0 15' + self.maxs_z * '0 0 1');
\r
697 self.chatbubbleentity.effects = EF_NODRAW;
\r
701 // LordHavoc: this hack will be removed when proper _pants/_shirt layers are
\r
702 // added to the model skins
\r
703 void() UpdateColorModHack =
\r
706 c = self.clientcolors & 15;
\r
707 // LordHavoc: only bothering to support white, green, red, yellow, blue
\r
708 if (teamplay == 0) self.colormod = '0 0 0';
\r
709 else if (c == 0) self.colormod = '1.00 1.00 1.00';
\r
710 else if (c == 3) self.colormod = '0.10 1.73 0.10';
\r
711 else if (c == 4) self.colormod = '1.73 0.10 0.10';
\r
712 else if (c == 12) self.colormod = '1.22 1.22 0.10';
\r
713 else if (c == 13) self.colormod = '0.10 0.10 1.73';
\r
714 else self.colormod = '1 1 1';
\r
721 When you press the jump key
\r
724 void PlayerJump (void)
\r
726 if (self.waterlevel >= 2)
\r
728 if (self.watertype == CONTENT_WATER)
\r
729 self.velocity_z = 200;
\r
730 else if (self.watertype == CONTENT_SLIME)
\r
731 self.velocity_z = 80;
\r
733 self.velocity_z = 50;
\r
740 // self.jump_pad = 0;
\r
741 CapPlayerVelocity(self, self.speed);
\r
744 if (!(self.flags & FL_ONGROUND))
\r
747 if (!(self.flags & FL_JUMPRELEASED))
\r
750 self.velocity_z = self.velocity_z + cvar("g_balance_jumpheight");
\r
752 self.flags = self.flags - FL_ONGROUND;
\r
753 self.flags = self.flags - FL_JUMPRELEASED;
\r
756 .float watersound_finished;
\r
759 if (self.movetype == MOVETYPE_NOCLIP)
\r
761 if (self.health < 0)
\r
764 if (self.waterlevel != 3)
\r
766 self.air_finished = time + 12;
\r
769 else if (self.air_finished < time)
\r
771 if (self.pain_finished < time)
\r
773 Damage (self, world, world, 5, DEATH_DROWN, self.origin, '0 0 0');
\r
774 self.pain_finished = time + 0.5;
\r
778 if (!self.waterlevel)
\r
780 if (self.flags & FL_INWATER)
\r
782 // play leave water sound
\r
783 self.flags = self.flags - FL_INWATER;
\r
788 if (self.watersound_finished < time)
\r
790 self.watersound_finished = time + 0.5;
\r
791 if (self.watertype == CONTENT_LAVA)
\r
792 sound (self, CHAN_BODY, "player/lava.wav", 1, ATTN_NORM);
\r
793 if (self.watertype == CONTENT_SLIME)
\r
794 sound (self, CHAN_BODY, "player/slime.wav", 1, ATTN_NORM);
\r
795 //if (self.watertype == CONTENT_WATER)
\r
796 // sound (self, CHAN_BODY, "player/water.wav", 1, ATTN_NORM);
\r
799 if (self.watertype == CONTENT_LAVA)
\r
802 // lava sets me to the maximum heat level, so I'll catch fire easily
\r
803 self.flame_heat = cvar("g_balance_maxheat");
\r
805 if (self.dmgtime < time)
\r
807 self.dmgtime = time + 0.1;
\r
808 Damage (self, world, world, 3 * self.waterlevel, DEATH_LAVA, self.origin, '0 0 0');
\r
811 else if (self.watertype == CONTENT_SLIME)
\r
815 self.flame_heat = 0;
\r
817 if (self.dmgtime < time)
\r
819 self.dmgtime = time + 0.1;
\r
820 Damage (self, world, world, 1 * self.waterlevel, DEATH_SLIME, self.origin, '0 0 0');
\r
823 else if (self.watertype == CONTENT_WATER)
\r
826 self.flame_heat = 0;
\r
829 if ( !(self.flags & FL_INWATER) )
\r
832 //if (self.watertype == CONTENT_LAVA)
\r
833 // sound (self, CHAN_BODY, "player/inlava.wav", 1, ATTN_NORM);
\r
834 //if (self.watertype == CONTENT_WATER)
\r
835 // sound (self, CHAN_BODY, "player/inh2o.wav", 1, ATTN_NORM);
\r
836 //if (self.watertype == CONTENT_SLIME)
\r
837 // sound (self, CHAN_BODY, "player/slimbrn2.wav", 1, ATTN_NORM);
\r
839 self.flags = self.flags + FL_INWATER;
\r
844 void() CheckWaterJump =
\r
846 local vector start, end;
\r
848 // check for a jump-out-of-water
\r
849 makevectors (self.angles);
\r
850 start = self.origin;
\r
851 start_z = start_z + 8;
\r
853 normalize(v_forward);
\r
854 end = start + v_forward*24;
\r
855 traceline (start, end, TRUE, self);
\r
856 if (trace_fraction < 1)
\r
857 { // solid at waist
\r
858 start_z = start_z + self.maxs_z - 8;
\r
859 end = start + v_forward*24;
\r
860 self.movedir = trace_plane_normal * -50;
\r
861 traceline (start, end, TRUE, self);
\r
862 if (trace_fraction == 1)
\r
863 { // open at eye level
\r
864 self.flags = self.flags | FL_WATERJUMP;
\r
865 self.velocity_z = 225;
\r
866 self.flags = self.flags - (self.flags & FL_JUMPRELEASED);
\r
867 self.teleport_time = time + 2; // safety net
\r
877 PutClientInServer();
\r
880 void player_powerups (void)
\r
882 self.effects = self.effects - (self.effects & (EF_RED | EF_BLUE | EF_ADDITIVE | EF_FULLBRIGHT));
\r
883 if (self.items & IT_STRENGTH)
\r
885 self.effects = self.effects | (EF_BLUE | EF_ADDITIVE | EF_FULLBRIGHT);
\r
886 if (time > self.strength_finished)
\r
888 self.items = self.items - (self.items & IT_STRENGTH);
\r
889 sprint(self, "^3Strength has worn off\n");
\r
894 if (time < self.strength_finished)
\r
896 self.items = self.items | IT_STRENGTH;
\r
897 sprint(self, "^3Strength infuses your weapons with devestating power\n");
\r
900 if (self.items & IT_INVINCIBLE)
\r
902 self.effects = self.effects | (EF_RED | EF_ADDITIVE | EF_FULLBRIGHT);
\r
903 if (time > self.invincible_finished)
\r
905 self.items = self.items - (self.items & IT_INVINCIBLE);
\r
906 sprint(self, "^3Shield has worn off\n");
\r
911 if (time < self.invincible_finished)
\r
913 self.items = self.items | IT_INVINCIBLE;
\r
914 sprint(self, "^3Shield surrounds you\n");
\r
919 void player_regen_health (float maxh, float regen_rate_mod)
\r
921 if (self.health < maxh && time > self.health_regen_delay)
\r
922 self.health = bound(0, self.health + regen_rate_mod*(maxh- self.health) * cvar("g_balance_health_regen") * frametime, 1000);
\r
924 void player_rot_health (float maxh, float rot_rate_mod)
\r
926 if (self.health > maxh && time > self.health_rot_delay)
\r
927 self.health = bound(0, self.health + rot_rate_mod*(maxh - self.health) * cvar("g_balance_health_rot") * frametime, 1000);
\r
929 void player_regen_armor (float maxa, float regen_rate_mod)
\r
931 if (self.armorvalue < maxa && time > self.armor_regen_delay)
\r
932 self.armorvalue = bound(0, self.armorvalue + regen_rate_mod*(maxa - self.armorvalue) * cvar("g_balance_armor_regen") * frametime, 1000);
\r
934 void player_rot_armor (float maxa, float regen_rot_mod)
\r
936 if (self.armorvalue > maxa && time > self.armor_rot_delay)
\r
937 self.armorvalue = bound(0, self.armorvalue + regen_rot_mod*(maxa - self.armorvalue) * cvar("g_balance_armor_rot") * frametime, 1000);
\r
940 void player_clearpoison(entity targ)
\r
942 targ.poison_damage = targ.poison_rate = 0;
\r
945 void DelayHealthRegen(entity e) { e.health_regen_delay = time + cvar("g_balance_regen_wait");}
\r
946 void DelayHealthRot(entity e) { e.health_rot_delay = time + cvar("g_balance_rot_wait");}
\r
947 void DelayArmorRegen(entity e) { e.armor_regen_delay = time + cvar("g_balance_regen_wait");}
\r
948 void DelayArmorRot(entity e) { e.armor_rot_delay = time + cvar("g_balance_rot_wait");}
\r
951 void player_takepoison()
\r
953 float oldhealth, take;
\r
954 if(self.health <= 5)
\r
956 player_clearpoison(self);
\r
959 oldhealth = self.health;
\r
961 take = bound(0, self.poison_rate * frametime, self.health - 5);
\r
964 player_clearpoison(self);
\r
968 DelayHealthRegen(self);
\r
969 self.health = self.health - take;
\r
970 self.poison_damage = self.poison_damage - take;
\r
972 if(self.health <= 5 || self.poison_damage <= 0)
\r
974 player_clearpoison(self);
\r
979 // cool off so you're not so vulnerable to fire
\r
980 void player_cooloff ()
\r
982 if(self.flame_heat_time > time)//heat up
\r
983 self.flame_heat = bound(0, self.flame_heat + self.flame_heat * cvar("g_balance_heatup_rate") * frametime, cvar("g_balance_maxheat"));
\r
985 self.flame_heat = bound(0, self.flame_heat - self.flame_heat * cvar("g_balance_cooloff_rate") * frametime, cvar("g_balance_maxheat"));
\r
988 void player_regen (void)
\r
992 maxh = self.max_health;//cvar("g_balance_health_stable");
\r
993 maxa = self.max_armor;//cvar("g_balance_armor_stable");
\r
995 if(self.poison_damage)
\r
997 player_takepoison();
\r
1001 if(self.class == CLASS_SPY)
\r
1002 {// don't let spy regenerate if cloaked, but do allow rot if above max
\r
1003 if(self.special_active)
\r
1005 //if(self.health > maxh)
\r
1006 player_rot_health(maxh, 1.0);
\r
1007 //if(self.armorvalue > maxa)
\r
1008 player_rot_armor(maxa, 1.0);
\r
1012 player_regen_health(maxh, 0.1); // spies regenerate slowly, and mostly rely on health packs
\r
1013 player_regen_armor(maxa, 1.0);
\r
1014 player_rot_health(maxh, 1.0);
\r
1015 player_rot_armor(maxa, 1.0);
\r
1020 player_regen_health(maxh, 1.0);
\r
1021 player_regen_armor(maxa, 1.0);
\r
1022 player_rot_health(maxh, 1.0);
\r
1023 player_rot_armor(maxa, 1.0);
\r
1033 Called every frame for each client before the physics are run
\r
1036 .float attack_finished;
\r
1037 void PlayerPreThink (void)
\r
1039 local vector m1, m2;
\r
1041 CheckRules_Player();
\r
1043 if (intermission_running)
\r
1045 IntermissionThink (); // otherwise a button could be missed between
\r
1046 return; // the think tics
\r
1049 if (self.deadflag != DEAD_NO)
\r
1053 if (self.deadflag == DEAD_DYING)
\r
1055 if (time > self.dead_time)
\r
1056 self.deadflag = DEAD_DEAD;
\r
1058 else if (self.deadflag == DEAD_DEAD)
\r
1060 if (!self.button0 && !self.button2 && !self.button3)
\r
1061 self.deadflag = DEAD_RESPAWNABLE;
\r
1063 else if (self.deadflag == DEAD_RESPAWNABLE)
\r
1065 if (self.button0 || self.button2 || self.button3 || self.button4)
\r
1075 self.crouch = TRUE;
\r
1076 self.view_ofs = PL_CROUCH_VIEW_OFS;
\r
1077 setsize (self, PL_CROUCH_MIN, PL_CROUCH_MAX);
\r
1084 tracebox(self.origin, PL_MIN, PL_MAX, self.origin, FALSE, self);
\r
1085 if (!trace_startsolid)
\r
1087 self.crouch = FALSE;
\r
1088 self.view_ofs = PL_VIEW_OFS;
\r
1089 setsize (self, PL_MIN, PL_MAX);
\r
1094 if (self.playermodel != self.mdl)
\r
1096 //bprint("playermodel changed\n");
\r
1097 self.playermodel = CheckPlayerModel(self.playermodel);
\r
1098 if(CheckForClassChange()) // check if we'll allow it
\r
1099 return; // if there's a return value, drop what you're doing and let the player respawn
\r
1101 if(self.playermodel != self.mdl) // if change has been allowed
\r
1105 precache_model (self.playermodel);
\r
1106 if(self.model != "")
\r
1108 setmodel (self, self.playermodel);
\r
1109 setsize (self, m1, m2);
\r
1111 self.mdl = strzone(self.playermodel);
\r
1117 if (self.skin != stof(self.playerskin))
\r
1118 self.skin = stof(self.playerskin);
\r
1120 if(self.class == CLASS_SCOUT)
\r
1121 GrapplingHookFrame();
\r
1125 if (self.button4 || (self.weapon == WEP_NEX && self.button3))
\r
1127 if (self.viewzoom > 0.4)
\r
1128 self.viewzoom = max (0.4, self.viewzoom - frametime * 2);
\r
1130 else if (self.viewzoom < 1.0)
\r
1131 self.viewzoom = min (1.0, self.viewzoom + frametime);
\r
1137 self.flags = self.flags | FL_JUMPRELEASED;
\r
1140 player_powerups();
\r
1144 //self.angles_y=self.v_angle_y + 90; // temp
\r
1147 if (self.waterlevel == 2)
\r
1148 CheckWaterJump ();
\r
1150 //if (TetrisPreFrame()) return;
\r
1152 PlayerLasergatePreThink();
\r
1159 Called every frame for each client after the physics are run
\r
1162 void PlayerPostThink (void)
\r
1164 float soundrandom;
\r
1165 CheckRules_Player();
\r
1166 UpdateChatBubble();
\r
1167 UpdateColorModHack();
\r
1168 UpdateTeamBubble();
\r
1169 if (self.deadflag == DEAD_NO)
\r
1171 ImpulseCommands ();
\r
1172 if (intermission_running)
\r
1173 return; // intermission or finale
\r
1175 // VorteX: landing on floor, landing damage etc.
\r
1176 // LordHavoc: removed 'big fall' death code that VorteX added
\r
1177 if (self.flags & FL_ONGROUND || (self.waterlevel >= 2 && self.velocity_z <= 0))
\r
1178 self.jump_pad = 0;
\r
1180 if (self.flags & FL_ONGROUND)
\r
1182 CapPlayerVelocity(self, self.speed);
\r
1184 if (self.jump_flag < -100 && !self.watertype == CONTENT_WATER) // HitGround
\r
1186 soundrandom = random() * 4;
\r
1188 self.air_time = time; //temp BH var
\r
1190 if (soundrandom < 1)
\r
1191 sound (self, CHAN_BODY, "misc/hitground1.wav", 1, ATTN_NORM);
\r
1192 else if (soundrandom < 2)
\r
1193 sound (self, CHAN_BODY, "misc/hitground2.wav", 1, ATTN_NORM);
\r
1194 else if (soundrandom < 3)
\r
1195 sound (self, CHAN_BODY, "misc/hitground3.wav", 1, ATTN_NORM);
\r
1196 else if (soundrandom < 4)
\r
1197 sound (self, CHAN_BODY, "misc/hitground4.wav", 1, ATTN_NORM);
\r
1198 if (self.jump_flag < -650) // landing damage
\r
1201 dm = bound(0, 0.1*(fabs(self.jump_flag) - 600), 5);
\r
1202 Damage (self, world, world, dm, DEATH_FALL, self.origin, '0 0 0');
\r
1204 self.jump_flag = 0;
\r
1208 self.jump_flag = self.velocity_z;
\r
1212 //if (TetrisPostFrame()) return;
\r
1213 PlayerLasergatePostThink();
\r
1216 // Parse team join, class etc.
\r
1217 void SV_ParseClientCommand (string s)
\r
1226 args = tokenize(s);
\r
1237 if (c == "changeclass")
\r
1239 stuffcmd(self, "set scmenu_directmenu ClassSelect; togglemenu\n");
\r
1242 if (c == "selectteam")
\r
1244 if (self.team_no > 0)
\r
1246 sprint(self, "You are already on a team!\n");
\r
1249 if (d == "auto" || d == "5")
\r
1251 TeamFortress_TeamPutPlayerInTeam();
\r
1252 PutClientInServer ();
\r
1254 if (d == "blue" || d == "1")
\r
1256 TeamFortress_TeamSet (1);
\r
1257 PutClientInServer ();
\r
1259 if (d == "red" || d == "2")
\r
1261 TeamFortress_TeamSet (2);
\r
1262 PutClientInServer ();
\r
1264 if (d == "yellow" || d == "3")
\r
1266 TeamFortress_TeamSet (3);
\r
1267 PutClientInServer ();
\r
1269 if (d == "green" || d == "pink" || d == "4") // Morphed set it to Pink in the menus. I think
\r
1270 { // we should make it white instead.
\r
1271 TeamFortress_TeamSet (4);
\r
1272 PutClientInServer ();
\r
1276 if (c == "selectclass")
\r
1278 if (self.team_no < 1)
\r
1280 sprint(self, "You must select a team to join first!\n");
\r
1283 CenterPrint(self, ""); // clear any centerprint messages
\r
1284 if (self.playerclass > 0) // if a class is already chosen
\r
1286 self.tfstate = self.tfstate - (self.tfstate & 8);
\r
1287 local string cname;
\r
1288 if (d == ftos(TF_CLASS_SCOUT))
\r
1292 if (d == ftos(TF_CLASS_SOLDIER))
\r
1294 cname = "soldier";
\r
1296 if (d == ftos(TF_CLASS_MEDIC))
\r
1300 if (d == ftos(TF_CLASS_PYRO))
\r
1304 if (d == ftos(TF_CLASS_ENGINEER))
\r
1306 cname = "engineer";
\r
1308 if (d == ftos(TF_CLASS_SPY))
\r
1312 if (d == ftos(TF_CLASS_RANDOM))
\r
1314 self.tfstate = self.tfstate | 8;
\r
1315 sprint(self, "You will respawn as a random class.\n");
\r
1319 // stuffcmd(self, "_cl_playermodel \"models/class/");
\r
1320 // stuffcmd(self, cname);
\r
1321 // stuffcmd(self, "_mechanical.zym\"\n");
\r
1322 if (cname == "engineer")
\r
1324 self.playermodel = strcat("models/class/",cname,"_other.zym");
\r
1328 self.playermodel = strcat("models/class/",cname,"_mechanical.zym");
\r
1330 if (self.is_dead == 1) // if player is dead, can change class
\r
1331 CheckForClassChange();
\r
1334 else // if no class is chosen
\r
1336 if (d == ftos(TF_CLASS_SCOUT))
\r
1338 self.impulse = TF_CLASS_SCOUT;
\r
1340 if (d == ftos(TF_CLASS_SOLDIER))
\r
1342 self.impulse = TF_CLASS_SOLDIER;
\r
1344 if (d == ftos(TF_CLASS_MEDIC))
\r
1346 self.impulse = TF_CLASS_MEDIC;
\r
1348 if (d == ftos(TF_CLASS_PYRO))
\r
1350 self.impulse = TF_CLASS_PYRO;
\r
1352 if (d == ftos(TF_CLASS_ENGINEER))
\r
1354 self.impulse = TF_CLASS_ENGINEER;
\r
1356 if (d == ftos(TF_CLASS_SPY))
\r
1358 self.impulse = TF_CLASS_SPY;
\r
1360 if (d == ftos(TF_CLASS_RANDOM))
\r
1362 self.impulse = TF_CLASS_RANDOM;
\r
1364 TeamFortress_ChangeClass();
\r
1368 else if (c == "check_val")
\r
1370 if (d == "r_bloom")
\r
1373 self.uses_bloom = 1;
\r
1375 self.uses_bloom = 0;
\r
1380 clientcommand(self, s);
\r