function onSay(cid, words, param, channel)
local pos, dir = getThingPos(cid), getPlayerLookDir(cid)
for i = 1, 5 do
local cur = {x=pos.x+(dir==1 and i or dir==3 and -i or 0), y=pos.y+(dir==0 and -i or dir==2 and i or 0), z=pos.z}
if queryTileAddThing(cid, cur) ~= 1 or getTilePzInfo(cur) or getTileHouseInfo(cur) then
return doPlayerSendCancel(cid, 'Destination not reachable.')
elseif i == [COLOR="Red"]2[/COLOR] then
doTeleportThing(cid, cur)
doSendMagicEffect(pos, CONST_ME_POFF)
doSendMagicEffect(cur, CONST_ME_TELEPORT)
end
end
return true
end