data/qcsrc/client/sbar.qc

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