1 #include "gamemode_race.qh"
3 #ifndef GAMEMODE_RACE_H
4 #define GAMEMODE_RACE_H
7 void race_Initialize();
9 REGISTER_MUTATOR(rc, false)
13 if (time > 1) // game loads at time 1
14 error("This is a game type and it cannot be added at runtime.");
20 MUTATOR_ONROLLBACK_OR_REMOVE
22 // we actually cannot roll back race_Initialize here
23 // BUT: we don't need to! If this gets called, adding always
29 LOG_INFO("This is a game type and it cannot be removed at runtime.");
40 #include <server/race.qh>
42 #define autocvar_g_race_laps_limit cvar("g_race_laps_limit")
43 float autocvar_g_race_qualifying_timelimit;
44 float autocvar_g_race_qualifying_timelimit_override;
45 int autocvar_g_race_teams;
48 .float race_checkpoint;
49 void havocbot_role_race(entity this)
55 if (this.bot_strategytime < time)
57 this.bot_strategytime = time + autocvar_bot_ai_strategyinterval;
58 navigation_goalrating_start(this);
60 for(e = NULL; (e = find(e, classname, "trigger_race_checkpoint")) != NULL; )
62 if(e.cnt == this.race_checkpoint)
64 navigation_routerating(this, e, 1000000, 5000);
66 else if(this.race_checkpoint == -1)
68 navigation_routerating(this, e, 1000000, 5000);
72 navigation_goalrating_end(this);
76 void race_ScoreRules()
78 ScoreRules_basics(race_teams, 0, 0, false);
81 ScoreInfo_SetLabel_TeamScore( ST_RACE_LAPS, "laps", SFL_SORT_PRIO_PRIMARY);
82 ScoreInfo_SetLabel_PlayerScore(SP_RACE_LAPS, "laps", SFL_SORT_PRIO_PRIMARY);
83 ScoreInfo_SetLabel_PlayerScore(SP_RACE_TIME, "time", SFL_SORT_PRIO_SECONDARY | SFL_LOWER_IS_BETTER | SFL_TIME);
84 ScoreInfo_SetLabel_PlayerScore(SP_RACE_FASTEST, "fastest", SFL_LOWER_IS_BETTER | SFL_TIME);
86 else if(g_race_qualifying)
88 ScoreInfo_SetLabel_PlayerScore(SP_RACE_FASTEST, "fastest", SFL_SORT_PRIO_PRIMARY | SFL_LOWER_IS_BETTER | SFL_TIME);
92 ScoreInfo_SetLabel_PlayerScore(SP_RACE_LAPS, "laps", SFL_SORT_PRIO_PRIMARY);
93 ScoreInfo_SetLabel_PlayerScore(SP_RACE_TIME, "time", SFL_SORT_PRIO_SECONDARY | SFL_LOWER_IS_BETTER | SFL_TIME);
94 ScoreInfo_SetLabel_PlayerScore(SP_RACE_FASTEST, "fastest", SFL_LOWER_IS_BETTER | SFL_TIME);
96 ScoreRules_basics_end();
99 void race_EventLog(string mode, entity actor) // use an alias for easy changing and quick editing later
101 if(autocvar_sv_eventlog)
102 GameLogEcho(strcat(":race:", mode, ":", ((actor != NULL) ? (strcat(":", ftos(actor.playerid))) : "")));
105 float WinningCondition_Race(float fraglimit)
112 FOREACH_CLIENT(IS_PLAYER(it), LAMBDA(
114 if(it.race_completed)
119 wc = WinningCondition_Scores(fraglimit, 0);
121 // ALWAYS initiate overtime, unless EVERYONE has finished the race!
122 if(wc == WINNING_YES || wc == WINNING_STARTSUDDENDEATHOVERTIME)
123 // do NOT support equality when the laps are all raced!
124 return WINNING_STARTSUDDENDEATHOVERTIME;
126 return WINNING_NEVER;
129 float WinningCondition_QualifyingThenRace(float limit)
132 wc = WinningCondition_Scores(limit, 0);
134 // NEVER initiate overtime
135 if(wc == WINNING_YES || wc == WINNING_STARTSUDDENDEATHOVERTIME)
143 MUTATOR_HOOKFUNCTION(rc, PlayerPhysics)
145 entity player = M_ARGV(0, entity);
146 float dt = M_ARGV(1, float);
148 player.race_movetime_frac += dt;
149 float f = floor(player.race_movetime_frac);
150 player.race_movetime_frac -= f;
151 player.race_movetime_count += f;
152 player.race_movetime = player.race_movetime_frac + player.race_movetime_count;
155 if(IS_PLAYER(player))
157 if (player.race_penalty)
158 if (time > player.race_penalty)
159 player.race_penalty = 0;
160 if(player.race_penalty)
162 player.velocity = '0 0 0';
163 set_movetype(player, MOVETYPE_NONE);
164 player.disableclientprediction = 2;
169 // force kbd movement for fairness
173 // if record times matter
174 // ensure nothing EVIL is being done (i.e. div0_evade)
175 // this hinders joystick users though
176 // but it still gives SOME analog control
177 wishvel.x = fabs(player.movement.x);
178 wishvel.y = fabs(player.movement.y);
179 if(wishvel.x != 0 && wishvel.y != 0 && wishvel.x != wishvel.y)
182 wishspeed = vlen(wishvel);
183 if(wishvel.x >= 2 * wishvel.y)
186 if(player.movement.x > 0)
187 player.movement_x = wishspeed;
189 player.movement_x = -wishspeed;
190 player.movement_y = 0;
192 else if(wishvel.y >= 2 * wishvel.x)
195 player.movement_x = 0;
196 if(player.movement.y > 0)
197 player.movement_y = wishspeed;
199 player.movement_y = -wishspeed;
204 if(player.movement.x > 0)
205 player.movement_x = M_SQRT1_2 * wishspeed;
207 player.movement_x = -M_SQRT1_2 * wishspeed;
208 if(player.movement.y > 0)
209 player.movement_y = M_SQRT1_2 * wishspeed;
211 player.movement_y = -M_SQRT1_2 * wishspeed;
216 MUTATOR_HOOKFUNCTION(rc, reset_map_global)
220 Score_NicePrint(NULL);
223 PlayerScore_Sort(race_place, 0, 1, 0);
225 FOREACH_CLIENT(true, LAMBDA(
228 s = PlayerScore_Add(it, SP_RACE_FASTEST, 0);
232 race_EventLog(ftos(it.race_place), it);
235 if(g_race_qualifying == 2)
237 g_race_qualifying = 0;
238 independent_players = 0;
239 cvar_set("fraglimit", ftos(race_fraglimit));
240 cvar_set("leadlimit", ftos(race_leadlimit));
241 cvar_set("timelimit", ftos(race_timelimit));
246 MUTATOR_HOOKFUNCTION(rc, ClientConnect)
248 entity player = M_ARGV(0, entity);
250 race_PreparePlayer(player);
251 player.race_checkpoint = -1;
253 string rr = RACE_RECORD;
255 if(IS_REAL_CLIENT(player))
258 race_send_recordtime(MSG_ONE);
259 race_send_speedaward(MSG_ONE);
261 speedaward_alltimebest = stof(db_get(ServerProgsDB, strcat(GetMapname(), rr, "speed/speed")));
262 speedaward_alltimebest_holder = uid2name(db_get(ServerProgsDB, strcat(GetMapname(), rr, "speed/crypto_idfp")));
263 race_send_speedaward_alltimebest(MSG_ONE);
266 for (i = 1; i <= RANKINGS_CNT; ++i)
268 race_SendRankings(i, 0, 0, MSG_ONE);
273 MUTATOR_HOOKFUNCTION(rc, MakePlayerObserver)
275 entity player = M_ARGV(0, entity);
277 if(g_race_qualifying)
278 if(PlayerScore_Add(player, SP_RACE_FASTEST, 0))
279 player.frags = FRAGS_LMS_LOSER;
281 player.frags = FRAGS_SPECTATOR;
283 race_PreparePlayer(player);
284 player.race_checkpoint = -1;
287 MUTATOR_HOOKFUNCTION(rc, PlayerSpawn)
289 entity player = M_ARGV(0, entity);
290 entity spawn_spot = M_ARGV(1, entity);
292 if(spawn_spot.target == "")
293 // Emergency: this wasn't a real spawnpoint. Can this ever happen?
294 race_PreparePlayer(player);
296 // if we need to respawn, do it right
297 player.race_respawn_checkpoint = player.race_checkpoint;
298 player.race_respawn_spotref = spawn_spot;
300 player.race_place = 0;
303 MUTATOR_HOOKFUNCTION(rc, PutClientInServer)
305 entity player = M_ARGV(0, entity);
307 if(IS_PLAYER(player))
310 if(player.killcount == FRAGS_SPECTATOR /* initial spawn */ || g_race_qualifying) // spawn
311 race_PreparePlayer(player);
313 race_RetractPlayer(player);
315 race_AbandonRaceCheck(player);
319 MUTATOR_HOOKFUNCTION(rc, PlayerDies)
321 entity frag_target = M_ARGV(2, entity);
323 frag_target.respawn_flags |= RESPAWN_FORCE;
324 race_AbandonRaceCheck(frag_target);
327 MUTATOR_HOOKFUNCTION(rc, HavocBot_ChooseRole)
329 entity bot = M_ARGV(0, entity);
331 bot.havocbot_role = havocbot_role_race;
335 MUTATOR_HOOKFUNCTION(rc, GetPressedKeys)
337 entity player = M_ARGV(0, entity);
339 if(player.cvar_cl_allow_uidtracking == 1 && player.cvar_cl_allow_uid2name == 1)
341 if (!player.stored_netname)
342 player.stored_netname = strzone(uid2name(player.crypto_idfp));
343 if(player.stored_netname != player.netname)
345 db_put(ServerProgsDB, strcat("/uid2name/", player.crypto_idfp), player.netname);
346 strunzone(player.stored_netname);
347 player.stored_netname = strzone(player.netname);
351 if (!IS_OBSERVER(player))
353 if(vdist(player.velocity - player.velocity_z * '0 0 1', >, speedaward_speed))
355 speedaward_speed = vlen(player.velocity - player.velocity_z * '0 0 1');
356 speedaward_holder = player.netname;
357 speedaward_uid = player.crypto_idfp;
358 speedaward_lastupdate = time;
360 if (speedaward_speed > speedaward_lastsent && time - speedaward_lastupdate > 1)
362 string rr = RACE_RECORD;
363 race_send_speedaward(MSG_ALL);
364 speedaward_lastsent = speedaward_speed;
365 if (speedaward_speed > speedaward_alltimebest && speedaward_uid != "")
367 speedaward_alltimebest = speedaward_speed;
368 speedaward_alltimebest_holder = speedaward_holder;
369 speedaward_alltimebest_uid = speedaward_uid;
370 db_put(ServerProgsDB, strcat(GetMapname(), rr, "speed/speed"), ftos(speedaward_alltimebest));
371 db_put(ServerProgsDB, strcat(GetMapname(), rr, "speed/crypto_idfp"), speedaward_alltimebest_uid);
372 race_send_speedaward_alltimebest(MSG_ALL);
378 MUTATOR_HOOKFUNCTION(rc, ForbidPlayerScore_Clear)
380 if(g_race_qualifying)
381 return true; // in qualifying, you don't lose score by observing
384 MUTATOR_HOOKFUNCTION(rc, GetTeamCount, CBC_ORDER_EXCLUSIVE)
386 M_ARGV(0, float) = race_teams;
389 MUTATOR_HOOKFUNCTION(rc, Scores_CountFragsRemaining)
391 // announce remaining frags if not in qualifying mode
392 if(!g_race_qualifying)
396 MUTATOR_HOOKFUNCTION(rc, GetRecords)
398 int record_page = M_ARGV(0, int);
399 string ret_string = M_ARGV(1, string);
401 for(int i = record_page * 200; i < MapInfo_count && i < record_page * 200 + 200; ++i)
403 if(MapInfo_Get_ByID(i))
405 float r = race_readTime(MapInfo_Map_bspname, 1);
410 string h = race_readName(MapInfo_Map_bspname, 1);
411 ret_string = strcat(ret_string, strpad(32, MapInfo_Map_bspname), " ", strpad(-8, TIME_ENCODED_TOSTRING(r)), " ", h, "\n");
415 M_ARGV(1, string) = ret_string;
418 MUTATOR_HOOKFUNCTION(rc, FixClientCvars)
420 entity player = M_ARGV(0, entity);
422 stuffcmd(player, "cl_cmd settemp cl_movecliptokeyboard 2\n");
425 MUTATOR_HOOKFUNCTION(rc, CheckRules_World)
427 float checkrules_timelimit = M_ARGV(1, float);
428 float checkrules_fraglimit = M_ARGV(2, float);
430 if(checkrules_timelimit >= 0)
432 if(!g_race_qualifying)
434 M_ARGV(0, float) = WinningCondition_Race(checkrules_fraglimit);
437 else if(g_race_qualifying == 2)
439 M_ARGV(0, float) = WinningCondition_QualifyingThenRace(checkrules_fraglimit);
445 MUTATOR_HOOKFUNCTION(rc, ReadLevelCvars)
447 if(g_race_qualifying == 2)
451 void race_Initialize()
454 if(g_race_qualifying == 2)
460 int fraglimit_override, leadlimit_override;
461 float timelimit_override, qualifying_override;
463 if(autocvar_g_race_teams)
466 race_teams = bound(2, autocvar_g_race_teams, 4);
468 if(race_teams >= 1) teams |= BIT(0);
469 if(race_teams >= 2) teams |= BIT(1);
470 if(race_teams >= 3) teams |= BIT(2);
471 if(race_teams >= 4) teams |= BIT(3);
473 race_teams = teams; // now set it?
475 have_team_spawns = -1; // request team spawns
480 qualifying_override = autocvar_g_race_qualifying_timelimit_override;
481 fraglimit_override = autocvar_g_race_laps_limit;
482 leadlimit_override = 0; // currently not supported by race
483 timelimit_override = autocvar_timelimit_override;
485 float want_qualifying = ((qualifying_override >= 0) ? qualifying_override : autocvar_g_race_qualifying_timelimit) > 0;
487 if(autocvar_g_campaign)
489 g_race_qualifying = 1;
490 independent_players = 1;
492 else if(want_qualifying)
494 g_race_qualifying = 2;
495 independent_players = 1;
496 race_fraglimit = (fraglimit_override >= 0) ? fraglimit_override : autocvar_fraglimit;
497 race_leadlimit = (leadlimit_override >= 0) ? leadlimit_override : autocvar_leadlimit;
498 race_timelimit = (timelimit_override >= 0) ? timelimit_override : autocvar_timelimit;
499 qualifying_override = (qualifying_override >= 0) ? qualifying_override : autocvar_g_race_qualifying_timelimit;
500 fraglimit_override = 0;
501 leadlimit_override = 0;
502 timelimit_override = qualifying_override;
505 g_race_qualifying = 0;
506 SetLimits(fraglimit_override, leadlimit_override, timelimit_override, qualifying_override);