function onSay(cid, words, param)
teleportTo = {x=1000, y=1000, z=7}
pos = getCreaturePosition(cid)
doTeleportThing(cid, teleportTo, TRUE)
doSendMagicEffect(pos, 10)
doSendMagicEffect(teleportTo, 10)
return TRUE
end
<talkaction words="!tp" script="tppos.lua"/>