1 #define PORTALS_ARE_NOT_SOLID
3 #define SAFENUDGE '1 1 1'
4 #define SAFERNUDGE '8 8 8'
6 .vector portal_transform;
7 .vector portal_safe_origin;
8 .float portal_wants_to_vanish;
9 .float portal_activatetime;
10 .float savemodelindex;
12 float PlayerEdgeDistance(entity p, vector v)
16 if(v_x < 0) vbest_x = p.mins_x; else vbest_x = p.maxs_x;
17 if(v_y < 0) vbest_y = p.mins_y; else vbest_y = p.maxs_y;
18 if(v_z < 0) vbest_z = p.mins_z; else vbest_z = p.maxs_z;
23 vector Portal_ApplyTransformToPlayerAngle(vector transform, vector vangle)
25 vector old_forward, old_up;
26 vector old_yawforward;
27 vector new_forward, new_up;
28 vector new_yawforward;
33 ang_x = bound(-89, mod(-ang_x + 180, 360) - 180, 89);
34 ang = AnglesTransform_ApplyToVAngles(transform, ang);
37 // PLAYERS use different math
38 #ifndef POSITIVE_PITCH_IS_DOWN
42 //print("reference: ", vtos(AnglesTransform_ApplyToVAngles(transform, ang)), "\n");
44 fixedmakevectors(ang);
45 old_forward = v_forward;
47 fixedmakevectors(ang_y * '0 1 0');
48 old_yawforward = v_forward;
50 // their aiming directions are portalled...
51 new_forward = AnglesTransform_Apply(transform, old_forward);
52 new_up = AnglesTransform_Apply(transform, old_up);
53 new_yawforward = AnglesTransform_Apply(transform, old_yawforward);
55 // but now find a new sense of direction
57 // assume new_forward points straight up.
60 // new_up could now point forward OR backward... which direction to choose?
62 if(new_forward_z > 0.7 || new_forward_z < -0.7) // far up; in this case, the "up" vector points backwards
64 // new_yawforward and new_yawup define the new aiming half-circle
65 // we "just" need to find out whether new_up or -new_up is in that half circle
66 ang = fixedvectoangles(new_forward); // this still gets us a nice pitch value...
67 if(new_up * new_yawforward < 0)
69 ang_y = vectoyaw(new_up); // this vector is the yaw we want
70 //print("UP/DOWN path: ", vtos(ang), "\n");
74 // good angles; here, "forward" suffices
75 ang = fixedvectoangles(new_forward);
76 //print("GOOD path: ", vtos(ang), "\n");
79 #ifndef POSITIVE_PITCH_IS_DOWN
87 float Portal_TeleportPlayer(entity teleporter, entity player)
89 vector from, to, safe, step, transform, ang, newvel;
90 float planeshift, s, t;
92 if (!teleporter.enemy)
94 backtrace("Portal_TeleportPlayer called without other portal being set. Stop.");
98 from = teleporter.origin;
99 transform = teleporter.portal_transform;
101 to = teleporter.enemy.origin;
102 to = to + AnglesTransform_Apply(teleporter.portal_transform, player.origin - from);
103 newvel = AnglesTransform_Apply(transform, player.velocity);
104 // this now is INSIDE the plane... can't use that
107 fixedmakevectors(teleporter.enemy.mangle);
109 // first shift it ON the plane if needed
110 planeshift = ((teleporter.enemy.origin - to) * v_forward) + PlayerEdgeDistance(player, v_forward) + 1;
112 if(planeshift > 0 && (newvel * v_forward) > vlen(newvel) * 0.01)
113 // if we can't, let us not do the planeshift and do somewhat incorrect transformation in the end
114 to += newvel * (planeshift / (newvel * v_forward));
117 to += v_forward * planeshift;
119 s = (to - teleporter.enemy.origin) * v_right;
120 t = (to - teleporter.enemy.origin) * v_up;
121 s = bound(-48, s, 48);
122 t = bound(-48, t, 48);
123 to = teleporter.enemy.origin
124 + ((to - teleporter.enemy.origin) * v_forward) * v_forward
128 safe = teleporter.enemy.portal_safe_origin; // a valid player origin
129 step = to + ((safe - to) * v_forward) * v_forward;
130 tracebox(safe, player.mins - SAFENUDGE, player.maxs + SAFENUDGE, step, MOVE_NOMONSTERS, player);
133 print("'safe' teleport location is not safe!\n");
134 // FAIL TODO why does this happen?
137 safe = trace_endpos + normalize(safe - trace_endpos) * 0;
138 tracebox(safe, player.mins - SAFENUDGE, player.maxs + SAFENUDGE, to, MOVE_NOMONSTERS, player);
141 print("trace_endpos in solid, this can't be!\n");
142 // FAIL TODO why does this happen? (reported by MrBougo)
145 to = trace_endpos + normalize(safe - trace_endpos) * 0;
146 //print(vtos(to), "\n");
148 // ang_x stuff works around weird quake angles
149 if(IS_PLAYER(player))
150 ang = Portal_ApplyTransformToPlayerAngle(transform, player.v_angle);
152 ang = AnglesTransform_ApplyToAngles(transform, player.angles);
154 // factor -1 allows chaining portals, but may be weird
155 player.right_vector = -1 * AnglesTransform_Apply(transform, player.right_vector);
157 entity oldself = self;
159 MUTATOR_CALLHOOK(PortalTeleport);
163 if (!teleporter.enemy)
165 backtrace("Portal_TeleportPlayer ended up without other portal being set BEFORE TeleportPlayer. Stop.");
170 TeleportPlayer(teleporter, player, to, ang, newvel, teleporter.enemy.absmin, teleporter.enemy.absmax, TELEPORT_FLAGS_PORTAL);
173 // telefrag within 1 second of portal creation = amazing
174 if(time < teleporter.teleport_time + 1)
175 Send_Notification(NOTIF_ONE, player, MSG_ANNCE, ANNCE_ACHIEVEMENT_AMAZING);
178 if (!teleporter.enemy)
180 backtrace("Portal_TeleportPlayer ended up without other portal being set AFTER TeleportPlayer. Stop.");
184 // reset fade counter
185 teleporter.portal_wants_to_vanish = 0;
186 teleporter.fade_time = time + autocvar_g_balance_portal_lifetime;
187 teleporter.health = autocvar_g_balance_portal_health;
188 teleporter.enemy.health = autocvar_g_balance_portal_health;
193 float Portal_FindSafeOrigin(entity portal)
197 portal.mins = PL_MIN - SAFERNUDGE;
198 portal.maxs = PL_MAX + SAFERNUDGE;
199 fixedmakevectors(portal.mangle);
200 portal.origin += 16 * v_forward;
201 if(!move_out_of_solid(portal))
204 print("NO SAFE ORIGIN\n");
208 portal.portal_safe_origin = portal.origin;
209 setorigin(portal, o);
213 float Portal_WillHitPlane(vector eorg, vector emins, vector emaxs, vector evel, vector porg, vector pnorm, float psize)
215 float dist, distpersec, delta;
218 dist = (eorg - porg) * pnorm;
219 dist += min(emins_x * pnorm_x, emaxs_x * pnorm_x);
220 dist += min(emins_y * pnorm_y, emaxs_y * pnorm_y);
221 dist += min(emins_z * pnorm_z, emaxs_z * pnorm_z);
222 if(dist < -1) // other side?
224 #ifdef PORTALS_ARE_NOT_SOLID
225 distpersec = evel * pnorm;
226 if(distpersec >= 0) // going away from the portal?
228 // we don't need this check with solid portals, them being SOLID_BSP should suffice
229 delta = dist / distpersec;
230 v = eorg - evel * delta - porg;
231 v = v - pnorm * (pnorm * v);
232 return vlen(v) < psize;
242 #ifdef PORTALS_ARE_NOT_SOLID
243 // portal is being removed?
244 if(self.solid != SOLID_TRIGGER)
245 return; // possibly engine bug
248 return; // handled by think
251 if(other.classname == "item_flag_team")
252 return; // never portal these
254 if(other.classname == "grapplinghook")
255 return; // handled by think
257 if(!autocvar_g_vehicles_teleportable)
258 if(other.vehicle_flags & VHF_ISVEHICLE)
259 return; // no teleporting vehicles?
262 error("Portal_Touch called for a broken portal\n");
264 #ifdef PORTALS_ARE_NOT_SOLID
265 if(trace_fraction < 1)
266 return; // only handle TouchAreaGrid ones (only these can teleport)
268 if(trace_fraction >= 1)
269 return; // only handle impacts
272 if(other.classname == "porto")
274 if(other.portal_id == self.portal_id)
277 if(time < self.portal_activatetime)
278 if(other == self.aiment)
280 self.portal_activatetime = time + 0.1;
283 if(other != self.aiment)
285 if(IS_INDEPENDENT_PLAYER(other) || IS_INDEPENDENT_PLAYER(self.aiment))
286 return; // cannot go through someone else's portal
287 if(other.aiment != self.aiment)
288 if(IS_PLAYER(other.aiment))
289 if(IS_INDEPENDENT_PLAYER(other.aiment) || IS_INDEPENDENT_PLAYER(self.aiment))
290 return; // cannot go through someone else's portal
291 fixedmakevectors(self.mangle);
292 g = frametime * '0 0 -1' * autocvar_sv_gravity;
293 if(!Portal_WillHitPlane(other.origin, other.mins, other.maxs, other.velocity + g, self.origin, v_forward, self.maxs_x))
297 if(other.mins_x < PL_MIN_x || other.mins_y < PL_MIN_y || other.mins_z < PL_MIN_z
298 || other.maxs_x > PL_MAX_x || other.maxs_y > PL_MAX_y || other.maxs_z > PL_MAX_z)
300 // can't teleport this
305 if(Portal_TeleportPlayer(self, other))
306 if(other.classname == "porto")
307 if(other.effects & EF_RED)
308 other.effects += EF_BLUE - EF_RED;
312 void Portal_MakeBrokenPortal(entity portal)
315 portal.solid = SOLID_NOT;
316 portal.touch = func_null;
317 portal.think = func_null;
319 portal.nextthink = 0;
320 portal.takedamage = DAMAGE_NO;
323 void Portal_MakeWaitingPortal(entity portal)
326 portal.solid = SOLID_NOT;
327 portal.touch = func_null;
328 portal.think = func_null;
329 portal.effects = EF_ADDITIVE;
330 portal.nextthink = 0;
331 portal.takedamage = DAMAGE_YES;
334 void Portal_MakeInPortal(entity portal)
337 portal.solid = SOLID_NOT; // this is done when connecting them!
338 portal.touch = Portal_Touch;
339 portal.think = Portal_Think;
340 portal.effects = EF_RED;
341 portal.nextthink = time;
342 portal.takedamage = DAMAGE_NO;
345 void Portal_MakeOutPortal(entity portal)
348 portal.solid = SOLID_NOT;
349 portal.touch = func_null;
350 portal.think = func_null;
351 portal.effects = EF_STARDUST | EF_BLUE;
352 portal.nextthink = 0;
353 portal.takedamage = DAMAGE_YES;
356 void Portal_Disconnect(entity teleporter, entity destination)
358 teleporter.enemy = world;
359 destination.enemy = world;
360 Portal_MakeBrokenPortal(teleporter);
361 Portal_MakeBrokenPortal(destination);
364 void Portal_Connect(entity teleporter, entity destination)
366 teleporter.portal_transform = AnglesTransform_RightDivide(AnglesTransform_TurnDirectionFR(destination.mangle), teleporter.mangle);
368 teleporter.enemy = destination;
369 destination.enemy = teleporter;
370 Portal_MakeInPortal(teleporter);
371 Portal_MakeOutPortal(destination);
372 teleporter.fade_time = time + autocvar_g_balance_portal_lifetime;
373 destination.fade_time = teleporter.fade_time;
374 teleporter.portal_wants_to_vanish = 0;
375 destination.portal_wants_to_vanish = 0;
376 teleporter.teleport_time = time;
377 #ifdef PORTALS_ARE_NOT_SOLID
378 teleporter.solid = SOLID_TRIGGER;
380 teleporter.solid = SOLID_BSP;
384 void Portal_Remove(entity portal, float killed)
391 Portal_Disconnect(portal, e);
392 Portal_Remove(e, killed);
395 if(portal == portal.aiment.portal_in)
396 portal.aiment.portal_in = world;
397 if(portal == portal.aiment.portal_out)
398 portal.aiment.portal_out = world;
399 //portal.aiment = world;
401 // makes the portal vanish
404 fixedmakevectors(portal.mangle);
405 sound(portal, CH_SHOTS, "porto/explode.wav", VOL_BASE, ATTEN_NORM);
406 pointparticles(particleeffectnum("rocket_explode"), portal.origin + v_forward * 16, v_forward * 1024, 4);
411 Portal_MakeBrokenPortal(portal);
412 sound(portal, CH_SHOTS, "porto/expire.wav", VOL_BASE, ATTEN_NORM);
413 SUB_SetFade(portal, time, 0.5);
417 void Portal_Damage(entity inflictor, entity attacker, float damage, float deathtype, vector hitloc, vector force)
419 if(deathtype == DEATH_TELEFRAG)
421 if(attacker != self.aiment)
422 if(IS_INDEPENDENT_PLAYER(attacker) || IS_INDEPENDENT_PLAYER(self.aiment))
424 self.health -= damage;
426 Portal_Remove(self, 1);
429 void Portal_Think_TryTeleportPlayer(entity e, vector g)
431 if(!Portal_WillHitPlane(e.origin, e.mins, e.maxs, e.velocity + g, self.origin, v_forward, self.maxs_x))
434 // if e would hit the portal in a frame...
435 // already teleport him
436 tracebox(e.origin, e.mins, e.maxs, e.origin + e.velocity * 2 * frametime, MOVE_NORMAL, e);
437 if(trace_ent == self)
438 Portal_TeleportPlayer(self, e);
446 #ifdef PORTALS_ARE_NOT_SOLID
447 // portal is being removed?
448 if(self.solid != SOLID_TRIGGER)
449 return; // possibly engine bug
452 error("Portal_Think called for a broken portal\n");
455 self.solid = SOLID_BBOX;
458 g = frametime * '0 0 -1' * autocvar_sv_gravity;
460 fixedmakevectors(self.mangle);
465 if(IS_INDEPENDENT_PLAYER(e) || IS_INDEPENDENT_PLAYER(o))
466 continue; // cannot go through someone else's portal
468 if(e != o || time >= self.portal_activatetime)
469 Portal_Think_TryTeleportPlayer(e, g);
472 Portal_Think_TryTeleportPlayer(e.hook, g);
474 self.solid = SOLID_TRIGGER;
478 self.nextthink = time;
480 if(time > self.fade_time)
481 Portal_Remove(self, 0);
484 float Portal_Customize()
488 if(other == self.aiment)
490 self.modelindex = self.savemodelindex;
492 else if(IS_INDEPENDENT_PLAYER(other) || IS_INDEPENDENT_PLAYER(self.aiment))
498 self.modelindex = self.savemodelindex;
504 // when creating in-portal:
506 // clear existing in-portal
509 // when creating out-portal:
511 // clear existing out-portal
514 // disconnect portals
515 // clear both portals
516 // after timeout of in-portal:
517 // disconnect portals
518 // clear both portals
519 // TODO: ensure only one portal shot at once
520 float Portal_SetInPortal(entity own, entity portal)
525 Portal_Disconnect(own.portal_in, own.portal_out);
526 Portal_Remove(own.portal_in, 0);
528 own.portal_in = portal;
531 own.portal_out.portal_id = portal.portal_id;
532 Portal_Connect(own.portal_in, own.portal_out);
536 float Portal_SetOutPortal(entity own, entity portal)
541 Portal_Disconnect(own.portal_in, own.portal_out);
542 Portal_Remove(own.portal_out, 0);
544 own.portal_out = portal;
547 own.portal_in.portal_id = portal.portal_id;
548 Portal_Connect(own.portal_in, own.portal_out);
552 void Portal_ClearAll_PortalsOnly(entity own)
555 Portal_Remove(own.portal_in, 0);
557 Portal_Remove(own.portal_out, 0);
559 void Portal_ClearAll(entity own)
561 Portal_ClearAll_PortalsOnly(own);
564 void Portal_RemoveLater_Think()
566 Portal_Remove(self, self.cnt);
568 void Portal_RemoveLater(entity portal, float kill)
570 Portal_MakeBrokenPortal(portal);
572 portal.think = Portal_RemoveLater_Think;
573 portal.nextthink = time;
575 void Portal_ClearAllLater_PortalsOnly(entity own)
578 Portal_RemoveLater(own.portal_in, 0);
580 Portal_RemoveLater(own.portal_out, 0);
582 void Portal_ClearAllLater(entity own)
584 Portal_ClearAllLater_PortalsOnly(own);
587 void Portal_ClearWithID(entity own, float id)
590 if(own.portal_in.portal_id == id)
593 Portal_Disconnect(own.portal_in, own.portal_out);
594 Portal_Remove(own.portal_in, 0);
597 if(own.portal_out.portal_id == id)
600 Portal_Disconnect(own.portal_in, own.portal_out);
601 Portal_Remove(own.portal_out, 0);
605 entity Portal_Spawn(entity own, vector org, vector ang)
609 fixedmakevectors(ang);
610 if(!CheckWireframeBox(own, org - 48 * v_right - 48 * v_up + 16 * v_forward, 96 * v_right, 96 * v_up, 96 * v_forward))
614 portal.classname = "portal";
616 setorigin(portal, org);
619 portal.angles_x = -portal.angles_x; // is a bmodel
620 portal.think = Portal_Think;
621 portal.nextthink = 0;
622 portal.portal_activatetime = time + 0.1;
623 portal.takedamage = DAMAGE_AIM;
624 portal.event_damage = Portal_Damage;
625 portal.fade_time = time + autocvar_g_balance_portal_lifetime;
626 portal.health = autocvar_g_balance_portal_health;
627 setmodel(portal, "models/portal.md3");
628 portal.savemodelindex = portal.modelindex;
629 portal.customizeentityforclient = Portal_Customize;
631 if(!Portal_FindSafeOrigin(portal))
637 setsize(portal, '-48 -48 -48', '48 48 48');
638 Portal_MakeWaitingPortal(portal);
643 float Portal_SpawnInPortalAtTrace(entity own, vector dir, float portal_id_val)
650 ang = fixedvectoangles2(trace_plane_normal, dir);
651 fixedmakevectors(ang);
653 portal = Portal_Spawn(own, org, ang);
657 portal.portal_id = portal_id_val;
658 Portal_SetInPortal(own, portal);
663 float Portal_SpawnOutPortalAtTrace(entity own, vector dir, float portal_id_val)
670 ang = fixedvectoangles2(trace_plane_normal, dir);
671 fixedmakevectors(ang);
673 portal = Portal_Spawn(own, org, ang);
677 portal.portal_id = portal_id_val;
678 Portal_SetOutPortal(own, portal);