Files
Paradise/code/game/verbs/atom_verbs.dm
2013-10-12 14:44:36 -04:00

33 lines
620 B
Plaintext

/atom/movable/verb/pull()
set name = "Pull"
set category = "Object"
set src in oview(1)
if(Adjacent(usr))
usr.start_pulling(src)
return
/atom/verb/point()
set name = "Point To"
set category = "Object"
set src in oview()
var/atom/this = src//detach proc from src
src = null
if(!usr || !isturf(usr.loc))
return
if(usr.stat || usr.restrained())
return
if(usr.status_flags & FAKEDEATH)
return
var/tile = get_turf(this)
if (!tile)
return
var/P = new /obj/effect/decal/point(tile)
spawn (20)
if(P) del(P)
usr.visible_message("<b>[usr]</b> points to [this]")