Ir para conteúdo
TK News
  • Cadastre-se

Tem como Tirar algumas Checagem desse Script?

TsplayerT

Por ,
em Suporte Tibia OTServer

 Share Seguidores 0

Posts Recomendados

Fir3element

Fir3element 626

Postado
Postado 

local config = {
    check = {"check", "viwer", "verificar", "ver"},
    delete = {"del", "delete", "deletar"},
    search = {"search", "procurar"}
}

function getItemsInContainer(cont, sep)
    local text, tsep, count = "", "", ""
    for i = 1, sep do
        tsep = tsep .. "-"
    end
    tsep = tsep .. ">"
    for i = 0, getContainerSize(cont.uid) - 1 do
        local item = getContainerItem(cont.uid, i)
        if not isContainer(item.uid) then
            if item.type > 0 then
                count = "(" .. item.type .. "x)"
            end
            text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " " .. count .. " (" .. item.itemid .. ")"
        else
            if getContainerSize(item.uid) > 0 then
                text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")"
                text = text .. getItemsInContainer(item, sep + 2) .. " (" .. item.itemid .. ")"
            else
                text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")"
            end
        end
    end
    return text
end

function onSay(cid, words, param, channel)
    local slotName = {CONST_SLOT_BACKPACK, CONST_SLOT_RIGHT, CONST_SLOT_FEET}
    local t = string.explode(param, ",")
    if(table.isStrIn(param, config.check)) then
        if getPlayerGroupId(cid) >= 5 then
            local player = getPlayerByNameWildcard(t[2])
            if isPlayer(player) then
                local text = getPlayerName(player) .. "'s Equipment: "
                for i = 1, #slotName do
                    text = text .. "\n\n"
                    local item = getPlayerSlotItem(player, slotName[i])
                    if item.itemid > 0 then
                        if isContainer(item.uid) then
                            text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ") " .. getItemsInContainer(item, 1)
                        else
                            text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")"
                        end
                    else
                        text = text .. slotName[i] .. ": Empty"
                    end
                end
                doShowTextDialog(cid, 6579, text)
            else
                doPlayerSendCancel(cid, "This player is not online.")
            end
        end
    elseif(table.isStrIn(param, config.delete)) then
        if getPlayerGroupId(cid) >= 5 then
            local player = getPlayerByNameWildcard(t[3])
            if isPlayer(player) then
                count = t[4]
                if(not t[4]) then
                    count = 1
                end
                if getPlayerItemCount(player, t[2]) > 0 then
                    if doPlayerRemoveItem(player, t[2], count) then
                        doPlayerSendCancel(cid, "Item Deletado.")
                    else
                        doPlayerSendCancel(cid, "Este player não esta quantidade.")
                    end
                else
                    doPlayerSendCancel(cid, "Este player não tem o item.")
                end
            end
        end
    elseif(table.isStrIn(param, config.search)) then
        if getPlayerGroupId(cid) >= 5 then
            local player = getPlayerByNameWildcard(t[3])
            local result = db.getResult("SELECT name, online FROM players WHERE id IN (SELECT player_id FROM player_items WHERE itemtype = " ..  t[2]  .. ");")
            local msg = "Resultados da busca pelo item " ..  t[2]  .. " em seu banco de dados:\n\n"
            if result:getID() ~= -1 then
                while true do
                    local name = result:getDataString("name")
                    local online = result:getDataInt("online")
                    msg = msg .. name  .. " [" ..  (online == 1 and "Online" or "Offline") .. "]\n"
                    if not result:next() then
                        break
                    end
                end
            else
                msg = msg .. "O item não foi encontrado em nenhum jogador."
            end
            doShowTextDialog(cid, t[2], msg)
        end
    end
    return true
end
Link para o post
Compartilhar em outros sites
  • Respostas 11
  • Created
  • Última resposta

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Popular Posts

TsplayerT

ALO COM QUE EU FALO?       Gente tem como me ajuda com esse Script do Comedinha? ele faz um checagem de itens que um jogador especifico porem eu quero tirar a checagem de item da Cabeça, Amuleto, Armor, Mao Esquerda, Legs, Ring e Ammo Slot, ficando somente a verificação da BACKPACK, MAO DIREITA E PÉS   link do Script: http://www.tibiaking.com/forum/topic/20933-talkaction-player-check-system/     TAG: <talkaction log="yes" words="!p;/p" access="5" event="script" value="playercheck.lua

TsplayerT

TsplayerT 83

Postado
  • Autor
Postado 

local config = {
    check = {"check", "viwer", "verificar", "ver"},
    delete = {"del", "delete", "deletar"},
    search = {"search", "procurar"}
}

function getItemsInContainer(cont, sep)
    local text, tsep, count = "", "", ""
    for i = 1, sep do
        tsep = tsep .. "-"
    end
    tsep = tsep .. ">"
    for i = 0, getContainerSize(cont.uid) - 1 do
        local item = getContainerItem(cont.uid, i)
        if not isContainer(item.uid) then
            if item.type > 0 then
                count = "(" .. item.type .. "x)"
            end
            text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " " .. count .. " (" .. item.itemid .. ")"
        else
            if getContainerSize(item.uid) > 0 then
                text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")"
                text = text .. getItemsInContainer(item, sep + 2) .. " (" .. item.itemid .. ")"
            else
                text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")"
            end
        end
    end
    return text
end

function onSay(cid, words, param, channel)
    local slotName = {CONST_SLOT_BACKPACK, CONST_SLOT_RIGHT, CONST_SLOT_FEET}
    local t = string.explode(param, ",")
    if(table.isStrIn(param, config.check)) then
        if getPlayerGroupId(cid) >= 5 then
            local player = getPlayerByNameWildcard(t[2])
            if isPlayer(player) then
                local text = getPlayerName(player) .. "'s Equipment: "
                for i = 1, #slotName do
                    text = text .. "\n\n"
                    local item = getPlayerSlotItem(player, slotName[i])
                    if item.itemid > 0 then
                        if isContainer(item.uid) then
                            text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ") " .. getItemsInContainer(item, 1)
                        else
                            text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")"
                        end
                    else
                        text = text .. slotName[i] .. ": Empty"
                    end
                end
                doShowTextDialog(cid, 6579, text)
            else
                doPlayerSendCancel(cid, "This player is not online.")
            end
        end
    elseif(table.isStrIn(param, config.delete)) then
        if getPlayerGroupId(cid) >= 5 then
            local player = getPlayerByNameWildcard(t[3])
            if isPlayer(player) then
                count = t[4]
                if(not t[4]) then
                    count = 1
                end
                if getPlayerItemCount(player, t[2]) > 0 then
                    if doPlayerRemoveItem(player, t[2], count) then
                        doPlayerSendCancel(cid, "Item Deletado.")
                    else
                        doPlayerSendCancel(cid, "Este player não esta quantidade.")
                    end
                else
                    doPlayerSendCancel(cid, "Este player não tem o item.")
                end
            end
        end
    elseif(table.isStrIn(param, config.search)) then
        if getPlayerGroupId(cid) >= 5 then
            local player = getPlayerByNameWildcard(t[3])
            local result = db.getResult("SELECT name, online FROM players WHERE id IN (SELECT player_id FROM player_items WHERE itemtype = " ..  t[2]  .. ");")
            local msg = "Resultados da busca pelo item " ..  t[2]  .. " em seu banco de dados:\n\n"
            if result:getID() ~= -1 then
                while true do
                    local name = result:getDataString("name")
                    local online = result:getDataInt("online")
                    msg = msg .. name  .. " [" ..  (online == 1 and "Online" or "Offline") .. "]\n"
                    if not result:next() then
                        break
                    end
                end
            else
                msg = msg .. "O item não foi encontrado em nenhum jogador."
            end
            doShowTextDialog(cid, t[2], msg)
        end
    end
    return true
end

Funcionou direitinho, mas tem como colocar o nome de cada checagem?(tipo a verificação da backpack no lugar de 3, ser Backpack?)

Meus Contatos!

 

Minhas Funções:

 

               Skype: TsplayerT

         Facebook: TakaFukushii

          YouTube: ADoseDupla

           Twitter: @_Splayer_

 

 

 

 

 

 

 

                             Mapper:▓▓▓▓▓▓▓▓▓▓ 97%

     Programmer:▓▓▓▓▓▒▒▒▒▒ 45%

             Scripter:▓▓▓▓▓▓▓▓▓▒ 83%

              Spriter:▓▓▓▓▓▓▒▒▒▒ 57%

    Gamemaster:▓▓▓▓▓▓▓▓▓▓ 99%

        Ot Creator:▓▓▓▓▓▓▓▒▒▒71%

Ot Client Maker:▓▓▓▓▓▓▓▒▒▒74%

 

Link para o post
Compartilhar em outros sites
Fir3element

Fir3element 626

Postado
Postado

Desse jeito ai não, tu pode usar essas tags:

CONST_SLOT_HEAD = 1
CONST_SLOT_NECKLACE = 2
CONST_SLOT_BACKPACK = 3
CONST_SLOT_ARMOR = 4
CONST_SLOT_RIGHT = 5
CONST_SLOT_LEFT = 6
CONST_SLOT_LEGS = 7
CONST_SLOT_FEET = 8
CONST_SLOT_RING = 9
CONST_SLOT_AMMO = 10
Link para o post
Compartilhar em outros sites
TsplayerT

TsplayerT 83

Postado
  • Autor
Postado

 

Desse jeito ai não, tu pode usar essas tags:

CONST_SLOT_HEAD = 1
CONST_SLOT_NECKLACE = 2
CONST_SLOT_BACKPACK = 3
CONST_SLOT_ARMOR = 4
CONST_SLOT_RIGHT = 5
CONST_SLOT_LEFT = 6
CONST_SLOT_LEGS = 7
CONST_SLOT_FEET = 8
CONST_SLOT_RING = 9
CONST_SLOT_AMMO = 10

eu não sei usa-las pode fazer uma??

Meus Contatos!

 

Minhas Funções:

 

               Skype: TsplayerT

         Facebook: TakaFukushii

          YouTube: ADoseDupla

           Twitter: @_Splayer_

 

 

 

 

 

 

 

                             Mapper:▓▓▓▓▓▓▓▓▓▓ 97%

     Programmer:▓▓▓▓▓▒▒▒▒▒ 45%

             Scripter:▓▓▓▓▓▓▓▓▓▒ 83%

              Spriter:▓▓▓▓▓▓▒▒▒▒ 57%

    Gamemaster:▓▓▓▓▓▓▓▓▓▓ 99%

        Ot Creator:▓▓▓▓▓▓▓▒▒▒71%

Ot Client Maker:▓▓▓▓▓▓▓▒▒▒74%

 

Link para o post
Compartilhar em outros sites
  • 2 months later...
TsplayerT

TsplayerT 83

Postado
  • Autor
Postado

@up

tava quase resolvido... *-*

Meus Contatos!

 

Minhas Funções:

 

               Skype: TsplayerT

         Facebook: TakaFukushii

          YouTube: ADoseDupla

           Twitter: @_Splayer_

 

 

 

 

 

 

 

                             Mapper:▓▓▓▓▓▓▓▓▓▓ 97%

     Programmer:▓▓▓▓▓▒▒▒▒▒ 45%

             Scripter:▓▓▓▓▓▓▓▓▓▒ 83%

              Spriter:▓▓▓▓▓▓▒▒▒▒ 57%

    Gamemaster:▓▓▓▓▓▓▓▓▓▓ 99%

        Ot Creator:▓▓▓▓▓▓▓▒▒▒71%

Ot Client Maker:▓▓▓▓▓▓▓▒▒▒74%

 

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Conteúdo Similar

    • Under
      🔥 Script Grátis de Alta Qualidade! | Revolução no Desenvolvimento de Servidores Tibia – Conheça o Tibia-AI! 🔥
      Por Under
      Apresentando o Tibia-IA: A IA para Desenvolvimento de Servidores Tibia! 
       O que é o Tibia-IA?
      Um modelo de IA especializado para Tibia! Ele está atualmente em teste gratuito, e eu adoraria que vocês o experimentassem. Basta acessar https://ai.tibiaking.com, criar uma conta e começar a usar totalmente de graça! 
       Versão Experimental Fechada
      Atualmente, algumas funcionalidades ainda estão em desenvolvimento. No momento, apenas a geração de scripts está disponível para o público.
      Se encontrarem qualquer problema nos scripts gerados, me avisem! Vamos juntos construir a IA mais poderosa para ajudar no desenvolvimento de servidores Tibia!  
      Contato direto discord : underewar
       Acesse agora: https://ai.tibiaking.com
       Como funciona?
       Geração automática de scripts LUA para TFS  Suporte a diferentes eventos, criaturas, NPCs, magias, etc.  Ferramenta em constante evolução para aprimorar o desenvolvimento Novidades em breve confira no site. O acesso ao Tibia-IA está disponível para testes GRATUITOS! 
      Basta criar uma conta em: https://ai.tibiaking.com
      Utilize a IA para gerar seus scripts de forma simples e rápida
      Envie feedbacks para ajudarmos a tornar a ferramenta ainda melhor!

      Problemas relatar diretamente no meu discord pessoal : underewar
       
       
    • Raito
      Preciso de uma base digitibia
      Por Raito
      Eu e mais 3 pessoas gostariamos de criar um digitibia alguem poderia me ajudar disponibilizando uma base que esteja funcionando, as unicas que eu encontrei nao funcionam. se alguem tiver para disponibilizar eu agradesço muito.
      meu email é 
      [email protected]
    • LasseXeterno
      Adicionar tipo fada em base Cyan
      Por LasseXeterno
      Então, estou tentando adicionar uma nova "race" no meu Ot de base Cyan, tentei seguir 3 tutoriais aqui do tibiaking, um sobre race, porém nos códigos do meu servidor não tem o constant.h e nem o monster.cpp. E o outro tutorial, eu fiz tudo que ele pediu e quando entrei no game para testar, funcionava os golpes e as imunidades, porém não aparecia o número do dano e nem a cor.  Usei esse tutorial como base: 
      Pois ele é derivado. E o outro tutorial que usei foi: 
      Porém nesse, não consegui achar a const.h, e quando fui nos arquivos do creaturescript e adicionei uma cor nova a "COLOR_FAIRY", quando abro o jogo, os pokemons que seriam teoricamente "fada", o que eu usei de teste foi a Clefable. A Clefable tomava IK e dava IK no seu atk do tipo fada. 
      Além de que, o meu erro principal é esse: Warning - Monsters::loadMonster] Unknown race type fairy. (data/monster/pokes/geracao 1/Clefable.xml)
       Pois como eu já disse, não consigo achar onde adicionar uma nova race.

    • yuriowns
      NPC Verifica quantos itens tem no tile que você está
      Por yuriowns
      Salve rapazes, tranquilo? Preciso de ajuda pra colocar para os npc's que vendem pots verificarem quantos itens possuem no tile em que o player está e se tiver com +80 itens no sqm, o npc avisa e não vende nada até o player ir em um sqm com menos de 80 itens no chão.
       
    • A.Mokk
      Imbuement System 8.60
      Por A.Mokk
      .Qual servidor ou website você utiliza como base? 
      TFS 0.4
      Qual o motivo deste tópico? 
      Bom pessoal, a algumas semanas atras eu joguei um servidor que havia sistema de imbuimento sendo 8.60, no servidor se utilizava a spellwand para encantar as armas, os comandos eram dado no canal Imbuiment... Gostaria de saber se alguém teria como disponibilizar algum sistema de imbuimento, já procurei pra caramba aqui no fórum mas tudo que encontro é pra versões acima da que eu uso.
       

  • Estatísticas dos Fóruns

    96844
    Tópicos
    519597
    Posts


TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito