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