local function teleportPlayer(cid, n, pos, topos, effect, msgonend, effectonend)
if not isCreature(cid) then
return
end
if n == 0 then
doSendMagicEffect(pos, CONST_ME_POFF)
doTeleportThing(cid, topos, true)
doSendMagicEffect(topos, CONST_ME_TELEPORT)
doCreatureSetNoMove(cid, false)...