]> git.xonotic.org Git - xonotic/xonotic-data.pk3dir.git/blob - qcsrc/client/view.qc
Make precedence explicit in expressions where || and && are mixed (patch by martin-t)
[xonotic/xonotic-data.pk3dir.git] / qcsrc / client / view.qc
1 #include "view.qh"
2
3 #include "autocvars.qh"
4 #include "miscfunctions.qh"
5 #include "announcer.qh"
6 #include "hud/_mod.qh"
7 #include "mapvoting.qh"
8 #include "shownames.qh"
9 #include "hud/panel/scoreboard.qh"
10 #include "hud/panel/quickmenu.qh"
11
12 #include <client/mutators/_mod.qh>
13
14 #include <common/animdecide.qh>
15 #include <common/deathtypes/all.qh>
16 #include <common/ent_cs.qh>
17 #include <common/anim.qh>
18 #include <common/constants.qh>
19 #include <common/net_linked.qh>
20 #include <common/net_notice.qh>
21 #include <common/debug.qh>
22 #include <common/mapinfo.qh>
23 #include <common/gamemodes/_mod.qh>
24 #include <common/physics/player.qh>
25 #include <common/stats.qh>
26 #include <common/mapobjects/target/music.qh>
27 #include <common/teams.qh>
28 #include <common/wepent.qh>
29
30 #include <common/weapons/weapon/tuba.qh>
31
32 #include <common/vehicles/all.qh>
33 #include <common/weapons/_all.qh>
34 #include <common/mutators/mutator/overkill/oknex.qh>
35 #include <common/mutators/mutator/waypoints/all.qh>
36 #include <common/viewloc.qh>
37 #include <common/mapobjects/trigger/viewloc.qh>
38 #include <common/minigames/cl_minigames.qh>
39 #include <common/minigames/cl_minigames_hud.qh>
40
41 #include <lib/csqcmodel/cl_player.qh>
42 #include <lib/csqcmodel/cl_model.qh>
43 #include "csqcmodel_hooks.qh"
44
45 #include <lib/warpzone/client.qh>
46 #include <lib/warpzone/common.qh>
47
48 #define EFMASK_CHEAP (EF_ADDITIVE | EF_DOUBLESIDED | EF_FULLBRIGHT | EF_NODEPTHTEST | EF_NODRAW | EF_NOSHADOW | EF_SELECTABLE | EF_TELEPORT_BIT)
49
50 float autocvar_cl_viewmodel_scale;
51 float autocvar_cl_viewmodel_alpha = 1;
52
53 bool autocvar_cl_bobmodel;
54 float autocvar_cl_bobmodel_speed;
55 float autocvar_cl_bobmodel_side;
56 float autocvar_cl_bobmodel_up;
57
58 float autocvar_cl_followmodel;
59 float autocvar_cl_followmodel_speed = 0.3;
60 float autocvar_cl_followmodel_limit = 135;
61 float autocvar_cl_followmodel_velocity_lowpass = 0.05;
62 float autocvar_cl_followmodel_highpass = 0.05;
63 float autocvar_cl_followmodel_lowpass = 0.03;
64 bool autocvar_cl_followmodel_velocity_absolute;
65
66 float autocvar_cl_leanmodel;
67 float autocvar_cl_leanmodel_speed = 0.3;
68 float autocvar_cl_leanmodel_limit = 30;
69 float autocvar_cl_leanmodel_highpass1 = 0.2;
70 float autocvar_cl_leanmodel_highpass = 0.2;
71 float autocvar_cl_leanmodel_lowpass = 0.05;
72
73 #define avg_factor(avg_time) (1 - exp(-frametime / max(0.001, avg_time)))
74
75 #define lowpass(value, frac, ref_store, ret) \
76         ret = ref_store = ref_store * (1 - frac) + (value) * frac;
77
78 #define lowpass_limited(value, frac, limit, ref_store, ret) MACRO_BEGIN \
79         float __ignore; lowpass(value, frac, ref_store, __ignore); \
80         ret = ref_store = bound((value) - (limit), ref_store, (value) + (limit)); \
81 MACRO_END
82
83 #define highpass(value, frac, ref_store, ret) MACRO_BEGIN \
84         float __f = 0; lowpass(value, frac, ref_store, __f); \
85         ret = (value) - __f; \
86 MACRO_END
87
88 #define highpass_limited(value, frac, limit, ref_store, ret) MACRO_BEGIN \
89         float __f = 0; lowpass_limited(value, frac, limit, ref_store, __f); \
90         ret = (value) - __f; \
91 MACRO_END
92
93 #define lowpass2(value, frac, ref_store, ref_out) MACRO_BEGIN \
94         lowpass(value.x, frac, ref_store.x, ref_out.x); \
95         lowpass(value.y, frac, ref_store.y, ref_out.y); \
96 MACRO_END
97
98 #define highpass2(value, frac, ref_store, ref_out) MACRO_BEGIN \
99         highpass(value.x, frac, ref_store.x, ref_out.x); \
100         highpass(value.y, frac, ref_store.y, ref_out.y); \
101 MACRO_END
102
103 #define highpass2_limited(value, frac, limit, ref_store, ref_out) MACRO_BEGIN \
104         highpass_limited(value.x, frac, limit, ref_store.x, ref_out.x); \
105         highpass_limited(value.y, frac, limit, ref_store.y, ref_out.y); \
106 MACRO_END
107
108 #define lowpass3(value, frac, ref_store, ref_out) MACRO_BEGIN \
109         lowpass(value.x, frac, ref_store.x, ref_out.x); \
110         lowpass(value.y, frac, ref_store.y, ref_out.y); \
111         lowpass(value.z, frac, ref_store.z, ref_out.z); \
112 MACRO_END
113
114 #define highpass3(value, frac, ref_store, ref_out) MACRO_BEGIN \
115         highpass(value.x, frac, ref_store.x, ref_out.x); \
116         highpass(value.y, frac, ref_store.y, ref_out.y); \
117         highpass(value.z, frac, ref_store.z, ref_out.z); \
118 MACRO_END
119
120 void calc_followmodel_ofs(entity view)
121 {
122         if(cl_followmodel_time == time)
123                 return; // cl_followmodel_ofs already calculated for this frame
124
125         float frac;
126         vector gunorg = '0 0 0';
127         static vector vel_average;
128         static vector gunorg_adjustment_highpass;
129         static vector gunorg_adjustment_lowpass;
130
131         vector vel;
132         if (autocvar_cl_followmodel_velocity_absolute)
133                 vel = view.velocity;
134         else
135         {
136                 vector forward, right, up;
137                 MAKE_VECTORS(view_angles, forward, right, up);
138                 vel.x = view.velocity * forward;
139                 vel.y = view.velocity * right * -1;
140                 vel.z = view.velocity * up;
141         }
142
143         vel.x = bound(vel_average.x - autocvar_cl_followmodel_limit, vel.x, vel_average.x + autocvar_cl_followmodel_limit);
144         vel.y = bound(vel_average.y - autocvar_cl_followmodel_limit, vel.y, vel_average.y + autocvar_cl_followmodel_limit);
145         vel.z = bound(vel_average.z - autocvar_cl_followmodel_limit, vel.z, vel_average.z + autocvar_cl_followmodel_limit);
146
147         frac = avg_factor(autocvar_cl_followmodel_velocity_lowpass);
148         lowpass3(vel, frac, vel_average, gunorg);
149
150         gunorg *= -autocvar_cl_followmodel_speed * 0.042;
151
152         // perform highpass/lowpass on the adjustment vectors (turning velocity into acceleration!)
153         // trick: we must do the lowpass LAST, so the lowpass vector IS the final vector!
154         frac = avg_factor(autocvar_cl_followmodel_highpass);
155         highpass3(gunorg, frac, gunorg_adjustment_highpass, gunorg);
156         frac = avg_factor(autocvar_cl_followmodel_lowpass);
157         lowpass3(gunorg, frac, gunorg_adjustment_lowpass, gunorg);
158
159         if (autocvar_cl_followmodel_velocity_absolute)
160         {
161                 vector fixed_gunorg;
162                 vector forward, right, up;
163                 MAKE_VECTORS(view_angles, forward, right, up);
164                 fixed_gunorg.x = gunorg * forward;
165                 fixed_gunorg.y = gunorg * right * -1;
166                 fixed_gunorg.z = gunorg * up;
167                 gunorg = fixed_gunorg;
168         }
169
170         cl_followmodel_ofs = gunorg;
171         cl_followmodel_time = time;
172 }
173
174 vector leanmodel_ofs(entity view)
175 {
176         float frac;
177         vector gunangles = '0 0 0';
178         static vector gunangles_prev = '0 0 0';
179         static vector gunangles_highpass = '0 0 0';
180         static vector gunangles_adjustment_highpass;
181         static vector gunangles_adjustment_lowpass;
182
183         if (view.csqcmodel_teleported)
184                 gunangles_prev = view_angles;
185
186         // in the highpass, we _store_ the DIFFERENCE to the actual view angles...
187         gunangles_highpass += gunangles_prev;
188         PITCH(gunangles_highpass) += 360 * floor((PITCH(view_angles) - PITCH(gunangles_highpass)) / 360 + 0.5);
189         YAW(gunangles_highpass) += 360 * floor((YAW(view_angles) - YAW(gunangles_highpass)) / 360 + 0.5);
190         ROLL(gunangles_highpass) += 360 * floor((ROLL(view_angles) - ROLL(gunangles_highpass)) / 360 + 0.5);
191         frac = avg_factor(autocvar_cl_leanmodel_highpass1);
192         highpass2_limited(view_angles, frac, autocvar_cl_leanmodel_limit, gunangles_highpass, gunangles);
193         gunangles_prev = view_angles;
194         gunangles_highpass -= gunangles_prev;
195
196         PITCH(gunangles) *= -autocvar_cl_leanmodel_speed;
197         YAW(gunangles) *= -autocvar_cl_leanmodel_speed;
198
199         // we assume here: PITCH = 0, YAW = 1, ROLL = 2
200         frac = avg_factor(autocvar_cl_leanmodel_highpass);
201         highpass2(gunangles, frac, gunangles_adjustment_highpass, gunangles);
202         frac = avg_factor(autocvar_cl_leanmodel_lowpass);
203         lowpass2(gunangles, frac, gunangles_adjustment_lowpass, gunangles);
204
205         gunangles.x = -gunangles.x; // pitch was inverted, now that actually matters
206
207         return gunangles;
208 }
209
210 vector bobmodel_ofs(entity view)
211 {
212         bool clonground = !(view.anim_implicit_state & ANIMIMPLICITSTATE_INAIR);
213         static bool oldonground;
214         static float hitgroundtime;
215         if (clonground)
216         {
217                 float f = time; // cl.movecmd[0].time
218                 if (!oldonground)
219                         hitgroundtime = f;
220         }
221         oldonground = clonground;
222
223         // calculate for swinging gun model
224         // the gun bobs when running on the ground, but doesn't bob when you're in the air.
225         vector gunorg = '0 0 0';
226         static float bobmodel_scale = 0;
227         static float time_ofs = 0; // makes the effect always restart in the same way
228         if (clonground)
229         {
230                 if (time - hitgroundtime > 0.05)
231                         bobmodel_scale = min(1, bobmodel_scale + frametime * 5);
232         }
233         else
234                 bobmodel_scale = max(0, bobmodel_scale - frametime * 5);
235
236         float xyspeed = bound(0, vlen(vec2(view.velocity)), 400);
237         if (bobmodel_scale && xyspeed)
238         {
239                 float bspeed = xyspeed * 0.01 * autocvar_cl_viewmodel_scale * bobmodel_scale;
240                 float s = (time - time_ofs) * autocvar_cl_bobmodel_speed;
241                 gunorg.y = bspeed * autocvar_cl_bobmodel_side * sin(s);
242                 gunorg.z = bspeed * autocvar_cl_bobmodel_up * cos(s * 2);
243         }
244         else
245                 time_ofs = time;
246
247         return gunorg;
248 }
249
250 void viewmodel_animate(entity this)
251 {
252         if (autocvar_chase_active) return;
253         if (STAT(HEALTH) <= 0) return;
254
255         entity view = CSQCModel_server2csqc(player_localentnum - 1);
256
257         if (autocvar_cl_followmodel)
258         {
259                 calc_followmodel_ofs(view);
260                 this.origin += cl_followmodel_ofs;
261         }
262
263         if (autocvar_cl_leanmodel)
264                 this.angles += leanmodel_ofs(view);
265
266         // vertical view bobbing code
267         // TODO: cl_bob
268
269         // horizontal view bobbing code
270         // TODO: cl_bob2
271
272         // fall bobbing code
273         // causes the view to swing down and back up when touching the ground
274         // TODO: cl_bobfall
275
276         // gun model bobbing code
277         if (autocvar_cl_bobmodel)
278                 this.origin += bobmodel_ofs(view);
279 }
280
281 .vector viewmodel_origin, viewmodel_angles;
282 .float weapon_nextthink;
283 .float weapon_eta_last;
284 .float weapon_switchdelay;
285
286 .string name_last;
287
288 void viewmodel_draw(entity this)
289 {
290         if(!this.activeweapon || !autocvar_r_drawviewmodel)
291                 return;
292         int mask = (intermission || (STAT(HEALTH) <= 0) || autocvar_chase_active) ? 0 : MASK_NORMAL;
293         float a = ((autocvar_cl_viewmodel_alpha) ? bound(-1, autocvar_cl_viewmodel_alpha, this.m_alpha) : this.m_alpha);
294         int wepskin = this.m_skin;
295         bool invehicle = player_localentnum > maxclients;
296         if (invehicle) a = -1;
297         Weapon wep = this.activeweapon;
298         int c = entcs_GetClientColors(current_player);
299         vector g = weaponentity_glowmod(wep, NULL, c, this);
300         entity me = CSQCModel_server2csqc(player_localentnum - 1);
301         int fx = ((me.csqcmodel_effects & EFMASK_CHEAP)
302                 | EF_NODEPTHTEST)
303                 &~ (EF_FULLBRIGHT); // can mask team color, so get rid of it
304         for (entity e = this; e; e = e.weaponchild)
305         {
306                 e.drawmask = mask;
307                 e.alpha = a;
308                 e.skin = wepskin;
309                 e.colormap = 256 + c;  // colormap == 0 is black, c == 0 is white
310                 e.glowmod = g;
311                 e.csqcmodel_effects = fx;
312                 CSQCModel_Effects_Apply(e);
313         }
314         if(a >= 0)
315         {
316                 string name = wep.mdl;
317                 string newname = wep.wr_viewmodel(wep, this);
318                 if(newname)
319                         name = newname;
320                 bool swap = name != this.name_last;
321                 // if (swap)
322                 {
323                         this.name_last = name;
324                         CL_WeaponEntity_SetModel(this, name, swap);
325                         this.viewmodel_origin = this.origin;
326                         this.viewmodel_angles = this.angles;
327                 }
328                 anim_update(this);
329                 if ((!this.animstate_override && !this.animstate_looping) || time > this.animstate_endtime)
330                         anim_set(this, this.anim_idle, true, false, false);
331         }
332         float f = 0; // 0..1; 0: fully active
333         float rate = STAT(WEAPONRATEFACTOR);
334         float eta = rate ? ((this.weapon_nextthink - time) / rate) : 0;
335         if (eta <= 0) f = this.weapon_eta_last;
336         else switch (this.state)
337         {
338                 case WS_RAISE:
339                 {
340                         f = eta / max(eta, this.weapon_switchdelay);
341                         break;
342                 }
343                 case WS_DROP:
344                 {
345                         f = 1 - eta / max(eta, this.weapon_switchdelay);
346                         break;
347                 }
348                 case WS_CLEAR:
349                 {
350                         f = 1;
351                         break;
352                 }
353         }
354         this.weapon_eta_last = f;
355         this.origin = this.viewmodel_origin;
356         this.angles = this.viewmodel_angles;
357         this.angles_x = (-90 * f * f);
358         viewmodel_animate(this);
359         MUTATOR_CALLHOOK(DrawViewModel, this);
360         setorigin(this, this.origin);
361 }
362
363 STATIC_INIT(viewmodel) {
364     for(int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
365         viewmodels[slot] = new(viewmodel);
366 }
367
368 float showfps_prevfps;
369 float showfps_prevfps_time;
370 int showfps_framecounter;
371
372 void fpscounter_update()
373 {
374         if(!STAT(SHOWFPS))
375                 return;
376
377         float currentTime = gettime(GETTIME_REALTIME);
378         showfps_framecounter += 1;
379         if(currentTime - showfps_prevfps_time > STAT(SHOWFPS))
380         {
381                 showfps_prevfps = showfps_framecounter/(currentTime - showfps_prevfps_time);
382                 showfps_framecounter = 0;
383                 showfps_prevfps_time = currentTime;
384
385                 int channel = MSG_C2S;
386                 WriteHeader(channel, fpsreport);
387                 WriteShort(channel, bound(0, rint(showfps_prevfps), 65535)); // prevent insane fps values
388         }
389 }
390
391 STATIC_INIT(fpscounter_init)
392 {
393         float currentTime = gettime(GETTIME_REALTIME);
394         showfps_prevfps_time = currentTime; // we must initialize it to avoid an instant low frame sending
395 }
396
397 float avgspeed;
398 vector GetCurrentFov(float fov)
399 {
400         float zoomsensitivity, zoomspeed, zoomfactor, zoomdir;
401         float velocityzoom, curspeed;
402         vector v;
403
404         zoomsensitivity = autocvar_cl_zoomsensitivity;
405         zoomfactor = autocvar_cl_zoomfactor;
406         if(zoomfactor < 1 || zoomfactor > 30)
407                 zoomfactor = 2.5;
408         zoomspeed = autocvar_cl_zoomspeed;
409         if (zoomspeed >= 0 && (zoomspeed < 0.5 || zoomspeed > 16))
410                 zoomspeed = 3.5;
411
412         zoomdir = button_zoom;
413
414         if(hud == HUD_NORMAL && !spectatee_status)
415         {
416                 for(int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
417                 {
418                         entity wepent = viewmodels[slot];
419                         if(wepent.switchweapon != wepent.activeweapon)
420                                 continue;
421                         Weapon wep = wepent.activeweapon;
422                         if(wep != WEP_Null && wep.wr_zoomdir)
423                         {
424                                 bool do_zoom = wep.wr_zoomdir(wep); // TODO: merge this with wr_zoom?
425                                 zoomdir += do_zoom;
426                         }
427                 }
428         }
429         if(spectatee_status > 0 || isdemo())
430         {
431                 if(spectatorbutton_zoom)
432                 {
433                         if(zoomdir)
434                                 zoomdir = 0;
435                         else
436                                 zoomdir = 1;
437                 }
438                 // fteqcc failed twice here already, don't optimize this
439         }
440
441         if(zoomdir) { zoomin_effect = 0; }
442
443         if (spectatee_status > 0 && STAT(CAMERA_SPECTATOR) == 2)
444         {
445                 current_viewzoom = 1;
446         }
447         else if (camera_active)
448         {
449                 current_viewzoom = min(1, current_viewzoom + drawframetime);
450         }
451         else if(autocvar_cl_spawnzoom && zoomin_effect)
452         {
453                 float spawnzoomfactor = bound(1, autocvar_cl_spawnzoom_factor, 30);
454
455                 current_viewzoom += (autocvar_cl_spawnzoom_speed * (spawnzoomfactor - current_viewzoom) * drawframetime);
456                 current_viewzoom = bound(1 / spawnzoomfactor, current_viewzoom, 1);
457                 if(current_viewzoom == 1) { zoomin_effect = 0; }
458         }
459         else
460         {
461                 if(zoomspeed < 0) // instant zoom
462                 {
463                         if(zoomdir)
464                                 current_viewzoom = 1 / zoomfactor;
465                         else
466                                 current_viewzoom = 1;
467                 }
468                 else
469                 {
470                         if(zoomdir)
471                                 current_viewzoom = 1 / bound(1, 1 / current_viewzoom + drawframetime * zoomspeed * (zoomfactor - 1), zoomfactor);
472                         else
473                                 current_viewzoom = bound(1 / zoomfactor, current_viewzoom + drawframetime * zoomspeed * (1 - 1 / zoomfactor), 1);
474                 }
475         }
476
477         if(almost_equals(current_viewzoom, 1))
478                 current_zoomfraction = 0;
479         else if(almost_equals(current_viewzoom, 1/zoomfactor))
480                 current_zoomfraction = 1;
481         else
482                 current_zoomfraction = (current_viewzoom - 1) / (1/zoomfactor - 1);
483
484         if(zoomsensitivity < 1)
485                 setsensitivityscale(current_viewzoom ** (1 - zoomsensitivity));
486         else
487                 setsensitivityscale(1);
488
489         if(autocvar_cl_velocityzoom_enabled && autocvar_cl_velocityzoom_type && !autocvar_cl_lockview) // _type = 0 disables velocity zoom too
490         {
491                 if (intermission || (spectatee_status > 0 && STAT(CAMERA_SPECTATOR) == 2))
492                         curspeed = 0;
493                 else
494                 {
495                         vector forward, right, up;
496                         MAKE_VECTORS(view_angles, forward, right, up);
497                         v = pmove_vel;
498                         if(csqcplayer)
499                                 v = csqcplayer.velocity;
500
501                         switch(autocvar_cl_velocityzoom_type)
502                         {
503                                 case 3: curspeed = max(0, forward * v); break;
504                                 case 2: curspeed = (forward * v); break;
505                                 case 1: default: curspeed = vlen(v); break;
506                         }
507                 }
508
509                 velocityzoom = bound(0, drawframetime / max(0.000000001, autocvar_cl_velocityzoom_time), 1); // speed at which the zoom adapts to player velocity
510                 avgspeed = avgspeed * (1 - velocityzoom) + (curspeed / autocvar_cl_velocityzoom_speed) * velocityzoom;
511                 velocityzoom = exp(float2range11(avgspeed * -autocvar_cl_velocityzoom_factor / 1) * 1);
512
513                 //print(ftos(avgspeed), " avgspeed, ", ftos(curspeed), " curspeed, ", ftos(velocityzoom), " return\n"); // for debugging
514         }
515         else
516                 velocityzoom = 1;
517
518         float frustumx, frustumy, fovx, fovy;
519         frustumy = tan(fov * M_PI / 360.0) * 0.75 * current_viewzoom * velocityzoom;
520         frustumx = frustumy * vid_width / vid_height / vid_pixelheight;
521         fovx = atan2(frustumx, 1) / M_PI * 360.0;
522         fovy = atan2(frustumy, 1) / M_PI * 360.0;
523
524         return '1 0 0' * fovx + '0 1 0' * fovy;
525 }
526
527 vector GetViewLocationFOV(float fov)
528 {
529         float frustumy = tan(fov * M_PI / 360.0) * 0.75;
530         float frustumx = frustumy * vid_width / vid_height / vid_pixelheight;
531         float fovx = atan2(frustumx, 1) / M_PI * 360.0;
532         float fovy = atan2(frustumy, 1) / M_PI * 360.0;
533         return '1 0 0' * fovx + '0 1 0' * fovy;
534 }
535
536 vector GetOrthoviewFOV(vector ov_worldmin, vector ov_worldmax, vector ov_mid, vector ov_org)
537 {
538         float fovx, fovy;
539         float width = (ov_worldmax.x - ov_worldmin.x);
540         float height = (ov_worldmax.y - ov_worldmin.y);
541         float distance_to_middle_of_world = vlen(ov_mid - ov_org);
542         fovx = atan2(width/2, distance_to_middle_of_world) / M_PI * 360.0;
543         fovy = atan2(height/2, distance_to_middle_of_world) / M_PI * 360.0;
544         return '1 0 0' * fovx + '0 1 0' * fovy;
545 }
546
547 // this function must match W_SetupShot!
548 float zoomscript_caught;
549
550 bool minigame_wasactive;
551
552 vector wcross_origin;
553 float wcross_scale_prev, wcross_alpha_prev;
554 vector wcross_color_prev;
555 float wcross_scale_goal_prev, wcross_alpha_goal_prev;
556 vector wcross_color_goal_prev;
557 float wcross_changedonetime;
558
559 string wcross_name_goal_prev, wcross_name_goal_prev_prev;
560 float wcross_resolution_goal_prev, wcross_resolution_goal_prev_prev;
561 float wcross_name_changestarttime, wcross_name_changedonetime;
562 float wcross_name_alpha_goal_prev, wcross_name_alpha_goal_prev_prev;
563
564 float wcross_ring_prev;
565
566 entity trueaim;
567 entity trueaim_rifle;
568
569 const float SHOTTYPE_HITTEAM = 1;
570 const float SHOTTYPE_HITOBSTRUCTION = 2;
571 const float SHOTTYPE_HITWORLD = 3;
572 const float SHOTTYPE_HITENEMY = 4;
573
574 void TrueAim_Init()
575 {
576         (trueaim = new_pure(trueaim)).dphitcontentsmask = DPCONTENTS_SOLID | DPCONTENTS_BODY | DPCONTENTS_CORPSE;
577         (trueaim_rifle = new_pure(trueaim_rifle)).dphitcontentsmask = DPCONTENTS_BODY | DPCONTENTS_CORPSE;
578 }
579
580 float EnemyHitCheck()
581 {
582         float t, n;
583         wcross_origin = project_3d_to_2d(trace_endpos);
584         wcross_origin.z = 0;
585         if(trace_ent)
586                 n = trace_ent.entnum;
587         else
588                 n = trace_networkentity;
589         if(n < 1)
590                 return SHOTTYPE_HITWORLD;
591         if(n > maxclients)
592                 return SHOTTYPE_HITWORLD;
593         t = entcs_GetTeam(n - 1);
594         if(teamplay)
595                 if(t == myteam)
596                         return SHOTTYPE_HITTEAM;
597         if(t == NUM_SPECTATOR)
598                 return SHOTTYPE_HITWORLD;
599         return SHOTTYPE_HITENEMY;
600 }
601
602 float TrueAimCheck(entity wepent)
603 {
604         if(wepent.activeweapon.spawnflags & WEP_FLAG_NOTRUEAIM)
605                 return SHOTTYPE_HITWORLD;
606
607         float nudge = 1; // added to traceline target and subtracted from result TOOD(divVerent): do we still need this? Doesn't the engine do this now for us?
608         vector vecs, trueaimpoint, w_shotorg;
609         vector mi, ma, dv;
610         float shottype;
611         entity ta;
612         float mv;
613
614         mi = ma = '0 0 0';
615         ta = trueaim;
616         mv = MOVE_NOMONSTERS;
617
618         switch(wepent.activeweapon) // WEAPONTODO
619         {
620                 case WEP_VORTEX:
621                 case WEP_OVERKILL_NEX:
622                 case WEP_VAPORIZER:
623                         mv = MOVE_NORMAL;
624                         break;
625                 case WEP_RIFLE:
626                         ta = trueaim_rifle;
627                         mv = MOVE_NORMAL;
628                         if(zoomscript_caught)
629                         {
630                                 tracebox(view_origin, '0 0 0', '0 0 0', view_origin + view_forward * max_shot_distance, mv, ta);
631                                 return EnemyHitCheck();
632                         }
633                         break;
634                 case WEP_DEVASTATOR: // projectile has a size!
635                         mi = '-3 -3 -3';
636                         ma = '3 3 3';
637                         break;
638                 case WEP_FIREBALL: // projectile has a size!
639                         mi = '-16 -16 -16';
640                         ma = '16 16 16';
641                         break;
642                 case WEP_SEEKER: // projectile has a size!
643                         mi = '-2 -2 -2';
644                         ma = '2 2 2';
645                         break;
646                 case WEP_ELECTRO: // projectile has a size!
647                         mi = '0 0 -3';
648                         ma = '0 0 -3';
649                         break;
650         }
651
652         vector traceorigin = entcs_receiver(player_localentnum - 1).origin + (eZ * STAT(VIEWHEIGHT));
653
654         vecs = decompressShotOrigin(STAT(SHOTORG));
655
656         traceline(traceorigin, traceorigin + view_forward * max_shot_distance, mv, ta);
657         trueaimpoint = trace_endpos;
658         // move trueaimpoint a little bit forward to make the final tracebox reliable
659         // since it sometimes doesn't reach a teammate by a hair
660         trueaimpoint += view_forward;
661
662         if(vdist((trueaimpoint - traceorigin), <, g_trueaim_minrange))
663                 trueaimpoint = traceorigin + view_forward * g_trueaim_minrange;
664
665         if(vecs.x > 0)
666                 vecs.y = -vecs.y;
667         else
668                 vecs = '0 0 0';
669
670         dv = view_right * vecs.y + view_up * vecs.z;
671         w_shotorg = traceorigin + dv;
672
673         // now move the vecs forward as much as requested if possible
674         tracebox(w_shotorg, mi, ma, w_shotorg + view_forward * (vecs.x + nudge), MOVE_NORMAL, ta); // FIXME this MOVE_NORMAL part will misbehave a little in csqc
675         w_shotorg = trace_endpos - view_forward * nudge;
676
677         tracebox(w_shotorg, mi, ma, trueaimpoint, MOVE_NORMAL, ta);
678         shottype = EnemyHitCheck();
679         if(shottype != SHOTTYPE_HITWORLD)
680                 return shottype;
681
682 #if 0
683         // FIXME WHY DOES THIS NOT WORK FOR THE ROCKET LAUNCHER?
684         // or rather, I know why, but see no fix
685         if(vlen(trace_endpos - trueaimpoint) > vlen(ma) + vlen(mi) + 1)
686                 // yes, this is an ugly hack... but it seems good enough to find out whether the test hits the same place as the initial trace
687                 return SHOTTYPE_HITOBSTRUCTION;
688 #endif
689
690         return SHOTTYPE_HITWORLD;
691 }
692
693 float camera_mode;
694 const float CAMERA_FREE = 1;
695 const float CAMERA_CHASE = 2;
696 float reticle_type;
697 string NextFrameCommand;
698
699 vector freeze_org, freeze_ang;
700 entity nightvision_noise, nightvision_noise2;
701
702 const float MAX_TIME_DIFF = 5;
703 float pickup_crosshair_time, pickup_crosshair_size;
704 float hitindication_crosshair_size;
705 float use_vortex_chargepool;
706
707 float myhealth, myhealth_prev;
708 float myhealth_flash;
709
710 float old_blurradius, old_bluralpha;
711 float old_sharpen_intensity;
712
713 vector myhealth_gentlergb;
714
715 float contentavgalpha, liquidalpha_prev;
716 vector liquidcolor_prev;
717
718 float eventchase_current_distance;
719 float eventchase_running;
720 int WantEventchase(entity this, bool want_vehiclechase)
721 {
722         if(autocvar_cl_orthoview)
723                 return 0;
724         if(STAT(GAME_STOPPED) || intermission)
725                 return 1;
726         if(this.viewloc)
727                 return 1;
728         if(spectatee_status >= 0)
729         {
730                 if(want_vehiclechase)
731                         return 1;
732                 if(MUTATOR_CALLHOOK(WantEventchase, this))
733                         return 1;
734                 if(autocvar_cl_eventchase_frozen && STAT(FROZEN))
735                         return 1;
736                 if(autocvar_cl_eventchase_death && (STAT(HEALTH) <= 0))
737                 {
738                         if(autocvar_cl_eventchase_death == 2)
739                         {
740                                 // don't stop eventchase once it's started (even if velocity changes afterwards)
741                                 if(this.velocity == '0 0 0' || eventchase_running)
742                                         return 1;
743                         }
744                         else return 1;
745                 }
746                 if (spectatee_status > 0 && autocvar_cl_eventchase_spectated_change)
747                 {
748                         if (time <= spectatee_status_changed_time + min(3, autocvar_cl_eventchase_spectated_change_time))
749                                 return 1;
750                         else if (eventchase_running)
751                                 return -1; // disable chase_active while eventchase is still enabled so to avoid a glicth
752                 }
753         }
754         return 0;
755 }
756
757 void View_EventChase(entity this)
758 {
759         // event chase camera
760         if(autocvar_chase_active <= 0) // greater than 0 means it's enabled manually, and this code is skipped
761         {
762                 if(STAT(CAMERA_SPECTATOR))
763                 {
764                         if(spectatee_status > 0)
765                         {
766                                 if(!autocvar_chase_active)
767                                 {
768                                         cvar_set("chase_active", "-2");
769                                         return;
770                                 }
771                         }
772                         else if(autocvar_chase_active == -2)
773                                 cvar_set("chase_active", "0");
774
775                         if(autocvar_chase_active == -2)
776                                 return;
777                 }
778                 else if(autocvar_chase_active == -2)
779                         cvar_set("chase_active", "0");
780
781                 bool vehicle_chase = (hud != HUD_NORMAL && (autocvar_cl_eventchase_vehicle || spectatee_status > 0));
782
783                 float vehicle_viewdist = 0;
784                 vector vehicle_viewofs = '0 0 0';
785
786                 if(vehicle_chase)
787                 {
788                         if(hud != HUD_BUMBLEBEE_GUN)
789                         {
790                                 Vehicle info = REGISTRY_GET(Vehicles, hud);
791                                 vehicle_viewdist = info.height;
792                                 vehicle_viewofs = info.view_ofs;
793                                 if(vehicle_viewdist < 0) // when set below 0, this vehicle doesn't use third person view (gunner slots)
794                                         vehicle_chase = false;
795                         }
796                         else
797                                 vehicle_chase = false;
798                 }
799
800                 int eventchase = WantEventchase(this, vehicle_chase);
801                 if (eventchase)
802                 {
803                         vector current_view_origin_override = '0 0 0';
804                         vector view_offset_override = '0 0 0';
805                         float chase_distance_override = 0;
806                         bool custom_eventchase = MUTATOR_CALLHOOK(CustomizeEventchase, this);
807                         if(custom_eventchase)
808                         {
809                                 current_view_origin_override = M_ARGV(0, vector);
810                                 view_offset_override = M_ARGV(1, vector);
811                                 chase_distance_override = M_ARGV(0, float);
812                         }
813                         eventchase_running = true;
814
815                         // make special vector since we can't use view_origin (It is one frame old as of this code, it gets set later with the results this code makes.)
816                         vector current_view_origin = (csqcplayer ? csqcplayer.origin : pmove_org);
817                         if (custom_eventchase)
818                                 current_view_origin = current_view_origin_override;
819
820                         // detect maximum viewoffset and use it
821                         vector view_offset = autocvar_cl_eventchase_viewoffset;
822                         if(vehicle_chase)
823                         {
824                                 if(vehicle_viewofs)
825                                         view_offset = vehicle_viewofs;
826                                 else
827                                         view_offset = autocvar_cl_eventchase_vehicle_viewoffset;
828                         }
829                         if (custom_eventchase)
830                                 view_offset = view_offset_override;
831
832                         if(view_offset)
833                         {
834                                 WarpZone_TraceLine(current_view_origin, current_view_origin + view_offset + ('0 0 1' * autocvar_cl_eventchase_maxs.z), MOVE_WORLDONLY, this);
835                                 if(trace_fraction == 1) { current_view_origin += view_offset; }
836                                 else { current_view_origin.z += max(0, (trace_endpos.z - current_view_origin.z) - autocvar_cl_eventchase_maxs.z); }
837                         }
838
839                         // We must enable chase_active to get a third person view (weapon viewmodel hidden and own player model showing).
840                         // Ideally, there should be another way to enable third person cameras, such as through setproperty()
841                         // -1 enables chase_active while marking it as set by this code, and not by the user (which would be 1)
842                         if(!autocvar_chase_active) { cvar_set("chase_active", "-1"); }
843
844                         // make the camera smooth back
845                         float chase_distance = autocvar_cl_eventchase_distance;
846                         if(vehicle_chase)
847                         {
848                                 if(vehicle_viewofs)
849                                         chase_distance = vehicle_viewdist;
850                                 else
851                                         chase_distance = autocvar_cl_eventchase_vehicle_distance;
852                         }
853                         if (custom_eventchase)
854                                 chase_distance = chase_distance_override;
855
856                         if(autocvar_cl_eventchase_speed && eventchase_current_distance < chase_distance)
857                                 eventchase_current_distance += autocvar_cl_eventchase_speed * (chase_distance - eventchase_current_distance) * frametime; // slow down the further we get
858                         else if(eventchase_current_distance != chase_distance)
859                                 eventchase_current_distance = chase_distance;
860
861                         vector forward, right, up;
862                         MAKE_VECTORS(view_angles, forward, right, up);
863
864                         vector eventchase_target_origin = (current_view_origin - (forward * eventchase_current_distance));
865                         WarpZone_TraceBox(current_view_origin, autocvar_cl_eventchase_mins, autocvar_cl_eventchase_maxs, eventchase_target_origin, MOVE_WORLDONLY, this);
866
867                         // If the boxtrace fails, revert back to line tracing.
868                         if(!this.viewloc)
869                         if(trace_startsolid)
870                         {
871                                 eventchase_target_origin = (current_view_origin - (forward * eventchase_current_distance));
872                                 WarpZone_TraceLine(current_view_origin, eventchase_target_origin, MOVE_WORLDONLY, this);
873                                 setproperty(VF_ORIGIN, (trace_endpos - (forward * autocvar_cl_eventchase_mins.z)));
874                         }
875                         else { setproperty(VF_ORIGIN, trace_endpos); }
876
877                         if(!this.viewloc)
878                                 setproperty(VF_ANGLES, WarpZone_TransformVAngles(WarpZone_trace_transform, view_angles));
879                 }
880
881                 if (eventchase <= 0 && autocvar_chase_active < 0) // time to disable chase_active if it was set by this code
882                 {
883                         eventchase_running = false;
884                         cvar_set("chase_active", "0");
885                         eventchase_current_distance = 0; // start from 0 next time
886                 }
887         }
888         // workaround for camera stuck between player's legs when using chase_active 1
889         // because the engine stops updating the chase_active camera when the game ends
890         else if(intermission)
891         {
892                 cvar_settemp("chase_active", "-1");
893                 eventchase_current_distance = 0;
894         }
895 }
896
897 void HUD_Crosshair_Vehicle(entity this)
898 {
899         if(hud != HUD_BUMBLEBEE_GUN)
900         {
901                 Vehicle info = REGISTRY_GET(Vehicles, hud);
902                 info.vr_crosshair(info, this);
903         }
904 }
905
906 vector damage_blurpostprocess, content_blurpostprocess;
907
908 float unaccounted_damage = 0;
909 void UpdateDamage()
910 {
911         // accumulate damage with each stat update
912         static float damage_total_prev = 0;
913         float damage_total = STAT(DAMAGE_DEALT_TOTAL);
914         float unaccounted_damage_new = COMPARE_INCREASING(damage_total, damage_total_prev);
915         damage_total_prev = damage_total;
916
917         static float damage_dealt_time_prev = 0;
918         float damage_dealt_time = STAT(HIT_TIME);
919         if (damage_dealt_time != damage_dealt_time_prev)
920         {
921                 unaccounted_damage += unaccounted_damage_new;
922                 //LOG_TRACE("dmg total: ", ftos(unaccounted_damage), " (+", ftos(unaccounted_damage_new), ")");
923         }
924         damage_dealt_time_prev = damage_dealt_time;
925
926         // prevent hitsound when switching spectatee
927         static float spectatee_status_prev = 0;
928         if (spectatee_status != spectatee_status_prev)
929                 unaccounted_damage = 0;
930         spectatee_status_prev = spectatee_status;
931 }
932
933 void HitSound()
934 {
935         // varying sound pitch
936
937         bool have_arc = false;
938         for(int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
939         {
940                 entity wepent = viewmodels[slot];
941
942                 if(wepent.activeweapon == WEP_ARC)
943                         have_arc = true;
944         }
945
946         static float hitsound_time_prev = 0;
947         // HACK: the only way to get the arc to sound consistent with pitch shift is to ignore cl_hitsound_antispam_time
948         bool arc_hack = have_arc && autocvar_cl_hitsound >= 2;
949         if (arc_hack || COMPARE_INCREASING(time, hitsound_time_prev) > autocvar_cl_hitsound_antispam_time)
950         {
951                 if (autocvar_cl_hitsound && unaccounted_damage)
952                 {
953                         // customizable gradient function that crosses (0,a), (c,1) and asymptotically approaches b
954                         float a = autocvar_cl_hitsound_max_pitch;
955                         float b = autocvar_cl_hitsound_min_pitch;
956                         float c = autocvar_cl_hitsound_nom_damage;
957                         float d = unaccounted_damage;
958                         float pitch_shift = (b*d*(a-1) + a*c*(1-b)) / (d*(a-1) + c*(1-b));
959
960                         // if sound variation is disabled, set pitch_shift to 1
961                         if (autocvar_cl_hitsound == 1)
962                                 pitch_shift = 1;
963
964                         // if pitch shift is reversed, mirror in (max-min)/2 + min
965                         if (autocvar_cl_hitsound == 3)
966                         {
967                                 float mirror_value = (a-b)/2 + b;
968                                 pitch_shift = mirror_value + (mirror_value - pitch_shift);
969                         }
970
971                         //LOG_TRACE("dmg total (dmg): ", ftos(unaccounted_damage), " , pitch shift: ", ftos(pitch_shift));
972
973                         // todo: avoid very long and very short sounds from wave stretching using different sound files? seems unnecessary
974                         // todo: normalize sound pressure levels? seems unnecessary
975
976                         sound7(NULL, CH_INFO, SND(HIT), VOL_BASE, ATTN_NONE, pitch_shift * 100, 0);
977                 }
978                 unaccounted_damage = 0;
979                 hitsound_time_prev = time;
980         }
981
982         static float typehit_time_prev = 0;
983         float typehit_time = STAT(TYPEHIT_TIME);
984         if (COMPARE_INCREASING(typehit_time, typehit_time_prev) > autocvar_cl_hitsound_antispam_time)
985         {
986                 sound(NULL, CH_INFO, SND_TYPEHIT, VOL_BASE, ATTN_NONE);
987                 typehit_time_prev = typehit_time;
988         }
989
990         static float kill_time_prev = 0;
991         float kill_time = STAT(KILL_TIME);
992         if (COMPARE_INCREASING(kill_time, kill_time_prev) > autocvar_cl_hitsound_antispam_time)
993         {
994                 sound(NULL, CH_INFO, SND_KILL, VOL_BASE, ATTN_NONE);
995                 kill_time_prev = kill_time;
996         }
997 }
998
999 vector crosshair_getcolor(entity this, float health_stat)
1000 {
1001         static float rainbow_last_flicker;
1002         static vector rainbow_prev_color;
1003         vector wcross_color = '0 0 0';
1004         switch(autocvar_crosshair_color_special)
1005         {
1006                 case 1: // weapon color
1007                 {
1008                         if(this != WEP_Null && hud == HUD_NORMAL)
1009                         {
1010                                 wcross_color = this.wpcolor;
1011                                 break;
1012                         }
1013                         else { goto normalcolor; }
1014                 }
1015
1016                 case 2: // color based on health and armor
1017                 {
1018                         vector v = healtharmor_maxdamage(health_stat, STAT(ARMOR), armorblockpercent, DEATH_WEAPON.m_id);
1019                         float health_and_armor = floor(v.x + 1);
1020                         wcross_color = HUD_Get_Num_Color(health_and_armor, 200, false);
1021                         break;
1022                 }
1023
1024                 case 3: // rainbow/random color
1025                 {
1026                         if(time >= rainbow_last_flicker)
1027                         {
1028                                 rainbow_prev_color = randomvec() * autocvar_crosshair_color_special_rainbow_brightness;
1029                                 rainbow_last_flicker = time + autocvar_crosshair_color_special_rainbow_delay;
1030                         }
1031                         wcross_color = rainbow_prev_color;
1032                         break;
1033                 }
1034 LABEL(normalcolor)
1035                 default: { wcross_color = stov(autocvar_crosshair_color); break; }
1036         }
1037
1038         return wcross_color;
1039 }
1040
1041 void HUD_Crosshair(entity this)
1042 {
1043         // reset player's alpha here upon death since forced scoreboard prevents running the crosshair_chase code
1044         if(autocvar_chase_active > 0 && autocvar_crosshair_chase && STAT(HEALTH) <= 0 && csqcplayer)
1045                 csqcplayer.alpha = csqcplayer.m_alpha;
1046
1047         float f, i, j;
1048         vector v;
1049         if(!scoreboard_active && !camera_active && intermission != 2 && !STAT(GAME_STOPPED) && !autocvar_cl_lockview
1050                 && spectatee_status != -1 && (!csqcplayer.viewloc || (!spectatee_status && (csqcplayer.viewloc.spawnflags & VIEWLOC_FREEAIM))) && !MUTATOR_CALLHOOK(DrawCrosshair)
1051                 && !HUD_MinigameMenu_IsOpened())
1052         {
1053                 if (!autocvar_crosshair_enabled) // main toggle for crosshair rendering
1054                         return;
1055
1056                 if (spectatee_status > 0 && STAT(CAMERA_SPECTATOR) == 2)
1057                         return;
1058
1059                 if (hud != HUD_NORMAL)
1060                 {
1061                         HUD_Crosshair_Vehicle(this);
1062                         return;
1063                 }
1064
1065                 string wcross_style;
1066                 float wcross_alpha, wcross_resolution;
1067                 wcross_style = autocvar_crosshair;
1068                 if (csqcplayer.viewloc && (csqcplayer.viewloc.spawnflags & VIEWLOC_FREEAIM) && autocvar_crosshair_2d != "")
1069                         wcross_style = autocvar_crosshair_2d;
1070                 if (wcross_style == "0")
1071                         return;
1072                 wcross_resolution = autocvar_crosshair_size;
1073                 if (wcross_resolution == 0)
1074                         return;
1075                 wcross_alpha = autocvar_crosshair_alpha;
1076                 if (wcross_alpha == 0)
1077                         return;
1078
1079                 // TrueAim check
1080                 float shottype;
1081
1082                 // wcross_origin = '0.5 0 0' * vid_conwidth + '0 0.5 0' * vid_conheight;
1083                 if(csqcplayer.viewloc && (csqcplayer.viewloc.spawnflags & VIEWLOC_FREEAIM))
1084                         wcross_origin = viewloc_mousepos;
1085                 else if(autocvar_chase_active > 0 && autocvar_crosshair_chase)
1086                 {
1087                         vector player_org = ((csqcplayer) ? csqcplayer.origin + csqcplayer.view_ofs : view_origin);
1088                         if(csqcplayer && autocvar_crosshair_chase_playeralpha && autocvar_crosshair_chase_playeralpha < 1)
1089                         {
1090                                 traceline(view_origin, view_origin + max_shot_distance * view_forward, MOVE_NORMAL, NULL);
1091                                 float myalpha = (!csqcplayer.m_alpha) ? 1 : csqcplayer.m_alpha;
1092                                 if(trace_ent == csqcplayer)
1093                                         csqcplayer.alpha = min(autocvar_crosshair_chase_playeralpha, myalpha);
1094                                 else
1095                                         csqcplayer.alpha = csqcplayer.m_alpha;
1096                         }
1097                         traceline(player_org, player_org + max_shot_distance * view_forward, MOVE_WORLDONLY, NULL);
1098                         wcross_origin = project_3d_to_2d(trace_endpos);
1099                 }
1100                 else
1101                         wcross_origin = project_3d_to_2d(view_origin + max_shot_distance * view_forward);
1102                 wcross_origin.z = 0;
1103                 if(autocvar_crosshair_hittest)
1104                 {
1105                         vector wcross_oldorigin;
1106                         entity thiswep = viewmodels[0]; // TODO: unhardcode
1107                         wcross_oldorigin = wcross_origin;
1108                         shottype = TrueAimCheck(thiswep);
1109                         if(shottype == SHOTTYPE_HITWORLD)
1110                         {
1111                                 v = wcross_origin - wcross_oldorigin;
1112                                 v.x /= vid_conwidth;
1113                                 v.y /= vid_conheight;
1114                                 if(vdist(v, >, 0.01))
1115                                         shottype = SHOTTYPE_HITOBSTRUCTION;
1116                         }
1117                         if(!autocvar_crosshair_hittest_showimpact)
1118                                 wcross_origin = wcross_oldorigin;
1119                 }
1120                 else
1121                         shottype = SHOTTYPE_HITWORLD;
1122
1123                 vector wcross_color = '0 0 0', wcross_size = '0 0 0';
1124                 string wcross_name = "";
1125                 float wcross_scale, wcross_blur;
1126
1127                 entity e = WEP_Null;
1128                 if(autocvar_crosshair_per_weapon || (autocvar_crosshair_color_special == 1))
1129                 {
1130                         entity wepent = viewmodels[0]; // TODO: unhardcode
1131                         e = wepent.switchingweapon;
1132                         if(e)
1133                         {
1134                                 if(autocvar_crosshair_per_weapon)
1135                                 {
1136                                         // WEAPONTODO: access these through some general settings (with non-balance config settings)
1137                                         //wcross_resolution *= cvar(strcat("crosshair_", wcross_wep, "_size"));
1138                                         //if (wcross_resolution == 0)
1139                                                 //return;
1140
1141                                         //wcross_style = cvar_string(strcat("crosshair_", wcross_wep));
1142                                         wcross_resolution *= e.w_crosshair_size;
1143                                         wcross_name = e.w_crosshair;
1144                                 }
1145                         }
1146                 }
1147
1148                 if(wcross_name == "")
1149                         wcross_name = strcat("gfx/crosshair", wcross_style);
1150
1151                 // MAIN CROSSHAIR COLOR DECISION
1152                 wcross_color = crosshair_getcolor(e, STAT(HEALTH));
1153
1154                 if(autocvar_crosshair_effect_scalefade)
1155                 {
1156                         wcross_scale = wcross_resolution;
1157                         wcross_resolution = 1;
1158                 }
1159                 else
1160                 {
1161                         wcross_scale = 1;
1162                 }
1163
1164                 if(autocvar_crosshair_pickup)
1165                 {
1166                         float stat_pickup_time = STAT(LAST_PICKUP);
1167
1168                         if(pickup_crosshair_time < stat_pickup_time)
1169                         {
1170                                 if(time - stat_pickup_time < MAX_TIME_DIFF) // don't trigger the animation if it's too old
1171                                         pickup_crosshair_size = 1;
1172
1173                                 pickup_crosshair_time = stat_pickup_time;
1174                         }
1175
1176                         if(pickup_crosshair_size > 0)
1177                                 pickup_crosshair_size -= autocvar_crosshair_pickup_speed * frametime;
1178                         else
1179                                 pickup_crosshair_size = 0;
1180
1181                         wcross_scale += sin(pickup_crosshair_size) * autocvar_crosshair_pickup;
1182                 }
1183
1184                 // todo: make crosshair hit indication dependent on damage dealt
1185                 if(autocvar_crosshair_hitindication)
1186                 {
1187                         vector hitindication_color = ((autocvar_crosshair_color_special == 1) ? stov(autocvar_crosshair_hitindication_per_weapon_color) : stov(autocvar_crosshair_hitindication_color));
1188
1189                         if(unaccounted_damage)
1190                         {
1191                                 hitindication_crosshair_size = 1;
1192                         }
1193
1194                         if(hitindication_crosshair_size > 0)
1195                                 hitindication_crosshair_size -= autocvar_crosshair_hitindication_speed * frametime;
1196                         else
1197                                 hitindication_crosshair_size = 0;
1198
1199                         wcross_scale += sin(hitindication_crosshair_size) * autocvar_crosshair_hitindication;
1200                         wcross_color.x += sin(hitindication_crosshair_size) * hitindication_color.x;
1201                         wcross_color.y += sin(hitindication_crosshair_size) * hitindication_color.y;
1202                         wcross_color.z += sin(hitindication_crosshair_size) * hitindication_color.z;
1203                 }
1204
1205                 // no effects needed for targeting enemies, this can't possibly span all valid targets!
1206                 // just show for teammates to give a sign that they're an invalid target
1207                 //if(shottype == SHOTTYPE_HITENEMY)
1208                         //wcross_scale *= autocvar_crosshair_hittest; // is not queried if hittest is 0
1209                 if(shottype == SHOTTYPE_HITTEAM)
1210                         wcross_scale /= autocvar_crosshair_hittest; // is not queried if hittest is 0
1211
1212                 f = fabs(autocvar_crosshair_effect_time);
1213                 if(wcross_scale != wcross_scale_goal_prev || wcross_alpha != wcross_alpha_goal_prev || wcross_color != wcross_color_goal_prev)
1214                 {
1215                         wcross_changedonetime = time + f;
1216                 }
1217                 if(wcross_name != wcross_name_goal_prev || wcross_resolution != wcross_resolution_goal_prev)
1218                 {
1219                         wcross_name_changestarttime = time;
1220                         wcross_name_changedonetime = time + f;
1221                         if(wcross_name_goal_prev_prev)
1222                                 strunzone(wcross_name_goal_prev_prev);
1223                         wcross_name_goal_prev_prev = wcross_name_goal_prev;
1224                         wcross_name_goal_prev = strzone(wcross_name);
1225                         wcross_name_alpha_goal_prev_prev = wcross_name_alpha_goal_prev;
1226                         wcross_resolution_goal_prev_prev = wcross_resolution_goal_prev;
1227                         wcross_resolution_goal_prev = wcross_resolution;
1228                 }
1229
1230                 wcross_scale_goal_prev = wcross_scale;
1231                 wcross_alpha_goal_prev = wcross_alpha;
1232                 wcross_color_goal_prev = wcross_color;
1233
1234                 if(spectatee_status == 0 && (shottype == SHOTTYPE_HITTEAM || (shottype == SHOTTYPE_HITOBSTRUCTION && autocvar_crosshair_hittest_blur && !autocvar_chase_active)))
1235                 {
1236                         wcross_blur = 1;
1237                         wcross_alpha *= 0.75;
1238                 }
1239                 else
1240                         wcross_blur = 0;
1241                 // *_prev is at time-frametime
1242                 // * is at wcross_changedonetime+f
1243                 // what do we have at time?
1244                 if(time < wcross_changedonetime)
1245                 {
1246                         f = frametime / (wcross_changedonetime - time + frametime);
1247                         wcross_scale = f * wcross_scale + (1 - f) * wcross_scale_prev;
1248                         wcross_alpha = f * wcross_alpha + (1 - f) * wcross_alpha_prev;
1249                         wcross_color = f * wcross_color + (1 - f) * wcross_color_prev;
1250                 }
1251
1252                 wcross_scale_prev = wcross_scale;
1253                 wcross_alpha_prev = wcross_alpha;
1254                 wcross_color_prev = wcross_color;
1255
1256                 MUTATOR_CALLHOOK(UpdateCrosshair);
1257
1258                 wcross_scale *= 1 - autocvar__menu_alpha;
1259                 wcross_alpha *= 1 - autocvar__menu_alpha;
1260                 wcross_size = draw_getimagesize(wcross_name) * wcross_scale;
1261
1262                 if(wcross_scale >= 0.001 && wcross_alpha >= 0.001)
1263                 {
1264                         // crosshair rings for weapon stats
1265                         if (autocvar_crosshair_ring || autocvar_crosshair_ring_reload)
1266                         {
1267                                 // declarations and stats
1268                                 float ring_value = 0, ring_scale = 0, ring_alpha = 0, ring_inner_value = 0, ring_inner_alpha = 0;
1269                                 string ring_image = string_null, ring_inner_image = string_null;
1270                                 vector ring_rgb = '0 0 0', ring_inner_rgb = '0 0 0';
1271
1272                                 ring_scale = autocvar_crosshair_ring_size;
1273
1274                                 entity wepent = viewmodels[0]; // TODO: unhardcode
1275
1276                                 int weapon_clipload = wepent.clip_load;
1277                                 int weapon_clipsize = wepent.clip_size;
1278
1279                                 float arc_heat = wepent.arc_heat_percent;
1280                                 float vcharge = wepent.vortex_charge;
1281                                 float vchargepool = wepent.vortex_chargepool_ammo;
1282                                 float oknex_charge_ = wepent.oknex_charge;
1283                                 float oknex_chargepool_ = wepent.oknex_chargepool_ammo;
1284
1285                                 if(vortex_charge_movingavg == 0) // this should only happen if we have just loaded up the game
1286                                         vortex_charge_movingavg = vcharge;
1287
1288                                 // handle the values
1289                                 if (autocvar_crosshair_ring && wepent.activeweapon == WEP_VORTEX && vcharge && autocvar_crosshair_ring_vortex) // ring around crosshair representing velocity-dependent damage for the vortex
1290                                 {
1291                                         if (vchargepool || use_vortex_chargepool) {
1292                                                 use_vortex_chargepool = 1;
1293                                                 ring_inner_value = vchargepool;
1294                                         } else {
1295                                                 vortex_charge_movingavg = (1 - autocvar_crosshair_ring_vortex_currentcharge_movingavg_rate) * vortex_charge_movingavg + autocvar_crosshair_ring_vortex_currentcharge_movingavg_rate * vcharge;
1296                                                 ring_inner_value = bound(0, autocvar_crosshair_ring_vortex_currentcharge_scale * (vcharge - vortex_charge_movingavg), 1);
1297                                         }
1298
1299                                         ring_inner_alpha = autocvar_crosshair_ring_vortex_inner_alpha;
1300                                         ring_inner_rgb = vec3(autocvar_crosshair_ring_vortex_inner_color_red, autocvar_crosshair_ring_vortex_inner_color_green, autocvar_crosshair_ring_vortex_inner_color_blue);
1301                                         ring_inner_image = "gfx/crosshair_ring_inner.tga";
1302
1303                                         // draw the outer ring to show the current charge of the weapon
1304                                         ring_value = vcharge;
1305                                         ring_alpha = autocvar_crosshair_ring_vortex_alpha;
1306                                         ring_rgb = wcross_color;
1307                                         ring_image = "gfx/crosshair_ring_nexgun.tga";
1308                                 }
1309                                 else if (autocvar_crosshair_ring && (wepent.activeweapon == WEP_OVERKILL_NEX) && oknex_charge_ && autocvar_crosshair_ring_vortex)
1310                                 {
1311                                         if (oknex_chargepool_ || use_vortex_chargepool) {
1312                                                 use_vortex_chargepool = 1;
1313                                                 ring_inner_value = oknex_chargepool_;
1314                                         } else {
1315                                                 vortex_charge_movingavg = (1 - autocvar_crosshair_ring_vortex_currentcharge_movingavg_rate) * vortex_charge_movingavg + autocvar_crosshair_ring_vortex_currentcharge_movingavg_rate * oknex_charge_;
1316                                                 ring_inner_value = bound(0, autocvar_crosshair_ring_vortex_currentcharge_scale * (oknex_charge_ - vortex_charge_movingavg), 1);
1317                                         }
1318
1319                                         ring_inner_alpha = autocvar_crosshair_ring_vortex_inner_alpha;
1320                                         ring_inner_rgb = eX * autocvar_crosshair_ring_vortex_inner_color_red + eY * autocvar_crosshair_ring_vortex_inner_color_green + eZ * autocvar_crosshair_ring_vortex_inner_color_blue;
1321                                         ring_inner_image = "gfx/crosshair_ring_inner.tga";
1322
1323                                         // draw the outer ring to show the current charge of the weapon
1324                                         ring_value = oknex_charge_;
1325                                         ring_alpha = autocvar_crosshair_ring_vortex_alpha;
1326                                         ring_rgb = wcross_color;
1327                                         ring_image = "gfx/crosshair_ring_nexgun.tga";
1328                                 }
1329                                 else if (autocvar_crosshair_ring && wepent.activeweapon == WEP_MINE_LAYER && WEP_CVAR(minelayer, limit) && autocvar_crosshair_ring_minelayer)
1330                                 {
1331                                         ring_value = bound(0, wepent.minelayer_mines / WEP_CVAR(minelayer, limit), 1); // if you later need to use the count of bullets in another place, then add a float for it. For now, no need to.
1332                                         ring_alpha = autocvar_crosshair_ring_minelayer_alpha;
1333                                         ring_rgb = wcross_color;
1334                                         ring_image = "gfx/crosshair_ring.tga";
1335                                 }
1336                                 else if (wepent.activeweapon == WEP_HAGAR && wepent.hagar_load && autocvar_crosshair_ring_hagar)
1337                                 {
1338                                         ring_value = bound(0, wepent.hagar_load / WEP_CVAR_SEC(hagar, load_max), 1);
1339                                         ring_alpha = autocvar_crosshair_ring_hagar_alpha;
1340                                         ring_rgb = wcross_color;
1341                                         ring_image = "gfx/crosshair_ring.tga";
1342                                 }
1343                                 else if(autocvar_crosshair_ring_reload && weapon_clipsize) // forces there to be only an ammo ring
1344                                 {
1345                                         ring_value = bound(0, weapon_clipload / weapon_clipsize, 1);
1346                                         ring_scale = autocvar_crosshair_ring_reload_size;
1347                                         ring_alpha = autocvar_crosshair_ring_reload_alpha;
1348                                         ring_rgb = wcross_color;
1349
1350                                         // Note: This is to stop Taoki from complaining that the image doesn't match all potential balances.
1351                                         // if a new image for another weapon is added, add the code (and its respective file/value) here
1352                                         if ((wepent.activeweapon == WEP_RIFLE) && (weapon_clipsize == 80))
1353                                                 ring_image = "gfx/crosshair_ring_rifle.tga";
1354                                         else
1355                                                 ring_image = "gfx/crosshair_ring.tga";
1356                                 }
1357                                 else if ( autocvar_crosshair_ring && autocvar_crosshair_ring_arc && arc_heat && wepent.activeweapon == WEP_ARC )
1358                                 {
1359                                         ring_value = arc_heat;
1360                                         ring_alpha = (1-arc_heat)*autocvar_crosshair_ring_arc_cold_alpha +
1361                                                 arc_heat*autocvar_crosshair_ring_arc_hot_alpha;
1362                                         ring_rgb = (1-arc_heat)*wcross_color + arc_heat*autocvar_crosshair_ring_arc_hot_color;
1363                                         ring_image = "gfx/crosshair_ring.tga";
1364                                 }
1365
1366                                 // if in weapon switch animation, fade ring out/in
1367                                 if(autocvar_crosshair_effect_time > 0)
1368                                 {
1369                                         f = (time - wcross_name_changestarttime) / autocvar_crosshair_effect_time;
1370                                         if (f >= 1)
1371                                         {
1372                                                 wcross_ring_prev = ((ring_image) ? true : false);
1373                                         }
1374
1375                                         if(wcross_ring_prev)
1376                                         {
1377                                                 if(f < 1)
1378                                                         ring_alpha *= fabs(1 - bound(0, f, 1));
1379                                         }
1380                                         else
1381                                         {
1382                                                 if(f < 1)
1383                                                         ring_alpha *= bound(0, f, 1);
1384                                         }
1385                                 }
1386
1387                                 if (autocvar_crosshair_ring_inner && ring_inner_value) // lets draw a ring inside a ring so you can ring while you ring
1388                                         DrawCircleClippedPic(wcross_origin, wcross_size.x * wcross_resolution * ring_scale, ring_inner_image, ring_inner_value, ring_inner_rgb, wcross_alpha * ring_inner_alpha, DRAWFLAG_ADDITIVE);
1389
1390                                 if (ring_value)
1391                                         DrawCircleClippedPic(wcross_origin, wcross_size.x * wcross_resolution * ring_scale, ring_image, ring_value, ring_rgb, wcross_alpha * ring_alpha, DRAWFLAG_ADDITIVE);
1392                         }
1393
1394 #define CROSSHAIR_DO_BLUR(M,sz,wcross_name,wcross_alpha) \
1395                         MACRO_BEGIN \
1396                                 vector scaled_sz = sz * wcross_size; \
1397                                 if(wcross_blur > 0) \
1398                                 { \
1399                                         for(i = -2; i <= 2; ++i) \
1400                                         for(j = -2; j <= 2; ++j) \
1401                                         M(i,j,sz,scaled_sz,wcross_name,wcross_alpha*0.04); \
1402                                 } \
1403                                 else \
1404                                 { \
1405                                         M(0,0,sz,scaled_sz,wcross_name,wcross_alpha); \
1406                                 } \
1407                         MACRO_END
1408
1409 #define CROSSHAIR_DRAW_SINGLE(i,j,sz,scaled_sz,wcross_name,wcross_alpha) \
1410                         drawpic(wcross_origin - ('0.5 0 0' * (scaled_sz.x + i * wcross_blur) + '0 0.5 0' * (scaled_sz.y + j * wcross_blur)), wcross_name, scaled_sz, wcross_color, wcross_alpha, DRAWFLAG_NORMAL)
1411
1412 #define CROSSHAIR_DRAW(sz,wcross_name,wcross_alpha) \
1413                         CROSSHAIR_DO_BLUR(CROSSHAIR_DRAW_SINGLE,sz,wcross_name,wcross_alpha)
1414
1415                         if(time < wcross_name_changedonetime && wcross_name != wcross_name_goal_prev_prev && wcross_name_goal_prev_prev)
1416                         {
1417                                 f = (wcross_name_changedonetime - time) / (wcross_name_changedonetime - wcross_name_changestarttime);
1418                                 wcross_size = draw_getimagesize(wcross_name_goal_prev_prev) * wcross_scale;
1419                                 CROSSHAIR_DRAW(wcross_resolution_goal_prev_prev, wcross_name_goal_prev_prev, wcross_alpha * f * wcross_name_alpha_goal_prev_prev);
1420                                 f = 1 - f;
1421                         }
1422                         else
1423                         {
1424                                 f = 1;
1425                         }
1426                         wcross_name_alpha_goal_prev = f;
1427
1428                         wcross_size = draw_getimagesize(wcross_name) * wcross_scale;
1429                         CROSSHAIR_DRAW(wcross_resolution, wcross_name, wcross_alpha * f);
1430
1431                         if(autocvar_crosshair_dot)
1432                         {
1433                                 vector wcross_color_old;
1434                                 wcross_color_old = wcross_color;
1435
1436                                 if((autocvar_crosshair_dot_color_custom) && (autocvar_crosshair_dot_color != "0"))
1437                                         wcross_color = stov(autocvar_crosshair_dot_color);
1438
1439                                 CROSSHAIR_DRAW(wcross_resolution * autocvar_crosshair_dot_size, "gfx/crosshairdot.tga", f * autocvar_crosshair_dot_alpha);
1440                                 // FIXME why don't we use wcross_alpha here?
1441                                 wcross_color = wcross_color_old;
1442                         }
1443                 }
1444         }
1445         else
1446         {
1447                 wcross_scale_prev = 0;
1448                 wcross_alpha_prev = 0;
1449                 wcross_scale_goal_prev = 0;
1450                 wcross_alpha_goal_prev = 0;
1451                 wcross_changedonetime = 0;
1452                 strfree(wcross_name_goal_prev);
1453                 strfree(wcross_name_goal_prev_prev);
1454                 wcross_name_changestarttime = 0;
1455                 wcross_name_changedonetime = 0;
1456                 wcross_name_alpha_goal_prev = 0;
1457                 wcross_name_alpha_goal_prev_prev = 0;
1458                 wcross_resolution_goal_prev = 0;
1459                 wcross_resolution_goal_prev_prev = 0;
1460         }
1461 }
1462
1463 const int MAX_SPECIALCOMMAND = 15;
1464 vector specialcommand_slots[MAX_SPECIALCOMMAND];
1465 vector specialcommand_colors[MAX_SPECIALCOMMAND];
1466 const float SPECIALCOMMAND_SPEED = 150;
1467 const float SPECIALCOMMAND_TURNSPEED = 2;
1468 const float SPECIALCOMMAND_SIZE = 0.025;
1469 const float SPECIALCOMMAND_CHANCE = 0.35;
1470 float sc_spawntime, sc_changetime;
1471 vector sc_color = '1 1 1';
1472 void SpecialCommand()
1473 {
1474         if(!STAT(MOVEVARS_SPECIALCOMMAND))
1475                 return;
1476
1477         if(time >= sc_changetime)
1478         {
1479                 sc_changetime = time + 1;
1480                 sc_color = randomvec() * 1.5;
1481                 sc_color.x = bound(0.2, sc_color.x, 0.75);
1482                 sc_color.y = bound(0.2, sc_color.y, 0.75);
1483                 sc_color.z = bound(0.2, sc_color.z, 0.75);
1484         }
1485         drawfill('0 0 0', vec2(vid_conwidth, vid_conheight), sc_color, autocvar_hud_colorflash_alpha * bound(0.1, sc_changetime - time, 0.3), DRAWFLAG_ADDITIVE);
1486
1487         if(!precache_pic("gfx/smile"))
1488                 return; // damn party poopers
1489
1490         for(int j = MAX_SPECIALCOMMAND - 1; j >= 0; --j)
1491         {
1492                 vector slot = specialcommand_slots[j];
1493                 if(slot.y)
1494                         slot.y += SPECIALCOMMAND_SPEED * frametime;
1495                 //if(slot.z)
1496                         //slot.z = sin(SPECIALCOMMAND_TURNSPEED * M_PI * time);
1497                 if(slot.y >= vid_conheight)
1498                         slot = '0 0 0';
1499
1500                 if(slot == '0 0 0')
1501                 {
1502                         if(random() <= SPECIALCOMMAND_CHANCE && time > sc_spawntime) // low chance to spawn!
1503                         {
1504                                 slot.x = bound(0, (random() * vid_conwidth + 1), vid_conwidth);
1505                                 slot.y = 1; // start it off 0 so we can use it
1506                                 slot.z = floor(random() * REGISTRY_MAX(Weapons));
1507                                 sc_spawntime = time + bound(0.4, random(), 0.75); // prevent spawning another one for this amount of time!
1508                                 vector newcolor = randomvec() * 2;
1509                                 newcolor.x = bound(0.4, newcolor.x, 1);
1510                                 newcolor.y = bound(0.4, newcolor.y, 1);
1511                                 newcolor.z = bound(0.4, newcolor.z, 1);
1512                                 specialcommand_colors[j] = newcolor;
1513                         }
1514                 }
1515                 else
1516                 {
1517                         vector splash_size = '0 0 0';
1518                         splash_size.x = max(vid_conwidth, vid_conheight) * SPECIALCOMMAND_SIZE;
1519                         splash_size.y = max(vid_conwidth, vid_conheight) * SPECIALCOMMAND_SIZE;
1520                         entity wep = REGISTRY_GET(Weapons, slot.z);
1521                         if(wep == WEP_Null)
1522                                 drawpic(vec2(slot), "gfx/smile", vec2(splash_size), specialcommand_colors[j], 0.95, DRAWFLAG_NORMAL);
1523                         else
1524                                 drawpic_skin(vec2(slot), wep.model2, vec2(splash_size), specialcommand_colors[j], 0.95, DRAWFLAG_NORMAL);
1525                         //drawrotpic(vec2(slot), slot.z, "gfx/smile", vec2(splash_size), vec2(splash_size) / 2, specialcommand_colors[j], 0.95, DRAWFLAG_NORMAL);
1526                 }
1527
1528                 specialcommand_slots[j] = slot;
1529         }
1530 }
1531
1532 void HUD_Draw(entity this)
1533 {
1534         // if we don't know gametype and scores yet avoid drawing the scoreboard
1535         // also in the very first frames, player state may be inconsistent so avoid drawing the hud at all
1536         // e.g. since initial player's health is 0 hud would display the hud_damage effect,
1537         // cl_deathscoreboard would show the scoreboard and so on
1538         if(!gametype)
1539                 return;
1540
1541         Hud_Dynamic_Frame();
1542
1543         if(!intermission)
1544         if (MUTATOR_CALLHOOK(HUD_Draw_overlay))
1545         {
1546                 drawfill('0 0 0', vec2(vid_conwidth, vid_conheight), M_ARGV(0, vector), autocvar_hud_colorflash_alpha * M_ARGV(1, float), DRAWFLAG_ADDITIVE);
1547         }
1548         else if(STAT(FROZEN))
1549         {
1550                 vector col = '0.25 0.90 1';
1551                 if(STAT(REVIVE_PROGRESS))
1552                         col += vec3(STAT(REVIVE_PROGRESS), -STAT(REVIVE_PROGRESS), -STAT(REVIVE_PROGRESS));
1553                 drawfill('0 0 0', vec2(vid_conwidth, vid_conheight), col, autocvar_hud_colorflash_alpha, DRAWFLAG_ADDITIVE);
1554         }
1555
1556         HUD_Scale_Enable();
1557         if(!intermission)
1558         if(STAT(NADE_TIMER) && autocvar_cl_nade_timer) // give nade top priority, as it's a matter of life and death
1559         {
1560                 vector col = '0.25 0.90 1' + vec3(STAT(NADE_TIMER), -STAT(NADE_TIMER), -STAT(NADE_TIMER));
1561                 DrawCircleClippedPic(vec2(0.5 * vid_conwidth, 0.6 * vid_conheight), 0.1 * vid_conheight, "gfx/crosshair_ring.tga", STAT(NADE_TIMER), col, autocvar_hud_colorflash_alpha, DRAWFLAG_ADDITIVE);
1562                 drawstring_aspect(eY * 0.64 * vid_conheight, ((autocvar_cl_nade_timer == 2) ? _("Nade timer") : ""), vec2(vid_conwidth, 0.025 * vid_conheight), '1 1 1', 1, DRAWFLAG_NORMAL);
1563         }
1564         else if(STAT(CAPTURE_PROGRESS))
1565         {
1566                 DrawCircleClippedPic(vec2(0.5 * vid_conwidth, 0.6 * vid_conheight), 0.1 * vid_conheight, "gfx/crosshair_ring.tga", STAT(CAPTURE_PROGRESS), '0.25 0.90 1', autocvar_hud_colorflash_alpha, DRAWFLAG_ADDITIVE);
1567                 drawstring_aspect(eY * 0.64 * vid_conheight, _("Capture progress"), vec2(vid_conwidth, 0.025 * vid_conheight), '1 1 1', 1, DRAWFLAG_NORMAL);
1568         }
1569         else if(STAT(REVIVE_PROGRESS))
1570         {
1571                 DrawCircleClippedPic(vec2(0.5 * vid_conwidth, 0.6 * vid_conheight), 0.1 * vid_conheight, "gfx/crosshair_ring.tga", STAT(REVIVE_PROGRESS), '0.25 0.90 1', autocvar_hud_colorflash_alpha, DRAWFLAG_ADDITIVE);
1572                 drawstring_aspect(eY * 0.64 * vid_conheight, _("Revival progress"), vec2(vid_conwidth, 0.025 * vid_conheight), '1 1 1', 1, DRAWFLAG_NORMAL);
1573         }
1574         HUD_Scale_Disable();
1575
1576         if(autocvar_r_letterbox == 0)
1577                 if(autocvar_viewsize < 120)
1578                 {
1579                         if(!(ISGAMETYPE(RACE) || ISGAMETYPE(CTS)))
1580                                 Accuracy_LoadLevels();
1581
1582                         HUD_Main();
1583                         HUD_Scale_Disable();
1584                 }
1585
1586         // crosshair goes VERY LAST
1587         SpecialCommand();
1588         UpdateDamage();
1589         HUD_Crosshair(this);
1590         HitSound();
1591 }
1592
1593 void ViewLocation_Mouse()
1594 {
1595         if(spectatee_status)
1596                 return; // don't draw it as spectator!
1597
1598         viewloc_mousepos += getmousepos() * autocvar_menu_mouse_speed;
1599         viewloc_mousepos.x = bound(0, viewloc_mousepos.x, vid_conwidth);
1600         viewloc_mousepos.y = bound(0, viewloc_mousepos.y, vid_conheight);
1601
1602         //float cursor_alpha = 1 - autocvar__menu_alpha;
1603         //cursor_type = CURSOR_NORMAL;
1604         //draw_cursor(viewloc_mousepos, '0.5 0.5 0', "/cursor_move", '1 1 1', cursor_alpha);
1605 }
1606
1607 void HUD_Cursor_Show()
1608 {
1609         float cursor_alpha = 1 - autocvar__menu_alpha;
1610         if(cursor_type == CURSOR_NORMAL)
1611                 draw_cursor_normal(mousepos, '1 1 1', cursor_alpha);
1612         else if(cursor_type == CURSOR_MOVE)
1613                 draw_cursor(mousepos, '0.5 0.5 0', "/cursor_move", '1 1 1', cursor_alpha);
1614         else if(cursor_type == CURSOR_RESIZE)
1615                 draw_cursor(mousepos, '0.5 0.5 0', "/cursor_resize", '1 1 1', cursor_alpha);
1616         else if(cursor_type == CURSOR_RESIZE2)
1617                 draw_cursor(mousepos, '0.5 0.5 0', "/cursor_resize2", '1 1 1', cursor_alpha);
1618 }
1619
1620 void HUD_Mouse(entity player)
1621 {
1622         if(autocvar__menu_alpha == 1)
1623                 return;
1624
1625         if(!cursor_active)
1626         {
1627                 if(player.viewloc && (player.viewloc.spawnflags & VIEWLOC_FREEAIM))
1628                         ViewLocation_Mouse(); // NOTE: doesn't use cursormode
1629                 return;
1630         }
1631
1632         if (cursor_active == -1) // starting to display the cursor
1633         {
1634                 // since HUD_Mouse is called by CSQC_UpdateView before CSQC_InputEvent,
1635                 // in the first frame mousepos is the mouse position of the last time
1636                 // the cursor was displayed, thus we ignore it to avoid a glictch
1637                 cursor_active = 1;
1638                 return;
1639         }
1640
1641         if(!autocvar_hud_cursormode)
1642                 update_mousepos();
1643
1644         cursor_type = CURSOR_NORMAL;
1645         if(autocvar__hud_configure)
1646                 HUD_Panel_Mouse();
1647         else
1648         {
1649                 if (HUD_MinigameMenu_IsOpened())
1650                         HUD_Minigame_Mouse();
1651                 if (QuickMenu_IsOpened())
1652                         QuickMenu_Mouse();
1653                 if (HUD_Radar_Clickable())
1654                         HUD_Radar_Mouse();
1655         }
1656
1657         prevMouseClicked = mouseClicked;
1658
1659         HUD_Cursor_Show();
1660 }
1661
1662 void View_NightVision()
1663 {
1664         if(!(autocvar_r_fakelight >= 2 || autocvar_r_fullbright) || (serverflags & SERVERFLAG_ALLOW_FULLBRIGHT))
1665                 return;
1666
1667         // apply night vision effect
1668         vector tc_00, tc_01, tc_10, tc_11;
1669         vector rgb = '0 0 0';
1670         float a;
1671
1672         if(!nightvision_noise)
1673         {
1674                 nightvision_noise = new(nightvision_noise);
1675         }
1676         if(!nightvision_noise2)
1677         {
1678                 nightvision_noise2 = new(nightvision_noise2);
1679         }
1680
1681         // color tint in yellow
1682         drawfill('0 0 0', autocvar_vid_conwidth * '1 0 0' + autocvar_vid_conheight * '0 1 0', '0.5 1 0.3', 1, DRAWFLAG_MODULATE);
1683
1684         // draw BG
1685         a = Noise_Pink(nightvision_noise, frametime * 1.5) * 0.05 + 0.15;
1686         rgb = '1 1 1';
1687         tc_00 = '0 0 0' + '0.2 0 0' * sin(time * 0.3) + '0 0.3 0' * cos(time * 0.7);
1688         tc_01 = '0 2.25 0' + '0.6 0 0' * cos(time * 1.2) - '0 0.3 0' * sin(time * 2.2);
1689         tc_10 = '1.5 0 0' - '0.2 0 0' * sin(time * 0.5) + '0 0.5 0' * cos(time * 1.7);
1690         //tc_11 = '1 1 0' + '0.6 0 0' * sin(time * 0.6) + '0 0.3 0' * cos(time * 0.1);
1691         tc_11 = tc_01 + tc_10 - tc_00;
1692         R_BeginPolygon("gfx/nightvision-bg.tga", DRAWFLAG_ADDITIVE, true);
1693         R_PolygonVertex('0 0 0', tc_00, rgb, a);
1694         R_PolygonVertex(autocvar_vid_conwidth * '1 0 0', tc_10, rgb, a);
1695         R_PolygonVertex(autocvar_vid_conwidth * '1 0 0' + autocvar_vid_conheight * '0 1 0', tc_11, rgb, a);
1696         R_PolygonVertex(autocvar_vid_conheight * '0 1 0', tc_01, rgb, a);
1697         R_EndPolygon();
1698
1699         // draw FG
1700         a = Noise_Pink(nightvision_noise2, frametime * 0.1) * 0.05 + 0.12;
1701         rgb = '0.3 0.6 0.4' + '0.1 0.4 0.2' * Noise_White(nightvision_noise2, frametime);
1702         tc_00 = '0 0 0' + '1 0 0' * Noise_White(nightvision_noise2, frametime) + '0 1 0' * Noise_White(nightvision_noise2, frametime);
1703         tc_01 = tc_00 + '0 3 0' * (1 + Noise_White(nightvision_noise2, frametime) * 0.2);
1704         tc_10 = tc_00 + '2 0 0' * (1 + Noise_White(nightvision_noise2, frametime) * 0.3);
1705         tc_11 = tc_01 + tc_10 - tc_00;
1706         R_BeginPolygon("gfx/nightvision-fg.tga", DRAWFLAG_ADDITIVE, true);
1707         R_PolygonVertex('0 0 0', tc_00, rgb, a);
1708         R_PolygonVertex(autocvar_vid_conwidth * '1 0 0', tc_10, rgb, a);
1709         R_PolygonVertex(autocvar_vid_conwidth * '1 0 0' + autocvar_vid_conheight * '0 1 0', tc_11, rgb, a);
1710         R_PolygonVertex(autocvar_vid_conheight * '0 1 0', tc_01, rgb, a);
1711         R_EndPolygon();
1712 }
1713
1714 void DrawReticle(entity this)
1715 {
1716         if(!autocvar_cl_reticle || MUTATOR_CALLHOOK(DrawReticle))
1717         {
1718                 reticle_type = 0;
1719                 return;
1720         }
1721
1722         float is_dead = (STAT(HEALTH) <= 0);
1723         string reticle_image = string_null;
1724         bool wep_zoomed = false;
1725         for(int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
1726         {
1727                 entity wepe = viewmodels[slot];
1728                 Weapon wep = wepe.activeweapon;
1729                 if(wep != WEP_Null && wep.wr_zoom)
1730                 {
1731                         bool do_zoom = wep.wr_zoom(wep, NULL);
1732                         if(!reticle_image && wep.w_reticle && wep.w_reticle != "")
1733                                 reticle_image = wep.w_reticle;
1734                         wep_zoomed += do_zoom;
1735                 }
1736         }
1737         // Draw the aiming reticle for weapons that use it
1738         // reticle_type is changed to the item we are zooming / aiming with, to decide which reticle to use
1739         // It must be a persisted float for fading out to work properly (you let go of the zoom button for
1740         // the view to go back to normal, so reticle_type would become 0 as we fade out)
1741         if(spectatee_status || is_dead || hud != HUD_NORMAL || this.viewloc)
1742         {
1743                 // no zoom reticle while dead
1744                 reticle_type = 0;
1745         }
1746         else if(wep_zoomed && autocvar_cl_reticle_weapon)
1747         {
1748                 if(reticle_image) { reticle_type = 2; }
1749                 else { reticle_type = 0; }
1750         }
1751         else if(button_zoom || zoomscript_caught)
1752         {
1753                 // normal zoom
1754                 reticle_type = 1;
1755         }
1756
1757         if(reticle_type)
1758         {
1759                 vector reticle_pos = '0 0 0', reticle_size = '0 0 0';
1760                 if(autocvar_cl_reticle_stretch)
1761                 {
1762                         reticle_size.x = vid_conwidth;
1763                         reticle_size.y = vid_conheight;
1764                         reticle_pos.x = 0;
1765                         reticle_pos.y = 0;
1766                 }
1767                 else
1768                 {
1769                         reticle_size.x = max(vid_conwidth, vid_conheight);
1770                         reticle_size.y = max(vid_conwidth, vid_conheight);
1771                         reticle_pos.x = (vid_conwidth - reticle_size.x) / 2;
1772                         reticle_pos.y = (vid_conheight - reticle_size.y) / 2;
1773                 }
1774
1775                 float f = (zoomscript_caught) ? 1 : current_zoomfraction;
1776
1777                 if(f)
1778                 {
1779                         switch(reticle_type)
1780                         {
1781                                 case 1: drawpic(reticle_pos, "gfx/reticle_normal", reticle_size, '1 1 1', f * autocvar_cl_reticle_normal_alpha, DRAWFLAG_NORMAL); break;
1782                                 case 2: if(reticle_image) drawpic(reticle_pos, reticle_image, reticle_size, '1 1 1', f * autocvar_cl_reticle_weapon_alpha, DRAWFLAG_NORMAL); break;
1783                         }
1784                 }
1785         }
1786 }
1787
1788 // visual overlay while in liquids
1789 // provides some effects to the postprocessing function
1790 void HUD_Contents()
1791 {
1792         if(!autocvar_hud_contents || MUTATOR_CALLHOOK(HUD_Contents))
1793                 return;
1794
1795         // improved polyblend
1796         float contentalpha_temp, incontent, liquidalpha, contentfadetime;
1797         vector liquidcolor;
1798
1799         switch(pointcontents(view_origin))
1800         {
1801                 case CONTENT_WATER:
1802                         liquidalpha = autocvar_hud_contents_water_alpha;
1803                         liquidcolor = stov(autocvar_hud_contents_water_color);
1804                         incontent = 1;
1805                         break;
1806
1807                 case CONTENT_LAVA:
1808                         liquidalpha = autocvar_hud_contents_lava_alpha;
1809                         liquidcolor = stov(autocvar_hud_contents_lava_color);
1810                         incontent = 1;
1811                         break;
1812
1813                 case CONTENT_SLIME:
1814                         liquidalpha = autocvar_hud_contents_slime_alpha;
1815                         liquidcolor = stov(autocvar_hud_contents_slime_color);
1816                         incontent = 1;
1817                         break;
1818
1819                 default:
1820                         liquidalpha = 0;
1821                         liquidcolor = '0 0 0';
1822                         incontent = 0;
1823                         break;
1824         }
1825
1826         if(incontent) // fade in/out at different speeds so you can do e.g. instant fade when entering water and slow when leaving it.
1827         { // also lets delcare previous values for blending properties, this way it isn't reset until after you have entered a different content
1828                 contentfadetime = autocvar_hud_contents_fadeintime;
1829                 liquidalpha_prev = liquidalpha;
1830                 liquidcolor_prev = liquidcolor;
1831         }
1832         else
1833                 contentfadetime = autocvar_hud_contents_fadeouttime;
1834
1835         contentalpha_temp = bound(0, drawframetime / max(0.0001, contentfadetime), 1);
1836         contentavgalpha = contentavgalpha * (1 - contentalpha_temp) + incontent * contentalpha_temp;
1837
1838         if(contentavgalpha)
1839                 drawfill('0 0 0', vec2(vid_conwidth, vid_conheight), liquidcolor_prev, contentavgalpha * liquidalpha_prev, DRAWFLAG_NORMAL);
1840
1841         if(autocvar_hud_postprocessing)
1842         {
1843                 if(autocvar_hud_contents_blur && contentavgalpha)
1844                 {
1845                         content_blurpostprocess.x = 1;
1846                         content_blurpostprocess.y = contentavgalpha * autocvar_hud_contents_blur;
1847                         content_blurpostprocess.z = contentavgalpha * autocvar_hud_contents_blur_alpha;
1848                 }
1849                 else
1850                 {
1851                         content_blurpostprocess.x = 0;
1852                         content_blurpostprocess.y = 0;
1853                         content_blurpostprocess.z = 0;
1854                 }
1855         }
1856 }
1857
1858 // visual pain effects on the screen
1859 // provides some effects to the postprocessing function
1860 void HUD_Damage()
1861 {
1862         if(!autocvar_hud_damage || STAT(FROZEN))
1863                 return;
1864
1865         vector splash_pos = '0 0 0', splash_size = '0 0 0';
1866         splash_size.x = max(vid_conwidth, vid_conheight);
1867         splash_size.y = max(vid_conwidth, vid_conheight);
1868         splash_pos.x = (vid_conwidth - splash_size.x) / 2;
1869         splash_pos.y = (vid_conheight - splash_size.y) / 2;
1870
1871         float myhealth_flash_temp;
1872         myhealth = STAT(HEALTH);
1873
1874         // fade out
1875         myhealth_flash = max(0, myhealth_flash - autocvar_hud_damage_fade_rate * frametime);
1876         // add new damage
1877         myhealth_flash = bound(0, myhealth_flash + dmg_take * autocvar_hud_damage_factor, autocvar_hud_damage_maxalpha);
1878
1879         float pain_threshold, pain_threshold_lower, pain_threshold_lower_health;
1880         pain_threshold = autocvar_hud_damage_pain_threshold;
1881         pain_threshold_lower = autocvar_hud_damage_pain_threshold_lower;
1882         pain_threshold_lower_health = autocvar_hud_damage_pain_threshold_lower_health;
1883
1884         if(pain_threshold_lower && myhealth < pain_threshold_lower_health)
1885         {
1886                 pain_threshold = pain_threshold - max(autocvar_hud_damage_pain_threshold_pulsating_min, fabs(sin(M_PI * time / autocvar_hud_damage_pain_threshold_pulsating_period))) * pain_threshold_lower * (1 - max(0, myhealth)/pain_threshold_lower_health);
1887         }
1888
1889         myhealth_flash_temp = bound(0, myhealth_flash - pain_threshold, 1);
1890
1891         if(myhealth_prev < 1)
1892         {
1893                 if(myhealth >= 1)
1894                 {
1895                         myhealth_flash = 0; // just spawned, clear the flash immediately
1896                         myhealth_flash_temp = 0;
1897                 }
1898                 else
1899                 {
1900                         myhealth_flash += autocvar_hud_damage_fade_rate * frametime; // dead
1901                 }
1902         }
1903
1904         if(spectatee_status == -1 || intermission)
1905         {
1906                 myhealth_flash = 0; // observing, or match ended
1907                 myhealth_flash_temp = 0;
1908         }
1909
1910         myhealth_prev = myhealth;
1911
1912         // IDEA: change damage color/picture based on player model for robot/alien species?
1913         // pro: matches model better
1914         // contra: it's not red because blood is red, but because red is an alarming color, so red should stay
1915         // maybe different reddish pics?
1916         if(autocvar_cl_gentle_damage || autocvar_cl_gentle)
1917         {
1918                 if(autocvar_cl_gentle_damage == 2)
1919                 {
1920                         if(myhealth_flash < pain_threshold) // only randomize when the flash is gone
1921                                 myhealth_gentlergb = randomvec();
1922                 }
1923                 else
1924                         myhealth_gentlergb = stov(autocvar_hud_damage_gentle_color);
1925
1926                 if(myhealth_flash_temp > 0)
1927                         drawfill('0 0 0', vec2(vid_conwidth, vid_conheight), myhealth_gentlergb, autocvar_hud_damage_gentle_alpha_multiplier * bound(0, myhealth_flash_temp, 1) * autocvar_hud_damage, DRAWFLAG_NORMAL);
1928         }
1929         else if(myhealth_flash_temp > 0)
1930                 drawpic(splash_pos, "gfx/blood", splash_size, stov(autocvar_hud_damage_color), bound(0, myhealth_flash_temp, 1) * autocvar_hud_damage, DRAWFLAG_NORMAL);
1931
1932         if(autocvar_hud_postprocessing) // we still need to set this anyway even when chase_active is set, this way it doesn't get stuck on.
1933         {
1934                 if(autocvar_hud_damage_blur && myhealth_flash_temp)
1935                 {
1936                         damage_blurpostprocess.x = 1;
1937                         damage_blurpostprocess.y = bound(0, myhealth_flash_temp, 1) * autocvar_hud_damage_blur;
1938                         damage_blurpostprocess.z = bound(0, myhealth_flash_temp, 1) * autocvar_hud_damage_blur_alpha;
1939                 }
1940                 else
1941                 {
1942                         damage_blurpostprocess.x = 0;
1943                         damage_blurpostprocess.y = 0;
1944                         damage_blurpostprocess.z = 0;
1945                 }
1946         }
1947 }
1948
1949 void View_PostProcessing()
1950 {
1951         float e1 = (autocvar_hud_postprocessing_maxbluralpha != 0);
1952         float e2 = (autocvar_hud_powerup != 0);
1953         if(autocvar_hud_postprocessing && (e1 || e2)) // TODO: Remove this code and re-do the postprocess handling in the engine, where it properly belongs.
1954         {
1955                 // enable or disable rendering types if they are used or not
1956                 if(cvar("r_glsl_postprocess_uservec1_enable") != e1) { cvar_set("r_glsl_postprocess_uservec1_enable", ftos(e1)); }
1957                 if(cvar("r_glsl_postprocess_uservec2_enable") != e2) { cvar_set("r_glsl_postprocess_uservec2_enable", ftos(e2)); }
1958
1959                 // blur postprocess handling done first (used by hud_damage and hud_contents)
1960                 if((damage_blurpostprocess.x || content_blurpostprocess.x))
1961                 {
1962                         float blurradius = bound(0, damage_blurpostprocess.y + content_blurpostprocess.y, autocvar_hud_postprocessing_maxblurradius);
1963                         float bluralpha = bound(0, damage_blurpostprocess.z + content_blurpostprocess.z, autocvar_hud_postprocessing_maxbluralpha);
1964                         if(blurradius != old_blurradius || bluralpha != old_bluralpha) // reduce cvar_set spam as much as possible
1965                         {
1966                                 cvar_set("r_glsl_postprocess_uservec1", strcat(ftos(blurradius), " ", ftos(bluralpha), " 0 0"));
1967                                 old_blurradius = blurradius;
1968                                 old_bluralpha = bluralpha;
1969                         }
1970                 }
1971                 else if(cvar_string("r_glsl_postprocess_uservec1") != "0 0 0 0") // reduce cvar_set spam as much as possible
1972                 {
1973                         cvar_set("r_glsl_postprocess_uservec1", "0 0 0 0");
1974                         old_blurradius = 0;
1975                         old_bluralpha = 0;
1976                 }
1977
1978                 // edge detection postprocess handling done second (used by hud_powerup)
1979                 float sharpen_intensity = 0, strength_finished = STAT(STRENGTH_FINISHED), invincible_finished = STAT(INVINCIBLE_FINISHED);
1980                 if (strength_finished - time > 0) { sharpen_intensity += (strength_finished - time); }
1981                 if (invincible_finished - time > 0) { sharpen_intensity += (invincible_finished - time); }
1982
1983                 sharpen_intensity = bound(0, ((STAT(HEALTH) > 0) ? sharpen_intensity : 0), 5); // Check to see if player is alive (if not, set 0) - also bound to fade out starting at 5 seconds.
1984
1985                 if(autocvar_hud_powerup && sharpen_intensity > 0)
1986                 {
1987                         if(sharpen_intensity != old_sharpen_intensity) // reduce cvar_set spam as much as possible
1988                         {
1989                                 cvar_set("r_glsl_postprocess_uservec2", strcat(ftos((sharpen_intensity / 5) * autocvar_hud_powerup), " ", ftos(-sharpen_intensity * autocvar_hud_powerup), " 0 0"));
1990                                 old_sharpen_intensity = sharpen_intensity;
1991                         }
1992                 }
1993                 else if(cvar_string("r_glsl_postprocess_uservec2") != "0 0 0 0") // reduce cvar_set spam as much as possible
1994                 {
1995                         cvar_set("r_glsl_postprocess_uservec2", "0 0 0 0");
1996                         old_sharpen_intensity = 0;
1997                 }
1998
1999                 if(cvar("r_glsl_postprocess") == 0)
2000                         cvar_set("r_glsl_postprocess", "2");
2001         }
2002         else if(cvar("r_glsl_postprocess") == 2)
2003                 cvar_set("r_glsl_postprocess", "0");
2004 }
2005
2006 void View_Lock()
2007 {
2008         int lock_type = (!autocvar_hud_cursormode && ((autocvar__hud_configure && spectatee_status <= 0) || intermission > 1 || QuickMenu_IsOpened()));
2009         if (lock_type == 0)
2010                 lock_type = autocvar_cl_lockview;
2011
2012         // lock_type 1: lock origin and angles
2013         // lock_type 2: lock only origin
2014         if(lock_type >= 1)
2015                 setproperty(VF_ORIGIN, freeze_org);
2016         else
2017                 freeze_org = getpropertyvec(VF_ORIGIN);
2018         if(lock_type == 1)
2019                 setproperty(VF_ANGLES, freeze_ang);
2020         else
2021                 freeze_ang = getpropertyvec(VF_ANGLES);
2022 }
2023
2024 void View_DemoCamera()
2025 {
2026         if(camera_active) // Camera for demo playback
2027         {
2028                 if(autocvar_camera_enable)
2029                         CSQC_Demo_Camera();
2030                 else
2031                 {
2032                         cvar_set("chase_active", ftos(chase_active_backup));
2033                         cvar_set("cl_demo_mousegrab", "0");
2034                         camera_active = false;
2035                 }
2036         }
2037         else
2038         {
2039 #ifdef CAMERATEST
2040                 if(autocvar_camera_enable)
2041 #else
2042                 if(autocvar_camera_enable && isdemo())
2043 #endif
2044                 {
2045                         // Enable required Darkplaces cvars
2046                         chase_active_backup = autocvar_chase_active;
2047                         cvar_set("chase_active", "2");
2048                         cvar_set("cl_demo_mousegrab", "1");
2049                         camera_active = true;
2050                         camera_mode = false;
2051                 }
2052         }
2053 }
2054
2055 #ifdef BLURTEST
2056 void View_BlurTest()
2057 {
2058         if(time > blurtest_time0 && time < blurtest_time1)
2059         {
2060                 float t = (time - blurtest_time0) / (blurtest_time1 - blurtest_time0);
2061                 float r = t * blurtest_radius;
2062                 float f = 1 / (t ** blurtest_power) - 1;
2063
2064                 cvar_set("r_glsl_postprocess", "1");
2065                 cvar_set("r_glsl_postprocess_uservec1", strcat(ftos(r), " ", ftos(f), " 0 0"));
2066         }
2067         else
2068         {
2069                 cvar_set("r_glsl_postprocess", "0");
2070                 cvar_set("r_glsl_postprocess_uservec1", "0 0 0 0");
2071         }
2072 }
2073 #endif
2074
2075 void View_CheckButtonStatus()
2076 {
2077         float is_dead = (STAT(HEALTH) <= 0);
2078
2079         // FIXME do we need this hack?
2080         if(isdemo())
2081         {
2082                 // in demos, input_buttons do not work
2083                 button_zoom = (autocvar__togglezoom == "-");
2084         }
2085         else if(button_zoom
2086                 && autocvar_cl_unpress_zoom_on_death
2087                 && (spectatee_status >= 0)
2088                 && (is_dead || intermission))
2089         {
2090                 // no zoom while dead or in intermission please
2091                 localcmd("-zoom\n");
2092                 button_zoom = false;
2093         }
2094
2095         if(autocvar_fov <= 59.5)
2096         {
2097                 if(!zoomscript_caught)
2098                 {
2099                         localcmd("+button9\n");
2100                         zoomscript_caught = 1;
2101                 }
2102         }
2103         else
2104         {
2105                 if(zoomscript_caught)
2106                 {
2107                         localcmd("-button9\n");
2108                         zoomscript_caught = 0;
2109                 }
2110         }
2111
2112         if(active_minigame && HUD_MinigameMenu_IsOpened())
2113         {
2114                 if(!minigame_wasactive)
2115                 {
2116                         localcmd("+button12\n");
2117                         minigame_wasactive = true;
2118                 }
2119         }
2120         else if(minigame_wasactive)
2121         {
2122                 localcmd("-button12\n");
2123                 minigame_wasactive = false;
2124         }
2125
2126         for(int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
2127         {
2128                 entity wepent = viewmodels[slot];
2129
2130                 if(wepent.last_switchweapon != wepent.switchweapon)
2131                 {
2132                         weapontime = time;
2133                         wepent.last_switchweapon = wepent.switchweapon;
2134                         if(slot == 0 && button_zoom && autocvar_cl_unpress_zoom_on_weapon_switch)
2135                         {
2136                                 localcmd("-zoom\n");
2137                                 button_zoom = false;
2138                         }
2139                         if(slot == 0 && autocvar_cl_unpress_attack_on_weapon_switch)
2140                         {
2141                                 localcmd("-fire\n");
2142                                 localcmd("-fire2\n");
2143                                 button_attack2 = false;
2144                         }
2145                 }
2146                 if(wepent.last_activeweapon != wepent.activeweapon)
2147                 {
2148                         wepent.last_activeweapon = wepent.activeweapon;
2149
2150                         entity e = wepent.activeweapon;
2151                         if(e.netname != "")
2152                                 localcmd(strcat("\ncl_hook_activeweapon ", e.netname), "\n");
2153                         else if(slot == 0)
2154                                 localcmd("\ncl_hook_activeweapon none\n");
2155                 }
2156         }
2157 }
2158
2159 bool ov_enabled;
2160 float oldr_nearclip;
2161 float oldr_farclip_base;
2162 float oldr_farclip_world;
2163 float oldr_novis;
2164 float oldr_useportalculling;
2165 float oldr_useinfinitefarclip;
2166 vector ov_org = '0 0 0';
2167 vector ov_mid = '0 0 0';
2168 vector ov_worldmin = '0 0 0';
2169 vector ov_worldmax = '0 0 0';
2170
2171 void View_Ortho()
2172 {
2173         ov_org = '0 0 0';
2174         ov_mid = '0 0 0';
2175         ov_worldmin = '0 0 0';
2176         ov_worldmax = '0 0 0';
2177         if(autocvar_cl_orthoview)
2178         {
2179                 ov_worldmin = mi_picmin;
2180                 ov_worldmax = mi_picmax;
2181
2182                 float ov_width = (ov_worldmax.x - ov_worldmin.x);
2183                 float ov_height = (ov_worldmax.y - ov_worldmin.y);
2184                 float ov_distance = (max(vid_width, vid_height) * max(ov_width, ov_height));
2185
2186                 ov_mid = ((ov_worldmax + ov_worldmin) * 0.5);
2187                 ov_org = vec3(ov_mid.x, ov_mid.y, (ov_mid.z + ov_distance));
2188
2189                 float ov_nearest = vlen(ov_org - vec3(
2190                         bound(ov_worldmin.x, ov_org.x, ov_worldmax.x),
2191                         bound(ov_worldmin.y, ov_org.y, ov_worldmax.y),
2192                         bound(ov_worldmin.z, ov_org.z, ov_worldmax.z)
2193                 ));
2194
2195                 float ov_furthest = 0;
2196                 float dist = 0;
2197
2198                 if((dist = vdist((vec3(ov_worldmin.x, ov_worldmin.y, ov_worldmin.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2199                 if((dist = vdist((vec3(ov_worldmax.x, ov_worldmin.y, ov_worldmin.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2200                 if((dist = vdist((vec3(ov_worldmin.x, ov_worldmax.y, ov_worldmin.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2201                 if((dist = vdist((vec3(ov_worldmin.x, ov_worldmin.y, ov_worldmax.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2202                 if((dist = vdist((vec3(ov_worldmax.x, ov_worldmax.y, ov_worldmin.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2203                 if((dist = vdist((vec3(ov_worldmin.x, ov_worldmax.y, ov_worldmax.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2204                 if((dist = vdist((vec3(ov_worldmax.x, ov_worldmin.y, ov_worldmax.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2205                 if((dist = vdist((vec3(ov_worldmax.x, ov_worldmax.y, ov_worldmax.z) - ov_org), >, ov_furthest))) { ov_furthest = dist; }
2206
2207                 if(!ov_enabled)
2208                 {
2209                         oldr_nearclip = cvar("r_nearclip");
2210                         oldr_farclip_base = cvar("r_farclip_base");
2211                         oldr_farclip_world = cvar("r_farclip_world");
2212                         oldr_novis = cvar("r_novis");
2213                         oldr_useportalculling = cvar("r_useportalculling");
2214                         oldr_useinfinitefarclip = cvar("r_useinfinitefarclip");
2215                 }
2216
2217                 cvar_settemp("r_nearclip", ftos(ov_nearest));
2218                 cvar_settemp("r_farclip_base", ftos(ov_furthest));
2219                 cvar_settemp("r_farclip_world", "0");
2220                 cvar_settemp("r_novis", "1");
2221                 cvar_settemp("r_useportalculling", "0");
2222                 cvar_settemp("r_useinfinitefarclip", "0");
2223
2224                 setproperty(VF_ORIGIN, ov_org);
2225                 setproperty(VF_ANGLES, '90 0 0');
2226
2227                 ov_enabled = true;
2228
2229                 #if 0
2230                 LOG_INFOF("OrthoView: org = %s, angles = %s, distance = %f, nearest = %f, furthest = %f",
2231                         vtos(ov_org),
2232                         vtos(getpropertyvec(VF_ANGLES)),
2233                         ov_distance,
2234                         ov_nearest,
2235                         ov_furthest);
2236                 #endif
2237         }
2238         else
2239         {
2240                 if(ov_enabled)
2241                 {
2242                         cvar_set("r_nearclip", ftos(oldr_nearclip));
2243                         cvar_set("r_farclip_base", ftos(oldr_farclip_base));
2244                         cvar_set("r_farclip_world", ftos(oldr_farclip_world));
2245                         cvar_set("r_novis", ftos(oldr_novis));
2246                         cvar_set("r_useportalculling", ftos(oldr_useportalculling));
2247                         cvar_set("r_useinfinitefarclip", ftos(oldr_useinfinitefarclip));
2248                 }
2249                 ov_enabled = false;
2250         }
2251 }
2252
2253 void View_UpdateFov()
2254 {
2255         vector fov;
2256         if(autocvar_cl_orthoview)
2257                 fov = GetOrthoviewFOV(ov_worldmin, ov_worldmax, ov_mid, ov_org);
2258         else if(csqcplayer.viewloc)
2259                 fov = GetViewLocationFOV(110); // enforce 110 fov, so things don't look odd
2260         else
2261                 fov = GetCurrentFov(autocvar_fov);
2262
2263         setproperty(VF_FOV, fov);
2264 }
2265
2266 void CSQC_UpdateView(entity this, float w, float h)
2267 {
2268         TC(int, w); TC(int, h);
2269
2270         execute_next_frame();
2271
2272         ++framecount;
2273
2274         stats_get();
2275         hud = STAT(HUD);
2276
2277         ReplicateVars(false);
2278         if (ReplicateVars_NOT_SENDING())
2279                 ReplicateVars_DELAY(0.8 + random() * 0.4); // no need to check cvars every frame
2280
2281         HUD_Scale_Disable();
2282
2283         if(autocvar__hud_showbinds_reload) // menu can set this one
2284         {
2285                 db_close(binddb);
2286                 binddb = db_create();
2287                 cvar_set("_hud_showbinds_reload", "0");
2288         }
2289
2290         if(checkextension("DP_CSQC_MINFPS_QUALITY"))
2291                 view_quality = getproperty(VF_MINFPS_QUALITY);
2292         else
2293                 view_quality = 1;
2294
2295         button_attack2 = PHYS_INPUT_BUTTON_ATCK2(this);
2296         button_zoom = PHYS_INPUT_BUTTON_ZOOM(this);
2297
2298         vector vf_size = getpropertyvec(VF_SIZE);
2299         vector vf_min = getpropertyvec(VF_MIN);
2300         vid_width = vf_size.x;
2301         vid_height = vf_size.y;
2302
2303         ticrate = STAT(MOVEVARS_TICRATE) * STAT(MOVEVARS_TIMESCALE);
2304
2305         WaypointSprite_Load();
2306
2307         CSQCPlayer_SetCamera();
2308
2309         if(player_localentnum <= maxclients) // is it a client?
2310                 current_player = player_localentnum - 1;
2311         else // then player_localentnum is the vehicle I'm driving
2312                 current_player = player_localnum;
2313         myteam = entcs_GetTeam(current_player);
2314
2315         // abused multiple places below
2316         entity local_player = ((csqcplayer) ? csqcplayer : CSQCModel_server2csqc(player_localentnum - 1));
2317         if(!local_player)
2318                 local_player = this; // fall back!
2319
2320         View_EventChase(local_player);
2321
2322         // do lockview after event chase camera so that it still applies whenever necessary.
2323         View_Lock();
2324
2325         WarpZone_FixView();
2326         //WarpZone_FixPMove();
2327
2328         View_Ortho();
2329
2330         // run viewmodel_draw before updating view_angles to the angles calculated by WarpZone_FixView
2331         // viewmodel_draw needs to use the view_angles set by the engine on every CSQC_UpdateView call
2332         for(int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
2333                 viewmodel_draw(viewmodels[slot]);
2334
2335         // Render the Scene
2336         view_origin = getpropertyvec(VF_ORIGIN);
2337         view_angles = getpropertyvec(VF_ANGLES);
2338         MAKE_VECTORS(view_angles, view_forward, view_right, view_up);
2339
2340 #ifdef BLURTEST
2341         View_BlurTest();
2342 #endif
2343
2344         TargetMusic_Advance();
2345         Fog_Force();
2346         fpscounter_update();
2347
2348         if(drawtime == 0)
2349                 drawframetime = 0.01666667; // when we don't know fps yet, we assume 60fps
2350         else
2351                 drawframetime = bound(0.000001, time - drawtime, 1);
2352         drawtime = time;
2353
2354         // watch for gametype changes here...
2355         // in ParseStuffCMD the cmd isn't executed yet :/
2356         // might even be better to add the gametype to TE_CSQC_INIT...?
2357         if(!postinit)
2358                 PostInit();
2359
2360         if(intermission && !intermission_time)
2361                 intermission_time = time;
2362
2363         if(intermission && !isdemo() && !(calledhooks & HOOK_END))
2364         {
2365                 if(calledhooks & HOOK_START)
2366                 {
2367                         localcmd("\ncl_hook_gameend\n");
2368                         calledhooks |= HOOK_END;
2369                 }
2370         }
2371
2372         Announcer();
2373
2374         View_CheckButtonStatus();
2375
2376         ColorTranslateMode = autocvar_cl_stripcolorcodes;
2377
2378         // ALWAYS Clear Current Scene First
2379         clearscene();
2380
2381         setproperty(VF_ORIGIN, view_origin);
2382         setproperty(VF_ANGLES, view_angles);
2383
2384         // FIXME engine bug? VF_SIZE and VF_MIN are not restored to sensible values by this
2385         setproperty(VF_SIZE, vf_size);
2386         setproperty(VF_MIN, vf_min);
2387
2388         // Assign Standard Viewflags
2389         // Draw the World (and sky)
2390         setproperty(VF_DRAWWORLD, 1);
2391
2392         // Set the console size vars
2393         vid_conwidth = autocvar_vid_conwidth;
2394         vid_conheight = autocvar_vid_conheight;
2395         vid_pixelheight = autocvar_vid_pixelheight;
2396
2397         View_UpdateFov();
2398
2399         View_DemoCamera();
2400
2401         // Draw the Crosshair
2402         setproperty(VF_DRAWCROSSHAIR, 0); //Make sure engine crosshairs are always hidden
2403
2404         // Draw the Engine Status Bar (the default Quake HUD)
2405         setproperty(VF_DRAWENGINESBAR, 0);
2406
2407         // Update the mouse position
2408         /*
2409            mousepos_x = vid_conwidth;
2410            mousepos_y = vid_conheight;
2411            mousepos = mousepos*0.5 + getmousepos();
2412          */
2413
2414         IL_EACH(g_drawables, it.draw, it.draw(it));
2415
2416         addentities(MASK_NORMAL | MASK_ENGINE | MASK_ENGINEVIEWMODELS); // TODO: .health is used in cl_deathfade (a feature we have turned off currently)
2417         renderscene();
2418
2419         // Now the the scene has been rendered, begin with the 2D drawing functions
2420
2421         View_NightVision();
2422         DrawReticle(local_player);
2423         HUD_Contents();
2424         HUD_Damage();
2425         View_PostProcessing();
2426
2427         // draw 2D entities
2428         IL_EACH(g_drawables_2d, it.draw2d, it.draw2d(it));
2429         Draw_ShowNames_All();
2430 #if ENABLE_DEBUGDRAW
2431         Debug_Draw();
2432 #endif
2433
2434         scoreboard_active = Scoreboard_WouldDraw();
2435
2436         HUD_Draw(this); // this parameter for deep vehicle function
2437
2438         if(NextFrameCommand)
2439         {
2440                 localcmd("\n", NextFrameCommand, "\n");
2441                 NextFrameCommand = string_null;
2442         }
2443
2444         // we must do this check AFTER a frame was rendered, or it won't work
2445         if(cs_project_is_b0rked == 0)
2446         {
2447                 string w0, h0;
2448                 w0 = ftos(autocvar_vid_conwidth);
2449                 h0 = ftos(autocvar_vid_conheight);
2450                 //setproperty(VF_VIEWPORT, '0 0 0', '640 480 0');
2451                 //setproperty(VF_FOV, '90 90 0');
2452                 setproperty(VF_ORIGIN, '0 0 0');
2453                 setproperty(VF_ANGLES, '0 0 0');
2454                 setproperty(VF_PERSPECTIVE, 1);
2455                 vector forward, right, up;
2456                 MAKE_VECTORS('0 0 0', forward, right, up);
2457                 vector v1, v2;
2458                 cvar_set("vid_conwidth", "800");
2459                 cvar_set("vid_conheight", "600");
2460                 v1 = cs_project(forward);
2461                 cvar_set("vid_conwidth", "640");
2462                 cvar_set("vid_conheight", "480");
2463                 v2 = cs_project(forward);
2464                 if(v1 == v2)
2465                         cs_project_is_b0rked = 1;
2466                 else
2467                         cs_project_is_b0rked = -1;
2468                 cvar_set("vid_conwidth", w0);
2469                 cvar_set("vid_conheight", h0);
2470         }
2471
2472         HUD_Mouse(local_player);
2473
2474         cl_notice_run();
2475         unpause_update();
2476         Net_Flush();
2477
2478         // let's reset the view back to normal for the end
2479         setproperty(VF_MIN, '0 0 0');
2480         setproperty(VF_SIZE, '1 0 0' * w + '0 1 0' * h);
2481
2482         IL_ENDFRAME();
2483 }
2484
2485
2486 // following vectors must be global to allow seamless switching between camera modes
2487 vector camera_offset, current_camera_offset, mouse_angles, current_angles, current_origin, current_position;
2488 void CSQC_Demo_Camera()
2489 {
2490         float speed, attenuation, dimensions;
2491         vector tmp, delta;
2492
2493         if( autocvar_camera_reset || !camera_mode )
2494         {
2495                 camera_offset = '0 0 0';
2496                 current_angles = '0 0 0';
2497                 camera_direction = '0 0 0';
2498                 camera_offset.z += 30;
2499                 camera_offset.x += 30 * -cos(current_angles.y * DEG2RAD);
2500                 camera_offset.y += 30 * -sin(current_angles.y * DEG2RAD);
2501                 current_origin = view_origin;
2502                 current_camera_offset  = camera_offset;
2503                 cvar_set("camera_reset", "0");
2504                 camera_mode = CAMERA_CHASE;
2505         }
2506
2507         // Camera angles
2508         if( camera_roll )
2509                 mouse_angles.z += camera_roll * autocvar_camera_speed_roll;
2510
2511         if(autocvar_camera_look_player)
2512         {
2513                 vector dir;
2514                 float n;
2515
2516                 dir = normalize(view_origin - current_position);
2517                 n = mouse_angles.z;
2518                 mouse_angles = vectoangles(dir);
2519                 mouse_angles.x = mouse_angles.x * -1;
2520                 mouse_angles.z = n;
2521         }
2522         else
2523         {
2524                 tmp = getmousepos() * 0.1;
2525                 if(vdist(tmp, >, autocvar_camera_mouse_threshold))
2526                 {
2527                         mouse_angles.x += tmp.y * cos(mouse_angles.z * DEG2RAD) + (tmp.x * sin(mouse_angles.z * DEG2RAD));
2528                         mouse_angles.y -= tmp.x * cos(mouse_angles.z * DEG2RAD) + (tmp.y * -sin(mouse_angles.z * DEG2RAD));
2529                 }
2530         }
2531
2532         while (mouse_angles.x < -180) mouse_angles.x = mouse_angles.x + 360;
2533         while (mouse_angles.x > 180) mouse_angles.x = mouse_angles.x - 360;
2534         while (mouse_angles.y < -180) mouse_angles.y = mouse_angles.y + 360;
2535         while (mouse_angles.y > 180) mouse_angles.y = mouse_angles.y - 360;
2536
2537         // Fix difference when angles don't have the same sign
2538         delta = '0 0 0';
2539         if(mouse_angles.y < -60 && current_angles.y > 60)
2540                 delta = '0 360 0';
2541         if(mouse_angles.y > 60 && current_angles.y < -60)
2542                 delta = '0 -360 0';
2543
2544         if(autocvar_camera_look_player)
2545                 attenuation = autocvar_camera_look_attenuation;
2546         else
2547                 attenuation = autocvar_camera_speed_attenuation;
2548
2549         attenuation = 1 / max(1, attenuation);
2550         current_angles += (mouse_angles - current_angles + delta) * attenuation;
2551
2552         while (current_angles.x < -180) current_angles.x = current_angles.x + 360;
2553         while (current_angles.x > 180) current_angles.x = current_angles.x - 360;
2554         while (current_angles.y < -180) current_angles.y = current_angles.y + 360;
2555         while (current_angles.y > 180) current_angles.y = current_angles.y - 360;
2556
2557         // Camera position
2558         tmp = '0 0 0';
2559         dimensions = 0;
2560
2561         if( camera_direction.x )
2562         {
2563                 tmp.x = camera_direction.x * cos(current_angles.y * DEG2RAD);
2564                 tmp.y = camera_direction.x * sin(current_angles.y * DEG2RAD);
2565                 if( autocvar_camera_forward_follows && !autocvar_camera_look_player )
2566                         tmp.z = camera_direction.x * -sin(current_angles.x * DEG2RAD);
2567                 ++dimensions;
2568         }
2569
2570         if( camera_direction.y )
2571         {
2572                 tmp.x += camera_direction.y * -sin(current_angles.y * DEG2RAD);
2573                 tmp.y += camera_direction.y * cos(current_angles.y * DEG2RAD) * cos(current_angles.z * DEG2RAD);
2574                 tmp.z += camera_direction.y * sin(current_angles.z * DEG2RAD);
2575                 ++dimensions;
2576         }
2577
2578         if( camera_direction.z )
2579         {
2580                 tmp.z += camera_direction.z * cos(current_angles.z * DEG2RAD);
2581                 ++dimensions;
2582         }
2583
2584         if(autocvar_camera_free)
2585                 speed = autocvar_camera_speed_free;
2586         else
2587                 speed = autocvar_camera_speed_chase;
2588
2589         if(dimensions)
2590         {
2591                 speed = speed * sqrt(1 / dimensions);
2592                 camera_offset += tmp * speed;
2593         }
2594
2595         current_camera_offset += (camera_offset - current_camera_offset) * attenuation;
2596
2597         // Camera modes
2598         if( autocvar_camera_free )
2599         {
2600                 if ( camera_mode == CAMERA_CHASE )
2601                 {
2602                         current_camera_offset = current_origin + current_camera_offset;
2603                         camera_offset = current_origin + camera_offset;
2604                 }
2605
2606                 camera_mode = CAMERA_FREE;
2607                 current_position = current_camera_offset;
2608         }
2609         else
2610         {
2611                 if ( camera_mode == CAMERA_FREE )
2612                 {
2613                         current_origin = view_origin;
2614                         camera_offset = camera_offset - current_origin;
2615                         current_camera_offset = current_camera_offset - current_origin;
2616                 }
2617
2618                 camera_mode = CAMERA_CHASE;
2619
2620                 if(autocvar_camera_chase_smoothly)
2621                         current_origin += (view_origin - current_origin) * attenuation;
2622                 else
2623                         current_origin = view_origin;
2624
2625                 current_position = current_origin + current_camera_offset;
2626         }
2627
2628         setproperty(VF_ANGLES, current_angles);
2629         setproperty(VF_ORIGIN, current_position);
2630 }