data/qcsrc/client/miscfunctions.qc

   1 var float(string text, float handleColors, vector fontSize) stringwidth;\r
   2 \r
   3 entity players;\r
   4 entity teams;\r
   5 \r
   6 void serverAnnouncer()\r
   7 {\r
   8         // check for pending announcement, play it and remove it\r
   9         if(announce_snd != "")\r
  10         {\r
  11                 sound(self, CHAN_VOICE, strcat("announcer/", cvar_string("cl_announcer"), "/", announce_snd, ".wav"), VOL_BASEVOICE, ATTN_NONE);\r
  12                 strunzone(announce_snd);\r
  13                 announce_snd = "";\r
  14         }\r
  15 }\r
  16 \r
  17 void restartAnnouncer_Think() {\r
  18         float countdown_rounded, countdown;\r
  19         countdown = getstatf(STAT_GAMESTARTTIME) - time;\r
  20         countdown_rounded = floor(0.5 + countdown);\r
  21         if(countdown <= 0) {\r
  22                 if (!spectatee_status) //do cprint only for players\r
  23                         centerprint("^1Begin!");\r
  24 \r
  25                 sound(self, CHAN_VOICE, strcat("announcer/", cvar_string("cl_announcer"), "/begin.wav"), VOL_BASEVOICE, ATTN_NONE);\r
  26                 //reset maptime announcers now as well\r
  27                 announcer_5min = announcer_1min = FALSE;\r
  28 \r
  29                 remove(self);\r
  30                 return;\r
  31         }\r
  32         else {\r
  33                 if (!spectatee_status) //do cprint only for players\r
  34                         centerprint(strcat("^1Game starts in ", ftos(countdown_rounded), " seconds"));\r
  35 \r
  36                 if(countdown_rounded <= 3 && countdown_rounded >= 1) {\r
  37                         sound(self, CHAN_VOICE, strcat("announcer/", cvar_string("cl_announcer"), "/", ftos(countdown_rounded), ".wav"), VOL_BASEVOICE, ATTN_NONE);\r
  38                 }\r
  39 \r
  40                 self.nextthink = getstatf(STAT_GAMESTARTTIME) - (countdown - 1);\r
  41         }\r
  42 }\r
  43 \r
  44 /**\r
  45  * Plays the 1minute or 5 minutes (of maptime) remaining sound, if client wants it\r
  46  */\r
  47 void maptimeAnnouncer() {\r
  48     float timelimit;\r
  49     timelimit = getstatf(STAT_TIMELIMIT);\r
  50     float timeleft;\r
  51     timeleft = max(0, timelimit * 60 + getstatf(STAT_GAMESTARTTIME) - time);\r
  52 \r
  53     float warmuplimit;\r
  54     float warmuptimeleft;\r
  55     if(warmup_stage) {\r
  56         warmuplimit = cvar("g_warmup_limit");\r
  57         if(warmuplimit > 0) {\r
  58            warmuptimeleft = max(0, warmuplimit + getstatf(STAT_GAMESTARTTIME) - time); \r
  59         }\r
  60     }\r
  61 \r
  62     //5 minute check\r
  63     if (cvar("cl_sound_maptime_warning") >= 2) {\r
  64         //make sure that after connect (and e.g. 4 minutes left) we will not get a wrong sound\r
  65         if(announcer_5min)\r
  66         {\r
  67                         if(((!warmup_stage || warmuplimit == 0) && timeleft > 300) || (warmup_stage && warmuplimit > 0 && warmuptimeleft > 300))\r
  68                                 announcer_5min = FALSE;\r
  69         }\r
  70         else if (((!warmup_stage || warmuplimit == 0) && timelimit > 0 && timeleft < 300 && timeleft > 299) || (warmup_stage && warmuplimit > 0 && warmuptimeleft < 300 && warmuptimeleft > 299))\r
  71         //if we're in warmup mode, check whether there's a warmup timelimit\r
  72         if not (warmuplimit == -1 && warmup_stage) {\r
  73                         announcer_5min = TRUE;\r
  74                         //dprint("i will play the sound, I promise!\n");\r
  75                         sound(self, CHAN_VOICE, strcat("announcer/", cvar_string("cl_announcer"), "/5minutesremain.wav"), VOL_BASEVOICE, ATTN_NONE);\r
  76                 }\r
  77     }\r
  78 \r
  79     //1 minute check\r
  80     if (cvar("cl_sound_maptime_warning") == 1 || cvar("cl_sound_maptime_warning") == 3) {\r
  81         if (announcer_1min)\r
  82         {\r
  83                         if(((!warmup_stage || warmuplimit == 0) && timeleft > 60) || (warmup_stage && warmuplimit > 0 && warmuptimeleft > 60))\r
  84                                 announcer_1min = FALSE;\r
  85         }\r
  86         else if (((!warmup_stage || warmuplimit == 0) && timelimit > 0 && timeleft < 60) || (warmup_stage && warmuplimit > 0 && warmuptimeleft < 60))\r
  87         //if we're in warmup mode, check whether there's a warmup timelimit\r
  88         if not (warmuplimit == -1 && warmup_stage) {\r
  89                         announcer_1min = TRUE;\r
  90                         sound(self, CHAN_VOICE, strcat("announcer/", cvar_string("cl_announcer"), "/1minuteremains.wav"), VOL_BASEVOICE, ATTN_NONE);\r
  91         }\r
  92         }\r
  93 }\r
  94 \r
  95  /**\r
  96  * Announce carried items (e.g. flags in CTF).\r
  97  */\r
  98 float redflag_prev;\r
  99 float blueflag_prev;\r
 100 void carrierAnnouncer() {\r
 101         float stat_items, redflag, blueflag;\r
 102         float pickup;\r
 103         string item;\r
 104 \r
 105         if not(cvar("cl_notify_carried_items"))\r
 106                 return;\r
 107 \r
 108         stat_items = getstati(STAT_ITEMS);\r
 109 \r
 110         redflag = (stat_items/IT_RED_FLAG_TAKEN) & 3;\r
 111         blueflag = (stat_items/IT_BLUE_FLAG_TAKEN) & 3;\r
 112 \r
 113         if (redflag == 3 && redflag != redflag_prev) {\r
 114                 item = "^1RED^7 flag";\r
 115                 pickup = (redflag_prev == 2);\r
 116         }\r
 117 \r
 118         if (blueflag == 3 && blueflag != blueflag_prev) {\r
 119                 item = "^4BLUE^7 flag";\r
 120                 pickup = (blueflag_prev == 2);\r
 121         }\r
 122 \r
 123         if (item)\r
 124         {\r
 125                 if (pickup) {\r
 126                         if (cvar("cl_notify_carried_items") & 2)\r
 127                                 centerprint(strcat("You picked up the ", item, "!"));\r
 128                 }\r
 129                 else {\r
 130                         if (cvar("cl_notify_carried_items") & 1)\r
 131                                 centerprint(strcat("You got the ", item, "!"));\r
 132                 }\r
 133         }\r
 134 \r
 135         blueflag_prev = blueflag;\r
 136         redflag_prev = redflag;\r
 137 }\r
 138 \r
 139 /**\r
 140  * Add all future announcer sounds precaches here.\r
 141  * TODO: announcer queues\r
 142  */\r
 143 void Announcer_Precache () {\r
 144         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/1minuteremains.wav"));\r
 145         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/5minutesremain.wav"));\r
 146 \r
 147         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/airshot.wav"));\r
 148         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/03kills.wav"));\r
 149         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/05kills.wav"));\r
 150         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/10kills.wav"));\r
 151         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/15kills.wav"));\r
 152         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/20kills.wav"));\r
 153         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/25kills.wav"));\r
 154         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/30kills.wav"));\r
 155         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/botlike.wav"));\r
 156         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/yoda.wav"));\r
 157         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/amazing.wav"));\r
 158         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/awesome.wav"));\r
 159         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/headshot.wav"));\r
 160         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/impressive.wav"));\r
 161 \r
 162         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/prepareforbattle.wav"));\r
 163         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/begin.wav"));\r
 164         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/timeoutcalled.wav"));\r
 165         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/1fragleft.wav"));\r
 166         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/2fragsleft.wav"));\r
 167         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/3fragsleft.wav"));\r
 168         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/terminated.wav"));\r
 169 \r
 170         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/1.wav"));\r
 171         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/2.wav"));\r
 172         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/3.wav"));\r
 173         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/4.wav"));\r
 174         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/5.wav"));\r
 175         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/6.wav"));\r
 176         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/7.wav"));\r
 177         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/8.wav"));\r
 178         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/9.wav"));\r
 179         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/10.wav"));\r
 180 \r
 181         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/lastsecond.wav"));\r
 182         precache_sound (strcat("announcer/", cvar_string("cl_announcer"), "/narrowly.wav"));\r
 183 \r
 184         precache_sound (strcat("helper/", cvar_string("cl_helper_voice"), "/health_low.wav"));\r
 185         precache_sound (strcat("helper/", cvar_string("cl_helper_voice"), "/armor_low.wav"));\r
 186 }\r
 187 \r
 188 void AuditLists()\r
 189 {\r
 190         entity e;\r
 191         entity prev;\r
 192 \r
 193         prev = players;\r
 194         for(e = prev.sort_next; e; prev = e, e = e.sort_next)\r
 195         {\r
 196                 if(prev != e.sort_prev)\r
 197                         error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));\r
 198         }\r
 199 \r
 200         prev = teams;\r
 201         for(e = prev.sort_next; e; prev = e, e = e.sort_next)\r
 202         {\r
 203                 if(prev != e.sort_prev)\r
 204                         error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));\r
 205         }\r
 206 }\r
 207 \r
 208 \r
 209 float RegisterPlayer(entity player)\r
 210 {\r
 211         entity pl;\r
 212         AuditLists();\r
 213         for(pl = players.sort_next; pl; pl = pl.sort_next)\r
 214                 if(pl == player)\r
 215                         error("Player already registered!");\r
 216         player.sort_next = players.sort_next;\r
 217         player.sort_prev = players;\r
 218         if(players.sort_next)\r
 219                 players.sort_next.sort_prev = player;\r
 220         players.sort_next = player;\r
 221         AuditLists();\r
 222         return true;\r
 223 }\r
 224 \r
 225 void RemovePlayer(entity player)\r
 226 {\r
 227         entity pl, parent;\r
 228         AuditLists();\r
 229         parent = players;\r
 230         for(pl = players.sort_next; pl && pl != player; pl = pl.sort_next)\r
 231                 parent = pl;\r
 232 \r
 233         if(!pl)\r
 234         {\r
 235                 error("Trying to remove a player which is not in the playerlist!");\r
 236                 return;\r
 237         }\r
 238         parent.sort_next = player.sort_next;\r
 239         if(player.sort_next)\r
 240                 player.sort_next.sort_prev = parent;\r
 241         AuditLists();\r
 242 }\r
 243 \r
 244 void MoveToLast(entity e)\r
 245 {\r
 246         AuditLists();\r
 247         other = e.sort_next;\r
 248         while(other)\r
 249         {\r
 250                 SORT_SWAP(other, e);\r
 251                 other = e.sort_next;\r
 252         }\r
 253         AuditLists();\r
 254 }\r
 255 \r
 256 float RegisterTeam(entity Team)\r
 257 {\r
 258         entity tm;\r
 259         AuditLists();\r
 260         for(tm = teams.sort_next; tm; tm = tm.sort_next)\r
 261                 if(tm == Team)\r
 262                         error("Team already registered!");\r
 263         Team.sort_next = teams.sort_next;\r
 264         Team.sort_prev = teams;\r
 265         if(teams.sort_next)\r
 266                 teams.sort_next.sort_prev = Team;\r
 267         teams.sort_next = Team;\r
 268         AuditLists();\r
 269         return true;\r
 270 }\r
 271 \r
 272 void RemoveTeam(entity Team)\r
 273 {\r
 274         entity tm, parent;\r
 275         AuditLists();\r
 276         parent = teams;\r
 277         for(tm = teams.sort_next; tm && tm != Team; tm = tm.sort_next)\r
 278                 parent = tm;\r
 279 \r
 280         if(!tm)\r
 281         {\r
 282                 print("Trying to remove a team which is not in the teamlist!");\r
 283                 return;\r
 284         }\r
 285         parent.sort_next = Team.sort_next;\r
 286         if(Team.sort_next)\r
 287                 Team.sort_next.sort_prev = parent;\r
 288         AuditLists();\r
 289 }\r
 290 \r
 291 entity GetTeam(float Team, float add)\r
 292 {\r
 293         float num;\r
 294         entity tm;\r
 295         num = (Team == COLOR_SPECTATOR) ? 16 : Team;\r
 296         if(teamslots[num])\r
 297                 return teamslots[num];\r
 298         if not(add)\r
 299                 return NULL;\r
 300         tm = spawn();\r
 301         tm.team = Team;\r
 302         teamslots[num] = tm;\r
 303         RegisterTeam(tm);\r
 304         return tm;\r
 305 }\r
 306 \r
 307 void CSQC_CheckEngine()\r
 308 {\r
 309         sbar_font = FONT_USER+1;\r
 310         sbar_bigfont = FONT_USER+2;\r
 311 }\r
 312 \r
 313 vector Sbar_GetFontsize(string cvarname)\r
 314 {\r
 315         vector v;\r
 316         v = stov(cvar_string(cvarname));\r
 317         if(v_x == 0)\r
 318                 v = '8 8 0';\r
 319         if(v_y == 0)\r
 320                 v_y = v_x;\r
 321         v_z = 0;\r
 322         return v;\r
 323 }\r
 324 \r
 325 float Sbar_GetWidth(float teamcolumnwidth)\r
 326 {\r
 327         float f;\r
 328         f = cvar("sbar_width");\r
 329         if(f == 0)\r
 330                 f = 640;\r
 331         if(f < 320)\r
 332                 f = 320;\r
 333         if(f > vid_conwidth - 2 * teamcolumnwidth)\r
 334                 f = vid_conwidth - 2 * teamcolumnwidth;\r
 335         return f;\r
 336 }\r
 337 \r
 338 float PreviewExists(string name)\r
 339 {\r
 340         float f;\r
 341         string file;\r
 342 \r
 343         if(cvar("cl_readpicture_force"))\r
 344                 return false;\r
 345 \r
 346         file = strcat(name, ".tga");\r
 347         f = fopen(file, FILE_READ);\r
 348         if(f >= 0)\r
 349         {\r
 350                 fclose(f);\r
 351                 return true;\r
 352         }\r
 353         file = strcat(name, ".png");\r
 354         f = fopen(file, FILE_READ);\r
 355         if(f >= 0)\r
 356         {\r
 357                 fclose(f);\r
 358                 return true;\r
 359         }\r
 360         file = strcat(name, ".jpg");\r
 361         f = fopen(file, FILE_READ);\r
 362         if(f >= 0)\r
 363         {\r
 364                 fclose(f);\r
 365                 return true;\r
 366         }\r
 367         file = strcat(name, ".pcx");\r
 368         f = fopen(file, FILE_READ);\r
 369         if(f >= 0)\r
 370         {\r
 371                 fclose(f);\r
 372                 return true;\r
 373         }\r
 374         return false;\r
 375 }\r
 376 \r
 377 vector rotate(vector v, float a)\r
 378 {\r
 379         vector w;\r
 380         // FTEQCC SUCKS AGAIN\r
 381         w_x =      v_x * cos(a) + v_y * sin(a);\r
 382         w_y = -1 * v_x * sin(a) + v_y * cos(a);\r
 383         return w;\r
 384 }\r
 385 \r
 386 float ColorTranslateMode;\r
 387 \r
 388 string ColorTranslateRGB(string s)\r
 389 {\r
 390         if(ColorTranslateMode & 1)\r
 391                 return strdecolorize(s);\r
 392         else\r
 393                 return s;\r
 394 }\r
 395 \r
 396 string Team_ColorCode(float teamid)\r
 397 {\r
 398     if (teamid == COLOR_TEAM1)\r
 399         return "^1";\r
 400     else if (teamid == COLOR_TEAM2)\r
 401         return "^4";\r
 402     else if (teamid == COLOR_TEAM3)\r
 403         return "^3";\r
 404     else if (teamid == COLOR_TEAM4)\r
 405         return "^6";\r
 406     else\r
 407         return "^7";\r
 408 }\r
 409 \r
 410 // decolorizes and team colors the player name when needed\r
 411 string playername(string thename, float teamid)\r
 412 {\r
 413     string t;\r
 414     if (teamplay)\r
 415     {\r
 416         t = Team_ColorCode(teamid);\r
 417         return strcat(t, strdecolorize(thename));\r
 418     }\r
 419     else\r
 420         return strdecolorize(thename);\r
 421 }\r
 422 \r
 423 float cvar_or(string cv, float v)\r
 424 {\r
 425         string s;\r
 426         s = cvar_string(cv);\r
 427         if(s == "")\r
 428                 return v;\r
 429         else\r
 430                 return stof(s);\r
 431 }\r
 432 \r
 433 vector project_3d_to_2d(vector vec)\r
 434 {\r
 435         vec = cs_project(vec);\r
 436         if(cs_project_is_b0rked > 0)\r
 437         {\r
 438                 vec_x *= vid_conwidth / vid_width;\r
 439                 vec_y *= vid_conheight / vid_height;\r
 440         }\r
 441         return vec;\r
 442 }\r
 443 \r
 444 void dummyfunction(float a1, float a2, float a3, float a4, float a5, float a6, float a7, float a8)\r
 445 {\r
 446 }\r
 447 \r
 448 float expandingbox_sizefactor_from_fadelerp(float fadelerp)\r
 449 {\r
 450         return 1.2 / (1.2 - fadelerp);\r
 451 }\r
 452 \r
 453 vector expandingbox_resize_centered_box_offset(float sz, vector boxsize, float boxxsizefactor)\r
 454 {\r
 455         boxsize_x *= boxxsizefactor; // easier interface for text\r
 456         return boxsize * (0.5 * (1 - sz));\r
 457 }\r
 458 \r
 459 void drawborderlines(float thickness, vector pos, vector dim, vector color, float alpha, float drawflag)\r
 460 {\r
 461         vector line_dim;\r
 462 \r
 463         // left and right lines\r
 464         pos_x -= thickness;\r
 465         line_dim_x = thickness;\r
 466         line_dim_y = dim_y;\r
 467         drawfill(pos, line_dim, color, alpha, drawflag);\r
 468         drawfill(pos + (dim_x + thickness) * '1 0 0', line_dim, color, alpha, drawflag);\r
 469 \r
 470         // upper and lower lines\r
 471         pos_y -= thickness;\r
 472         line_dim_x = dim_x + thickness * 2; // make upper and lower lines longer\r
 473         line_dim_y = thickness;\r
 474         drawfill(pos, line_dim, color, alpha, drawflag);\r
 475         drawfill(pos + (dim_y + thickness) * '0 1 0', line_dim, color, alpha, drawflag);\r
 476 }\r
 477 \r
 478 void drawpic_tiled(vector pos, string pic, vector sz, vector area, vector color, float alpha, float drawflag)\r
 479 {\r
 480         vector current_pos, end_pos, new_size, ratio;\r
 481         end_pos = pos + area;\r
 482 \r
 483         current_pos_y = pos_y;\r
 484         while (current_pos_y < end_pos_y)\r
 485         {\r
 486                 current_pos_x = pos_x;\r
 487                 while (current_pos_x < end_pos_x)\r
 488                 {\r
 489                         new_size_x = min(sz_x, end_pos_x - current_pos_x);\r
 490                         new_size_y = min(sz_y, end_pos_y - current_pos_y);\r
 491                         ratio_x = new_size_x / sz_x;\r
 492                         ratio_y = new_size_y / sz_y;\r
 493                         drawsubpic(current_pos, new_size, pic, '0 0 0', ratio, color, alpha, drawflag);\r
 494                         current_pos_x += sz_x;\r
 495                 }\r
 496                 current_pos_y += sz_y;\r
 497         }\r
 498 }\r
 499 \r
 500 void drawpic_expanding(vector position, string pic, vector scale, vector rgb, float alpha, float flag, float fadelerp)\r
 501 {\r
 502         float sz;\r
 503         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);\r
 504 \r
 505         drawpic(position + expandingbox_resize_centered_box_offset(sz, scale, 1), pic, scale * sz, rgb, alpha * (1 - fadelerp), flag);\r
 506 }\r
 507 \r
 508 void drawpic_expanding_two(vector position, string pic, vector scale, vector rgb, float alpha, float flag, float fadelerp)\r
 509 {\r
 510         drawpic_expanding(position, pic, scale, rgb, alpha, flag, fadelerp);\r
 511         drawpic(position, pic, scale, rgb, alpha * fadelerp, flag);\r
 512 }\r
 513 \r
 514 vector drawfontscale;\r
 515 void drawstring_expanding(vector position, string text, vector scale, vector rgb, float alpha, float flag, float fadelerp)\r
 516 {\r
 517         float sz;\r
 518         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);\r
 519 \r
 520         if(cvar("menu_font_size_snapping_fix"))\r
 521                 drawfontscale = sz * '1 1 0';\r
 522         else\r
 523                 drawfontscale = '1 1 0';\r
 524         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);\r
 525         drawstring(position + expandingbox_resize_centered_box_offset(sz, scale, stringwidth(text, FALSE, scale * (sz / drawfontscale_x)) / (scale_x * sz)), text, scale * (sz / drawfontscale_x), rgb, alpha * (1 - fadelerp), flag);\r
 526         // width parameter:\r
 527         //    (scale_x * sz / drawfontscale_x) * drawfontscale_x * SIZE1 / (scale_x * sz)\r
 528         //    SIZE1\r
 529 \r
 530         if(cvar("menu_font_size_snapping_fix"))\r
 531                 drawfontscale = '1 1 0';\r
 532 }\r
 533 \r
 534 void drawcolorcodedstring_expanding(vector position, string text, vector scale, float alpha, float flag, float fadelerp)\r
 535 {\r
 536         float sz;\r
 537         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);\r
 538 \r
 539         if(cvar("menu_font_size_snapping_fix"))\r
 540                 drawfontscale = sz * '1 1 0';\r
 541         else\r
 542                 drawfontscale = '1 1 0';\r
 543         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);\r
 544         drawcolorcodedstring(position + expandingbox_resize_centered_box_offset(sz, scale, stringwidth(text, TRUE, scale * (sz / drawfontscale_x)) / (scale_x * sz)), text, scale * (sz / drawfontscale_x), alpha * (1 - fadelerp), flag);\r
 545 \r
 546         if(cvar("menu_font_size_snapping_fix"))\r
 547                 drawfontscale = '1 1 0';\r
 548 }\r
 549 \r
 550 // this draws the triangles of a model DIRECTLY. Don't expect high performance, really...\r
 551 void PolyDrawModel(entity e)\r
 552 {\r
 553         float i_s, i_t;\r
 554         float n_t;\r
 555         vector tri;\r
 556         string tex;\r
 557         for(i_s = 0; ; ++i_s)\r
 558         {\r
 559                 tex = getsurfacetexture(e, i_s);\r
 560                 if not(tex)\r
 561                         break; // this is beyond the last one\r
 562                 n_t = getsurfacenumtriangles(e, i_s);\r
 563                 for(i_t = 0; i_t < n_t; ++i_t)\r
 564                 {\r
 565                         tri = getsurfacetriangle(e, i_s, i_t);\r
 566                         R_BeginPolygon(tex, 0);\r
 567                         R_PolygonVertex(getsurfacepoint(e, i_s, tri_x), getsurfacepointattribute(e, i_s, tri_x, SPA_TEXCOORDS0), '1 1 1', 1);\r
 568                         R_PolygonVertex(getsurfacepoint(e, i_s, tri_y), getsurfacepointattribute(e, i_s, tri_y, SPA_TEXCOORDS0), '1 1 1', 1);\r
 569                         R_PolygonVertex(getsurfacepoint(e, i_s, tri_z), getsurfacepointattribute(e, i_s, tri_z, SPA_TEXCOORDS0), '1 1 1', 1);\r
 570                         R_EndPolygon();\r
 571                 }\r
 572         }\r
 573 }\r
 574 \r
 575 void DrawCircleClippedPic(vector centre, float radius, string pic, float f, vector rgb, float a, float drawflag)\r
 576 {\r
 577         float x, y, q, d;\r
 578         vector ringsize, v, t;\r
 579         ringsize = radius * '1 1 0';\r
 580 \r
 581         x = cos(f * 2 * M_PI);\r
 582         y = sin(f * 2 * M_PI);\r
 583         q = fabs(x) + fabs(y);\r
 584         x /= q;\r
 585         y /= q;\r
 586 \r
 587         if(f >= 1)\r
 588         {\r
 589                 // draw full rectangle\r
 590                 R_BeginPolygon(pic, drawflag);\r
 591                         v = centre;                     t = '0.5 0.5 0';\r
 592                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
 593                         R_PolygonVertex(v, t, rgb, a);\r
 594 \r
 595                         v = centre;                     t = '0.5 0.5 0';\r
 596                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
 597                         R_PolygonVertex(v, t, rgb, a);\r
 598 \r
 599                         v = centre;                     t = '0.5 0.5 0';\r
 600                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
 601                         R_PolygonVertex(v, t, rgb, a);\r
 602 \r
 603                         v = centre;                     t = '0.5 0.5 0';\r
 604                         v_y -= 0.5 * ringsize_y;        t -= '0.5 -0.5 0';\r
 605                         R_PolygonVertex(v, t, rgb, a);\r
 606                 R_EndPolygon();\r
 607 \r
 608                 d = q - 1;\r
 609                 if(d > 0)\r
 610                 {\r
 611                         R_BeginPolygon(pic, drawflag);\r
 612                                 v = centre;                     t = '0.5 0.5 0';\r
 613                                 R_PolygonVertex(v, t, rgb, a);\r
 614 \r
 615                                 v = centre;                     t = '0.5 0.5 0';\r
 616                                 v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
 617                                 R_PolygonVertex(v, t, rgb, a);\r
 618                 }\r
 619         }\r
 620         else if(f > 0.75)\r
 621         {\r
 622                 // draw upper and first triangle\r
 623                 R_BeginPolygon(pic, drawflag);\r
 624                         v = centre;                     t = '0.5 0.5 0';\r
 625                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
 626                         R_PolygonVertex(v, t, rgb, a);\r
 627 \r
 628                         v = centre;                     t = '0.5 0.5 0';\r
 629                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
 630                         R_PolygonVertex(v, t, rgb, a);\r
 631 \r
 632                         v = centre;                     t = '0.5 0.5 0';\r
 633                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
 634                         R_PolygonVertex(v, t, rgb, a);\r
 635                 R_EndPolygon();\r
 636                 R_BeginPolygon(pic, drawflag);\r
 637                         v = centre;                     t = '0.5 0.5 0';\r
 638                         R_PolygonVertex(v, t, rgb, a);\r
 639 \r
 640                         v = centre;                     t = '0.5 0.5 0';\r
 641                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
 642                         R_PolygonVertex(v, t, rgb, a);\r
 643 \r
 644                         v = centre;                     t = '0.5 0.5 0';\r
 645                         v_y -= 0.5 * ringsize_y;        t -= '0.5 -0.5 0';\r
 646                         R_PolygonVertex(v, t, rgb, a);\r
 647 \r
 648                 d = q - 0.75;\r
 649                 if(d <= 0)\r
 650                         R_EndPolygon();\r
 651         }\r
 652         else if(f > 0.5)\r
 653         {\r
 654                 // draw upper triangle\r
 655                 R_BeginPolygon(pic, drawflag);\r
 656                         v = centre;                     t = '0.5 0.5 0';\r
 657                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
 658                         R_PolygonVertex(v, t, rgb, a);\r
 659 \r
 660                         v = centre;                     t = '0.5 0.5 0';\r
 661                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
 662                         R_PolygonVertex(v, t, rgb, a);\r
 663 \r
 664                         v = centre;                     t = '0.5 0.5 0';\r
 665                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
 666                         R_PolygonVertex(v, t, rgb, a);\r
 667                 R_EndPolygon();\r
 668 \r
 669                 d = q - 0.5;\r
 670                 if(d > 0)\r
 671                 {\r
 672                         R_BeginPolygon(pic, drawflag);\r
 673                                 v = centre;                     t = '0.5 0.5 0';\r
 674                                 R_PolygonVertex(v, t, rgb, a);\r
 675 \r
 676                                 v = centre;                     t = '0.5 0.5 0';\r
 677                                 v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
 678                                 R_PolygonVertex(v, t, rgb, a);\r
 679                 }\r
 680         }\r
 681         else if(f > 0.25)\r
 682         {\r
 683                 // draw first triangle\r
 684                 R_BeginPolygon(pic, drawflag);\r
 685                         v = centre;                     t = '0.5 0.5 0';\r
 686                         R_PolygonVertex(v, t, rgb, a);\r
 687 \r
 688                         v = centre;                     t = '0.5 0.5 0';\r
 689                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
 690                         R_PolygonVertex(v, t, rgb, a);\r
 691 \r
 692                         v = centre;                     t = '0.5 0.5 0';\r
 693                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
 694                         R_PolygonVertex(v, t, rgb, a);\r
 695 \r
 696                 d = q - 0.25;\r
 697                 if(d <= 0)\r
 698                         R_EndPolygon();\r
 699         }\r
 700         else\r
 701         {\r
 702                 d = q;\r
 703                 if(d > 0)\r
 704                 {\r
 705                         R_BeginPolygon(pic, drawflag);\r
 706                                 v = centre;                     t = '0.5 0.5 0';\r
 707                                 R_PolygonVertex(v, t, rgb, a);\r
 708 \r
 709                                 v = centre;                     t = '0.5 0.5 0';\r
 710                                 v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
 711                                 R_PolygonVertex(v, t, rgb, a);\r
 712                 }\r
 713         }\r
 714 \r
 715         if(d > 0)\r
 716         {\r
 717                         v = centre;                     t = '0.5 0.5 0';\r
 718                         v_x += x * 0.5 * ringsize_x;    t += x * '0.5 0.5 0';\r
 719                         v_y += y * 0.5 * ringsize_y;    t += y * '0.5 -0.5 0';\r
 720                         R_PolygonVertex(v, t, rgb, a);\r
 721                 R_EndPolygon();\r
 722         }\r
 723 }\r
 724 \r
 725 const vector GETPLAYERORIGIN_ERROR = '1123581321 2357111317 3141592653'; // way out of bounds for anything on the map\r
 726 vector getplayerorigin(float pl)\r
 727 {\r
 728         string s;\r
 729         entity e;\r
 730 \r
 731         s = getplayerkey(pl, "TEMPHACK_origin");\r
 732         if(s != "")\r
 733                 return stov(s);\r
 734 \r
 735         e = entcs_receiver[pl];\r
 736         if(e)\r
 737                 return e.origin;\r
 738 \r
 739         return GETPLAYERORIGIN_ERROR;\r
 740 }\r