Sistema de Adicionar items a Todo o Servidor Online

<talkaction words="!ta;/ta" access="4" event="script" value="createitemall.lua"/>

 

function onSay(cid, words, param, channel)

if(param == '') then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")

return true

end

for _, pid in ipairs(getPlayersOnline()) do

local t = string.explode(param, ",")

local ret = RETURNVALUE_NOERROR

local pos = getCreaturePosition(cid)

local id = tonumber(t[1])

if(not id) then

errors(false)

id = getItemIdByName(t[1])

errors(true)

if(not id) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Item wich such name does not exists.")

return true

end

end

amount = t[2]

if(not t[2]) then

amount = 1

end

local item = doCreateItemEx(id, amount)

if(t[3] and getBooleanFromString(t[3])) then

if(t[4] and getBooleanFromString(t[4])) then

pos = getCreatureLookPosition(cid)

end

ret = doTileAddItemEx(pos, item)

else

doPlayerSendTextMessage(pid, MESSAGE_STATUS_CONSOLE_BLUE, "O "..getCreatureName(cid).." deu ("..amount.."x) "..getItemNameById(id).." para todos os players online.")

ret = doPlayerAddItemEx(pid, item, true)

end

if(ret ~= RETURNVALUE_NOERROR) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Couldn't add item: " .. t[1])

return true

end

doDecayItem(item)

if(not isPlayerGhost(cid)) then

doSendMagicEffect(pos, CONST_ME_MAGIC_RED)

end

end

return true

end