Ir para conteúdo
Banner com Efeitos

zSoninho

Membro
  • Registro em

  • Última visita

Histórico de Curtidas

  1. Gostei
    zSoninho deu reputação a GabrielSapient em Comando Presente Para todos do Servidor Poke tibia   
    *Sistema de premiação ~ By: Vampira*


    Com este comando você podera dar determinado item a um ou todos os players on no server! 

    Copie e cole esta linha na sua talkactions.xml
    <talkaction words="!premiar" event="script" value="premiar.lua"/>
    Agora crie um arquivo chamado primiar.lua na pasta data/talkactions/ e copie e cole este codigo dentro dele:
    -- Sistema de premiação 1.0
    -- script criado por Vampira.
    -- suporte técnico: [email protected].
    local function premiarItem(cid, itemid, amount)
    local item = 0
    if(isItemStackable(itemid)) then
             item = doCreateItemEx(itemid, amount)
             if(doPlayerAddItemEx(cid, item, true) ~= RETURNVALUE_NOERROR) then
                     return false
             end
    else
             for i = 1, amount do
                     item = doCreateItemEx(itemid)
                     if(doPlayerAddItemEx(cid, item, true) ~= RETURNVALUE_NOERROR) then
                             return false
                     end
             end
    end
    return true
    end
    function onSay(cid, words, param, channel)
    if(param == "") then
             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Diga um nome, Item, quantidade(opcional) exemplo: !premiar Player, Demon Helmet, 1")
             return TRUE
    end
    local player = string.explode(param, ",")
    local quantidade = 1
    local premiar = player[2]
    if (player[3]) then
             quantidade = player[3]
    end
    local id = tonumber(premiar)
    if(not id) then
             id = getItemIdByName(premiar, false)
             if(not id) then
                     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Nome digitado incorretamente ou item não existe.")
                     return true
             else
                     premiar = id
             end
    end

    if(isItemMovable(premiar) == false) then
             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Item não pode ser premiado")
             return TRUE
    else
        
             if(player[1] == "todos") then
                     if getPlayerGroupId(cid) > 4 then
                             local monos = getPlayersOnline()
                             local ley = {}
                             for i, lol in ipairs(monos) do
                                     ley[i] = lol
                                     local vampira_tk = ley[#ley]
                                     premiarItem(vampira_tk, premiar, quantidade)
                             end
                             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Premiação entregue")
                        
                     else
                             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player não encontrado")
                     end
                     return TRUE
             end
        
             if (getPlayerByName(player[1])) then
                     if getPlayerGroupId(cid) > 4 then
                             premiarItem(getPlayerByNameWildcard(player[1]), regalar, quantidade)
                             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Premiação entregue")
                     else
                             if getPlayerItemCount(cid,premiar) >= quantidade then
                                     doPlayerRemoveItem(cid, regalar, quantidade)
    premiarItem(getPlayerByNameWildcard(player[1]), regalar, quantidade)
                                     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Premiação entregue")
                             else
                                     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem este item")
                             end
                     end
                     return TRUE
             else
                     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player não encontrado")
             end
    end
    return TRUE
    end

    Como usar o comando:
    Citar



    * Marrom = nome do player, escreva todos para mandar para todos os players.
    * Azul = ID ou nome do item
    * Verde = Quantidade do item

    OBS: player só poderá enviar item se ele estiver o determinado item na bp, já o GOD pode enviar o item mesmo sem ter ele na bp.
  2. Gostei
  3. Gostei
  4. Gostei
    zSoninho recebeu reputação de Jobsiinsz1 em Ajuda Site Nao sei oque fazer.   
    Olá galera estou com essa duvida não sei oque acontece =/
     
     
     
     
    Quando tento cria site.

Informação Importante

Confirmação de Termo