Add stomach board indicator to show whether you are seeing your stomach or your preda...
[voretournament/voretournament.git] / data / qcsrc / client / sbar.qc
1 void drawstringright(vector, string, vector, vector, float, float);\r
2 void drawstringcenter(vector, string, vector, vector, float, float);\r
3 \r
4 float teamnagger;\r
5 \r
6 float weapon_hits[WEP_MAXCOUNT];\r
7 float weapon_fired[WEP_MAXCOUNT];\r
8 float weapon_number;\r
9 \r
10 float last_weapon;\r
11 float weapontime;\r
12 \r
13 float sbar_alpha_fg;\r
14 float sbar_alpha_bg;\r
15 float sbar_color_bg_team;\r
16 float sbar_border_thickness;\r
17 float sbar_accuracy_border_thickness;\r
18 float sbar_scoreboard_alpha_bg;\r
19 float sbar_scoreboard_alpha_fg;\r
20 float sbar_scoreboard_highlight;\r
21 float sbar_scoreboard_highlight_alpha;\r
22 float sbar_scoreboard_highlight_alpha_self;\r
23 float sbar_hudselector;\r
24 float sbar_accuracy_hud;\r
25 float sbar_scoreboard_alpha_name;\r
26 float sbar_scoreboard_alpha_name_self;\r
27 \r
28 float ps_primary, ps_secondary;\r
29 float ts_primary, ts_secondary;\r
30 \r
31 vector color;\r
32 float SCOREBOARD_OFFSET = 50;\r
33 \r
34 void CSQC_kh_hudreset();\r
35 void CSQC_kh_hud();\r
36 void CSQC_ctf_hudreset();\r
37 void CSQC_ctf_hud();\r
38 void CSQC_race_hud();\r
39 void MapVote_Draw();\r
40 void Sbar_FinaleOverlay()\r
41 {\r
42         /*vector pos;\r
43         pos_x = (vid_conwidth - 1)/2;\r
44         pos_y = 16;\r
45         pos_z = 0;*/\r
46 \r
47         //drawpic(pos, "gfx/finale", '0 0 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
48 \r
49         //drawstring(pos, "END", sbar_fontsize, '1 1 1', 1, DRAWFLAG_NORMAL);\r
50         MapVote_Draw();\r
51 }\r
52 \r
53 vector Sbar_AccuracyColor(float accuracy)\r
54 {\r
55         vector rgb;\r
56         float yellow_accuracy = cvar("sbar_accuracy_yellow"); // value at which this function returns yellow\r
57         if(accuracy >= 100) {\r
58                 rgb_x = 0;\r
59                 rgb_y = 1;\r
60         }\r
61         else if(accuracy > yellow_accuracy) {\r
62                 rgb_x = 1 - (accuracy-yellow_accuracy)/(100-yellow_accuracy); // red value between 1 -> 0\r
63                 rgb_y = 1;\r
64         }\r
65         else {\r
66                 rgb_x = 1;\r
67                 rgb_y = accuracy/yellow_accuracy; // green value between 0 -> 1\r
68         }\r
69         rgb_z = 0;\r
70         return rgb;\r
71 }\r
72 \r
73 void Sbar_DrawXNum (vector pos, float num, float digits, float showminusplus, float lettersize, vector rgb, float highlighted, float stroke, float alpha, float dflags)\r
74 {\r
75         float l, i;\r
76         string str, tmp, l_length;\r
77         float minus, plus;\r
78         vector vsize, num_color;\r
79 \r
80         vsize_x = vsize_y = lettersize;\r
81         vsize_z = 0;\r
82 \r
83         // showminusplus 1: always prefix with minus sign (useful in race distribution display)\r
84         // showminusplus 2: always prefix with plus sign (useful in race distribution display)\r
85         // showminusplus 3: prefix with minus sign if negative, plus sign if positive (useful in score distribution display)\r
86 \r
87         if((showminusplus == 2 && num >= 0) || (num > 0 && showminusplus == 3))\r
88         {\r
89                 plus = true;\r
90                 pos_x -= lettersize;\r
91         } else\r
92                 plus = false;   \r
93 \r
94         if(num < 0 || (num < 0 && showminusplus == 3) || (showminusplus == 1 && num <= 0))\r
95         {\r
96                 minus = true;\r
97                 num = -num;\r
98                 pos_x -= lettersize;\r
99         } else\r
100                 minus = false;\r
101 \r
102         if(digits < 0)\r
103         {\r
104                 tmp = ftos(num);\r
105                 digits = -digits;\r
106                 str = strcat(substring("0000000000", 0, digits - strlen(tmp)), tmp);\r
107         } else\r
108                 str = ftos(num);\r
109 \r
110         l = strlen(str);\r
111         l_length = ftos(l);\r
112 \r
113         if(l > digits)\r
114         {\r
115                 str = substring(str, l-digits, 999);\r
116                 l = strlen(str);\r
117         } else if(l < digits)\r
118                 pos_x += (digits-l) * lettersize;\r
119 \r
120         if (highlighted == 1) {\r
121                 vector hl_size;\r
122                 hl_size_x = vsize_x * l + vsize_x * 0.2;\r
123                 hl_size_y = vsize_y * 1.1;\r
124                 hl_size_z = 0;\r
125                 if(minus)\r
126                         hl_size_x = hl_size_x + vsize_x;\r
127 \r
128                 vector hl_pos;\r
129                 hl_pos_x = pos_x - lettersize/10;\r
130                 hl_pos_y = pos_y - lettersize/20;\r
131                 hl_pos_z = 0;\r
132 \r
133                 drawpic(hl_pos, strcat("gfx/hud/sb_highlight_", l_length), hl_size, '1 1 1', alpha, dflags);\r
134         }\r
135 \r
136         if (stroke == 1)\r
137                 num_color = '1 1 1';\r
138         else\r
139                 num_color = rgb;\r
140 \r
141         if(minus)\r
142         {\r
143                 if (stroke == 1)\r
144                         drawpic(pos, "gfx/hud/num_minus_stroke", vsize, rgb, alpha, dflags);\r
145                 drawpic(pos, "gfx/hud/num_minus", vsize, num_color, alpha, dflags);\r
146                 pos_x += lettersize;\r
147         } else if(plus)\r
148         {\r
149                 if (stroke == 1)\r
150                         drawpic(pos, "gfx/hud/num_plus_stroke", vsize, rgb, alpha, dflags);\r
151                 drawpic(pos, "gfx/hud/num_plus", vsize, num_color, alpha, dflags);\r
152                 pos_x += lettersize;\r
153         }\r
154 \r
155         for(i = 0; i < l; ++i)\r
156         {\r
157                 tmp = substring(str, i, 1);\r
158                 if (stroke == 1)\r
159                         drawpic(pos, strcat("gfx/hud/num_", tmp, "_stroke"), vsize, rgb, alpha, dflags);\r
160                 drawpic(pos, strcat("gfx/hud/num_", tmp), vsize, num_color, alpha, dflags);\r
161                 pos_x += lettersize;\r
162         }\r
163 }\r
164 \r
165 void Sbar_DrawXNum_Colored (vector pos, float x, float lettersize, float alpha)\r
166 {\r
167         if(x > 200) {\r
168                 color_x = 0;\r
169                 color_y = 1;\r
170                 color_z = 0;\r
171         }\r
172         else if(x > 150) {\r
173                 color_x = 0.4 - (x-150)*0.02 * 0.4; //red value between 0.4 -> 0\r
174                 color_y = 0.9 + (x-150)*0.02 * 0.1; // green value between 0.9 -> 1\r
175                 color_z = 0;\r
176         }\r
177         else if(x > 100) {\r
178                 color_x = 1 - (x-100)*0.02 * 0.6; //red value between 1 -> 0.4\r
179                 color_y = 1 - (x-100)*0.02 * 0.1; // green value between 1 -> 0.9\r
180                 color_z = 1 - (x-100)*0.02; // blue value between 1 -> 0\r
181         }\r
182         else if(x > 50) {\r
183                 color_x = 1;\r
184                 color_y = 1;\r
185                 color_z = 0.2 + (x-50)*0.02 * 0.8; // blue value between 0.2 -> 1\r
186         }\r
187         else if(x > 20) {\r
188                 color_x = 1;\r
189                 color_y = (x-20)*90/27/100; // green value between 0 -> 1\r
190                 color_z = (x-20)*90/27/100 * 0.2; // blue value between 0 -> 0.2\r
191         }\r
192         else {\r
193                 color_x = 1;\r
194                 color_y = 0;\r
195                 color_z = 0;\r
196         }\r
197         Sbar_DrawXNum(pos, x, 3, 0, lettersize, color, 0, 0, alpha, DRAWFLAG_NORMAL);\r
198 }\r
199 \r
200 void Cmd_Sbar_SetFields(float argc);\r
201 void Sbar_InitScores()\r
202 {\r
203         float i, f;\r
204 \r
205         ps_primary = ps_secondary = ts_primary = ts_secondary = -1;\r
206         for(i = 0; i < MAX_SCORE; ++i)\r
207         {\r
208                 f = (scores_flags[i] & SFL_SORT_PRIO_MASK);\r
209                 if(f == SFL_SORT_PRIO_PRIMARY)\r
210                         ps_primary = i;\r
211                 if(f == SFL_SORT_PRIO_SECONDARY)\r
212                         ps_secondary = i;\r
213         }\r
214         if(ps_secondary == -1)\r
215                 ps_secondary = ps_primary;\r
216 \r
217         for(i = 0; i < MAX_TEAMSCORE; ++i)\r
218         {\r
219                 f = (teamscores_flags[i] & SFL_SORT_PRIO_MASK);\r
220                 if(f == SFL_SORT_PRIO_PRIMARY)\r
221                         ts_primary = i;\r
222                 if(f == SFL_SORT_PRIO_SECONDARY)\r
223                         ts_secondary = i;\r
224         }\r
225         if(ts_secondary == -1)\r
226                 ts_secondary = ts_primary;\r
227 \r
228         Cmd_Sbar_SetFields(0);\r
229 }\r
230 \r
231 void Sbar_UpdatePlayerPos(entity pl);\r
232 float SetTeam(entity pl, float Team);\r
233 //float lastpnum;\r
234 void Sbar_UpdatePlayerTeams()\r
235 {\r
236         float Team;\r
237         entity pl, tmp;\r
238         float num;\r
239 \r
240         num = 0;\r
241         for(pl = players.sort_next; pl; pl = pl.sort_next)\r
242         {\r
243                 num += 1;\r
244                 Team = GetPlayerColor(pl.sv_entnum);\r
245                 if(SetTeam(pl, Team))\r
246                 {\r
247                         tmp = pl.sort_prev;\r
248                         Sbar_UpdatePlayerPos(pl);\r
249                         if(tmp)\r
250                                 pl = tmp;\r
251                         else\r
252                                 pl = players.sort_next;\r
253                 }\r
254         }\r
255         /*\r
256         if(num != lastpnum)\r
257                 print(strcat("PNUM: ", ftos(num), "\n"));\r
258         lastpnum = num;\r
259         */\r
260 }\r
261 \r
262 float Sbar_ComparePlayerScores(entity left, entity right)\r
263 {\r
264         float vl, vr;\r
265         vl = GetPlayerColor(left.sv_entnum);\r
266         vr = GetPlayerColor(right.sv_entnum);\r
267 \r
268         if(!left.gotscores)\r
269                 vl = COLOR_SPECTATOR;\r
270         if(!right.gotscores)\r
271                 vr = COLOR_SPECTATOR;\r
272 \r
273         if(vl > vr)\r
274                 return true;\r
275         if(vl < vr)\r
276                 return false;\r
277 \r
278         if(vl == COLOR_SPECTATOR)\r
279         {\r
280                 // FIRST the one with scores (spectators), THEN the ones without (downloaders)\r
281                 // no other sorting\r
282                 if(!left.gotscores && right.gotscores)\r
283                         return true;\r
284                 return false;\r
285         }\r
286 \r
287         vl = left.scores[ps_primary];\r
288         vr = right.scores[ps_primary];\r
289         if(scores_flags[ps_primary] & SFL_ZERO_IS_WORST)\r
290         {\r
291                 if(vl == 0 && vr != 0)\r
292                         return 1;\r
293                 if(vl != 0 && vr == 0)\r
294                         return 0;\r
295         }\r
296         if(vl > vr)\r
297                 return IS_INCREASING(scores_flags[ps_primary]);\r
298         if(vl < vr)\r
299                 return IS_DECREASING(scores_flags[ps_primary]);\r
300 \r
301         vl = left.scores[ps_secondary];\r
302         vr = right.scores[ps_secondary];\r
303         if(scores_flags[ps_secondary] & SFL_ZERO_IS_WORST)\r
304         {\r
305                 if(vl == 0 && vr != 0)\r
306                         return 1;\r
307                 if(vl != 0 && vr == 0)\r
308                         return 0;\r
309         }\r
310         if(vl > vr)\r
311                 return IS_INCREASING(scores_flags[ps_secondary]);\r
312         if(vl < vr)\r
313                 return IS_DECREASING(scores_flags[ps_secondary]);\r
314 \r
315         return false;\r
316 }\r
317 \r
318 void Sbar_UpdatePlayerPos(entity player)\r
319 {\r
320         for(other = player.sort_next; other && Sbar_ComparePlayerScores(player, other); other = player.sort_next)\r
321         {\r
322                 SORT_SWAP(player, other);\r
323         }\r
324         for(other = player.sort_prev; other != players && Sbar_ComparePlayerScores(other, player); other = player.sort_prev)\r
325         {\r
326                 SORT_SWAP(other, player);\r
327         }\r
328 }\r
329 \r
330 float Sbar_CompareTeamScores(entity left, entity right)\r
331 {\r
332         float vl, vr;\r
333 \r
334         if(left.team == COLOR_SPECTATOR)\r
335                 return 1;\r
336         if(right.team == COLOR_SPECTATOR)\r
337                 return 0;\r
338 \r
339         vl = left.teamscores[ts_primary];\r
340         vr = right.teamscores[ts_primary];\r
341         if(vl > vr)\r
342                 return IS_INCREASING(teamscores_flags[ts_primary]);\r
343         if(vl < vr)\r
344                 return IS_DECREASING(teamscores_flags[ts_primary]);\r
345 \r
346         vl = left.teamscores[ts_secondary];\r
347         vr = right.teamscores[ts_secondary];\r
348         if(vl > vr)\r
349                 return IS_INCREASING(teamscores_flags[ts_secondary]);\r
350         if(vl < vr)\r
351                 return IS_DECREASING(teamscores_flags[ts_secondary]);\r
352 \r
353         return false;\r
354 }\r
355 \r
356 void Sbar_UpdateTeamPos(entity Team)\r
357 {\r
358         for(other = Team.sort_next; other && Sbar_CompareTeamScores(Team, other); other = Team.sort_next)\r
359         {\r
360                 SORT_SWAP(Team, other);\r
361         }\r
362         for(other = Team.sort_prev; other != teams && Sbar_CompareTeamScores(other, Team); other = Team.sort_prev)\r
363         {\r
364                 SORT_SWAP(other, Team);\r
365         }\r
366 }\r
367 \r
368 void Cmd_Sbar_Help(float argc)\r
369 {\r
370         print("You can modify the scoreboard using the ^2sbar_columns_set command.\n");\r
371         print("^3|---------------------------------------------------------------|\n");\r
372         print("Usage:\n");\r
373         print("^2sbar_columns_set default\n");\r
374         print("^2sbar_columns_set ^7filed1 field2 ...\n");\r
375         print("The following field names are recognized (case insensitive):\n");\r
376         print("You can use a ^3|^7 to start the right-aligned fields.\n\n");\r
377 \r
378         print("^3name^7 or ^3nick^7         Name of a player\n");\r
379         print("^3ping^7                     Ping time\n");\r
380         print("^3pl^7                       Packet loss\n");\r
381         print("^3kills^7                    Number of kills\n");\r
382         print("^3deaths^7                   Number of deaths\n");\r
383         print("^3suicides^7                 Number of suicides\n");\r
384         print("^3frags^7                    kills - suicides\n");\r
385         print("^3kd^7                       The kill-death ratio\n");\r
386         print("^3caps^7                     How often a flag (CTF) or a key (KeyHunt) was captured\n");\r
387         print("^3pickups^7                  How often a flag (CTF) or a key (KeyHunt) was picked up\n");\r
388         print("^3fckills^7                  Number of flag carrier kills\n");\r
389         print("^3returns^7                  Number of flag returns\n");\r
390         print("^3drops^7                    Number of flag drops\n");\r
391         print("^3lives^7                    Number of lives (LMS)\n");\r
392         print("^3rank^7                     Player rank\n");\r
393         print("^3pushes^7                   Number of players pushed into void\n");\r
394         print("^3destroyed^7                Number of keys destroyed by pushing them into void\n");\r
395         print("^3kckills^7                  Number of keys carrier kills\n");\r
396         print("^3losses^7                   Number of times a key was lost\n");\r
397         print("^3laps^7                     Number of laps finished (race/cts)\n");\r
398         print("^3time^7                     Total time raced (race/cts)\n");\r
399         print("^3fastest^7                  Time of fastest lap (race/cts)\n");\r
400         print("^3ticks^7                    Number of ticks (DOM)\n");\r
401         print("^3takes^7                    Number of domination points taken (DOM)\n");\r
402         print("^3score^7                    Total score\n\n");\r
403 \r
404         print("Before a field you can put a + or - sign, then a comma separated list\n");\r
405         print("of game types, then a slash, to make the field show up only in these\n");\r
406         print("or in all but these game types. You can also specify 'all' as a\n");\r
407         print("field to show all fields available for the current game mode.\n\n");\r
408         \r
409         print("The special game type names 'teams' and 'noteams' can be used to\n");\r
410         print("include/exclude ALL teams/noteams game modes.\n\n");\r
411 \r
412         print("Example: sbar_columns_set name ping pl | +ctf/field3 -dm/field4\n");\r
413         print("will display name, ping and pl aligned to the left, and the fields\n");\r
414         print("right of the vertical bar aligned to the right.\n");\r
415         print("'field3' will only be shown in CTF, and 'field4' will be shown in all\n");\r
416         print("other gamemodes except DM.\n");\r
417 }\r
418 \r
419 string Sbar_DefaultColumnLayout()\r
420 {\r
421         return strcat( // fteqcc sucks\r
422                 "ping pl name | ",\r
423                 "-teams,race,lms/kills -teams,lms/deaths -teams,lms,race/suicides -race,dm,tdm/frags ", // tdm already has this in "score"\r
424                 "+ctf/caps +ctf/pickups +ctf/fckills +ctf/returns ",\r
425                 "+lms/lives +lms/rank ",\r
426                 "+kh/caps +kh/pushes +kh/destroyed ",\r
427                 "?+race/laps ?+race/time ?+race/fastest ",\r
428                 "-lms,race");\r
429 }\r
430 \r
431 void Cmd_Sbar_SetFields(float argc)\r
432 {\r
433         float i, j, slash;\r
434         string str, pattern;\r
435         float have_name, have_primary, have_secondary, have_separator;\r
436         float missing;\r
437 \r
438         // TODO: re enable with gametype dependant cvars?\r
439         if(argc < 2) // no arguments provided\r
440                 argc = tokenizebyseparator(strcat("x ", cvar_string("sbar_columns")), " ");\r
441 \r
442         if(argc < 2)\r
443                 argc = tokenizebyseparator(strcat("x ", Sbar_DefaultColumnLayout()), " ");\r
444 \r
445         if(argc == 2)\r
446         {\r
447                 if(argv(1) == "default")\r
448                         argc = tokenizebyseparator(strcat("x ", Sbar_DefaultColumnLayout()), " ");\r
449                 else if(argv(1) == "all")\r
450                 {\r
451                         string s;\r
452                         s = "ping pl color name |";\r
453                         for(i = 0; i < MAX_SCORE; ++i)\r
454                         {\r
455                                 if(i != ps_primary)\r
456                                 if(i != ps_secondary)\r
457                                 if(scores_label[i] != "")\r
458                                         s = strcat(s, " ", scores_label[i]);\r
459                         }\r
460                         if(ps_secondary != ps_primary)\r
461                                 s = strcat(s, " ", scores_label[ps_secondary]);\r
462                         s = strcat(s, " ", scores_label[ps_primary]);\r
463                         argc = tokenizebyseparator(strcat("x ", s), " ");\r
464                 }\r
465         }\r
466 \r
467 \r
468         sbar_num_fields = 0;\r
469 \r
470         drawfont = sbar_font;\r
471 \r
472         for(i = 0; i < argc - 1; ++i)\r
473         {\r
474                 float nocomplain;\r
475                 str = argv(i+1);\r
476 \r
477                 nocomplain = FALSE;\r
478                 if(substring(str, 0, 1) == "?")\r
479                 {\r
480                         nocomplain = TRUE;\r
481                         str = substring(str, 1, strlen(str) - 1);\r
482                 }\r
483 \r
484                 slash = strstrofs(str, "/", 0);\r
485                 if(slash >= 0)\r
486                 {\r
487                         pattern = substring(str, 0, slash);\r
488                         str = substring(str, slash + 1, strlen(str) - (slash + 1));\r
489 \r
490                         if not(isGametypeInFilter(gametype, teamplay, pattern))\r
491                                 continue;\r
492                 }\r
493 \r
494                 strunzone(sbar_title[sbar_num_fields]);\r
495                 sbar_title[sbar_num_fields] = strzone(str);\r
496                 sbar_size[sbar_num_fields] = stringwidth(str, FALSE, sbar_fontsize);\r
497                 str = strtolower(str);\r
498 \r
499                 if(str == "ping") {\r
500                         sbar_field[sbar_num_fields] = SP_PING;\r
501                 } else if(str == "pl") {\r
502                         sbar_field[sbar_num_fields] = SP_PL;\r
503                 } else if(str == "kd" || str == "kdr" || str == "kdratio" || str == "k/d") {\r
504                         sbar_field[sbar_num_fields] = SP_KDRATIO;\r
505                 } else if(str == "name" || str == "nick") {\r
506                         sbar_field[sbar_num_fields] = SP_NAME;\r
507                         have_name = 1;\r
508                 } else if(str == "|") {\r
509                         sbar_field[sbar_num_fields] = SP_SEPARATOR;\r
510                         have_separator = 1;\r
511                 } else {\r
512                         for(j = 0; j < MAX_SCORE; ++j)\r
513                                 if(str == strtolower(scores_label[j]))\r
514                                         goto found; // sorry, but otherwise fteqcc -O3 miscompiles this and warns about "unreachable code"\r
515 :notfound\r
516                         if(str == "frags" && !(gametype == GAME_RPG))\r
517                         {\r
518                                 j = SP_FRAGS;\r
519                         }\r
520                         else\r
521                         {\r
522                                 if not(nocomplain)\r
523                                         print(strcat("^1Error:^7 Unknown score field: '", str, "'\n"));\r
524                                 continue;\r
525                         }\r
526 :found\r
527                         sbar_field[sbar_num_fields] = j;\r
528                         if(j == ps_primary)\r
529                                 have_primary = 1;\r
530                         if(j == ps_secondary)\r
531                                 have_secondary = 1;\r
532                 }\r
533                 ++sbar_num_fields;\r
534                 if(sbar_num_fields >= MAX_SBAR_FIELDS)\r
535                         break;\r
536         }\r
537 \r
538         if(scores_flags[ps_primary] & SFL_ALLOW_HIDE)\r
539                 have_primary = 1;\r
540         if(scores_flags[ps_secondary] & SFL_ALLOW_HIDE)\r
541                 have_secondary = 1;\r
542         if(ps_primary == ps_secondary)\r
543                 have_secondary = 1;\r
544         missing = (!have_primary) + (!have_secondary) + (!have_separator) + (!have_name);\r
545 \r
546         if(sbar_num_fields+missing < MAX_SBAR_FIELDS)\r
547         {\r
548                 if(!have_name)\r
549                 {\r
550                         strunzone(sbar_title[sbar_num_fields]);\r
551                         for(i = sbar_num_fields; i > 0; --i)\r
552                         {\r
553                                 sbar_title[i] = sbar_title[i-1];\r
554                                 sbar_size[i] = sbar_size[i-1];\r
555                                 sbar_field[i] = sbar_field[i-1];\r
556                         }\r
557                         sbar_title[0] = strzone("name");\r
558                         sbar_field[0] = SP_NAME;\r
559                         ++sbar_num_fields;\r
560                         print("fixed missing field 'name'\n");\r
561 \r
562                         if(!have_separator)\r
563                         {\r
564                                 strunzone(sbar_title[sbar_num_fields]);\r
565                                 for(i = sbar_num_fields; i > 1; --i)\r
566                                 {\r
567                                         sbar_title[i] = sbar_title[i-1];\r
568                                         sbar_size[i] = sbar_size[i-1];\r
569                                         sbar_field[i] = sbar_field[i-1];\r
570                                 }\r
571                                 sbar_title[1] = strzone("|");\r
572                                 sbar_field[1] = SP_SEPARATOR;\r
573                                 sbar_size[1] = stringwidth("|", FALSE, sbar_fontsize);\r
574                                 ++sbar_num_fields;\r
575                                 print("fixed missing field '|'\n");\r
576                         }\r
577                 }\r
578                 else if(!have_separator)\r
579                 {\r
580                         strunzone(sbar_title[sbar_num_fields]);\r
581                         sbar_title[sbar_num_fields] = strzone("|");\r
582                         sbar_size[sbar_num_fields] = stringwidth("|", FALSE, sbar_fontsize);\r
583                         sbar_field[sbar_num_fields] = SP_SEPARATOR;\r
584                         ++sbar_num_fields;\r
585                         print("fixed missing field '|'\n");\r
586                 }\r
587                 if(!have_secondary)\r
588                 {\r
589                         strunzone(sbar_title[sbar_num_fields]);\r
590                         sbar_title[sbar_num_fields] = strzone(scores_label[ps_secondary]);\r
591                         sbar_size[sbar_num_fields] = stringwidth(sbar_title[sbar_num_fields], FALSE, sbar_fontsize);\r
592                         sbar_field[sbar_num_fields] = ps_secondary;\r
593                         ++sbar_num_fields;\r
594                         print("fixed missing field '", scores_label[ps_secondary], "'\n");\r
595                 }\r
596                 if(!have_primary)\r
597                 {\r
598                         strunzone(sbar_title[sbar_num_fields]);\r
599                         sbar_title[sbar_num_fields] = strzone(scores_label[ps_primary]);\r
600                         sbar_size[sbar_num_fields] = stringwidth(sbar_title[sbar_num_fields], FALSE, sbar_fontsize);\r
601                         sbar_field[sbar_num_fields] = ps_primary;\r
602                         ++sbar_num_fields;\r
603                         print("fixed missing field '", scores_label[ps_primary], "'\n");\r
604                 }\r
605         }\r
606 \r
607         sbar_field[sbar_num_fields] = SP_END;\r
608 }\r
609 \r
610 // MOVEUP::\r
611 vector sbar_field_rgb;\r
612 string sbar_field_icon0;\r
613 string sbar_field_icon1;\r
614 string sbar_field_icon2;\r
615 vector sbar_field_icon0_rgb;\r
616 vector sbar_field_icon1_rgb;\r
617 vector sbar_field_icon2_rgb;\r
618 float sbar_field_icon0_alpha;\r
619 float sbar_field_icon1_alpha;\r
620 float sbar_field_icon2_alpha;\r
621 string Sbar_GetField(entity pl, float field)\r
622 {\r
623         float tmp, num, denom, f;\r
624         string str;\r
625         sbar_field_rgb = '1 1 1';\r
626         sbar_field_icon0 = "";\r
627         sbar_field_icon1 = "";\r
628         sbar_field_icon2 = "";\r
629         sbar_field_icon0_rgb = '1 1 1';\r
630         sbar_field_icon1_rgb = '1 1 1';\r
631         sbar_field_icon2_rgb = '1 1 1';\r
632         sbar_field_icon0_alpha = 1;\r
633         sbar_field_icon1_alpha = 1;\r
634         sbar_field_icon2_alpha = 1;\r
635         switch(field)\r
636         {\r
637                 case SP_PING:\r
638                         if not(pl.gotscores)\r
639                                 return "\x8D\x8D\x8D"; // >>> sign\r
640                         //str = getplayerkey(pl.sv_entnum, "ping");\r
641                         f = pl.ping;\r
642                         if(f == 0)\r
643                                 return "N/A";\r
644                         tmp = max(0, min(220, f-80)) / 220;\r
645                         sbar_field_rgb = '1 1 1' - '0 1 1'*tmp;\r
646                         return ftos(f);\r
647 \r
648                 case SP_PL:\r
649                         if not(pl.gotscores)\r
650                                 return "N/A";\r
651                         f = pl.ping_packetloss;\r
652                         tmp = pl.ping_movementloss;\r
653                         if(f == 0 && tmp == 0)\r
654                                 return "";\r
655                         str = ftos(ceil(f * 100));\r
656                         if(tmp != 0)\r
657                                 str = strcat(str, "~", ftos(ceil(tmp * 100)));\r
658                         tmp = bound(0, f / 0.2 + tmp / 0.04, 1); // 20% is REALLY BAD pl\r
659                         sbar_field_rgb = '1 0.5 0.5' - '0 0.5 0.5'*tmp;\r
660                         return str;\r
661 \r
662                 case SP_NAME:\r
663                         if(ready_waiting && pl.ready)\r
664                         {\r
665                                 sbar_field_icon0 = "gfx/sb_player_ready";\r
666                         }\r
667                         else if(!teamplay)\r
668                         {\r
669                                 f = stof(getplayerkey(pl.sv_entnum, "colors"));\r
670                                 {\r
671                                         sbar_field_icon0 = "gfx/sb_playercolor_base";\r
672                                         sbar_field_icon1 = "gfx/sb_playercolor_shirt";\r
673                                         sbar_field_icon1_rgb = colormapPaletteColor(floor(f / 16), 0);\r
674                                         sbar_field_icon2 = "gfx/sb_playercolor_pants";\r
675                                         sbar_field_icon2_rgb = colormapPaletteColor(mod(f, 16), 1);\r
676                                 }\r
677                         }\r
678                         return GetPlayerName(pl.sv_entnum);\r
679 \r
680                 case SP_FRAGS:\r
681                         f = pl.(scores[SP_KILLS]);\r
682                         f -= pl.(scores[SP_SUICIDES]);\r
683                         return ftos(f);\r
684 \r
685                 case SP_KDRATIO:\r
686                         num = pl.(scores[SP_KILLS]);\r
687                         denom = pl.(scores[SP_DEATHS]);\r
688 \r
689                         if(denom == 0) {\r
690                                 sbar_field_rgb = '0 1 0';\r
691                                 str = ftos(num);\r
692                         } else if(num <= 0) {\r
693                                 sbar_field_rgb = '1 0 0';\r
694                                 str = ftos(num/denom);\r
695                         } else\r
696                                 str = ftos(num/denom);\r
697 \r
698                         tmp = strstrofs(str, ".", 0);\r
699                         if(tmp > 0)\r
700                                 str = substring(str, 0, tmp+2);\r
701                         return str;\r
702 \r
703                 default:\r
704                         tmp = pl.(scores[field]);\r
705                         f = scores_flags[field];\r
706                         if(field == ps_primary)\r
707                                 sbar_field_rgb = '1 1 0';\r
708                         else if(field == ps_secondary)\r
709                                 sbar_field_rgb = '0 1 1';\r
710                         else\r
711                                 sbar_field_rgb = '1 1 1';\r
712                         return ScoreString(f, tmp);\r
713         }\r
714         //return "error";\r
715 }\r
716 \r
717 string Sbar_GetStomachField(entity pl, float field)\r
718 {\r
719         sbar_field_rgb = '1 1 1';\r
720         sbar_field_icon0 = "";\r
721         sbar_field_icon1 = "";\r
722         sbar_field_icon2 = "";\r
723         sbar_field_icon0_rgb = '1 1 1';\r
724         sbar_field_icon1_rgb = '1 1 1';\r
725         sbar_field_icon2_rgb = '1 1 1';\r
726         sbar_field_icon0_alpha = 1;\r
727         sbar_field_icon1_alpha = 1;\r
728         sbar_field_icon2_alpha = 1;\r
729         switch(field)\r
730         {\r
731                 case ST_NAME:\r
732                         return GetPlayerName(pl.sv_entnum);\r
733 \r
734                 case ST_HEALTH:\r
735                         return ftos(pl.plhealth);\r
736 \r
737                 default:\r
738                         return "N/A";\r
739         }\r
740         //return "error";\r
741 }\r
742 \r
743 float xmin, xmax, ymin, ymax, sbwidth;\r
744 float sbar_fixscoreboardcolumnwidth_len;\r
745 float sbar_fixscoreboardcolumnwidth_iconlen;\r
746 float sbar_fixscoreboardcolumnwidth_marginlen;\r
747 \r
748 float stringwidth_colors(string s, vector theSize)\r
749 {\r
750         return stringwidth(s, TRUE, theSize);\r
751 }\r
752 \r
753 float stringwidth_nocolors(string s, vector theSize)\r
754 {\r
755         return stringwidth(s, FALSE, theSize);\r
756 }\r
757 \r
758 string Sbar_FixScoreboardColumnWidth(float i, string str)\r
759 {\r
760         float field, f;\r
761         vector sz;\r
762         field = sbar_field[i];\r
763 \r
764         sbar_fixscoreboardcolumnwidth_iconlen = 0;\r
765 \r
766         if(sbar_field_icon0 != "")\r
767         {\r
768                 sz = drawgetimagesize(sbar_field_icon0);\r
769                 f = sz_x / sz_y;\r
770                 if(sbar_fixscoreboardcolumnwidth_iconlen < f)\r
771                         sbar_fixscoreboardcolumnwidth_iconlen = f;\r
772         }\r
773 \r
774         if(sbar_field_icon1 != "")\r
775         {\r
776                 sz = drawgetimagesize(sbar_field_icon1);\r
777                 f = sz_x / sz_y;\r
778                 if(sbar_fixscoreboardcolumnwidth_iconlen < f)\r
779                         sbar_fixscoreboardcolumnwidth_iconlen = f;\r
780         }\r
781 \r
782         if(sbar_field_icon2 != "")\r
783         {\r
784                 sz = drawgetimagesize(sbar_field_icon2);\r
785                 f = sz_x / sz_y;\r
786                 if(sbar_fixscoreboardcolumnwidth_iconlen < f)\r
787                         sbar_fixscoreboardcolumnwidth_iconlen = f;\r
788         }\r
789 \r
790         sbar_fixscoreboardcolumnwidth_iconlen *= sbar_fontsize_y / sbar_fontsize_x; // fix icon aspect\r
791 \r
792         if(sbar_fixscoreboardcolumnwidth_iconlen != 0)\r
793                 sbar_fixscoreboardcolumnwidth_marginlen = stringwidth(" ", FALSE, sbar_fontsize);\r
794         else\r
795                 sbar_fixscoreboardcolumnwidth_marginlen = 0;\r
796 \r
797         if(field == SP_NAME) // name gets all remaining space\r
798         {\r
799                 float namesize, j;\r
800                 namesize = sbwidth;// / sbar_fontsize_x;\r
801                 for(j = 0; j < sbar_num_fields; ++j)\r
802                         if(j != i)\r
803                                 if (sbar_field[i] != SP_SEPARATOR)\r
804                                         namesize -= sbar_size[j] + 1;\r
805                 namesize += 1;\r
806                 sbar_size[i] = namesize;\r
807                 \r
808                 if (sbar_fixscoreboardcolumnwidth_iconlen != 0)\r
809                         namesize -= sbar_fixscoreboardcolumnwidth_marginlen + sbar_fixscoreboardcolumnwidth_iconlen;\r
810                 str = textShortenToWidth(str, namesize, sbar_fontsize, stringwidth_colors);\r
811                 sbar_fixscoreboardcolumnwidth_len = stringwidth(str, TRUE, sbar_fontsize);\r
812         }\r
813         else\r
814                 sbar_fixscoreboardcolumnwidth_len = stringwidth(str, FALSE, sbar_fontsize);\r
815         \r
816         f = sbar_fixscoreboardcolumnwidth_len + sbar_fixscoreboardcolumnwidth_marginlen + sbar_fixscoreboardcolumnwidth_iconlen;\r
817         if(sbar_size[i] < f)\r
818                 sbar_size[i] = f;\r
819 \r
820         return str;\r
821 }\r
822 \r
823 void Sbar_PrintScoreboardItem(vector pos, entity pl, float is_self, float pl_number)\r
824 {\r
825         vector tmp, rgb;\r
826         rgb = GetTeamRGB(pl.team);\r
827         string str;\r
828         float i, field;\r
829         float is_spec;\r
830         is_spec = (GetPlayerColor(pl.sv_entnum) == COLOR_SPECTATOR);\r
831         \r
832         if((rgb == '1 1 1') && (!is_spec)) {\r
833                 rgb_x = cvar("sbar_color_bg_r") + 0.5;\r
834                 rgb_y = cvar("sbar_color_bg_g") + 0.5;\r
835                 rgb_z = cvar("sbar_color_bg_b") + 0.5; }\r
836                 \r
837         // Layout:\r
838         tmp_x = sbwidth;\r
839         tmp_y = sbar_fontsize_y * 1.25;\r
840         tmp_z = 0;\r
841 \r
842         // alternated rows highlighting\r
843         if(is_self)\r
844                 drawfill(pos - '1 1 0', tmp + '2 0 0', rgb, sbar_scoreboard_highlight_alpha_self, DRAWFLAG_NORMAL);\r
845         else if((sbar_scoreboard_highlight) && (!mod(pl_number,2)))\r
846                 drawfill(pos - '1 1 0', tmp + '2 0 0', rgb, sbar_scoreboard_highlight_alpha, DRAWFLAG_NORMAL);\r
847 \r
848         tmp_y = 0;\r
849 \r
850         for(i = 0; i < sbar_num_fields; ++i)\r
851         {\r
852                 field = sbar_field[i];\r
853                 if(field == SP_SEPARATOR)\r
854                         break;\r
855 \r
856                 if(is_spec && field != SP_NAME && field != SP_PING) {\r
857                         pos_x += sbar_size[i] + sbar_fontsize_x;\r
858                         continue;\r
859                 }\r
860                 str = Sbar_GetField(pl, field);\r
861                 str = Sbar_FixScoreboardColumnWidth(i, str);\r
862 \r
863                 pos_x += sbar_size[i] + sbar_fontsize_x;\r
864 \r
865                 if(field == SP_NAME) {\r
866                         tmp_x = sbar_size[i] - sbar_fontsize_x*sbar_fixscoreboardcolumnwidth_iconlen - sbar_fixscoreboardcolumnwidth_marginlen + sbar_fontsize_x;\r
867                         if (is_self)\r
868                                 drawcolorcodedstring(pos - tmp, str, sbar_fontsize, sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
869                         else\r
870                                 drawcolorcodedstring(pos - tmp, str, sbar_fontsize, sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
871                 } else {\r
872                         tmp_x = sbar_fixscoreboardcolumnwidth_len + sbar_fontsize_x;\r
873                         if (is_self)\r
874                                 drawstring(pos - tmp, str, sbar_fontsize, sbar_field_rgb, sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
875                         else\r
876                                 drawstring(pos - tmp, str, sbar_fontsize, sbar_field_rgb, sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
877                 }\r
878 \r
879                 tmp_x = sbar_size[i] + sbar_fontsize_x;\r
880                 if(sbar_field_icon0 != "")\r
881                         if (is_self)\r
882                                 drawpic(pos - tmp, sbar_field_icon0, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon0_alpha * sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
883                         else\r
884                                 drawpic(pos - tmp, sbar_field_icon0, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon0_alpha * sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
885                 if(sbar_field_icon1 != "")\r
886                         if (is_self)\r
887                                 drawpic(pos - tmp, sbar_field_icon1, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon1_alpha * sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
888                         else\r
889                                 drawpic(pos - tmp, sbar_field_icon1, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon1_alpha * sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
890                 if(sbar_field_icon2 != "")\r
891                         if (is_self)\r
892                                 drawpic(pos - tmp, sbar_field_icon2, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon2_rgb, sbar_field_icon2_alpha * sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
893                         else\r
894                                 drawpic(pos - tmp, sbar_field_icon2, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon2_rgb, sbar_field_icon2_alpha * sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
895         }\r
896 \r
897         if(sbar_field[i] == SP_SEPARATOR)\r
898         {\r
899                 pos_x = xmax;\r
900                 for(i = sbar_num_fields-1; i > 0; --i)\r
901                 {\r
902                         field = sbar_field[i];\r
903                         if(field == SP_SEPARATOR)\r
904                                 break;\r
905 \r
906                         if(is_spec && field != SP_NAME && field != SP_PING) {\r
907                                 pos_x -= sbar_size[i] + sbar_fontsize_x;\r
908                                 continue;\r
909                         }\r
910 \r
911                         str = Sbar_GetField(pl, field);\r
912                         str = Sbar_FixScoreboardColumnWidth(i, str);\r
913 \r
914                         if(field == SP_NAME) {\r
915                                 tmp_x = sbar_fixscoreboardcolumnwidth_len; // left or right aligned? let's put it right...\r
916                                 if(is_self)\r
917                                         drawcolorcodedstring(pos - tmp, str, sbar_fontsize, sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
918                                 else\r
919                                         drawcolorcodedstring(pos - tmp, str, sbar_fontsize, sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
920                         } else {\r
921                                 tmp_x = sbar_fixscoreboardcolumnwidth_len;\r
922                                 if(is_self)\r
923                                         drawstring(pos - tmp, str, sbar_fontsize, sbar_field_rgb, sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
924                                 else\r
925                                         drawstring(pos - tmp, str, sbar_fontsize, sbar_field_rgb, sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
926                         }\r
927 \r
928                         tmp_x = sbar_size[i];\r
929                         if(sbar_field_icon0 != "")\r
930                                 if (is_self)\r
931                                         drawpic(pos - tmp, sbar_field_icon0, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon0_alpha * sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
932                                 else\r
933                                         drawpic(pos - tmp, sbar_field_icon0, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon0_alpha * sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
934                         if(sbar_field_icon1 != "")\r
935                                 if (is_self)\r
936                                         drawpic(pos - tmp, sbar_field_icon1, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon1_alpha * sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
937                                 else\r
938                                         drawpic(pos - tmp, sbar_field_icon1, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon1_rgb, sbar_field_icon1_alpha * sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
939                         if(sbar_field_icon2 != "")\r
940                                 if (is_self)\r
941                                         drawpic(pos - tmp, sbar_field_icon2, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon2_rgb, sbar_field_icon2_alpha * sbar_scoreboard_alpha_name_self, DRAWFLAG_NORMAL);\r
942                                 else\r
943                                         drawpic(pos - tmp, sbar_field_icon2, '0 1 0' * sbar_fontsize_y + '1 0 0' * sbar_fontsize_x * sbar_fixscoreboardcolumnwidth_iconlen, sbar_field_icon2_rgb, sbar_field_icon2_alpha * sbar_scoreboard_alpha_name, DRAWFLAG_NORMAL);\r
944                         pos_x -= sbar_size[i] + sbar_fontsize_x;\r
945                 }\r
946         }\r
947 }\r
948 \r
949 float fieldcounter;\r
950 void Sbar_PrintStomachboardItem(vector pos, entity pl)\r
951 {\r
952         string str;\r
953         float f, field;\r
954 \r
955         for(fieldcounter = 1; fieldcounter <= 2; ++fieldcounter)\r
956         {\r
957                 field = -fieldcounter;\r
958                 if(field == SP_SEPARATOR)\r
959                         break;\r
960 \r
961                 str = Sbar_GetStomachField(pl, field);\r
962 \r
963                 if(field == ST_NAME) {\r
964                         f = stof(getplayerkey(pl.sv_entnum, "colors"));\r
965                         drawpic(pos, "gfx/sb_playercolor_base", '22 11 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
966                         drawpic(pos, "gfx/sb_playercolor_shirt", '22 11 0', colormapPaletteColor(floor(f / 16), 0), sbar_alpha_fg, DRAWFLAG_NORMAL);\r
967                         drawpic(pos, "gfx/sb_playercolor_pants", '22 11 0', colormapPaletteColor(mod(f, 16), 1), sbar_alpha_fg, DRAWFLAG_NORMAL);\r
968 \r
969                         pos_x += 24;\r
970                         drawcolorcodedstring(pos, str, '11 11 0', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
971                 }\r
972 \r
973                 if(field == ST_HEALTH)\r
974                 if(g_vore_showpreyhealth && stof(str)) { // only if player health is not 0. Also used to hide the predators health\r
975                         pos_x += 138;\r
976                                 if(pl.sv_entnum == player_localentnum - 1 || (spectatee_status && pl.sv_entnum == spectatee_status - 1))\r
977                                         drawcolorcodedstring(pos, "self", '11 11 0', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
978                                 else\r
979                                 {\r
980                                         drawpic(pos, "gfx/hud/sb_health", '11 11 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
981 \r
982                                         pos_x += 9;\r
983                                                 drawcolorcodedstring(pos, str, '11 11 0', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
984                                 }\r
985                 }\r
986         }\r
987 }\r
988 \r
989 /*\r
990  * Sbar_Scoreboard_MakeTable\r
991  *\r
992  * Makes a table for a team (for all playing players in DM) and fills it\r
993  */\r
994 \r
995 vector Sbar_Scoreboard_MakeTable(vector pos, entity tm, vector rgb, vector bg_size)\r
996 {\r
997         float body_table_height, i;\r
998         vector tmp, column_dim;\r
999         entity pl;\r
1000 \r
1001         body_table_height = 1.25 * sbar_fontsize_y * max(1, tm.team_size); // no player? show 1 empty line\r
1002 \r
1003         pos -= '1 1 0';\r
1004 \r
1005         tmp_x = sbwidth + 2;\r
1006         tmp_y = 1.25 * sbar_fontsize_y;\r
1007 \r
1008         // rounded header\r
1009         drawpic(pos, "gfx/hud/sb_scoreboard_tableheader", tmp, (rgb * sbar_color_bg_team) + '0.5 0.5 0.5', sbar_scoreboard_alpha_bg, DRAWFLAG_NORMAL);\r
1010 \r
1011         // table border\r
1012         tmp_y += sbar_border_thickness;\r
1013         tmp_y += body_table_height;\r
1014         drawborderlines(sbar_border_thickness, pos, tmp, '0 0 0', sbar_scoreboard_alpha_bg, DRAWFLAG_NORMAL); // more transparency for the scoreboard\r
1015 \r
1016         // separator header/table\r
1017         pos_y += 1.25 * sbar_fontsize_y;\r
1018         tmp_y = sbar_border_thickness;\r
1019         drawfill(pos, tmp, '0 0 0', sbar_scoreboard_alpha_bg, DRAWFLAG_NORMAL);\r
1020 \r
1021         pos_y += sbar_border_thickness;\r
1022 \r
1023         // table background\r
1024         tmp_y = body_table_height;\r
1025         drawpic_tiled(pos, "gfx/hud/sb_scoreboard_bg", bg_size, tmp, rgb * sbar_color_bg_team, sbar_scoreboard_alpha_bg, DRAWFLAG_NORMAL);\r
1026 \r
1027         // anyway, apply some color\r
1028         //drawfill(pos, tmp + '2 0 0', rgb, 0.1, DRAWFLAG_NORMAL);\r
1029 \r
1030         // go back to the top to make alternated columns highlighting and to print the strings\r
1031         pos_y -= 1.25 * sbar_fontsize_y;\r
1032         pos_y -= sbar_border_thickness;\r
1033 \r
1034         pos += '1 1 0';\r
1035 \r
1036         if (sbar_scoreboard_highlight)\r
1037         {\r
1038                 column_dim_y = 1.25 * sbar_fontsize_y; // header\r
1039                 column_dim_y += sbar_border_thickness;\r
1040                 column_dim_y += body_table_height;\r
1041         }\r
1042 \r
1043         // print the strings of the columns headers and draw the columns\r
1044         for(i = 0; i < sbar_num_fields; ++i)\r
1045         {\r
1046                 if(sbar_field[i] == SP_SEPARATOR)\r
1047                         break;\r
1048                 column_dim_x = sbar_size[i] + sbar_fontsize_x;\r
1049                 if (sbar_scoreboard_highlight)\r
1050                 {\r
1051                         if (mod(i,2))\r
1052                                 drawfill(pos - '0 1 0' - sbar_fontsize_x / 2 * '1 0 0', column_dim, '0 0 0', sbar_scoreboard_alpha_bg * 0.2, DRAWFLAG_NORMAL);\r
1053                 }\r
1054                 drawstring(pos, sbar_title[i], sbar_fontsize, rgb * 1.5, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1055                 pos_x += column_dim_x;\r
1056         }\r
1057         if(sbar_field[i] == SP_SEPARATOR)\r
1058         {\r
1059                 pos_x = xmax;\r
1060                 tmp_y = 0;\r
1061                 for(i = sbar_num_fields-1; i > 0; --i)\r
1062                 {\r
1063                         if(sbar_field[i] == SP_SEPARATOR)\r
1064                                 break;\r
1065 \r
1066                         pos_x -= sbar_size[i];\r
1067 \r
1068                         if (sbar_scoreboard_highlight)\r
1069                         {\r
1070                                 if (!mod(i,2))\r
1071                                 {\r
1072                                         if (i == sbar_num_fields-1)\r
1073                                                 column_dim_x = sbar_size[i] + sbar_fontsize_x / 2 + 1;\r
1074                                         else\r
1075                                                 column_dim_x = sbar_size[i] + sbar_fontsize_x;\r
1076                                         drawfill(pos - '0 1 0' - sbar_fontsize_x / 2 * '1 0 0', column_dim, '0 0 0', sbar_scoreboard_alpha_bg * 0.2, DRAWFLAG_NORMAL);\r
1077                                 }\r
1078                         }\r
1079 \r
1080                         tmp_x = stringwidth(sbar_title[i], FALSE, sbar_fontsize);\r
1081                         tmp_x = sbar_size[i] - tmp_x;\r
1082                         drawstring(pos + tmp, sbar_title[i], sbar_fontsize, rgb * 1.5, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1083                         pos_x -= sbar_fontsize_x;\r
1084                 }\r
1085         }\r
1086         \r
1087         pos_x = xmin;\r
1088         pos_y += 1.25 * sbar_fontsize_y; // skip the header\r
1089         pos_y += sbar_border_thickness;\r
1090 \r
1091         // fill the table and draw the rows\r
1092         i = 0;\r
1093         if (teamplay)\r
1094                 for(pl = players.sort_next; pl; pl = pl.sort_next)\r
1095                 {\r
1096                         if(pl.team != tm.team)\r
1097                                 continue;\r
1098                         Sbar_PrintScoreboardItem(pos, pl, (pl.sv_entnum == player_localentnum - 1), i);\r
1099                         pos_y += 1.25 * sbar_fontsize_y;\r
1100                         ++i;\r
1101                 }\r
1102         else\r
1103                 for(pl = players.sort_next; pl; pl = pl.sort_next)\r
1104                 {\r
1105                         if(pl.team == COLOR_SPECTATOR)\r
1106                                 continue;\r
1107                         Sbar_PrintScoreboardItem(pos, pl, (pl.sv_entnum == player_localentnum - 1), i);\r
1108                         pos_y += 1.25 * sbar_fontsize_y;\r
1109                         ++i;\r
1110                 }\r
1111         \r
1112         if (i == 0)\r
1113                 pos_y += 1.25 * sbar_fontsize_y; // move to the end of the table\r
1114         pos_y += 1.25 * sbar_fontsize_y; // move empty row (out of the table)\r
1115 \r
1116         return pos;\r
1117 }\r
1118 \r
1119 float Sbar_WouldDrawScoreboard() {\r
1120         if (sb_showscores)\r
1121                 return 1;\r
1122         else if (intermission == 1)\r
1123                 return 1;\r
1124         else if (intermission == 2)\r
1125                 return 1;\r
1126         else if (getstati(STAT_HEALTH) <= 0 && cvar("cl_deathscoreboard"))\r
1127                 return 1;\r
1128         else if(sb_showscores_force)\r
1129                 return 1;\r
1130         return 0;\r
1131 }\r
1132 \r
1133 float average_accuracy;\r
1134 vector Sbar_DrawScoreboardAccuracyStats(vector pos, vector rgb, vector bg_size)\r
1135 {\r
1136         float i;\r
1137         float weapon_hit, weapon_damage, weapon_stats;\r
1138         float fontsize = 40 * 1/3;\r
1139         float xsave;\r
1140         float weapon_cnt;\r
1141         float rows;\r
1142         if(cvar("sbar_accuracy_doublerows"))\r
1143                 rows = 2;\r
1144         else\r
1145                 rows = 1;\r
1146         float height = 40;\r
1147 \r
1148         if(warmup_stage)\r
1149         {\r
1150                 return pos;\r
1151         }\r
1152 \r
1153         xsave = pos_x;\r
1154         drawstring(pos, strcat("Accuracy stats (average ", ftos(average_accuracy), "%)"), sbar_fontsize, '1 1 1', sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1155         pos_y += 18;\r
1156         vector tmp;\r
1157         tmp_x = sbwidth;\r
1158         tmp_y = height * rows;\r
1159 \r
1160         drawpic_tiled(pos, "gfx/hud/sb_scoreboard_bg", bg_size, tmp, rgb * sbar_color_bg_team, sbar_scoreboard_alpha_bg, DRAWFLAG_NORMAL);\r
1161         drawborderlines(sbar_accuracy_border_thickness, pos, tmp, '0 0 0', sbar_scoreboard_alpha_bg * 0.75, DRAWFLAG_NORMAL);\r
1162 \r
1163         // column highlighting\r
1164         for(i = 0; i < weapon_cnt/rows; ++i)\r
1165         {\r
1166                 if(!mod(i, 2))\r
1167                         drawfill(pos + '1 0 0' * (sbwidth/weapon_cnt) * rows * i, '0 1 0' * height * rows + '1 0 0' * (sbwidth/weapon_cnt) * rows, '0 0 0', sbar_scoreboard_alpha_bg * 0.2, DRAWFLAG_NORMAL);\r
1168         }\r
1169 \r
1170         // row highlighting\r
1171         for(i = 0; i < rows; ++i)\r
1172         {\r
1173                 drawfill(pos + '0 1 0' * height * (2/3) + '0 1 0' * height * i, '1 0 0' * sbwidth + '0 1 0' * fontsize, '1 1 1', sbar_scoreboard_highlight_alpha, DRAWFLAG_NORMAL);     \r
1174         }\r
1175 \r
1176         // skip useless weapons\r
1177         weapon_cnt = 0;\r
1178         for(i = WEP_FIRST; i <= WEP_LAST; ++i)\r
1179         {\r
1180                 self = get_weaponinfo(i);\r
1181                 if not(self.weapons)\r
1182                         continue;\r
1183                 ++weapon_cnt;\r
1184         }\r
1185 \r
1186         drawfont = sbar_bigfont;\r
1187         average_accuracy = 0;\r
1188         float weapons_with_stats;\r
1189         weapons_with_stats = 0;\r
1190         if(rows == 2)\r
1191                 pos_x += sbwidth/weapon_cnt / 2;\r
1192 \r
1193         for(i = WEP_FIRST; i <= WEP_LAST; ++i)\r
1194         {\r
1195                 self = get_weaponinfo(i);\r
1196                 if not(self.weapons)\r
1197                         continue;\r
1198                 weapon_hit = weapon_hits[i-WEP_FIRST];\r
1199                 weapon_damage = weapon_fired[i-WEP_FIRST];\r
1200                 if(weapon_damage)\r
1201                         weapon_stats = bound(0, floor(100 * weapon_hit / weapon_damage), 100);\r
1202                 float weapon_alpha;\r
1203 \r
1204                 if(weapon_damage)\r
1205                         weapon_alpha = sbar_scoreboard_alpha_fg;\r
1206                 else\r
1207                         weapon_alpha = 0.2 * sbar_scoreboard_alpha_fg;\r
1208 \r
1209                 // weapon icon\r
1210                 drawpic(pos, strcat("gfx/hud/inv_weapon", self.netname), '1 0 0' * sbwidth * (1/weapon_cnt) + '0 1 0' * height * (2/3), '1 1 1', weapon_alpha, DRAWFLAG_NORMAL);\r
1211                 // the accuracy\r
1212                 if(weapon_damage) {\r
1213                         weapons_with_stats += 1;\r
1214                         average_accuracy += weapon_stats; // store sum of all accuracies in average_accuracy\r
1215 \r
1216                         string s;\r
1217                         s = strcat(ftos(weapon_stats),"%");\r
1218 \r
1219                         float padding;\r
1220                         padding = ((sbwidth/weapon_cnt) - stringwidth(s, FALSE, '1 0 0' * fontsize)) / 2; // center the accuracy value\r
1221 \r
1222                         rgb = Sbar_AccuracyColor(weapon_stats);\r
1223                         drawstring(pos + '1 0 0' * padding + '0 1 0' * height * (2/3), s, '1 1 0' * fontsize, rgb, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1224                 }\r
1225                 pos_x += sbwidth/weapon_cnt * rows;\r
1226                 if(rows == 2 && i == 6) {\r
1227                         pos_x -= sbwidth;\r
1228                         pos_y += height;\r
1229                 }\r
1230         }\r
1231         drawfont = sbar_font;\r
1232 \r
1233         if(weapons_with_stats)\r
1234                 average_accuracy = floor(average_accuracy / weapons_with_stats);\r
1235 \r
1236         pos_x = xsave;\r
1237         pos_y += height;\r
1238         return pos;\r
1239 }\r
1240 \r
1241 string race_PlaceName(float pos) {\r
1242         if(pos == 1)\r
1243                 return "1st";\r
1244         else if(pos == 2)\r
1245                 return "2nd";\r
1246         else if(pos == 3)\r
1247                 return "3rd";\r
1248         else\r
1249                 return strcat(ftos(pos), "th");\r
1250 }\r
1251 \r
1252 vector Sbar_DrawScoreboardRankings(vector pos, entity pl,  vector rgb, vector bg_size)\r
1253 {\r
1254         float i;\r
1255         RANKINGS_RECEIVED_CNT = 0;\r
1256                 for (i=RANKINGS_CNT-1; i>=0; --i)\r
1257                         if (grecordtime[i])\r
1258                                 RANKINGS_RECEIVED_CNT = RANKINGS_RECEIVED_CNT + 1;\r
1259 \r
1260         if (RANKINGS_RECEIVED_CNT == 0)\r
1261                 return pos;\r
1262 \r
1263         float is_spec;\r
1264         is_spec = (GetPlayerColor(pl.sv_entnum) == COLOR_SPECTATOR);\r
1265         vector hl_rgb;\r
1266                 hl_rgb_x = cvar("sbar_color_bg_r") + 0.5;\r
1267                 hl_rgb_y = cvar("sbar_color_bg_g") + 0.5;\r
1268                 hl_rgb_z = cvar("sbar_color_bg_b") + 0.5;\r
1269 \r
1270         pos_y += sbar_fontsize_y;\r
1271         drawstring(pos, strcat("Rankings"), sbar_fontsize, '1 1 1', sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1272         pos_y += sbar_fontsize_y;\r
1273         vector tmp;\r
1274         tmp_x = sbwidth;\r
1275         tmp_y = sbar_fontsize_y * RANKINGS_RECEIVED_CNT;\r
1276 \r
1277         drawpic_tiled(pos, "gfx/hud/sb_scoreboard_bg", bg_size, tmp, rgb * sbar_color_bg_team, sbar_scoreboard_alpha_bg, DRAWFLAG_NORMAL);\r
1278         drawborderlines(sbar_border_thickness, pos, tmp, '0 0 0', sbar_scoreboard_alpha_bg * 0.75, DRAWFLAG_NORMAL);\r
1279 \r
1280         // row highlighting\r
1281         for(i = 0; i<RANKINGS_RECEIVED_CNT; ++i)\r
1282         {\r
1283                 string n, p;\r
1284                 float t;\r
1285                 t = grecordtime[i];\r
1286                 if (t == 0)\r
1287                         continue;\r
1288                 n = grecordholder[i];\r
1289                 p = race_PlaceName(i+1);\r
1290                 if(grecordholder[i] == GetPlayerName(player_localentnum - 1))\r
1291                         drawfill(pos, '1 0 0' * sbwidth + '0 1 0' * sbar_fontsize_y, hl_rgb, sbar_scoreboard_highlight_alpha_self, DRAWFLAG_NORMAL);    \r
1292                 else if(!mod(i, 2) && sbar_scoreboard_highlight)\r
1293                         drawfill(pos, '1 0 0' * sbwidth + '0 1 0' * sbar_fontsize_y, hl_rgb, sbar_scoreboard_highlight_alpha, DRAWFLAG_NORMAL); \r
1294                 drawstring(pos, p, sbar_fontsize, '1 1 1', sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1295                 drawstring(pos + '3 0 0' * sbar_fontsize_x, TIME_ENCODED_TOSTRING(t), sbar_fontsize, '1 1 1', sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1296                 drawcolorcodedstring(pos + '8 0 0' * sbar_fontsize_x, n, sbar_fontsize, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1297                 pos += '0 1 0' * sbar_fontsize_y;\r
1298         }\r
1299 \r
1300         return pos;\r
1301 }\r
1302 \r
1303 float scoreboard_bottom;\r
1304 float sbar_scoreboard_fade_alpha;\r
1305 float sbar_woulddrawscoreboard_prev;\r
1306 float sbar_woulddrawscoreboard_change; // "time" at which Sbar_WouldDrawScoreboard() changed\r
1307 void Sbar_DrawScoreboard()\r
1308 {\r
1309         float sbar_woulddrawscoreboard; \r
1310         sbar_woulddrawscoreboard = Sbar_WouldDrawScoreboard();\r
1311         if(sbar_woulddrawscoreboard != sbar_woulddrawscoreboard_prev) {\r
1312                 sbar_woulddrawscoreboard_change = time;\r
1313                 sbar_woulddrawscoreboard_prev = sbar_woulddrawscoreboard;\r
1314         }\r
1315 \r
1316         float scoreboard_fadeinspeed = cvar_or("sbar_scoreboard_fadeinspeed", 10);\r
1317         float scoreboard_fadeoutspeed = cvar_or("sbar_scoreboard_fadeoutspeed", 5);\r
1318         if(sbar_woulddrawscoreboard) {\r
1319                 if (scoreboard_fadeinspeed)\r
1320                         sbar_scoreboard_fade_alpha = bound (0, (time - sbar_woulddrawscoreboard_change) * scoreboard_fadeinspeed, 1);\r
1321                 else\r
1322                         sbar_scoreboard_fade_alpha = 1;\r
1323         }\r
1324         else\r
1325                 if (scoreboard_fadeoutspeed)\r
1326                         sbar_scoreboard_fade_alpha = bound (0, (1/scoreboard_fadeoutspeed - (time - sbar_woulddrawscoreboard_change)) * scoreboard_fadeoutspeed, 1);\r
1327                 else\r
1328                         sbar_scoreboard_fade_alpha = 0;\r
1329 \r
1330         if not(sbar_scoreboard_fade_alpha)\r
1331                 return;\r
1332                 \r
1333         sbar_scoreboard_alpha_bg = cvar("sbar_scoreboard_alpha_bg") * sbar_scoreboard_fade_alpha;\r
1334         sbar_scoreboard_alpha_fg = cvar_or("sbar_scoreboard_alpha_fg", 1.0) * sbar_scoreboard_fade_alpha;\r
1335         sbar_scoreboard_highlight = cvar("sbar_scoreboard_highlight");\r
1336         sbar_scoreboard_highlight_alpha = cvar_or("sbar_scoreboard_highlight_alpha", 0.10) * sbar_scoreboard_alpha_fg;\r
1337         sbar_scoreboard_highlight_alpha_self = cvar_or("sbar_scoreboard_highlight_alpha_self", 0.25) * sbar_scoreboard_alpha_fg;\r
1338         sbar_scoreboard_alpha_name = cvar_or("sbar_scoreboard_alpha_name", 0.9) * sbar_scoreboard_alpha_fg;\r
1339         sbar_scoreboard_alpha_name_self = cvar_or("sbar_scoreboard_alpha_name_self", 1) * sbar_scoreboard_alpha_fg;\r
1340         \r
1341         vector rgb, pos, tmp;\r
1342         entity pl, tm;\r
1343 \r
1344         sbwidth = Sbar_GetWidth(6.5 * sbar_fontsize_y);\r
1345 \r
1346         xmin = 0.5 * (vid_conwidth - sbwidth);\r
1347         ymin = SCOREBOARD_OFFSET;\r
1348 \r
1349         xmax = vid_conwidth - xmin;\r
1350         ymax = vid_conheight - 0.2*vid_conheight;\r
1351 \r
1352         // Initializes position\r
1353         pos_x = xmin;\r
1354         pos_y = ymin;\r
1355         pos_z = 0;\r
1356 \r
1357         // Heading\r
1358         drawfont = sbar_bigfont;\r
1359         drawstringcenter('0 1 0' * ymin, "Scoreboard", '24 24 0', '1 1 1', sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1360 \r
1361         pos_y += 24 + 4;\r
1362         pos_y += sbar_fontsize_y;\r
1363 \r
1364         drawfont = sbar_font;\r
1365 \r
1366         // Draw the scoreboard\r
1367         vector bg_size;\r
1368         bg_size = drawgetimagesize("gfx/hud/sb_scoreboard_bg");\r
1369 \r
1370         if(teamplay)\r
1371         {\r
1372                 for(tm = teams.sort_next; tm; tm = tm.sort_next)\r
1373                 {\r
1374                         if(tm.team == COLOR_SPECTATOR)\r
1375                                 continue;\r
1376 \r
1377                         rgb = GetTeamRGB(tm.team);\r
1378                         Sbar_DrawXNum(pos - '9.5 0 0' * sbar_fontsize_y + '0 1 0' * sbar_fontsize_y, tm.(teamscores[ts_primary]), 6, 0, sbar_fontsize_y * 1.5, rgb, 0, 1, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1379                                 \r
1380                         if(ts_primary != ts_secondary)\r
1381                                 Sbar_DrawXNum(pos - '7.5 0 0' * sbar_fontsize_y + '0 2.5 0' * sbar_fontsize_y, tm.(teamscores[ts_secondary]), 6, 0, sbar_fontsize_y * 1, rgb, 0, 1, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1382 \r
1383                         pos = Sbar_Scoreboard_MakeTable(pos, tm, rgb, bg_size);\r
1384                 }\r
1385         }\r
1386         else\r
1387         {\r
1388                 rgb_x = cvar("sbar_color_bg_r");\r
1389                 rgb_y = cvar("sbar_color_bg_g");\r
1390                 rgb_z = cvar("sbar_color_bg_b");\r
1391 \r
1392                 for(tm = teams.sort_next; tm; tm = tm.sort_next)\r
1393                 {\r
1394                         if(tm.team == COLOR_SPECTATOR)\r
1395                                 continue;\r
1396 \r
1397                         pos = Sbar_Scoreboard_MakeTable(pos, tm, rgb, bg_size);\r
1398                 }\r
1399         }\r
1400 \r
1401         if(gametype == GAME_CTS || gametype == GAME_RACE) {\r
1402                 if(race_speedaward) {\r
1403                         drawcolorcodedstring(pos, strcat("Speed award: ", ftos(race_speedaward), " (", race_speedaward_holder, ")"), sbar_fontsize, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1404                         pos_y += 1.25 * sbar_fontsize_y;\r
1405                 }\r
1406                 if(race_speedaward_alltimebest) {\r
1407                         drawcolorcodedstring(pos, strcat("All-time fastest: ", ftos(race_speedaward_alltimebest), " (", race_speedaward_alltimebest_holder, ")"), sbar_fontsize, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1408                         pos_y += 1.25 * sbar_fontsize_y;\r
1409                 }\r
1410                 pos = Sbar_DrawScoreboardRankings(pos, pl, rgb, bg_size);\r
1411         }\r
1412         else if(cvar("sbar_accuracy") && spectatee_status != -1) {\r
1413                 if(teamplay)\r
1414                         pos = Sbar_DrawScoreboardAccuracyStats(pos, GetTeamRGB(myteam), bg_size);\r
1415                 else\r
1416                         pos = Sbar_DrawScoreboardAccuracyStats(pos, rgb, bg_size);\r
1417         }\r
1418 \r
1419         tmp = pos + '0 1.5 0' * sbar_fontsize_y;\r
1420         pos_y += 3 * sbar_fontsize_y;\r
1421 \r
1422         // List spectators\r
1423         float specs;\r
1424         specs = 0;\r
1425         for(pl = players.sort_next; pl; pl = pl.sort_next)\r
1426         {\r
1427                 if(pl.team != COLOR_SPECTATOR)\r
1428                         continue;\r
1429                 Sbar_PrintScoreboardItem(pos, pl, (pl.sv_entnum == player_localentnum - 1), specs);\r
1430                 pos_y += 1.25 * sbar_fontsize_y;\r
1431                 ++specs;\r
1432         }\r
1433 \r
1434         if(specs)\r
1435                 drawstring(tmp, "Spectators", sbar_fontsize, '1 1 1', sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1436 \r
1437         // Print info string\r
1438         string str;\r
1439         float tl, fl, ll;\r
1440         str = strcat("playing on ^2", shortmapname, "^7");\r
1441         tl = getstatf(STAT_TIMELIMIT);\r
1442         fl = getstatf(STAT_FRAGLIMIT);\r
1443         ll = getstatf(STAT_LEADLIMIT);\r
1444         if(gametype == GAME_LMS)\r
1445         {\r
1446                 if(tl > 0)\r
1447                         str = strcat(str, " for up to ^1", ftos(tl), " minutes^7");\r
1448         }\r
1449         else\r
1450         {\r
1451                 if(tl > 0)\r
1452                         str = strcat(str, " for ^1", ftos(tl), " minutes^7");\r
1453                 if(fl > 0)\r
1454                 {\r
1455                         if(tl > 0)\r
1456                                 str = strcat(str, " or");\r
1457                         if(teamplay)\r
1458                         {\r
1459                                 str = strcat(str, " until ^3", ScoreString(teamscores_flags[ts_primary], fl));\r
1460                                 if(teamscores_label[ts_primary] == "score")\r
1461                                         str = strcat(str, " points^7");\r
1462                                 else if(teamscores_label[ts_primary] == "fastest")\r
1463                                         str = strcat(str, " is beaten^7");\r
1464                                 else\r
1465                                         str = strcat(str, " ", teamscores_label[ts_primary]);\r
1466                         }\r
1467                         else\r
1468                         {\r
1469                                 str = strcat(str, " until ^3", ScoreString(scores_flags[ps_primary], fl));\r
1470                                 if(scores_label[ps_primary] == "score")\r
1471                                         str = strcat(str, " points^7");\r
1472                                 else if(scores_label[ps_primary] == "fastest")\r
1473                                         str = strcat(str, " is beaten^7");\r
1474                                 else\r
1475                                         str = strcat(str, " ", scores_label[ps_primary]);\r
1476                         }\r
1477                 }\r
1478                 if(ll > 0)\r
1479                 {\r
1480                         if(tl > 0 || fl > 0)\r
1481                                 str = strcat(str, " or");\r
1482                         if(teamplay)\r
1483                         {\r
1484                                 str = strcat(str, " until a lead of ^3", ScoreString(teamscores_flags[ts_primary], ll));\r
1485                                 if(teamscores_label[ts_primary] == "score")\r
1486                                         str = strcat(str, " points^7");\r
1487                                 else if(teamscores_label[ts_primary] == "fastest")\r
1488                                         str = strcat(str, " is beaten^7");\r
1489                                 else\r
1490                                         str = strcat(str, " ", teamscores_label[ts_primary]);\r
1491                         }\r
1492                         else\r
1493                         {\r
1494                                 str = strcat(str, " until a lead of ^3", ScoreString(scores_flags[ps_primary], ll));\r
1495                                 if(scores_label[ps_primary] == "score")\r
1496                                         str = strcat(str, " points^7");\r
1497                                 else if(scores_label[ps_primary] == "fastest")\r
1498                                         str = strcat(str, " is beaten^7");\r
1499                                 else\r
1500                                         str = strcat(str, " ", scores_label[ps_primary]);\r
1501                         }\r
1502                 }\r
1503         }\r
1504 \r
1505 \r
1506         pos_y += 1.2 * sbar_fontsize_y;\r
1507         drawcolorcodedstring(pos + '0.5 0 0' * (sbwidth - stringwidth(str, TRUE, sbar_fontsize)), str, sbar_fontsize, sbar_scoreboard_alpha_fg, DRAWFLAG_NORMAL);\r
1508 \r
1509         scoreboard_bottom = pos_y + 2 * sbar_fontsize_y;\r
1510 }\r
1511 \r
1512 string MakeRaceString(float cp, float mytime, float histime, float lapdelta, string hisname)\r
1513 {\r
1514         string col;\r
1515         string timestr;\r
1516         string cpname;\r
1517         string lapstr;\r
1518         lapstr = "";\r
1519 \r
1520         if(histime == 0) // goal hit\r
1521         {\r
1522                 if(mytime > 0)\r
1523                 {\r
1524                         timestr = strcat("+", ftos_decimals(+mytime, TIME_DECIMALS));\r
1525                         col = "^1";\r
1526                 }\r
1527                 else if(mytime == 0)\r
1528                 {\r
1529                         timestr = "+0.0";\r
1530                         col = "^3";\r
1531                 }\r
1532                 else\r
1533                 {\r
1534                         timestr = strcat("-", ftos_decimals(-mytime, TIME_DECIMALS));\r
1535                         col = "^2";\r
1536                 }\r
1537 \r
1538                 if(lapdelta > 0)\r
1539                 {\r
1540                         lapstr = strcat(" (-", ftos(lapdelta), "L)");\r
1541                         col = "^2";\r
1542                 }\r
1543                 else if(lapdelta < 0)\r
1544                 {\r
1545                         lapstr = strcat(" (+", ftos(-lapdelta), "L)");\r
1546                         col = "^1";\r
1547                 }\r
1548         }\r
1549         else if(histime > 0) // anticipation\r
1550         {\r
1551                 if(mytime >= histime)\r
1552                         timestr = strcat("+", ftos_decimals(mytime - histime, TIME_DECIMALS));\r
1553                 else\r
1554                         timestr = TIME_ENCODED_TOSTRING(TIME_ENCODE(histime));\r
1555                 col = "^3";\r
1556         }\r
1557         else\r
1558                 col = "^7";\r
1559 \r
1560         if(cp == 254)\r
1561                 cpname = "Start line";\r
1562         else if(cp == 255)\r
1563                 cpname = "Finish line";\r
1564         else if(cp)\r
1565                 cpname = strcat("Intermediate ", ftos(cp));\r
1566         else\r
1567                 cpname = "Finish line";\r
1568 \r
1569         if(histime < 0)\r
1570                 return strcat(col, cpname);\r
1571         else if(hisname == "")\r
1572                 return strcat(col, cpname, " (", timestr, ")");\r
1573         else\r
1574                 return strcat(col, cpname, " (", timestr, " ", strcat(hisname, col, lapstr), ")");\r
1575 }\r
1576 \r
1577 float race_CheckName(string net_name) { // Does the name already exist in rankings? In that case, where? (otherwise 0)\r
1578         float i;\r
1579         for (i=RANKINGS_CNT-1;i>=0;--i)\r
1580                 if(grecordholder[i] == net_name)\r
1581                         return i+1;\r
1582         return 0;\r
1583 }\r
1584 \r
1585 float race_status_time;\r
1586 float race_status_prev;\r
1587 string race_status_name_prev;\r
1588 void Sbar_DrawRaceStatus(vector pos)\r
1589 {\r
1590         if (race_status != race_status_prev || race_status_name != race_status_name_prev) {\r
1591                 race_status_time = time + 5;\r
1592                 race_status_prev = race_status;\r
1593                 if (race_status_name_prev)\r
1594                         strunzone(race_status_name_prev);\r
1595                 race_status_name_prev = strzone(race_status_name);\r
1596         }\r
1597 \r
1598         float a;\r
1599         a = bound(0, race_status_time - time, 1);\r
1600 \r
1601         string s;\r
1602         s = textShortenToWidth(race_status_name, 120, '10 10 0', stringwidth_colors);\r
1603 \r
1604         float rank;\r
1605         if(race_status > 0)\r
1606                 rank = race_CheckName(race_status_name);\r
1607         string rankname;\r
1608         rankname = race_PlaceName(rank);\r
1609 \r
1610         if(race_status == 0)\r
1611                 drawpic(pos, "gfx/hud/race/newfail", '80 80 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1612         else if(race_status == 1) {\r
1613                 drawpic(pos, "gfx/hud/race/newtime", '80 80 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);   \r
1614                 drawcolorcodedstring(pos + '40 80 0' - '1 0 0' * stringwidth(s, TRUE, '5 0 0'), s, '10 10 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1615                 drawstring(pos + '40 20 0' - '1 0 0' * stringwidth(rankname, TRUE, '7 0 0'), rankname, '14 14 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1616         } else if(race_status == 2) {\r
1617                 if(race_status_name == GetPlayerName(player_localentnum -1) || !race_myrank || race_myrank < rank)\r
1618                         drawpic(pos, "gfx/hud/race/newrankgreen", '80 80 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1619                 else\r
1620                         drawpic(pos, "gfx/hud/race/newrankyellow", '80 80 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1621                 drawcolorcodedstring(pos + '40 80 0' - '1 0 0' * stringwidth(s, TRUE, '5 0 0'), s, '10 10 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1622                 drawstring(pos + '40 20 0' - '1 0 0' * stringwidth(rankname, TRUE, '7 0 0'), rankname, '14 14 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1623         } else if(race_status == 3) {\r
1624                 drawpic(pos, "gfx/hud/race/newrecordserver", '80 80 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1625                 drawcolorcodedstring(pos + '40 80 0' - '1 0 0' * stringwidth(s, TRUE, '5 0 0'), s, '10 10 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1626                 drawstring(pos + '40 20 0' - '1 0 0' * stringwidth(rankname, TRUE, '7 0 0'), rankname, '14 14 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1627         }\r
1628 \r
1629         if (race_status_time - time <= 0) {\r
1630                 race_status_prev = -1;\r
1631                 race_status = -1;\r
1632                 if(race_status_name)\r
1633                         strunzone(race_status_name);\r
1634                 race_status_name = string_null;\r
1635                 if(race_status_name_prev)\r
1636                         strunzone(race_status_name_prev);\r
1637                 race_status_name_prev = string_null;\r
1638         }\r
1639 }\r
1640 \r
1641 void Sbar_Score()\r
1642 {\r
1643         float score, distribution, leader;\r
1644         vector score_pos, secondary_score_pos, distribution_color;\r
1645         entity tm, pl, me;\r
1646         me = (spectatee_status > 0) ? playerslots[spectatee_status - 1] : playerslots[player_localentnum - 1];\r
1647 \r
1648         vector top;\r
1649         top_x = vid_conwidth / 2;\r
1650         top_y = 0;\r
1651         top_z = 0;\r
1652 \r
1653         if(gametype == GAME_RPG)\r
1654                 return;\r
1655 \r
1656         score_pos = top + '-240 8 0';\r
1657         secondary_score_pos = score_pos + '210 -6 0';\r
1658 \r
1659         if((scores_flags[ps_primary] & SFL_TIME) && !teamplay) { // race/cts record display on HUD\r
1660                 pl = players.sort_next;\r
1661                 if(pl == me)\r
1662                         pl = pl.sort_next;\r
1663                 if(scores_flags[ps_primary] & SFL_ZERO_IS_WORST)\r
1664                         if(pl.scores[ps_primary] == 0)\r
1665                                 pl = world;\r
1666 \r
1667                 score = me.(scores[ps_primary]);\r
1668 \r
1669                 float racemin, racesec, racemsec;\r
1670                 float distsec, distmsec, minusplus;\r
1671                 \r
1672                 racemin = floor(score/(60 * TIME_FACTOR));\r
1673                 racesec = floor((score - racemin*(60 * TIME_FACTOR))/TIME_FACTOR);\r
1674                 racemsec = score - racemin*60*TIME_FACTOR - racesec*TIME_FACTOR;\r
1675 \r
1676                 if (pl && ((!(scores_flags[ps_primary] & SFL_ZERO_IS_WORST)) || score)) {\r
1677                         // distribution display\r
1678                         distribution = me.(scores[ps_primary]) - pl.(scores[ps_primary]);\r
1679 \r
1680                         if (distribution < TIME_FACTOR && distribution > -TIME_FACTOR)\r
1681                                 distmsec = fabs(distribution);\r
1682                         else {\r
1683                                 distsec = floor(fabs(distribution)/TIME_FACTOR);\r
1684                                 distmsec = fabs(distribution) - distsec*TIME_FACTOR;\r
1685                                 if (distribution < 0)\r
1686                                         distsec = -distsec;\r
1687                         }\r
1688 \r
1689                         if (distribution <= 0) {\r
1690                                 distribution_color = '0 1 0';\r
1691                                 minusplus = 1; // minusplus 1: always prefix with minus sign\r
1692                         }\r
1693                         else {\r
1694                                 distribution_color = '1 0 0';\r
1695                                 minusplus = 2; // minusplus 1: always prefix with plus sign\r
1696                         }\r
1697                         Sbar_DrawXNum(score_pos + '335 16 0' - '16 0 0' * TIME_DECIMALS, distmsec, -TIME_DECIMALS, 0, 16, distribution_color, 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1698                         Sbar_DrawXNum(score_pos + '403 16 0' - '16 0 0' * TIME_DECIMALS, distsec, 4, minusplus, 16, distribution_color, 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1699                         drawpic(score_pos + '335 16 0' - '16 0 0' * TIME_DECIMALS, "gfx/hud/num_dot", '16 16 0', distribution_color, sbar_alpha_fg, DRAWFLAG_ADDITIVE);\r
1700                 }\r
1701                 // race record display\r
1702                 if (distribution <= 0 || distribution == score) // draw the highlight background behind the timer if we have the lead\r
1703                         drawpic(score_pos + '335 0 0' - '32 0 0' * (4 + TIME_DECIMALS), "gfx/hud/sb_highlight_4", '0 28 0' + '32 0 0' * (4 + TIME_DECIMALS), '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1704 \r
1705                 Sbar_DrawXNum(score_pos + '335 0 0' - TIME_DECIMALS * '30 0 0', racemsec, -TIME_DECIMALS, 0, 30, '1 1 1', 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1706                 Sbar_DrawXNum(score_pos + '335 0 0' - TIME_DECIMALS * '30 0 0'  - '66 0 0', racesec, -2, 0, 30, '1 1 1', 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1707                 drawpic(score_pos + '335 0 0' - TIME_DECIMALS * '30 0 0' - '18 0 0', "gfx/hud/num_dot", '30 30 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE);\r
1708 \r
1709                 Sbar_DrawXNum(score_pos + '335 0 0' - TIME_DECIMALS * '30 0 0' - '132 0 0', racemin, -2, 0, 30, '1 1 1', 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1710                 drawpic(score_pos + '335 0 0' - TIME_DECIMALS * '30 0 0' - '84 0 0', "gfx/hud/num_colon", '30 30 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE);\r
1711 \r
1712         } else if (!teamplay) { // non-teamgames, except race/cts\r
1713                 // me vector := [team/connected frags id]\r
1714                 pl = players.sort_next;\r
1715                 if(pl == me)\r
1716                         pl = pl.sort_next;\r
1717 \r
1718                 if(pl)\r
1719                         distribution = me.(scores[ps_primary]) - pl.(scores[ps_primary]);\r
1720                 else\r
1721                         distribution = 0;\r
1722 \r
1723                 score = me.(scores[ps_primary]);\r
1724                 \r
1725                 if(distribution >= 5) {\r
1726                         distribution_color = '0 1 0';\r
1727                         leader = 1;\r
1728                 } else if(distribution >= 0) {\r
1729                         distribution_color = '1 1 1';\r
1730                         leader = 1;\r
1731                 } else if(distribution >= -5)\r
1732                         distribution_color = '1 1 0';\r
1733                 else\r
1734                         distribution_color = '1 0 0';\r
1735                 \r
1736                 Sbar_DrawXNum(secondary_score_pos, distribution, 6, 0, 16, distribution_color, 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1737                 Sbar_DrawXNum(score_pos, score, 6, 0, 34, distribution_color, leader, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1738         } else { // teamgames\r
1739                 float max_fragcount;\r
1740                 max_fragcount = -999;\r
1741 \r
1742                 for(tm = teams.sort_next; tm; tm = tm.sort_next) {\r
1743                         if(tm.team == COLOR_SPECTATOR || !tm.team_size) // no players? don't display\r
1744                                 continue;\r
1745                         score = tm.(teamscores[ts_primary]);\r
1746                         leader = 0;\r
1747 \r
1748                         if (score > max_fragcount)\r
1749                                 max_fragcount = score;\r
1750         \r
1751                         if(tm.team == myteam) {\r
1752                                 if (max_fragcount == score)\r
1753                                         leader = 1;\r
1754                                 Sbar_DrawXNum(score_pos, score, 6, 0, 34, GetTeamRGB(tm.team) * 0.8, leader, 1, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1755                         } else {\r
1756                                 if (max_fragcount == score)\r
1757                                         leader = 1;\r
1758                                 Sbar_DrawXNum(secondary_score_pos, score, 6, 0, 16, GetTeamRGB(tm.team) * 0.8, leader, 1, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1759                                 secondary_score_pos = secondary_score_pos + '0 16 0';\r
1760                         }\r
1761                 }\r
1762         }\r
1763 \r
1764         if(gametype == GAME_RACE || gametype == GAME_CTS)\r
1765         {\r
1766                 drawfont = sbar_bigfont;\r
1767                 float a, t;\r
1768                 vector m;\r
1769                 string s, forcetime;\r
1770 \r
1771                 m = '0.5 0 0' * vid_conwidth + '0 1 0' * cvar_or("cl_racetimer_position", 0.25) * vid_conheight;\r
1772 \r
1773                 if(race_checkpointtime)\r
1774                 {\r
1775                         a = bound(0, 2 - (time - race_checkpointtime), 1);\r
1776                         s = "";\r
1777                         forcetime = "";\r
1778                         if(a > 0) // just hit a checkpoint?\r
1779                         {\r
1780                                 if(race_checkpoint != 254)\r
1781                                 {\r
1782                                         if(race_time && race_previousbesttime)\r
1783                                                 s = MakeRaceString(race_checkpoint, TIME_DECODE(race_time) - TIME_DECODE(race_previousbesttime), 0, 0, race_previousbestname);\r
1784                                         else\r
1785                                                 s = MakeRaceString(race_checkpoint, 0, -1, 0, race_previousbestname);\r
1786                                         if(race_time)\r
1787                                                 forcetime = TIME_ENCODED_TOSTRING(race_time);\r
1788                                 }\r
1789                         }\r
1790                         else\r
1791                         {\r
1792                                 if(race_laptime && race_nextbesttime && race_nextcheckpoint != 254)\r
1793                                 {\r
1794                                         a = bound(0, 2 - ((race_laptime + TIME_DECODE(race_nextbesttime)) - (time + TIME_DECODE(race_penaltyaccumulator))), 1);\r
1795                                         if(a > 0) // next one?\r
1796                                         {\r
1797                                                 s = MakeRaceString(race_nextcheckpoint, (time + TIME_DECODE(race_penaltyaccumulator)) - race_laptime, TIME_DECODE(race_nextbesttime), 0, race_nextbestname);\r
1798                                         }\r
1799                                 }\r
1800                         }\r
1801 \r
1802                         if(s != "" && a > 0)\r
1803                         {\r
1804                                 dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
1805                                 //drawcolorcodedstring(m - '0 16 0' - '8 0 0' * stringwidth(s, TRUE), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1806                                 drawcolorcodedstring(m - '0 16 0' - '0.5 0 0' * stringwidth(s, TRUE, '16 16 0'), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1807                         }\r
1808 \r
1809                         if(race_penaltytime)\r
1810                         {\r
1811                                 a = bound(0, 2 - (time - race_penaltyeventtime), 1);\r
1812                                 if(a > 0)\r
1813                                 {\r
1814                                         s = strcat("^1PENALTY: ", ftos_decimals(race_penaltytime * 0.1, 1), " (", race_penaltyreason, ")");\r
1815                                         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
1816                                         //drawcolorcodedstring(m - '0 32 0' - '8 0 0' * stringwidth(s, TRUE), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1817                                         drawcolorcodedstring(m - '0 32 0' - '0.5 0 0' * stringwidth(s, TRUE, '16 16 0'), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1818                                 }\r
1819                         }\r
1820 \r
1821                         if(forcetime != "")\r
1822                         {\r
1823                                 a = bound(0, (time - race_checkpointtime) / 0.5, 1);\r
1824                                 //drawstring_expanding(m - '16 0 0' * stringwidth(forcetime, FALSE), forcetime, '32 32 0', '1 1 1', sbar_alpha_fg, 0, a);\r
1825                                 drawstring_expanding(m - '1 0 0' * stringwidth(forcetime, FALSE, '16 0 0'), forcetime, '32 32 0', '1 1 1', sbar_alpha_fg, 0, a);\r
1826                         }\r
1827                         else\r
1828                                 a = 1;\r
1829 \r
1830                         if(race_laptime && race_checkpoint != 255)\r
1831                         {\r
1832                                 s = TIME_ENCODED_TOSTRING(TIME_ENCODE(time + TIME_DECODE(race_penaltyaccumulator) - race_laptime));\r
1833                                 //drawstring(m - '16 0 0' * stringwidth(s, FALSE), s, '32 32 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1834                                 drawstring(m - '0.5 0 0' * stringwidth(s, FALSE, '32 32 0'), s, '32 32 0', '1 1 1', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1835                         }\r
1836                 }\r
1837                 else\r
1838                 {\r
1839                         if(race_mycheckpointtime)\r
1840                         {\r
1841                                 a = bound(0, 2 - (time - race_mycheckpointtime), 1);\r
1842                                 s = MakeRaceString(race_mycheckpoint, TIME_DECODE(race_mycheckpointdelta), -!race_mycheckpointenemy, race_mycheckpointlapsdelta, race_mycheckpointenemy);\r
1843                                 dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
1844                                 //drawcolorcodedstring(m - '0 16 0' - '8 0 0' * stringwidth(s, TRUE), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1845                                 drawcolorcodedstring(m - '0 16 0' - '0.5 0 0' * stringwidth(s, TRUE, '16 16 0'), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1846                         }\r
1847                         if(race_othercheckpointtime && race_othercheckpointenemy != "")\r
1848                         {\r
1849                                 a = bound(0, 2 - (time - race_othercheckpointtime), 1);\r
1850                                 s = MakeRaceString(race_othercheckpoint, -TIME_DECODE(race_othercheckpointdelta), -!race_othercheckpointenemy, race_othercheckpointlapsdelta, race_othercheckpointenemy);\r
1851                                 dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
1852                                 //drawcolorcodedstring(m - '0 0 0' - '8 0 0' * stringwidth(s, TRUE), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1853                                 drawcolorcodedstring(m - '0 0 0' - '0.5 0 0' * stringwidth(s, TRUE, '16 16 0'), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1854                         }\r
1855 \r
1856                         if(race_penaltytime && !race_penaltyaccumulator)\r
1857                         {\r
1858                                 t = race_penaltytime * 0.1 + race_penaltyeventtime;\r
1859                                 a = bound(0, (1 + t - time), 1);\r
1860                                 if(a > 0)\r
1861                                 {\r
1862                                         if(time < t)\r
1863                                                 s = strcat("^1PENALTY: ", ftos_decimals(t - time, 1), " (", race_penaltyreason, ")");\r
1864                                         else\r
1865                                                 s = strcat("^2PENALTY: 0.0 (", race_penaltyreason, ")");\r
1866                                         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
1867                                         //drawcolorcodedstring(m - '0 32 0' - '8 0 0' * stringwidth(s, TRUE), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1868                                         drawcolorcodedstring(m - '0 32 0' - '0.5 0 0' * stringwidth(s, TRUE, '16 16 0'), s, '16 16 0', sbar_alpha_fg * a, DRAWFLAG_NORMAL);\r
1869                                 }\r
1870                         }\r
1871                 }\r
1872 \r
1873                 drawfont = sbar_font;\r
1874         }\r
1875 }\r
1876 \r
1877 void Sbar_Timer()\r
1878 {\r
1879         float timelimit, elapsedTime, minutes, seconds, timeleft, minutesLeft, secondsLeft;\r
1880         vector bgpos, timer_color;\r
1881         bgpos = '0 0 0';\r
1882         \r
1883         vector topright;\r
1884         topright = '0 0 0';\r
1885         topright_x = vid_conwidth;\r
1886         \r
1887         float scale;\r
1888         scale = cvar_or("sbar_timer_scale", 1);\r
1889         timelimit = getstatf(STAT_TIMELIMIT);\r
1890 \r
1891         if(gametype == GAME_RPG && !timelimit) // don't draw the timer in rpg if there's no time limit\r
1892                 return;\r
1893 \r
1894         Sbar_DrawRaceStatus((topright_x - 100) * '1 0 0' + '0 30 0' * scale);\r
1895         \r
1896         timeleft = max(0, timelimit * 60 + getstatf(STAT_GAMESTARTTIME) - time);\r
1897         timeleft = ceil(timeleft);\r
1898         minutesLeft = floor(timeleft / 60);\r
1899         secondsLeft = timeleft - minutesLeft*60;\r
1900 \r
1901         if(minutesLeft >= 5 || warmup_stage || timelimit == 0) //don't use red or yellow in warmup or when there is no timelimit\r
1902                 timer_color = '1 1 1'; //white\r
1903         else if(minutesLeft >= 1)\r
1904                 timer_color = '1 1 0'; //yellow\r
1905         else\r
1906                 timer_color = '1 0 0'; //red\r
1907 \r
1908         if (cvar("sbar_increment_maptime") || timelimit == 0 || warmup_stage) {\r
1909                 if (time < getstatf(STAT_GAMESTARTTIME)) {\r
1910                         //while restart is still active, show 00:00\r
1911                         minutes = seconds = 0;\r
1912                 } else {\r
1913                         elapsedTime = floor(time - getstatf(STAT_GAMESTARTTIME)); //127\r
1914                         minutes = floor(elapsedTime / 60);\r
1915                         seconds = elapsedTime - minutes*60;\r
1916                 }\r
1917                 if (minutes < 10)\r
1918                         bgpos_x = topright_x - (54 + 17 + 12) * scale;\r
1919                 else if (minutes < 100) // nudge the timer background left if more digits are drawn\r
1920                         bgpos_x = topright_x - (72 + 17 + 12) * scale;\r
1921                 else\r
1922                         bgpos_x = topright_x - (90 + 17 + 12) * scale;\r
1923                 bgpos_y = 0;\r
1924                 bgpos_z = 0;\r
1925         } else {\r
1926                 minutes = minutesLeft;\r
1927                 seconds = secondsLeft;\r
1928                 if (minutes == 0)\r
1929                         bgpos_x = topright_x - (36 + 7 + 12) * scale;\r
1930                 else if (minutes < 10) // nudge the timer background left if more digits are drawn\r
1931                         bgpos_x = topright_x - (54 + 17 + 12) * scale;\r
1932                 else if (minutes < 100)\r
1933                         bgpos_x = topright_x - (72 + 17 + 12) * scale;\r
1934                 else\r
1935                         bgpos_x = topright_x - (90 + 17 + 12) * scale;\r
1936                 bgpos_y = 0;\r
1937                 bgpos_z = 0;\r
1938         }\r
1939 \r
1940         if (cvar("viewsize") <= 100) { // draw timer background when viewsize <= 100\r
1941                 if (teamplay)\r
1942                         drawpic(bgpos, "gfx/hud/bg_timer", '120 30 0' * scale, GetTeamRGB(myteam) * sbar_color_bg_team, sbar_alpha_bg, DRAWFLAG_NORMAL); // timer bg color = myteam color\r
1943                 else {\r
1944                         color_x = cvar("sbar_color_bg_r");\r
1945                         color_y = cvar("sbar_color_bg_g");\r
1946                         color_z = cvar("sbar_color_bg_b");\r
1947 \r
1948                         drawpic(bgpos, "gfx/hud/bg_timer", '120 30 0' * scale, color, sbar_alpha_bg, DRAWFLAG_NORMAL);\r
1949                 }\r
1950         }\r
1951 \r
1952         if(minutesLeft >= 1 || cvar("sbar_increment_maptime") || timelimit == 0 || warmup_stage) {\r
1953                 Sbar_DrawXNum(topright - ('103 -2 0' - '0 2 0') * scale, minutes, 3, 0, 18 * scale, timer_color, 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1954                 drawpic(topright - ('53 0 0' - '0 1 0') * scale, "gfx/hud/num_colon", '18 18 0' * scale, timer_color, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1955         }\r
1956         Sbar_DrawXNum(topright - ('36 -2 0' + '3 0 0' - '0 2 0') * scale, seconds, -2, 0, 18 * scale, timer_color, 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
1957 }\r
1958 \r
1959 void CSQC_Strength_Timer() {\r
1960         vector pos;\r
1961         vector bottomright;\r
1962 \r
1963         bottomright_x = vid_conwidth;\r
1964         bottomright_y = vid_conheight;\r
1965         bottomright_z = 0;\r
1966 \r
1967         float stat_items, dt;\r
1968         stat_items = getstati(STAT_ITEMS);\r
1969         /*\r
1970         if not(stat_items & IT_STRENGTH)\r
1971                 if not(stat_items & IT_INVINCIBLE)\r
1972                         return;\r
1973         */\r
1974 \r
1975         if (getstati(STAT_HEALTH) <= 0)\r
1976                 return;\r
1977 \r
1978         vector picsize;\r
1979         float strength_time, invincibility_time, countdown_fontsize;\r
1980 \r
1981         picsize = '22 22 0';\r
1982         countdown_fontsize = 18;\r
1983 \r
1984         if (vid_conwidth >= 800)\r
1985                 pos = bottomright - '34 48 0';\r
1986         else\r
1987                 pos = bottomright - '34 96 0';\r
1988 \r
1989         //strength\r
1990         strength_time = getstatf(STAT_STRENGTH_FINISHED);\r
1991         invincibility_time = getstatf(STAT_INVINCIBLE_FINISHED);\r
1992 \r
1993         if (strength_time) {\r
1994                 dt = strength_time - time;\r
1995                 if(dt > 0)\r
1996                 {\r
1997                         if(dt < 5)\r
1998                         {\r
1999                                 drawpic_expanding_two(pos, "gfx/hud/sb_str", picsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE,\r
2000                                         bound(0, (ceil(dt) - dt) / 0.5, 1));\r
2001                         }\r
2002                         else\r
2003                         {\r
2004                                 drawpic(pos, "gfx/hud/sb_str", picsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE);\r
2005                         }\r
2006                         Sbar_DrawXNum(pos - '40 -2 0', ceil(dt), 2, 0, countdown_fontsize, '1 1 1', 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2007                 }\r
2008                 else if(dt > -1)\r
2009                 {\r
2010                         drawpic_expanding(pos, "gfx/hud/sb_str", picsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE,\r
2011                                 bound(0, -dt / 0.5, 1));\r
2012                 }\r
2013         }\r
2014 \r
2015         //invincibility\r
2016         if (invincibility_time) {\r
2017                 dt = invincibility_time - time;\r
2018                 if(dt > 0)\r
2019                 {\r
2020                         if(dt < 5)\r
2021                         {\r
2022                                 drawpic_expanding_two(pos - '0 -22 0', "gfx/hud/sb_invinc", picsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE,\r
2023                                         bound(0, (ceil(dt) - dt) / 0.5, 1));\r
2024                         }\r
2025                         else\r
2026                         {\r
2027                                 drawpic(pos - '0 -22 0', "gfx/hud/sb_invinc", picsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE);\r
2028                         }\r
2029                         Sbar_DrawXNum(pos - '40 -24 0', ceil(dt), 2, 0, countdown_fontsize, '1 1 1', 0, 0, sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2030                 }\r
2031                 else if(dt > -1)\r
2032                 {\r
2033                         drawpic_expanding(pos - '0 -22 0', "gfx/hud/sb_invinc", picsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_ADDITIVE,\r
2034                                 bound(0, -dt / 0.5, 1));\r
2035                 }\r
2036         }\r
2037 }\r
2038 \r
2039 #define CENTERPRINT_MAX_LINES 30\r
2040 string centerprint_messages[CENTERPRINT_MAX_LINES];\r
2041 float centerprint_width[CENTERPRINT_MAX_LINES];\r
2042 vector centerprint_start;\r
2043 float centerprint_expire;\r
2044 float centerprint_num;\r
2045 float centerprint_offset_hint;\r
2046 vector centerprint_fontsize;\r
2047 \r
2048 void centerprint(string strMessage)\r
2049 {\r
2050         float i, j, n, hcount;\r
2051         string s;\r
2052 \r
2053         centerprint_fontsize = Sbar_GetFontsize("scr_centersize");\r
2054 \r
2055         centerprint_expire = min(centerprint_expire, time); // if any of the returns happens, this message will fade out\r
2056 \r
2057         if(cvar("scr_centertime") <= 0)\r
2058                 return;\r
2059 \r
2060         if(strMessage == "")\r
2061                 return;\r
2062 \r
2063         // strip trailing newlines\r
2064         j = strlen(strMessage) - 1;\r
2065         while(substring(strMessage, j, 1) == "\n" && j >= 0)\r
2066                 j = j - 1;\r
2067         strMessage = substring(strMessage, 0, j + 1);\r
2068 \r
2069         if(strMessage == "")\r
2070                 return;\r
2071 \r
2072         // strip leading newlines and remember them, they are a hint that the message should be lower on the screen\r
2073         j = 0;\r
2074         while(substring(strMessage, j, 1) == "\n" && j < strlen(strMessage))\r
2075                 j = j + 1;\r
2076         strMessage = substring(strMessage, j, strlen(strMessage) - j);\r
2077         centerprint_offset_hint = j;\r
2078 \r
2079         if(strMessage == "")\r
2080                 return;\r
2081 \r
2082         // if we get here, we have a message. Initialize its height.\r
2083         centerprint_num = 0;\r
2084 \r
2085         n = tokenizebyseparator(strMessage, "\n");\r
2086         i = hcount = 0;\r
2087         for(j = 0; j < n; ++j)\r
2088         {\r
2089                 getWrappedLine_remaining = argv(j);\r
2090                 while(getWrappedLine_remaining)\r
2091                 {\r
2092                         s = getWrappedLine(vid_conwidth * 0.75, centerprint_fontsize, stringwidth_colors);\r
2093                         if(centerprint_messages[i])\r
2094                                 strunzone(centerprint_messages[i]);\r
2095                         centerprint_messages[i] = strzone(s);\r
2096                         centerprint_width[i] = stringwidth(s, TRUE, centerprint_fontsize);\r
2097                         ++i;\r
2098 \r
2099                         // half height for empty lines looks better\r
2100                         if(s == "")\r
2101                                 hcount += 0.5;\r
2102                         else\r
2103                                 hcount += 1;\r
2104 \r
2105                         if(i >= CENTERPRINT_MAX_LINES)\r
2106                                 break;\r
2107                 }\r
2108         }\r
2109 \r
2110         float h, havail;\r
2111         h = centerprint_fontsize_y*hcount;\r
2112 \r
2113         havail = vid_conheight;\r
2114         if(cvar("con_chatpos") < 0)\r
2115                 havail -= (-cvar("con_chatpos") + cvar("con_chat")) * cvar("con_chatsize"); // avoid overlapping chat\r
2116         if(havail > vid_conheight - 70)\r
2117                 havail = vid_conheight - 70; // avoid overlapping HUD\r
2118 \r
2119         centerprint_start_x = 0;\r
2120 \r
2121 #if 0\r
2122         float forbiddenmin, forbiddenmax, allowedmin, allowedmax, preferred;\r
2123 \r
2124         // here, the centerprint would cover the crosshair. REALLY BAD.\r
2125         forbiddenmin = vid_conheight * 0.5 - h - 16;\r
2126         forbiddenmax = vid_conheight * 0.5 + 16;\r
2127 \r
2128         allowedmin = scoreboard_bottom;\r
2129         allowedmax = havail - h;\r
2130         preferred = (havail - h)/2;\r
2131 \r
2132 \r
2133         // possible orderings (total: 4! / 4 = 6)\r
2134         //  allowedmin allowedmax forbiddenmin forbiddenmax\r
2135         //  forbiddenmin forbiddenmax allowedmin allowedmax\r
2136         if(allowedmax < forbiddenmin || allowedmin > forbiddenmax)\r
2137         {\r
2138                 // forbidden doesn't matter in this case\r
2139                 centerprint_start_y = bound(allowedmin, preferred, allowedmax);\r
2140         }\r
2141         //  allowedmin forbiddenmin allowedmax forbiddenmax\r
2142         else if(allowedmin < forbiddenmin && allowedmax < forbiddenmax)\r
2143         {\r
2144                 centerprint_start_y = bound(allowedmin, preferred, forbiddenmin);\r
2145         }\r
2146         //  allowedmin forbiddenmin forbiddenmax allowedmax\r
2147         else if(allowedmin < forbiddenmin)\r
2148         {\r
2149                 // make sure the forbidden zone is not covered\r
2150                 if(preferred > (forbiddenmin + forbiddenmax) * 0.5)\r
2151                         centerprint_start_y = bound(allowedmin, preferred, forbiddenmin);\r
2152                 else\r
2153                         centerprint_start_y = bound(forbiddenmax, preferred, allowedmin);\r
2154         }\r
2155         //  forbiddenmin allowedmin allowedmax forbiddenmax\r
2156         else if(allowedmax < forbiddenmax)\r
2157         {\r
2158                 // it's better to leave the allowed zone (overlap with scoreboard) than\r
2159                 // to cover the forbidden zone (crosshair)\r
2160                 if(preferred > (forbiddenmin + forbiddenmax) * 0.5)\r
2161                         centerprint_start_y = forbiddenmax;\r
2162                 else\r
2163                         centerprint_start_y = forbiddenmin;\r
2164         }\r
2165         //  forbiddenmin allowedmin forbiddenmax allowedmax\r
2166         else\r
2167         {\r
2168                 centerprint_start_y = bound(forbiddenmax, preferred, allowedmax);\r
2169         }\r
2170 #else\r
2171         centerprint_start_y =\r
2172                 min(\r
2173                         max(\r
2174                                 max(scoreboard_bottom, vid_conheight * 0.5 + 16),\r
2175                                 (havail - h)/2\r
2176                         ),\r
2177                         havail - h\r
2178                 );\r
2179 #endif\r
2180 \r
2181         centerprint_num = i;\r
2182         centerprint_expire = time + cvar("scr_centertime");\r
2183 }\r
2184 \r
2185 void Sbar_DrawCenterPrint (void)\r
2186 {\r
2187         float i;\r
2188         vector pos;\r
2189         string ts;\r
2190         float a;\r
2191 \r
2192         //if(time > centerprint_expire)\r
2193         //      return;\r
2194 \r
2195         //a = bound(0, 1 - 2 * (time - centerprint_expire), 1);\r
2196         a = bound(0, 1 - 4 * (time - centerprint_expire), 1);\r
2197         //sz = 1.2 / (a + 0.2);\r
2198 \r
2199         if(a <= 0)\r
2200                 return;\r
2201 \r
2202         pos = centerprint_start;\r
2203         for (i=0; i<centerprint_num; i = i + 1)\r
2204         {\r
2205                 pos_x = (vid_conwidth - centerprint_width[i]) * 0.5;\r
2206                 ts = centerprint_messages[i];\r
2207                 if (ts != "")\r
2208                 {\r
2209                         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
2210                         drawcolorcodedstring(pos, ts, centerprint_fontsize, a, DRAWFLAG_NORMAL);\r
2211                         //  - '0 0.5 0' * (sz - 1) * centerprint_fontsize_x - '0.5 0 0' * (sz - 1) * centerprint_width[i] * centerprint_fontsize_y, centerprint_fontsize * sz\r
2212                         pos_y = pos_y + centerprint_fontsize_y;\r
2213                 }\r
2214                 else\r
2215                         // half height for empty lines looks better\r
2216                         pos_y = pos_y + centerprint_fontsize_y * 0.5;\r
2217         }\r
2218 }\r
2219 \r
2220 vector Sbar_DrawNoteLine(vector offset, string s)\r
2221 {\r
2222         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0); // work around DP bug (set OFS_PARAM5 to 0)\r
2223         drawcolorcodedstring(\r
2224                 offset - '1 0 0' * stringwidth(s, TRUE, sbar_fontsize),\r
2225                 s,\r
2226                 sbar_fontsize,\r
2227                 sbar_alpha_fg,\r
2228                 0\r
2229         );\r
2230         return offset + sbar_fontsize_y * '0 1 0';\r
2231 }\r
2232 \r
2233 void Sbar_DrawPressedKeys(void)\r
2234 {\r
2235         vector pos, bgsize;\r
2236         float pressedkeys;\r
2237 \r
2238         pos = stov(cvar_string("cl_showpressedkeys_position"));\r
2239 \r
2240         bgsize = '126 75 0';\r
2241 \r
2242         pos = '1 0 0' * (vid_conwidth - bgsize_x) * pos_x\r
2243             + '0 1 0' * (vid_conheight - bgsize_y) * pos_y;\r
2244         pos -= '-15 -6 0'; // adjust to the origin of these numbers\r
2245 \r
2246         pressedkeys = getstatf(STAT_PRESSED_KEYS);\r
2247         drawpic(pos + '-15   -6   0', "gfx/hud/keys/key_bg.tga",           bgsize, '1 1 1', 0.1 * sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2248         drawpic(pos + ' 83.5  9   0', ((pressedkeys & KEY_CROUCH) ? "gfx/hud/keys/key_crouch_inv.tga" : "gfx/hud/keys/key_crouch.tga"), ' 24 24 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2249         drawpic(pos + ' 32   -1.5 0', ((pressedkeys & KEY_FORWARD) ? "gfx/hud/keys/key_forward_inv.tga" : "gfx/hud/keys/key_forward.tga"),  ' 32 32 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2250         drawpic(pos + '-11.5  9   0', ((pressedkeys & KEY_JUMP) ? "gfx/hud/keys/key_jump_inv.tga" : "gfx/hud/keys/key_jump.tga"),     ' 24 24 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2251         drawpic(pos + ' -1   32   0', ((pressedkeys & KEY_LEFT) ? "gfx/hud/keys/key_left_inv.tga" : "gfx/hud/keys/key_left.tga"),     ' 32 32 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2252         drawpic(pos + ' 32   32   0', ((pressedkeys & KEY_BACKWARD) ? "gfx/hud/keys/key_backward_inv.tga" : "gfx/hud/keys/key_backward.tga"), ' 32 32 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2253         drawpic(pos + ' 65   32   0', ((pressedkeys & KEY_RIGHT) ? "gfx/hud/keys/key_right_inv.tga" : "gfx/hud/keys/key_right.tga"),    ' 32 32 0', '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2254 }\r
2255 \r
2256 void Sbar_ShowSpeed(void)\r
2257 {\r
2258         vector numsize;\r
2259         float pos, conversion_factor;\r
2260         string speed, zspeed, unit;\r
2261 \r
2262         switch(cvar("cl_showspeed_unit"))\r
2263         {\r
2264                 default:\r
2265                 case 0:\r
2266                         unit = "";\r
2267                         conversion_factor = 1.0;\r
2268                         break;\r
2269                 case 1:\r
2270                         unit = " qu/s";\r
2271                         conversion_factor = 1.0;\r
2272                         break;\r
2273                 case 2:\r
2274                         unit = " m/s";\r
2275                         conversion_factor = 0.0254;\r
2276                         break;\r
2277                 case 3:\r
2278                         unit = " km/h";\r
2279                         conversion_factor = 0.0254 * 3.6;\r
2280                         break;\r
2281                 case 4:\r
2282                         unit = " mph";\r
2283                         conversion_factor = 0.0254 * 3.6 * 0.6213711922;\r
2284                         break;\r
2285                 case 5:\r
2286                         unit = " knots";\r
2287                         conversion_factor = 0.0254 * 1.943844492; // 1 m/s = 1.943844492 knots, because 1 knot = 1.852 km/h\r
2288                         break;\r
2289         }\r
2290 \r
2291         speed = strcat(ftos(floor( vlen(pmove_vel - pmove_vel_z * '0 0 1') * conversion_factor + 0.5 )), unit);\r
2292 \r
2293         numsize_x = numsize_y = cvar("cl_showspeed_size");\r
2294         pos = (vid_conheight - numsize_y) * cvar("cl_showspeed_position");\r
2295         \r
2296         drawfont = sbar_bigfont;\r
2297         drawstringcenter('1 0 0' + pos * '0 1 0', speed, numsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2298 \r
2299         if (cvar("cl_showspeed_z") == 1) {\r
2300                 zspeed = strcat(ftos(fabs(floor( pmove_vel_z * conversion_factor + 0.5 ))), unit);\r
2301                 drawstringcenter('1 0 0' + pos * '0 1 0' + numsize_y * '0 1 0', zspeed, numsize * 0.5, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2302         }\r
2303 \r
2304         drawfont = sbar_font;\r
2305 }\r
2306 \r
2307 vector acc_prevspeed;\r
2308 float acc_prevtime;\r
2309 float acc_avg;\r
2310 \r
2311 void Sbar_ShowAcceleration(void)\r
2312 {\r
2313         float acceleration, sz, scale, alpha, f;\r
2314         vector pos, top, rgb;\r
2315         top_x = vid_conwidth/2;\r
2316         top_y = 0;\r
2317 \r
2318         f = time - acc_prevtime;\r
2319         if(cvar("cl_showacceleration_z"))\r
2320                 acceleration = (vlen(pmove_vel) - vlen(acc_prevspeed)) * (1 / f);\r
2321         else\r
2322                 acceleration = (vlen(pmove_vel - '0 0 1' * pmove_vel_z) - vlen(acc_prevspeed - '0 0 1' * acc_prevspeed_z)) * (1 / f);\r
2323         acc_prevspeed = pmove_vel;\r
2324         acc_prevtime = time;\r
2325 \r
2326         f = bound(0, f * 10, 1);\r
2327         acc_avg = acc_avg * (1 - f) + acceleration * f;\r
2328         acceleration = acc_avg / getstatf(STAT_MOVEVARS_MAXSPEED);\r
2329 \r
2330         pos = top - sz/2 * '0 1 0' + (cvar("cl_showacceleration_position") * vid_conheight) * '0 1 0';\r
2331 \r
2332         sz = cvar("cl_showacceleration_size");\r
2333         scale = cvar("cl_showacceleration_scale");\r
2334         alpha = cvar("cl_showacceleration_alpha");\r
2335         if (cvar("cl_showacceleration_color_custom"))\r
2336                 rgb = stov(cvar_string("cl_showacceleration_color"));\r
2337         else {\r
2338                 rgb = '1 1 1';\r
2339                 if (acceleration < 0) {\r
2340                         rgb = '1 .5 .5' - '0 .5 .5' * bound(0, -acceleration * 0.2, 1);\r
2341                 } else if (acceleration > 0) {\r
2342                         rgb = '.5 1 .5' - '.5 0 .5' * bound(0, +acceleration * 0.2, 1);\r
2343                 }\r
2344         }\r
2345                 \r
2346         if (acceleration > 0)\r
2347                 drawpic(pos, "gfx/hud/accelerometer_gradient", acceleration * scale * '40 0 0' + sz * '0 1 0', rgb, alpha * sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2348         else if (acceleration < 0)\r
2349                 drawpic(pos + acceleration * scale * '40 0 0', "gfx/hud/accelerometer_gradient", -acceleration * scale * '40 0 0' + sz * '0 1 0', rgb, alpha * sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2350 }\r
2351 \r
2352 void Sbar_DrawAccuracyStats_Description_Hitscan(vector position)\r
2353 {\r
2354         drawstring(position + '0 3 0' * sbar_fontsize_y, "Shots fired:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2355         drawstring(position + '0 5 0' * sbar_fontsize_y, "Shots hit:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2356         drawstring(position + '0 7 0' * sbar_fontsize_y, "Accuracy:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2357         drawstring(position + '0 9 0' * sbar_fontsize_y, "Shots missed:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2358 }\r
2359 \r
2360 void Sbar_DrawAccuracyStats_Description_Splash(vector position)\r
2361 {\r
2362         drawstring(position + '0 3 0' * sbar_fontsize_y, "Maximum damage:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2363         drawstring(position + '0 5 0' * sbar_fontsize_y, "Actual damage:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2364         drawstring(position + '0 7 0' * sbar_fontsize_y, "Accuracy:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2365         drawstring(position + '0 9 0' * sbar_fontsize_y, "Damage wasted:", sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2366 }\r
2367 \r
2368 void Sbar_DrawAccuracyStats()\r
2369 {\r
2370         float i, count_hitscan, count_splash, row_hitscan, row_splash;  // count is the number of 'colums'\r
2371         float weapon_hit, weapon_damage, weapon_stats;\r
2372         float left_border;  // position where the weapons start, the description is in the border\r
2373         vector fill_colour, fill_size;\r
2374         vector pos;\r
2375         vector border_colour;\r
2376 \r
2377         float col_margin = 20;  // pixels between the columns\r
2378         float row_margin = 20;  // pixels between the rows\r
2379 \r
2380         fill_size_x = 5 * sbar_fontsize_x;  // width of the background\r
2381         fill_size_y = 10 * sbar_fontsize_y;  // height of the background\r
2382 \r
2383         drawfont = sbar_bigfont;\r
2384         pos_x = 0;\r
2385         pos_y = SCOREBOARD_OFFSET;\r
2386         pos_z = 0;\r
2387         drawstringcenter(pos, "Weapon Accuracy", 2 * sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2388 \r
2389         left_border = col_margin + 11 * sbar_fontsize_x;\r
2390 \r
2391         drawfont = sbar_font;\r
2392 \r
2393         if(warmup_stage)\r
2394         {\r
2395                 pos_y += 40;\r
2396                 if(mod(time, 1) >= 0.4)\r
2397                         drawstringcenter(pos, "Stats are not tracked during warmup stage", sbar_fontsize, '1 1 0', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2398 \r
2399                 return;\r
2400         }\r
2401 \r
2402         if(gametype == GAME_RACE || gametype == GAME_CTS)\r
2403         {\r
2404                 pos_y += 40;\r
2405                 if(mod(time, 1) >= 0.4)\r
2406                         drawstringcenter(pos, "Stats are not tracked in Race/CTS", sbar_fontsize, '1 1 0', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2407 \r
2408                 return;\r
2409         }\r
2410 \r
2411         float top_border_hitscan = SCOREBOARD_OFFSET + 55;  // position where the hitscan row starts: pixels down the screen\r
2412         Sbar_DrawAccuracyStats_Description_Hitscan('1 0 0' * col_margin + '0 1 0' * top_border_hitscan);\r
2413 \r
2414         float top_border_splash = SCOREBOARD_OFFSET + 175;  // position where the splash row starts: pixels down the screen\r
2415         Sbar_DrawAccuracyStats_Description_Splash('1 0 0' * col_margin + '0 1 0' * top_border_splash);\r
2416 \r
2417         for(i = WEP_FIRST; i <= WEP_LAST; ++i)\r
2418         {\r
2419                 self = get_weaponinfo(i);\r
2420                 if not(self.weapons)\r
2421                         continue;\r
2422                 weapon_hit = weapon_hits[i-WEP_FIRST];\r
2423                 weapon_damage = weapon_fired[i-WEP_FIRST];\r
2424                 border_colour = (i == activeweapon) ? '1 1 1' : '0 0 0';  // white or black border\r
2425 \r
2426                 if (weapon_damage) {\r
2427                         if (self.spawnflags & WEP_TYPE_SPLASH) {\r
2428                                 weapon_stats = bound(0, floor(100 * weapon_hit / weapon_damage), 100);\r
2429 \r
2430                                 fill_colour_x = 1 - 0.015 * weapon_stats;\r
2431                                 fill_colour_y = 1 - 0.015 * (100 - weapon_stats);\r
2432 \r
2433                                 // how the background colour is calculated\r
2434                                 // %    red             green   red_2                   green_2\r
2435                                 // 0    1               0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2436                                 // 10   0.85    0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2437                                 // 20   0.70    0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2438                                 // 30   0.55    0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2439                                 // 40   0.40    0.10    1 - % * 0.015   1 - (100 - %) * 0.015\r
2440                                 // 50   0.25    0.25    1 - % * 0.015   1 - (100 - %) * 0.015\r
2441                                 // 60   0.10    0.40    1 - % * 0.015   1 - (100 - %) * 0.015\r
2442                                 // 70   0               0.55    1 - % * 0.015   1 - (100 - %) * 0.015\r
2443                                 // 80   0               0.70    1 - % * 0.015   1 - (100 - %) * 0.015\r
2444                                 // 90   0               0.85    1 - % * 0.015   1 - (100 - %) * 0.015\r
2445                                 // 100  0               1               1 - % * 0.015   1 - (100 - %) * 0.015\r
2446 \r
2447                                 if ((left_border + count_splash * (fill_size_x + col_margin) + fill_size_x) >= vid_conwidth)\r
2448                                 {\r
2449                                         count_splash = 0;\r
2450                                         ++row_splash;\r
2451                                         Sbar_DrawAccuracyStats_Description_Splash('1 0 0' * col_margin + '0 1 0' * (top_border_splash + row_splash * (fill_size_y + row_margin)));\r
2452                                 }\r
2453 \r
2454                                 pos_x = left_border + count_splash * (fill_size_x + col_margin);\r
2455                                 pos_y = top_border_splash + row_splash * (fill_size_y + row_margin);\r
2456 \r
2457                                 // background\r
2458                                 drawpic(pos, "gfx/hud/sb_accuracy", fill_size , fill_colour, sbar_alpha_bg, DRAWFLAG_NORMAL);\r
2459                                 drawborderlines(sbar_border_thickness, pos, fill_size, border_colour, sbar_alpha_bg, DRAWFLAG_NORMAL);\r
2460 \r
2461                                 // the weapon\r
2462                                 drawpic(pos, strcat("gfx/hud/inv_weapon", self.netname), '1 0.5 0' * fill_size_x , '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2463 \r
2464                                 // the amount of shots fired or max damage\r
2465                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 3 0' * sbar_fontsize_y, ftos(weapon_damage), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2466 \r
2467                                 // the amount of hits or actual damage\r
2468                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 5 0' * sbar_fontsize_y, ftos(weapon_hit), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2469 \r
2470                                 // the accuracy\r
2471                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 7 0' * sbar_fontsize_y, strcat(ftos(weapon_stats),"%"), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2472 \r
2473                                 // the amount of shots missed or damage wasted\r
2474                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 9 0' * sbar_fontsize_y, ftos(max(0, weapon_damage - weapon_hit)), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2475 \r
2476                                 ++count_splash;\r
2477                         } else if (self.spawnflags & WEP_TYPE_HITSCAN) {\r
2478                                 weapon_stats = bound(0, floor(100 * weapon_hit / weapon_damage), 100);\r
2479 \r
2480                                 fill_colour_x = 1 - 0.015 * weapon_stats;\r
2481                                 fill_colour_y = 1 - 0.015 * (100 - weapon_stats);\r
2482 \r
2483                                 // how the background colour is calculated\r
2484                                 // %    red             green   red_2                   green_2\r
2485                                 // 0    1               0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2486                                 // 10   0.850   0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2487                                 // 20   0.70    0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2488                                 // 30   0.55    0               1 - % * 0.015   1 - (100 - %) * 0.015\r
2489                                 // 40   0.40    0.10    1 - % * 0.015   1 - (100 - %) * 0.015\r
2490                                 // 50   0.25    0.25    1 - % * 0.015   1 - (100 - %) * 0.015\r
2491                                 // 60   0.10    0.40    1 - % * 0.015   1 - (100 - %) * 0.015\r
2492                                 // 70   0               0.55    1 - % * 0.015   1 - (100 - %) * 0.015\r
2493                                 // 80   0               0.70    1 - % * 0.015   1 - (100 - %) * 0.015\r
2494                                 // 90   0               0.85    1 - % * 0.015   1 - (100 - %) * 0.015\r
2495                                 // 100  0               1               1 - % * 0.015   1 - (100 - %) * 0.015\r
2496 \r
2497                                 if ((left_border + count_hitscan * (fill_size_x + col_margin) + fill_size_x + cvar("stats_right_margin")) >= vid_conwidth)\r
2498                                 {\r
2499                                         count_hitscan = 0;\r
2500                                         ++row_hitscan;\r
2501                                         Sbar_DrawAccuracyStats_Description_Hitscan('1 0 0' * col_margin + '0 1 0' * (top_border_hitscan + row_hitscan * (fill_size_y + row_margin)));\r
2502                                 }\r
2503 \r
2504                                 pos_x = left_border + count_hitscan * (fill_size_x + col_margin);\r
2505                                 pos_y = top_border_hitscan + row_hitscan * (fill_size_y + row_margin);\r
2506 \r
2507                                 // background\r
2508                                 drawpic(pos, "gfx/hud/sb_accuracy", fill_size , fill_colour, sbar_alpha_bg, DRAWFLAG_NORMAL);\r
2509                                 drawborderlines(sbar_border_thickness, pos, fill_size, border_colour, sbar_alpha_bg, DRAWFLAG_NORMAL);\r
2510 \r
2511                                 // the weapon\r
2512                                 drawpic(pos, strcat("gfx/hud/inv_weapon", self.netname), '1 0.5 0' * fill_size_x , '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2513 \r
2514                                 // the amount of shots fired or max damage\r
2515                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 3 0' * sbar_fontsize_y, ftos(weapon_damage), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2516 \r
2517                                 // the amount of hits or actual damage\r
2518                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 5 0' * sbar_fontsize_y, ftos(weapon_hit), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2519 \r
2520                                 // the accuracy\r
2521                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 7 0' * sbar_fontsize_y, strcat(ftos(weapon_stats),"%"), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2522 \r
2523                                 // the amount of shots missed or damage wasted\r
2524                                 drawstringright(pos + '4.5 0 0' * sbar_fontsize_x + '0 9 0' * sbar_fontsize_y, ftos(max(0, weapon_damage - weapon_hit)), sbar_fontsize, '1 1 1', sbar_alpha_fg, DRAWFLAG_NORMAL);\r
2525 \r
2526                                 ++count_hitscan;\r
2527                         }\r
2528                 }\r
2529         }\r
2530 }\r
2531 \r
2532 void drawstringright(vector position, string text, vector scale, vector rgb, float alpha, float flag)\r
2533 {\r
2534         position_x -= 2 / 3 * strlen(text) * scale_x;\r
2535         drawstring(position, text, scale, rgb, alpha, flag);\r
2536 }\r
2537 \r
2538 void drawstringcenter(vector position, string text, vector scale, vector rgb, float alpha, float flag)\r
2539 {\r
2540         position_x = 0.5 * (vid_conwidth - 0.6025 * strlen(text) * scale_x);\r
2541         drawstring(position, text, scale, rgb, alpha, flag);\r
2542 }\r
2543 \r
2544 float GetAmmoStat(float i)\r
2545 {\r
2546         switch(i)\r
2547         {\r
2548                 case 1: return STAT_FUEL;\r
2549                 default: return -1;\r
2550         }\r
2551 }\r
2552 \r
2553 float GetAmmoItemCode(float i)\r
2554 {\r
2555         switch(i)\r
2556         {\r
2557                 case 1: return IT_FUEL;\r
2558                 default: return -1;\r
2559         }\r
2560 }\r
2561 \r
2562 string GetAmmoPicture(float i)\r
2563 {\r
2564         switch(i)\r
2565         {\r
2566                 case 1: return "gfx/hud/sb_fuel";\r
2567                 default: return "";\r
2568         }\r
2569 }\r
2570 \r
2571 void Sbar_Reset (void)\r
2572 {\r
2573         // reset gametype specific icons\r
2574         if(gametype == GAME_KEYHUNT)\r
2575                 CSQC_kh_hudreset();\r
2576         else if(gametype == GAME_CTF)\r
2577                 CSQC_ctf_hudreset();\r
2578 }\r
2579 \r
2580 float vote_yescount;\r
2581 float vote_nocount;\r
2582 float vote_needed;\r
2583 float vote_highlighted; // currently selected vote\r
2584 \r
2585 float vote_active; // is there an active vote?\r
2586 float vote_prev; // previous state of vote_active to check for a change\r
2587 float vote_alpha;\r
2588 float vote_change; // "time" when vote_active changed\r
2589 \r
2590 void Sbar_Draw (void)\r
2591 {\r
2592         // vectors for top right, bottom right, bottom and bottom left corners\r
2593         vector topright;\r
2594         vector bottom;\r
2595         vector bottomright;\r
2596         vector bottomleft;\r
2597 \r
2598         topright_x = vid_conwidth;\r
2599         topright_y = 0;\r
2600         topright_z = 0;\r
2601 \r
2602         bottom_x = vid_conwidth/2;\r
2603         bottom_y = vid_conheight;\r
2604         bottom_z = 0;\r
2605 \r
2606         bottomright_x = vid_conwidth;\r
2607         bottomright_y = vid_conheight;\r
2608         bottomright_z = 0;\r
2609 \r
2610         bottomleft_x = 0;\r
2611         bottomleft_y = vid_conheight;\r
2612         bottomleft_z = 0;\r
2613 \r
2614         sbar_alpha_bg = cvar("sbar_alpha_bg") * (1 - cvar("_menu_alpha"));\r
2615         sbar_border_thickness = bound(0, cvar("sbar_border_thickness"), 5);\r
2616         sbar_accuracy_border_thickness = bound(0, cvar_or("sbar_accuracy_border_thickness", 1), 5);\r
2617         sbar_color_bg_team = cvar("sbar_color_bg_team");\r
2618 \r
2619         float weapon_stats;\r
2620         float x, fade;\r
2621         float stat_items, stat_weapons;\r
2622 \r
2623         weapon_stats = getstati(STAT_DAMAGE_HITS);\r
2624         weapon_number = weapon_stats & 63;\r
2625         weapon_hits[weapon_number-WEP_FIRST] = floor(weapon_stats / 64);\r
2626 \r
2627         weapon_stats = getstati(STAT_DAMAGE_FIRED);\r
2628         weapon_number = weapon_stats & 63;\r
2629         weapon_fired[weapon_number-WEP_FIRST] = floor(weapon_stats / 64);\r
2630 \r
2631         vector o; o = '1 0 0' * vid_conwidth;\r
2632         o_y = 28; // move spectator text slightly down to prevent overlapping the timer\r
2633 \r
2634         string s;\r
2635         vector pos;\r
2636         pos = '0 0 0';\r
2637 \r
2638         sbar_fontsize = Sbar_GetFontsize("sbar_fontsize");\r
2639         sbar_fontsize_spec = Sbar_GetFontsize("sbar_fontsize_spec");\r
2640         if(sbar_fontsize != sbar_oldfontsize)\r
2641         {\r
2642                 Cmd_Sbar_SetFields(0);\r
2643                 sbar_oldfontsize = sbar_fontsize;\r
2644         }\r
2645 \r
2646         if(spectatee_status && !intermission)\r
2647         {\r