A few useful functions (CHECK!)

[Colandus]

-- Returns the top item on a tile.
function getTopItem(pos)
    pos.stackpos = 1 + getTopCreature(pos).itemid
    return getTileThingByPos(pos)
end

-- Teleport a creature with effects, invisible players will not show effects!
function doTeleportCreature(cid, pos, pushmove)
    if(not isCreature(cid)) then
        return FALSE
    end

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
        doSendMagicEffect(pos, CONST_ME_TELEPORT)
    end
   
    doTeleportThing(cid, pos, pushmove)
    return TRUE
end

-- Check whether a position is free (for a player to walk on)... can't remember if it works tho :D
function isPositionFree(pos)
    local thing = getTopCreature(pos)
    if isCreature(thing.uid) == FALSE then
        pos.stackpos = 0
        thing = getThingfromPos(pos)
       
        if thing.uid > 0 then
            while hasProperty(thing.uid, CONST_PROP_BLOCKINGANDNOTMOVEABLE) == FALSE do
                pos.stackpos = pos.stackpos + 1
                thing = getThingfromPos(pos)
               
                if thing.uid == FALSE then
                    return TRUE
                end
            end
        end
    end
    return FALSE
end

 

[Apollo]

Pretty nice! Thanks for sharing

 

[chojrak]

function doTeleportCreature(cid, pos, move)

But where's used move parameter?

 

[Colandus]

Forgot to use it It's for "doTeleportThing(cid, newpos[, pushmove = TRUE])"

It's an optional parameter.

 

[Elvang]

Thanks colandus. So useful.

 

[hodleo]

god blesses ur brain, col

 

[Shawak]

-- Teleport a creature with effects, invisible players will not show effects!
function doTeleportCreature(cid, pos, pushmove)
        if(isCreature(cid) and not isPlayerGhost(cid)) then
                doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
                doTeleportThing(cid, pos, pushmove)
                doSendMagicEffect(pos, CONST_ME_TELEPORT)
                return TRUE
        end
       
        return FALSE
end

hahahhhaaa, invisible player won't teleportet.

Better:

-- Teleport a creature with effects, invisible players will not show effects!
function doTeleportCreature(cid, pos, pushmove)
	if isCreature(cid) == TRUE then
		if(isPlayer(cid) and isPlayerGhost(cid) == FALSE) or (isMonster(cid) == TRUE) or (isNpc(cid) == TURE) then
			doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
			doSendMagicEffect(pos, CONST_ME_TELEPORT)
		end
		return doTeleportThing(cid, pos, pushmove)
	end
	return FALSE
end

 

[chojrak]

@shawak:
not something == (something == FALSE)

 

[Colandus]

-- Teleport a creature with effects, invisible players will not show effects!
function doTeleportCreature(cid, pos, pushmove)
        if(isCreature(cid) and not isPlayerGhost(cid)) then
                doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
                doTeleportThing(cid, pos, pushmove)
                doSendMagicEffect(pos, CONST_ME_TELEPORT)
                return TRUE
        end
       
        return FALSE
end

hahahhhaaa, invisible player won't teleportet.

Better:

-- Teleport a creature with effects, invisible players will not show effects!
function doTeleportCreature(cid, pos, pushmove)
	if isCreature(cid) == TRUE then
		if(isPlayer(cid) and isPlayerGhost(cid) == FALSE) or (isMonster(cid) == TRUE) or (isNpc(cid) == TURE) then
			doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
			doSendMagicEffect(pos, CONST_ME_TELEPORT)
		end
		return doTeleportThing(cid, pos, pushmove)
	end
	return FALSE
end

yess lol I forgot to edit hehe! Fixed it in my serv but i forgot to fix here

Thanks for notifying me

 

[Shawak]

yess lol I forgot to edit hehe! Fixed it in my serv but i forgot to fix here

Thanks for notifying me

No Problem ^_^.

@shawak:
not something == (something == FALSE)

I Know, lol.

 

[hodleo]

heya colandus, I need a little upgrade of your ispositionfree function
I need it to check if pos is PZ and HOUSETILE plz I need it for my new spell
since I don't want to script many checkings(getTilePZinfo, getTileHouseinfo)