mirror of
https://github.com/ParadiseSS13/Paradise.git
synced 2026-01-02 13:42:32 +00:00
89ba9c047c
* effects * removed anchored = TRUE from objects that inherit that property within the effects folder and subfolders
138 lines
3.7 KiB
Plaintext
138 lines
3.7 KiB
Plaintext
/obj/effect/portal
|
|
name = "portal"
|
|
desc = "Looks unstable. Best to test it with the clown."
|
|
icon = 'icons/obj/stationobjs.dmi'
|
|
icon_state = "portal"
|
|
|
|
var/obj/item/target = null
|
|
/// The UID and `name` of the object that created this portal. For example, a wormhole jaunter.
|
|
var/list/creation_obj_data
|
|
/// The ckey of the mob which was responsible for the creation of the portal. For example, the mob who used a wormhole jaunter.
|
|
var/creation_mob_ckey
|
|
|
|
var/failchance = 5
|
|
var/fail_icon = "portal1"
|
|
|
|
var/precision = TRUE // how close to the portal you will teleport. FALSE = on the portal, TRUE = adjacent
|
|
var/can_multitool_to_remove = FALSE
|
|
var/ignore_tele_proof_area_setting = FALSE
|
|
var/one_use = FALSE // Does this portal go away after one teleport?
|
|
|
|
/obj/effect/portal/New(loc, turf/_target, obj/creation_object = null, lifespan = 300, mob/creation_mob = null)
|
|
..()
|
|
|
|
GLOB.portals += src
|
|
|
|
target = _target
|
|
if(creation_object)
|
|
creation_obj_data = list(creation_object.UID(), "[creation_object.name]") // Store the name incase the object is deleted.
|
|
else
|
|
creation_obj_data = list(null, null)
|
|
creation_mob_ckey = creation_mob?.ckey
|
|
|
|
if(lifespan > 0)
|
|
QDEL_IN(src, lifespan)
|
|
|
|
/obj/effect/portal/Destroy()
|
|
GLOB.portals -= src
|
|
var/obj/O = locateUID(creation_obj_data[1])
|
|
if(!QDELETED(O))
|
|
O.portal_destroyed(src)
|
|
target = null
|
|
return ..()
|
|
|
|
/obj/effect/portal/singularity_pull()
|
|
return
|
|
|
|
/obj/effect/portal/singularity_act()
|
|
return
|
|
|
|
/obj/effect/portal/Crossed(atom/movable/AM, oldloc)
|
|
if(isobserver(AM))
|
|
return ..()
|
|
|
|
if(target && (get_turf(oldloc) == get_turf(target)))
|
|
return ..()
|
|
|
|
if(!teleport(AM))
|
|
return ..()
|
|
|
|
/obj/effect/portal/attack_tk(mob/user)
|
|
return
|
|
|
|
/obj/effect/portal/attack_hand(mob/user)
|
|
. = ..()
|
|
if(.)
|
|
return
|
|
if(get_turf(user) == get_turf(src))
|
|
teleport(user)
|
|
if(Adjacent(user))
|
|
user.forceMove(get_turf(src))
|
|
|
|
/obj/effect/portal/attack_ghost(mob/dead/observer/O)
|
|
if(target)
|
|
O.forceMove(target)
|
|
|
|
/obj/effect/portal/multitool_act(mob/user, obj/item/I)
|
|
. = TRUE
|
|
if(!I.use_tool(src, user, 0, volume = I.tool_volume))
|
|
return
|
|
if(can_multitool_to_remove)
|
|
qdel(src)
|
|
else
|
|
user.forceMove(get_turf(src))
|
|
|
|
/obj/effect/portal/proc/can_teleport(atom/movable/M)
|
|
. = TRUE
|
|
|
|
if(!istype(M))
|
|
. = FALSE
|
|
|
|
if(!M.simulated || iseffect(M))
|
|
. = FALSE
|
|
|
|
/obj/effect/portal/proc/teleport(atom/movable/M)
|
|
if(!can_teleport(M))
|
|
return FALSE
|
|
|
|
if(!target)
|
|
qdel(src)
|
|
return FALSE
|
|
|
|
if(ismegafauna(M))
|
|
var/creator_string = ""
|
|
var/obj_name = creation_obj_data[2]
|
|
if(creation_mob_ckey)
|
|
creator_string = " created by [key_name_admin(GLOB.directory[creation_mob_ckey])][obj_name ? " using \a [obj_name]" : ""]"
|
|
else if(obj_name)
|
|
creator_string = " created by \a [obj_name]"
|
|
message_admins("[M] has used a portal at [ADMIN_VERBOSEJMP(src)][creator_string].")
|
|
|
|
if(prob(failchance))
|
|
icon_state = fail_icon
|
|
var/list/target_z = levels_by_trait(SPAWN_RUINS)
|
|
target_z -= M.z
|
|
if(!do_teleport(M, locate(rand(5, world.maxx - 5), rand(5, world.maxy -5), pick(target_z)), 0, bypass_area_flag = ignore_tele_proof_area_setting)) // Try to send them to deep space.
|
|
invalid_teleport()
|
|
return FALSE
|
|
else
|
|
if(!do_teleport(M, target, precision, bypass_area_flag = ignore_tele_proof_area_setting)) // Try to send them to a turf adjacent to target.
|
|
invalid_teleport()
|
|
return FALSE
|
|
if(one_use)
|
|
qdel(src)
|
|
return TRUE
|
|
|
|
/obj/effect/portal/proc/invalid_teleport()
|
|
visible_message("<span class='warning'>[src] flickers and fails due to bluespace interference!</span>")
|
|
do_sparks(5, 0, loc)
|
|
qdel(src)
|
|
|
|
/obj/effect/portal/redspace
|
|
name = "redspace portal"
|
|
desc = "A portal capable of bypassing bluespace interference."
|
|
icon_state = "portal1"
|
|
failchance = 0
|
|
precision = 0
|
|
ignore_tele_proof_area_setting = TRUE
|