Files
Yogstation/code/game/objects/items/scrolls.dm
Ling f83723c389 Ports SSfoam and SSsmoke (#17742)
* Ports SSfoam and SSsmoke

* Remove dupe define
2023-02-08 00:52:57 +00:00

87 lines
2.4 KiB
Plaintext

/obj/item/teleportation_scroll
name = "scroll of teleportation"
desc = "A scroll for moving around."
icon = 'icons/obj/wizard.dmi'
icon_state = "scroll"
var/uses = 4
w_class = WEIGHT_CLASS_SMALL
item_state = "paper"
throw_speed = 3
throw_range = 7
resistance_flags = FLAMMABLE
/obj/item/teleportation_scroll/apprentice
name = "lesser scroll of teleportation"
uses = 1
/obj/item/teleportation_scroll/attack_self(mob/user)
user.set_machine(src)
var/dat = ""
dat += "<HTML><HEAD><meta charset='UTF-8'></HEAD><BODY>"
dat +="<B>Teleportation Scroll:</B><BR>"
dat += "Number of uses: [src.uses]<BR>"
dat += "<HR>"
dat += "<B>Four uses, use them wisely:</B><BR>"
dat += "<A href='byond://?src=[REF(src)];spell_teleport=1'>Teleport</A><BR>"
dat += "Kind regards,<br>Wizards Federation<br><br>P.S. Don't forget to bring your gear, you'll need it to cast most spells.<HR>"
dat += "</BODY></HTML>"
user << browse(dat, "window=scroll")
onclose(user, "scroll")
return
/obj/item/teleportation_scroll/Topic(href, href_list)
..()
if (usr.stat || usr.restrained() || src.loc != usr)
return
if (!ishuman(usr))
return 1
var/mob/living/carbon/human/H = usr
if(H.is_holding(src))
H.set_machine(src)
if (href_list["spell_teleport"])
if(uses)
teleportscroll(H)
if(H)
attack_self(H)
return
/obj/item/teleportation_scroll/proc/teleportscroll(mob/user)
var/A
A = input(user, "Area to jump to", "BOOYEA", A) as null|anything in GLOB.teleportlocs
if(!src || QDELETED(src) || !user || !user.is_holding(src) || user.incapacitated() || !A || !uses)
return
var/area/thearea = GLOB.teleportlocs[A]
var/datum/effect_system/fluid_spread/smoke/smoke = new
smoke.set_up(2, location = user.loc)
smoke.attach(user)
smoke.start()
var/list/L = list()
var/list/achors = thearea.teleport_anchors
if(achors.len) //check the areas prefered teleportation list if it is empty just use a random enpty tile like before
for(var/turf/T in achors)
if(!is_blocked_turf(T))
L += T
if(!L.len)
for(var/turf/T in get_area_turfs(thearea.type))
if(!is_blocked_turf(T))
L += T
if(!L.len)
to_chat(user, "The spell matrix was unable to locate a suitable teleport destination for an unknown reason. Sorry.")
return
if(do_teleport(user, pick(L), forceMove = TRUE, channel = TELEPORT_CHANNEL_MAGIC, forced = TRUE))
smoke.start()
uses--
else
to_chat(user, "The spell matrix was disrupted by something near the destination.")