]> git.xonotic.org Git - voretournament/voretournament.git/blob - data/qcsrc/client/miscfunctions.qc
Speed helper
[voretournament/voretournament.git] / 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         precache_sound (strcat("helper/", cvar_string("cl_helper_voice"), "/ammo_low.wav"));\r
187         precache_sound (strcat("helper/", cvar_string("cl_helper_voice"), "/speed_fast.wav"));\r
188 }\r
189 \r
190 void AuditLists()\r
191 {\r
192         entity e;\r
193         entity prev;\r
194 \r
195         prev = players;\r
196         for(e = prev.sort_next; e; prev = e, e = e.sort_next)\r
197         {\r
198                 if(prev != e.sort_prev)\r
199                         error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));\r
200         }\r
201 \r
202         prev = teams;\r
203         for(e = prev.sort_next; e; prev = e, e = e.sort_next)\r
204         {\r
205                 if(prev != e.sort_prev)\r
206                         error(strcat("sort list chain error\nplease submit the output of 'prvm_edicts client' to the developers"));\r
207         }\r
208 }\r
209 \r
210 \r
211 float RegisterPlayer(entity player)\r
212 {\r
213         entity pl;\r
214         AuditLists();\r
215         for(pl = players.sort_next; pl; pl = pl.sort_next)\r
216                 if(pl == player)\r
217                         error("Player already registered!");\r
218         player.sort_next = players.sort_next;\r
219         player.sort_prev = players;\r
220         if(players.sort_next)\r
221                 players.sort_next.sort_prev = player;\r
222         players.sort_next = player;\r
223         AuditLists();\r
224         return true;\r
225 }\r
226 \r
227 void RemovePlayer(entity player)\r
228 {\r
229         entity pl, parent;\r
230         AuditLists();\r
231         parent = players;\r
232         for(pl = players.sort_next; pl && pl != player; pl = pl.sort_next)\r
233                 parent = pl;\r
234 \r
235         if(!pl)\r
236         {\r
237                 error("Trying to remove a player which is not in the playerlist!");\r
238                 return;\r
239         }\r
240         parent.sort_next = player.sort_next;\r
241         if(player.sort_next)\r
242                 player.sort_next.sort_prev = parent;\r
243         AuditLists();\r
244 }\r
245 \r
246 void MoveToLast(entity e)\r
247 {\r
248         AuditLists();\r
249         other = e.sort_next;\r
250         while(other)\r
251         {\r
252                 SORT_SWAP(other, e);\r
253                 other = e.sort_next;\r
254         }\r
255         AuditLists();\r
256 }\r
257 \r
258 float RegisterTeam(entity Team)\r
259 {\r
260         entity tm;\r
261         AuditLists();\r
262         for(tm = teams.sort_next; tm; tm = tm.sort_next)\r
263                 if(tm == Team)\r
264                         error("Team already registered!");\r
265         Team.sort_next = teams.sort_next;\r
266         Team.sort_prev = teams;\r
267         if(teams.sort_next)\r
268                 teams.sort_next.sort_prev = Team;\r
269         teams.sort_next = Team;\r
270         AuditLists();\r
271         return true;\r
272 }\r
273 \r
274 void RemoveTeam(entity Team)\r
275 {\r
276         entity tm, parent;\r
277         AuditLists();\r
278         parent = teams;\r
279         for(tm = teams.sort_next; tm && tm != Team; tm = tm.sort_next)\r
280                 parent = tm;\r
281 \r
282         if(!tm)\r
283         {\r
284                 print("Trying to remove a team which is not in the teamlist!");\r
285                 return;\r
286         }\r
287         parent.sort_next = Team.sort_next;\r
288         if(Team.sort_next)\r
289                 Team.sort_next.sort_prev = parent;\r
290         AuditLists();\r
291 }\r
292 \r
293 entity GetTeam(float Team, float add)\r
294 {\r
295         float num;\r
296         entity tm;\r
297         num = (Team == COLOR_SPECTATOR) ? 16 : Team;\r
298         if(teamslots[num])\r
299                 return teamslots[num];\r
300         if not(add)\r
301                 return NULL;\r
302         tm = spawn();\r
303         tm.team = Team;\r
304         teamslots[num] = tm;\r
305         RegisterTeam(tm);\r
306         return tm;\r
307 }\r
308 \r
309 void CSQC_CheckEngine()\r
310 {\r
311         sbar_font = FONT_USER+1;\r
312         sbar_bigfont = FONT_USER+2;\r
313 }\r
314 \r
315 vector Sbar_GetFontsize(string cvarname)\r
316 {\r
317         vector v;\r
318         v = stov(cvar_string(cvarname));\r
319         if(v_x == 0)\r
320                 v = '8 8 0';\r
321         if(v_y == 0)\r
322                 v_y = v_x;\r
323         v_z = 0;\r
324         return v;\r
325 }\r
326 \r
327 float Sbar_GetWidth(float teamcolumnwidth)\r
328 {\r
329         float f;\r
330         f = cvar("sbar_width");\r
331         if(f == 0)\r
332                 f = 640;\r
333         if(f < 320)\r
334                 f = 320;\r
335         if(f > vid_conwidth - 2 * teamcolumnwidth)\r
336                 f = vid_conwidth - 2 * teamcolumnwidth;\r
337         return f;\r
338 }\r
339 \r
340 float PreviewExists(string name)\r
341 {\r
342         float f;\r
343         string file;\r
344 \r
345         if(cvar("cl_readpicture_force"))\r
346                 return false;\r
347 \r
348         file = strcat(name, ".tga");\r
349         f = fopen(file, FILE_READ);\r
350         if(f >= 0)\r
351         {\r
352                 fclose(f);\r
353                 return true;\r
354         }\r
355         file = strcat(name, ".png");\r
356         f = fopen(file, FILE_READ);\r
357         if(f >= 0)\r
358         {\r
359                 fclose(f);\r
360                 return true;\r
361         }\r
362         file = strcat(name, ".jpg");\r
363         f = fopen(file, FILE_READ);\r
364         if(f >= 0)\r
365         {\r
366                 fclose(f);\r
367                 return true;\r
368         }\r
369         file = strcat(name, ".pcx");\r
370         f = fopen(file, FILE_READ);\r
371         if(f >= 0)\r
372         {\r
373                 fclose(f);\r
374                 return true;\r
375         }\r
376         return false;\r
377 }\r
378 \r
379 vector rotate(vector v, float a)\r
380 {\r
381         vector w;\r
382         // FTEQCC SUCKS AGAIN\r
383         w_x =      v_x * cos(a) + v_y * sin(a);\r
384         w_y = -1 * v_x * sin(a) + v_y * cos(a);\r
385         return w;\r
386 }\r
387 \r
388 float ColorTranslateMode;\r
389 \r
390 string ColorTranslateRGB(string s)\r
391 {\r
392         if(ColorTranslateMode & 1)\r
393                 return strdecolorize(s);\r
394         else\r
395                 return s;\r
396 }\r
397 \r
398 string Team_ColorCode(float teamid)\r
399 {\r
400     if (teamid == COLOR_TEAM1)\r
401         return "^1";\r
402     else if (teamid == COLOR_TEAM2)\r
403         return "^4";\r
404     else if (teamid == COLOR_TEAM3)\r
405         return "^3";\r
406     else if (teamid == COLOR_TEAM4)\r
407         return "^6";\r
408     else\r
409         return "^7";\r
410 }\r
411 \r
412 // decolorizes and team colors the player name when needed\r
413 string playername(string thename, float teamid)\r
414 {\r
415     string t;\r
416     if (teamplay)\r
417     {\r
418         t = Team_ColorCode(teamid);\r
419         return strcat(t, strdecolorize(thename));\r
420     }\r
421     else\r
422         return strdecolorize(thename);\r
423 }\r
424 \r
425 float cvar_or(string cv, float v)\r
426 {\r
427         string s;\r
428         s = cvar_string(cv);\r
429         if(s == "")\r
430                 return v;\r
431         else\r
432                 return stof(s);\r
433 }\r
434 \r
435 vector project_3d_to_2d(vector vec)\r
436 {\r
437         vec = cs_project(vec);\r
438         if(cs_project_is_b0rked > 0)\r
439         {\r
440                 vec_x *= vid_conwidth / vid_width;\r
441                 vec_y *= vid_conheight / vid_height;\r
442         }\r
443         return vec;\r
444 }\r
445 \r
446 void dummyfunction(float a1, float a2, float a3, float a4, float a5, float a6, float a7, float a8)\r
447 {\r
448 }\r
449 \r
450 float expandingbox_sizefactor_from_fadelerp(float fadelerp)\r
451 {\r
452         return 1.2 / (1.2 - fadelerp);\r
453 }\r
454 \r
455 vector expandingbox_resize_centered_box_offset(float sz, vector boxsize, float boxxsizefactor)\r
456 {\r
457         boxsize_x *= boxxsizefactor; // easier interface for text\r
458         return boxsize * (0.5 * (1 - sz));\r
459 }\r
460 \r
461 void drawborderlines(float thickness, vector pos, vector dim, vector color, float alpha, float drawflag)\r
462 {\r
463         vector line_dim;\r
464 \r
465         // left and right lines\r
466         pos_x -= thickness;\r
467         line_dim_x = thickness;\r
468         line_dim_y = dim_y;\r
469         drawfill(pos, line_dim, color, alpha, drawflag);\r
470         drawfill(pos + (dim_x + thickness) * '1 0 0', line_dim, color, alpha, drawflag);\r
471 \r
472         // upper and lower lines\r
473         pos_y -= thickness;\r
474         line_dim_x = dim_x + thickness * 2; // make upper and lower lines longer\r
475         line_dim_y = thickness;\r
476         drawfill(pos, line_dim, color, alpha, drawflag);\r
477         drawfill(pos + (dim_y + thickness) * '0 1 0', line_dim, color, alpha, drawflag);\r
478 }\r
479 \r
480 void drawpic_tiled(vector pos, string pic, vector sz, vector area, vector color, float alpha, float drawflag)\r
481 {\r
482         vector current_pos, end_pos, new_size, ratio;\r
483         end_pos = pos + area;\r
484 \r
485         current_pos_y = pos_y;\r
486         while (current_pos_y < end_pos_y)\r
487         {\r
488                 current_pos_x = pos_x;\r
489                 while (current_pos_x < end_pos_x)\r
490                 {\r
491                         new_size_x = min(sz_x, end_pos_x - current_pos_x);\r
492                         new_size_y = min(sz_y, end_pos_y - current_pos_y);\r
493                         ratio_x = new_size_x / sz_x;\r
494                         ratio_y = new_size_y / sz_y;\r
495                         drawsubpic(current_pos, new_size, pic, '0 0 0', ratio, color, alpha, drawflag);\r
496                         current_pos_x += sz_x;\r
497                 }\r
498                 current_pos_y += sz_y;\r
499         }\r
500 }\r
501 \r
502 void drawpic_expanding(vector position, string pic, vector scale, vector rgb, float alpha, float flag, float fadelerp)\r
503 {\r
504         float sz;\r
505         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);\r
506 \r
507         drawpic(position + expandingbox_resize_centered_box_offset(sz, scale, 1), pic, scale * sz, rgb, alpha * (1 - fadelerp), flag);\r
508 }\r
509 \r
510 void drawpic_expanding_two(vector position, string pic, vector scale, vector rgb, float alpha, float flag, float fadelerp)\r
511 {\r
512         drawpic_expanding(position, pic, scale, rgb, alpha, flag, fadelerp);\r
513         drawpic(position, pic, scale, rgb, alpha * fadelerp, flag);\r
514 }\r
515 \r
516 vector drawfontscale;\r
517 void drawstring_expanding(vector position, string text, vector scale, vector rgb, float alpha, float flag, float fadelerp)\r
518 {\r
519         float sz;\r
520         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);\r
521 \r
522         if(cvar("menu_font_size_snapping_fix"))\r
523                 drawfontscale = sz * '1 1 0';\r
524         else\r
525                 drawfontscale = '1 1 0';\r
526         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);\r
527         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
528         // width parameter:\r
529         //    (scale_x * sz / drawfontscale_x) * drawfontscale_x * SIZE1 / (scale_x * sz)\r
530         //    SIZE1\r
531 \r
532         if(cvar("menu_font_size_snapping_fix"))\r
533                 drawfontscale = '1 1 0';\r
534 }\r
535 \r
536 void drawcolorcodedstring_expanding(vector position, string text, vector scale, float alpha, float flag, float fadelerp)\r
537 {\r
538         float sz;\r
539         sz = expandingbox_sizefactor_from_fadelerp(fadelerp);\r
540 \r
541         if(cvar("menu_font_size_snapping_fix"))\r
542                 drawfontscale = sz * '1 1 0';\r
543         else\r
544                 drawfontscale = '1 1 0';\r
545         dummyfunction(0, 0, 0, 0, 0, 0, 0, 0);\r
546         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
547 \r
548         if(cvar("menu_font_size_snapping_fix"))\r
549                 drawfontscale = '1 1 0';\r
550 }\r
551 \r
552 // this draws the triangles of a model DIRECTLY. Don't expect high performance, really...\r
553 void PolyDrawModel(entity e)\r
554 {\r
555         float i_s, i_t;\r
556         float n_t;\r
557         vector tri;\r
558         string tex;\r
559         for(i_s = 0; ; ++i_s)\r
560         {\r
561                 tex = getsurfacetexture(e, i_s);\r
562                 if not(tex)\r
563                         break; // this is beyond the last one\r
564                 n_t = getsurfacenumtriangles(e, i_s);\r
565                 for(i_t = 0; i_t < n_t; ++i_t)\r
566                 {\r
567                         tri = getsurfacetriangle(e, i_s, i_t);\r
568                         R_BeginPolygon(tex, 0);\r
569                         R_PolygonVertex(getsurfacepoint(e, i_s, tri_x), getsurfacepointattribute(e, i_s, tri_x, SPA_TEXCOORDS0), '1 1 1', 1);\r
570                         R_PolygonVertex(getsurfacepoint(e, i_s, tri_y), getsurfacepointattribute(e, i_s, tri_y, SPA_TEXCOORDS0), '1 1 1', 1);\r
571                         R_PolygonVertex(getsurfacepoint(e, i_s, tri_z), getsurfacepointattribute(e, i_s, tri_z, SPA_TEXCOORDS0), '1 1 1', 1);\r
572                         R_EndPolygon();\r
573                 }\r
574         }\r
575 }\r
576 \r
577 void DrawCircleClippedPic(vector centre, float radius, string pic, float f, vector rgb, float a, float drawflag)\r
578 {\r
579         float x, y, q, d;\r
580         vector ringsize, v, t;\r
581         ringsize = radius * '1 1 0';\r
582 \r
583         x = cos(f * 2 * M_PI);\r
584         y = sin(f * 2 * M_PI);\r
585         q = fabs(x) + fabs(y);\r
586         x /= q;\r
587         y /= q;\r
588 \r
589         if(f >= 1)\r
590         {\r
591                 // draw full rectangle\r
592                 R_BeginPolygon(pic, drawflag);\r
593                         v = centre;                     t = '0.5 0.5 0';\r
594                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
595                         R_PolygonVertex(v, t, rgb, a);\r
596 \r
597                         v = centre;                     t = '0.5 0.5 0';\r
598                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
599                         R_PolygonVertex(v, t, rgb, a);\r
600 \r
601                         v = centre;                     t = '0.5 0.5 0';\r
602                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
603                         R_PolygonVertex(v, t, rgb, a);\r
604 \r
605                         v = centre;                     t = '0.5 0.5 0';\r
606                         v_y -= 0.5 * ringsize_y;        t -= '0.5 -0.5 0';\r
607                         R_PolygonVertex(v, t, rgb, a);\r
608                 R_EndPolygon();\r
609 \r
610                 d = q - 1;\r
611                 if(d > 0)\r
612                 {\r
613                         R_BeginPolygon(pic, drawflag);\r
614                                 v = centre;                     t = '0.5 0.5 0';\r
615                                 R_PolygonVertex(v, t, rgb, a);\r
616 \r
617                                 v = centre;                     t = '0.5 0.5 0';\r
618                                 v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
619                                 R_PolygonVertex(v, t, rgb, a);\r
620                 }\r
621         }\r
622         else if(f > 0.75)\r
623         {\r
624                 // draw upper and first triangle\r
625                 R_BeginPolygon(pic, drawflag);\r
626                         v = centre;                     t = '0.5 0.5 0';\r
627                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
628                         R_PolygonVertex(v, t, rgb, a);\r
629 \r
630                         v = centre;                     t = '0.5 0.5 0';\r
631                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
632                         R_PolygonVertex(v, t, rgb, a);\r
633 \r
634                         v = centre;                     t = '0.5 0.5 0';\r
635                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
636                         R_PolygonVertex(v, t, rgb, a);\r
637                 R_EndPolygon();\r
638                 R_BeginPolygon(pic, drawflag);\r
639                         v = centre;                     t = '0.5 0.5 0';\r
640                         R_PolygonVertex(v, t, rgb, a);\r
641 \r
642                         v = centre;                     t = '0.5 0.5 0';\r
643                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
644                         R_PolygonVertex(v, t, rgb, a);\r
645 \r
646                         v = centre;                     t = '0.5 0.5 0';\r
647                         v_y -= 0.5 * ringsize_y;        t -= '0.5 -0.5 0';\r
648                         R_PolygonVertex(v, t, rgb, a);\r
649 \r
650                 d = q - 0.75;\r
651                 if(d <= 0)\r
652                         R_EndPolygon();\r
653         }\r
654         else if(f > 0.5)\r
655         {\r
656                 // draw upper triangle\r
657                 R_BeginPolygon(pic, drawflag);\r
658                         v = centre;                     t = '0.5 0.5 0';\r
659                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
660                         R_PolygonVertex(v, t, rgb, a);\r
661 \r
662                         v = centre;                     t = '0.5 0.5 0';\r
663                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
664                         R_PolygonVertex(v, t, rgb, a);\r
665 \r
666                         v = centre;                     t = '0.5 0.5 0';\r
667                         v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
668                         R_PolygonVertex(v, t, rgb, a);\r
669                 R_EndPolygon();\r
670 \r
671                 d = q - 0.5;\r
672                 if(d > 0)\r
673                 {\r
674                         R_BeginPolygon(pic, drawflag);\r
675                                 v = centre;                     t = '0.5 0.5 0';\r
676                                 R_PolygonVertex(v, t, rgb, a);\r
677 \r
678                                 v = centre;                     t = '0.5 0.5 0';\r
679                                 v_x -= 0.5 * ringsize_x;        t -= '0.5 0.5 0';\r
680                                 R_PolygonVertex(v, t, rgb, a);\r
681                 }\r
682         }\r
683         else if(f > 0.25)\r
684         {\r
685                 // draw first triangle\r
686                 R_BeginPolygon(pic, drawflag);\r
687                         v = centre;                     t = '0.5 0.5 0';\r
688                         R_PolygonVertex(v, t, rgb, a);\r
689 \r
690                         v = centre;                     t = '0.5 0.5 0';\r
691                         v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
692                         R_PolygonVertex(v, t, rgb, a);\r
693 \r
694                         v = centre;                     t = '0.5 0.5 0';\r
695                         v_y += 0.5 * ringsize_y;        t += '0.5 -0.5 0';\r
696                         R_PolygonVertex(v, t, rgb, a);\r
697 \r
698                 d = q - 0.25;\r
699                 if(d <= 0)\r
700                         R_EndPolygon();\r
701         }\r
702         else\r
703         {\r
704                 d = q;\r
705                 if(d > 0)\r
706                 {\r
707                         R_BeginPolygon(pic, drawflag);\r
708                                 v = centre;                     t = '0.5 0.5 0';\r
709                                 R_PolygonVertex(v, t, rgb, a);\r
710 \r
711                                 v = centre;                     t = '0.5 0.5 0';\r
712                                 v_x += 0.5 * ringsize_x;        t += '0.5 0.5 0';\r
713                                 R_PolygonVertex(v, t, rgb, a);\r
714                 }\r
715         }\r
716 \r
717         if(d > 0)\r
718         {\r
719                         v = centre;                     t = '0.5 0.5 0';\r
720                         v_x += x * 0.5 * ringsize_x;    t += x * '0.5 0.5 0';\r
721                         v_y += y * 0.5 * ringsize_y;    t += y * '0.5 -0.5 0';\r
722                         R_PolygonVertex(v, t, rgb, a);\r
723                 R_EndPolygon();\r
724         }\r
725 }\r
726 \r
727 const vector GETPLAYERORIGIN_ERROR = '1123581321 2357111317 3141592653'; // way out of bounds for anything on the map\r
728 vector getplayerorigin(float pl)\r
729 {\r
730         string s;\r
731         entity e;\r
732 \r
733         s = getplayerkey(pl, "TEMPHACK_origin");\r
734         if(s != "")\r
735                 return stov(s);\r
736 \r
737         e = entcs_receiver[pl];\r
738         if(e)\r
739                 return e.origin;\r
740 \r
741         return GETPLAYERORIGIN_ERROR;\r
742 }\r