function onSay(cid, words, param, channel)
if getPlayerStorageValue(cid, 46464) == -1 then
local toPos = getCreatureLookPosition(cid)
if(isInArray({"full", "all"}, param:lower())) then
doCleanTile(toPos, false)
doSendMagicEffect(toPos, CONST_ME_MAGIC_RED)
return true
end
local amount = 1
param = tonumber(param)
if(param) then
amount = param
end
toPos.stackpos = STACKPOS_TOP_MOVEABLE_ITEM_OR_CREATURE
local tmp = getThingFromPos(toPos)
if(tmp.uid ~= 0) then
if(isCreature(tmp.uid)) then
doRemoveCreature(tmp.uid)
else
doRemoveItem(tmp.uid, math.min(math.max(1, tmp.type), amount))
end
doSendMagicEffect(toPos, CONST_ME_MAGIC_RED)
return true
end
toPos.stackpos = STACKPOS_TOP_FIELD
tmp = getThingFromPos(toPos)
if(tmp.uid ~= 0) then
doRemoveItem(tmp.uid, math.min(math.max(1, tmp.type), amount))
doSendMagicEffect(toPos, CONST_ME_MAGIC_RED)
return true
end
toPos.stackpos = STACKPOS_TOP_CREATURE
tmp = getThingFromPos(toPos)
if(tmp.uid ~= 0) then
doRemoveCreature(tmp.uid)
doSendMagicEffect(toPos, CONST_ME_MAGIC_RED)
return true
end
for i = 5, 1, -1 do
toPos.stackpos = i
tmp = getThingFromPos(toPos)
if(tmp.uid ~= 0) then
if(isCreature(tmp.uid)) then
doRemoveCreature(tmp.uid)
else
doRemoveItem(tmp.uid, math.min(math.max(1, tmp.type), amount))
end
doSendMagicEffect(toPos, CONST_ME_MAGIC_RED)
return true
end
end
end
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return true
end
O comando /r é lua mesmo. Só retirar os doSendMagicEffect do script.



info
Grupo: Marquês
Registrado: 02/08/12
Posts: 1k
Reputação: +234
Char no Tibia: Maurolkit
Olá alguém poderia me passar o comando /r por source?
ou somente o parâmetro para deletar items sem o efeito.