[Pedido] talkaction sorteio

[dono red 9]

o comando deverá funcionar +/- igual o comando /ta da base cyan 2.0,só que com a diferença que só um player ganhe o item exemplo um ADM usa o comando /so itemid  e tem 50 players online desses 50  players apenas um irá ganhar o item x. quem fazer esse script pra mim ganha rep+

 

Script /ta:

 

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

 

 

[Sanieg 202]

<talkaction log="yes" words="/additem" access="5" event="script" value="additem.lua"/>

function onSay(cid, words, param, channel)
local t = string.explode(param, ",")
if t[1] ~= nil and t[2] ~= nil then
local list = {}
for i, tid in ipairs(getPlayersOnline()) do
    list[i] = tid
end
for i = 1, #list do
doPlayerAddItem(math.random(1,list[i]),t[1],t[2])
doBroadcastMessage(getPlayerName(cid) .. " Acabou de sortear: " .. t[2] .." ".. getItemNameById(t[1]) .. " para todos os players online!")
end
else
doPlayerPopupFYI(cid, "No parm...\nSend:\n /itemadd itemid,how_much_items\nexample:\n /itemadd 2160,10")
end
return true
end

Editado Maio 17, 2015 por Vinicius Xxgamexx (veja o histórico de edições)

[dono red 9]

nâo funcionou.... aparece o brodcast certinho do sorteio mas ninguém recebe nada...

[Sanieg 202]

Tente da seguinte forma:

function onSay(cid, words, param, channel)
local t = string.explode(param, ",")
if t[1] ~= nil and t[2] ~= nil then
local list = {}
for i, tid in ipairs(getPlayersOnline()) do
    list[i] = tid
end
for i = 1, #list do
doPlayerAddItem(math.random(list[i]),t[1],t[2])
doBroadcastMessage(getPlayerName(cid) .. " Acabou de sortear: " .. t[2] .." ".. getItemNameById(t[1]) .. " para todos os players online!")
end
else
doPlayerPopupFYI(cid, "No parm...\nSend:\n /itemadd itemid,how_much_items\nexample:\n /itemadd 2160,10")
end
return true
end