1 var float(string text, float handleColors, vector fontSize) stringwidth;
12 for(e = prev.sort_next; e; prev = e, e = e.sort_next)
14 if(prev != e.sort_prev)
15 error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));
19 for(e = prev.sort_next; e; prev = e, e = e.sort_next)
21 if(prev != e.sort_prev)
22 error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));
27 float RegisterPlayer(entity player)
31 for(pl = players.sort_next; pl; pl = pl.sort_next)
33 error("Player already registered!");
34 player.sort_next = players.sort_next;
35 player.sort_prev = players;
37 players.sort_next.sort_prev = player;
38 players.sort_next = player;
43 void RemovePlayer(entity player)
48 for(pl = players.sort_next; pl && pl != player; pl = pl.sort_next)
53 error("Trying to remove a player which is not in the playerlist!");
56 parent.sort_next = player.sort_next;
58 player.sort_next.sort_prev = parent;
62 void MoveToLast(entity e)
74 float RegisterTeam(entity Team)
78 for(tm = teams.sort_next; tm; tm = tm.sort_next)
80 error("Team already registered!");
81 Team.sort_next = teams.sort_next;
82 Team.sort_prev = teams;
84 teams.sort_next.sort_prev = Team;
85 teams.sort_next = Team;
90 void RemoveTeam(entity Team)
95 for(tm = teams.sort_next; tm && tm != Team; tm = tm.sort_next)
100 print(_("Trying to remove a team which is not in the teamlist!"));
103 parent.sort_next = Team.sort_next;
105 Team.sort_next.sort_prev = parent;
109 entity GetTeam(float Team, float add)
113 num = (Team == COLOR_SPECTATOR) ? 16 : Team;
115 return teamslots[num];
125 vector HUD_GetFontsize(string cvarname)
128 v = stov(cvar_string(cvarname));
137 float PreviewExists(string name)
139 if(autocvar_cl_readpicture_force)
142 if (fexists(strcat(name, ".tga"))) return true;
143 if (fexists(strcat(name, ".png"))) return true;
144 if (fexists(strcat(name, ".jpg"))) return true;
145 if (fexists(strcat(name, ".pcx"))) return true;
150 vector rotate(vector v, float a)
153 // FTEQCC SUCKS AGAIN
154 w_x = v_x * cos(a) + v_y * sin(a);
155 w_y = -1 * v_x * sin(a) + v_y * cos(a);
159 float ColorTranslateMode;
161 string ColorTranslateRGB(string s)
163 if(ColorTranslateMode & 1)
164 return strdecolorize(s);
169 string Team_ColorCode(float teamid)
171 if (teamid == COLOR_TEAM1)
173 else if (teamid == COLOR_TEAM2)
175 else if (teamid == COLOR_TEAM3)
177 else if (teamid == COLOR_TEAM4)
183 // decolorizes and team colors the player name when needed
184 string playername(string thename, float teamid)
189 t = Team_ColorCode(teamid);
190 return strcat(t, strdecolorize(thename));
193 return strdecolorize(thename);
196 float cvar_or(string cv, float v)
206 vector project_3d_to_2d(vector vec)
208 vec = cs_project(vec);
209 if(cs_project_is_b0rked > 0)
211 vec_x *= vid_conwidth / vid_width;
212 vec_y *= vid_conheight / vid_height;
217 void dummyfunction(float a1, float a2, float a3, float a4, float a5, float a6, float a7, float a8)
221 float expandingbox_sizefactor_from_fadelerp(float fadelerp)
223 return 1.2 / (1.2 - fadelerp);
226 vector expandingbox_resize_centered_box_offset(float sz, vector boxsize, float boxxsizefactor)
228 boxsize_x *= boxxsizefactor; // easier interface for text
229 return boxsize * (0.5 * (1 - sz));
232 void drawborderlines(float thickness, vector pos, vector dim, vector color, float theAlpha, float drawflag)
236 // left and right lines
238 line_dim_x = thickness;
240 drawfill(pos, line_dim, color, theAlpha, drawflag);
241 drawfill(pos + (dim_x + thickness) * '1 0 0', line_dim, color, theAlpha, drawflag);
243 // upper and lower lines
245 line_dim_x = dim_x + thickness * 2; // make upper and lower lines longer
246 line_dim_y = thickness;
247 drawfill(pos, line_dim, color, theAlpha, drawflag);
248 drawfill(pos + (dim_y + thickness) * '0 1 0', line_dim, color, theAlpha, drawflag);
251 void drawpic_tiled(vector pos, string pic, vector sz, vector area, vector color, float theAlpha, float drawflag)
253 vector current_pos, end_pos, new_size, ratio;
254 end_pos = pos + area;
256 current_pos_y = pos_y;
257 while (current_pos_y < end_pos_y)
259 current_pos_x = pos_x;
260 while (current_pos_x < end_pos_x)
262 new_size_x = min(sz_x, end_pos_x - current_pos_x);
263 new_size_y = min(sz_y, end_pos_y - current_pos_y);
264 ratio_x = new_size_x / sz_x;
265 ratio_y = new_size_y / sz_y;
266 drawsubpic(current_pos, new_size, pic, '0 0 0', ratio, color, theAlpha, drawflag);
267 current_pos_x += sz_x;
269 current_pos_y += sz_y;
273 // drawpic wrapper to draw an image as large as possible with preserved aspect ratio into a box
274 var float _drawpic_imgaspect;
275 var vector _drawpic_imgsize;
276 var vector _drawpic_sz;
277 var float _drawpic_oldsz;
278 var string _drawpic_picpath;
279 #define drawpic_aspect(pos,pic,mySize,color,theAlpha,drawflag)\
281 _drawpic_imgsize = draw_getimagesize(pic);\
282 _drawpic_imgaspect = _drawpic_imgsize_x/_drawpic_imgsize_y;\
283 _drawpic_sz = mySize;\
284 if(_drawpic_sz_x/_drawpic_sz_y > _drawpic_imgaspect) {\
285 _drawpic_oldsz = _drawpic_sz_x;\
286 _drawpic_sz_x = _drawpic_sz_y * _drawpic_imgaspect;\
288 drawpic(pos + eX * (_drawpic_oldsz - _drawpic_sz_x) * 0.5, pic, _drawpic_sz, color, theAlpha, drawflag);\
290 _drawpic_oldsz = _drawpic_sz_y;\
291 _drawpic_sz_y = _drawpic_sz_x / _drawpic_imgaspect;\
293 drawpic(pos + eY * (_drawpic_oldsz - _drawpic_sz_y) * 0.5, pic, _drawpic_sz, color, theAlpha, drawflag);\
297 // draw HUD element with image from gfx/hud/hud_skin/foo.tga if it exists, otherwise gfx/hud/default/foo.tga
298 #define drawpic_aspect_skin(pos,pic,sz,color,theAlpha,drawflag)\
300 _drawpic_picpath = strcat(hud_skin_path, "/", pic);\
301 if(precache_pic(_drawpic_picpath) == "") {\
302 _drawpic_picpath = strcat("gfx/hud/default/", pic);\
304 drawpic_aspect(pos, _drawpic_picpath, sz, color, theAlpha, drawflag);\
305 _drawpic_picpath = string_null;\
308 // draw HUD element with image from gfx/hud/hud_skin/foo.tga if it exists, otherwise gfx/hud/default/foo.tga
309 #define drawpic_skin(pos,pic,sz,color,theAlpha,drawflag)\
311 _drawpic_picpath = strcat(hud_skin_path, "/", pic);\
312 if(precache_pic(_drawpic_picpath) == "") {\
313 _drawpic_picpath = strcat("gfx/hud/default/", pic);\
315 drawpic(pos, _drawpic_picpath, sz, color, theAlpha, drawflag);\
316 _drawpic_picpath = string_null;\
319 void drawpic_aspect_skin_expanding(vector position, string pic, vector scale, vector rgb, float theAlpha, float flag, float fadelerp)
322 sz = expandingbox_sizefactor_from_fadelerp(fadelerp);
324 drawpic_aspect_skin(position + expandingbox_resize_centered_box_offset(sz, scale, 1), pic, scale * sz, rgb, theAlpha * (1 - fadelerp), flag);
327 void drawpic_aspect_skin_expanding_two(vector position, string pic, vector scale, vector rgb, float theAlpha, float flag, float fadelerp)
329 drawpic_aspect_skin_expanding(position, pic, scale, rgb, theAlpha, flag, fadelerp);
330 drawpic_skin(position, pic, scale, rgb, theAlpha * fadelerp, flag);
332 #define SET_POS_AND_SZ_Y_ASPECT(allow_colors)\
333 float textaspect, oldsz;\
334 textaspect = stringwidth(text, allow_colors, '1 1 1' * sz_y) / sz_y;\
335 if(sz_x/sz_y > textaspect) {\
337 sz_x = sz_y * textaspect;\
338 pos_x += (oldsz - sz_x) * 0.5;\
341 sz_y = sz_x / textaspect; \
342 pos_y += (oldsz - sz_y) * 0.5;\
345 // drawstring wrapper to draw a string as large as possible with preserved aspect ratio into a box
346 void drawstring_aspect(vector pos, string text, vector sz, vector color, float theAlpha, float drawflag) {
347 SET_POS_AND_SZ_Y_ASPECT(FALSE)
348 drawstring(pos, text, '1 1 0' * sz_y, color, theAlpha, drawflag);
351 // drawstring wrapper to draw a colorcodedstring as large as possible with preserved aspect ratio into a box
352 void drawcolorcodedstring_aspect(vector pos, string text, vector sz, float theAlpha, float drawflag) {
353 SET_POS_AND_SZ_Y_ASPECT(TRUE)
354 drawcolorcodedstring(pos, text, '1 1 0' * sz_y, theAlpha, drawflag);
357 vector drawfontscale;
358 void drawstring_expanding(vector position, string text, vector scale, vector rgb, float theAlpha, float flag, float fadelerp)
361 sz = expandingbox_sizefactor_from_fadelerp(fadelerp);
363 drawfontscale = sz * '1 1 0';
364 dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);
365 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, theAlpha * (1 - fadelerp), flag);
367 // (scale_x * sz / drawfontscale_x) * drawfontscale_x * SIZE1 / (scale_x * sz)
369 drawfontscale = '1 1 0';
372 // drawstring wrapper to draw a string as large as possible with preserved aspect ratio into a box
373 void drawstring_aspect_expanding(vector pos, string text, vector sz, vector color, float theAlpha, float drawflag, float fadelerp) {
374 SET_POS_AND_SZ_Y_ASPECT(FALSE)
375 drawstring_expanding(pos, text, '1 1 0' * sz_y, color, theAlpha, drawflag, fadelerp);
378 void drawcolorcodedstring_expanding(vector position, string text, vector scale, float theAlpha, float flag, float fadelerp)
381 sz = expandingbox_sizefactor_from_fadelerp(fadelerp);
383 drawfontscale = sz * '1 1 0';
384 dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);
385 drawcolorcodedstring(position + expandingbox_resize_centered_box_offset(sz, scale, stringwidth(text, TRUE, scale * (sz / drawfontscale_x)) / (scale_x * sz)), text, scale * (sz / drawfontscale_x), theAlpha * (1 - fadelerp), flag);
386 drawfontscale = '1 1 0';
389 void drawcolorcodedstring_aspect_expanding(vector pos, string text, vector sz, float theAlpha, float drawflag, float fadelerp) {
390 SET_POS_AND_SZ_Y_ASPECT(TRUE)
391 drawcolorcodedstring_expanding(pos, text, '1 1 0' * sz_y, theAlpha, drawflag, fadelerp);
394 // this draws the triangles of a model DIRECTLY. Don't expect high performance, really...
395 float PolyDrawModelSurface(entity e, float i_s)
401 tex = getsurfacetexture(e, i_s);
403 return 0; // this is beyond the last one
404 n_t = getsurfacenumtriangles(e, i_s);
405 for(i_t = 0; i_t < n_t; ++i_t)
407 tri = getsurfacetriangle(e, i_s, i_t);
408 R_BeginPolygon(tex, 0);
409 R_PolygonVertex(getsurfacepoint(e, i_s, tri_x), getsurfacepointattribute(e, i_s, tri_x, SPA_TEXCOORDS0), '1 1 1', 1);
410 R_PolygonVertex(getsurfacepoint(e, i_s, tri_y), getsurfacepointattribute(e, i_s, tri_y, SPA_TEXCOORDS0), '1 1 1', 1);
411 R_PolygonVertex(getsurfacepoint(e, i_s, tri_z), getsurfacepointattribute(e, i_s, tri_z, SPA_TEXCOORDS0), '1 1 1', 1);
416 void PolyDrawModel(entity e)
419 for(i_s = 0; ; ++i_s)
420 if(!PolyDrawModelSurface(e, i_s))
424 void DrawCircleClippedPic(vector centre, float radius, string pic, float f, vector rgb, float a, float drawflag)
427 vector ringsize, v, t;
428 ringsize = radius * '1 1 0';
430 x = cos(f * 2 * M_PI);
431 y = sin(f * 2 * M_PI);
432 q = fabs(x) + fabs(y);
438 // draw full rectangle
439 R_BeginPolygon(pic, drawflag);
440 v = centre; t = '0.5 0.5 0';
441 v_x += 0.5 * ringsize_x; t += '0.5 0.5 0';
442 R_PolygonVertex(v, t, rgb, a);
444 v = centre; t = '0.5 0.5 0';
445 v_y += 0.5 * ringsize_y; t += '0.5 -0.5 0';
446 R_PolygonVertex(v, t, rgb, a);
448 v = centre; t = '0.5 0.5 0';
449 v_x -= 0.5 * ringsize_x; t -= '0.5 0.5 0';
450 R_PolygonVertex(v, t, rgb, a);
452 v = centre; t = '0.5 0.5 0';
453 v_y -= 0.5 * ringsize_y; t -= '0.5 -0.5 0';
454 R_PolygonVertex(v, t, rgb, a);
460 R_BeginPolygon(pic, drawflag);
461 v = centre; t = '0.5 0.5 0';
462 R_PolygonVertex(v, t, rgb, a);
464 v = centre; t = '0.5 0.5 0';
465 v_x += 0.5 * ringsize_x; t += '0.5 0.5 0';
466 R_PolygonVertex(v, t, rgb, a);
471 // draw upper and first triangle
472 R_BeginPolygon(pic, drawflag);
473 v = centre; t = '0.5 0.5 0';
474 v_x += 0.5 * ringsize_x; t += '0.5 0.5 0';
475 R_PolygonVertex(v, t, rgb, a);
477 v = centre; t = '0.5 0.5 0';
478 v_y += 0.5 * ringsize_y; t += '0.5 -0.5 0';
479 R_PolygonVertex(v, t, rgb, a);
481 v = centre; t = '0.5 0.5 0';
482 v_x -= 0.5 * ringsize_x; t -= '0.5 0.5 0';
483 R_PolygonVertex(v, t, rgb, a);
485 R_BeginPolygon(pic, drawflag);
486 v = centre; t = '0.5 0.5 0';
487 R_PolygonVertex(v, t, rgb, a);
489 v = centre; t = '0.5 0.5 0';
490 v_x -= 0.5 * ringsize_x; t -= '0.5 0.5 0';
491 R_PolygonVertex(v, t, rgb, a);
493 v = centre; t = '0.5 0.5 0';
494 v_y -= 0.5 * ringsize_y; t -= '0.5 -0.5 0';
495 R_PolygonVertex(v, t, rgb, a);
503 // draw upper triangle
504 R_BeginPolygon(pic, drawflag);
505 v = centre; t = '0.5 0.5 0';
506 v_x += 0.5 * ringsize_x; t += '0.5 0.5 0';
507 R_PolygonVertex(v, t, rgb, a);
509 v = centre; t = '0.5 0.5 0';
510 v_y += 0.5 * ringsize_y; t += '0.5 -0.5 0';
511 R_PolygonVertex(v, t, rgb, a);
513 v = centre; t = '0.5 0.5 0';
514 v_x -= 0.5 * ringsize_x; t -= '0.5 0.5 0';
515 R_PolygonVertex(v, t, rgb, a);
521 R_BeginPolygon(pic, drawflag);
522 v = centre; t = '0.5 0.5 0';
523 R_PolygonVertex(v, t, rgb, a);
525 v = centre; t = '0.5 0.5 0';
526 v_x -= 0.5 * ringsize_x; t -= '0.5 0.5 0';
527 R_PolygonVertex(v, t, rgb, a);
532 // draw first triangle
533 R_BeginPolygon(pic, drawflag);
534 v = centre; t = '0.5 0.5 0';
535 R_PolygonVertex(v, t, rgb, a);
537 v = centre; t = '0.5 0.5 0';
538 v_x += 0.5 * ringsize_x; t += '0.5 0.5 0';
539 R_PolygonVertex(v, t, rgb, a);
541 v = centre; t = '0.5 0.5 0';
542 v_y += 0.5 * ringsize_y; t += '0.5 -0.5 0';
543 R_PolygonVertex(v, t, rgb, a);
554 R_BeginPolygon(pic, drawflag);
555 v = centre; t = '0.5 0.5 0';
556 R_PolygonVertex(v, t, rgb, a);
558 v = centre; t = '0.5 0.5 0';
559 v_x += 0.5 * ringsize_x; t += '0.5 0.5 0';
560 R_PolygonVertex(v, t, rgb, a);
566 v = centre; t = '0.5 0.5 0';
567 v_x += x * 0.5 * ringsize_x; t += x * '0.5 0.5 0';
568 v_y += y * 0.5 * ringsize_y; t += y * '0.5 -0.5 0';
569 R_PolygonVertex(v, t, rgb, a);
574 const vector GETPLAYERORIGIN_ERROR = '1123581321 2357111317 3141592653'; // way out of bounds for anything on the map
575 vector getplayerorigin(float pl)
580 e = CSQCModel_server2csqc(pl + 1);
584 #ifndef NO_LEGACY_NETWORKING
585 s = getplayerkeyvalue(pl, "TEMPHACK_origin");
590 e = entcs_receiver[pl];
594 return GETPLAYERORIGIN_ERROR;
597 float getplayerisdead(float pl)
601 e = CSQCModel_server2csqc(pl + 1);
603 return e.csqcmodel_isdead;