Ir para conteúdo

BlazerX

Campones
  • Total de itens

    90
  • Registro em

  • Última visita

  • Dias Ganhos

    11

Posts postados por BlazerX

  1. 2 minutos atrás, anderson127 disse:

    e aquele npc ali em cima
     

    
    local keywordHandler = KeywordHandler:new()
    local npcHandler = NpcHandler:new(keywordHandler)
    NpcSystem.parseParameters(npcHandler)
    local talkState = {}
    
    function doBuyPokemonWithCasinoCoins(cid, poke) npcHandler:onSellpokemon(cid) end
    function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
    function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
    function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
    function onThink() npcHandler:onThink() end
    
    function getPlayerAllTowerItens(cid)
    	if getPlayerItemCount(cid, 12163) >= 1000 and getPlayerItemCount(cid, 12161) >= 1000 and getPlayerItemCount(cid, 19500) >= 1500 and getPlayerItemCount(cid, 19501) >= 2000 and getPlayerItemCount(cid, 19540) >= 200 and getPlayerItemCount(cid, 15092) >= 100 and getPlayerItemCount(cid, 15098) >= 100 and getPlayerItemCount(cid, 15094) >= 100 and getPlayerItemCount(cid, 19536) >= 50 then
    		return true
    	end
    	return false
    end
    
    function doRemoveItensTower(cid)
    	doPlayerRemoveItem(cid, 12163, 1000)
    	doPlayerRemoveItem(cid, 12161, 1000)
    	doPlayerRemoveItem(cid, 19500, 1500)
    	doPlayerRemoveItem(cid, 19501, 2000)
    	doPlayerRemoveItem(cid, 19540, 200)
    	doPlayerRemoveItem(cid, 15092, 100)
    	doPlayerRemoveItem(cid, 15098, 100)
    	doPlayerRemoveItem(cid, 15094, 100)
    	doPlayerRemoveItem(cid, 19536, 50)
    	return true
    end
    
    function creatureSayCallback(cid, type, msg)
    
    if(not npcHandler:isFocused(cid)) then
    return false
    end
    
    if (msgcontains(msg, 'Embedded Tower') or msgcontains(msg, 'embedded tower')) then
    
    	if getPlayerStorageValue(cid, 509001) >= 1 then
    		selfSay("Não preciso mais de sua ajuda, você agora pode explorar a Embedded Tower!")	
    		return true
    	end
    
    	if getPlayerStorageValue(cid, 659875) == -1 then 
    		 selfSay("Antes de tudo preciso checar se eis forte o suficiente para poder entrar lá, você poderia trazer-me {50x Giant Ruby}, {100x Sharpe Leave}, {100x Pawn}, {100x Crimson Feather}, {200x Linearly Guided Hypnosis}, {2000x enchanted gem}, {2000x Rubber Ball}, {1500x Earth Ball}, {1000x Seed}, {1000x water gem}?", cid)
    		 talkState[cid] = 1
    	else
    		 selfSay("Você já fez seus pedidos?", cid)
    		 talkState[cid] = 2
    	end
    
    elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'sim')) and talkState[cid] == 1 and getPlayerStorageValue(cid, 659875) == -1 then
    
    	  if getPlayerAllTowerItens(cid) then
    	
    		doRemoveItensTower(cid)
    		selfSay("É dito uma lenda à qual a antiga civilização pokémon adorava 3 grandes deuses que trariam prosperidade, hoje são representado-os pelas {Pedra Sagrada da Floresta}, {Pedra Sagrada da Terra} e a {Pedra Sagrada do Mar}, volte quando feito seus {pedidos}!", cid)
    		setPlayerStorageValue(cid, 659875, 1)
    	  
    	  else
    	 
             selfSay("Lembre-se, os itens são {50x Giant Ruby}, {100x Sharpe Leave}, {100x Pawn}, {100x Crimson Feather}, {200x Linearly Guided Hypnosis}, {2000x enchanted gem}, {2000x Rubber Ball}, {1500x Earth Ball}, {1000x Seed}, {1000x water gem}...", cid)
             talkState[cid] = 0
             return true
          end
       
    elseif msgcontains(msg, 'pedidos') and getPlayerStorageValue(cid, 659875) == 1 then
           selfSay("Você já fez seus pedidos?", cid)
           talkState[cid] = 2
           
    elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'sim')) and talkState[cid] == 2 and getPlayerStorageValue(cid, 659875) == 1 then
    
    		if getPlayerStorageValue(cid, 60900) >= 1 and getPlayerStorageValue(cid, 60901) >= 1 and getPlayerStorageValue(cid, 60902) >= 1 then
    			setPlayerStorageValue(cid, 509001, 1)
    			setPlayerStorageValue(cid, 78501, 1)
    			selfSay("Pronto agora você pode acessar a tower!", cid)
    			talkState[talkUser] = 0		
    		else
    			selfSay("Você não fez seus pedidos às 3x pedras sagradas;", cid)
    			talkState[talkUser] = 0	
    		end
        
    elseif (msgcontains(msg, 'no') or msgcontains(msg, 'nao')) then
         selfSay("So good bye...", cid)
         talkState[cid] = 0
         return false 
    end
    
    end
    npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
    npcHandler:addModule(FocusModule:new())

    Manda pm para mim que eu vou ajudar você.

  2. 6 minutos atrás, anderson127 disse:
    
    local keywordHandler = KeywordHandler:new()
    local npcHandler = NpcHandler:new(keywordHandler)
    NpcSystem.parseParameters(npcHandler)
    local talkState = {}
    
    function doBuyPokemonWithCasinoCoins(cid, poke) npcHandler:onSellpokemon(cid) end
    function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
    function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
    function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
    function onThink() npcHandler:onThink() end
    
    function getPlayerAllTowerItens(cid)
    	if getPlayerItemCount(cid, 12163) >= 1000 and getPlayerItemCount(cid, 12161) >= 1000 and getPlayerItemCount(cid, 19500) >= 1500 and getPlayerItemCount(cid, 19501) >= 2000 and getPlayerItemCount(cid, 19540) >= 200 and getPlayerItemCount(cid, 15092) >= 100 and getPlayerItemCount(cid, 15098) >= 100 and getPlayerItemCount(cid, 15094) >= 100 and getPlayerItemCount(cid, 19536) >= 50 then
    		return true
    	end
    	return false
    end
    
    function doRemoveItensTower(cid)
    	doPlayerRemoveItem(cid, 12163, 1000)
    	doPlayerRemoveItem(cid, 12161, 1000)
    	doPlayerRemoveItem(cid, 19500, 1500)
    	doPlayerRemoveItem(cid, 19501, 2000)
    	doPlayerRemoveItem(cid, 19540, 200)
    	doPlayerRemoveItem(cid, 15092, 100)
    	doPlayerRemoveItem(cid, 15098, 100)
    	doPlayerRemoveItem(cid, 15094, 100)
    	doPlayerRemoveItem(cid, 19536, 50)
    	return true
    end
    
    function creatureSayCallback(cid, type, msg)
    
    if(not npcHandler:isFocused(cid)) then
    return false
    end
    
    if (msgcontains(msg, 'Embedded Tower') or msgcontains(msg, 'embedded tower')) then
    
    	if getPlayerStorageValue(cid, 509001) >= 1 then
    		selfSay("Não preciso mais de sua ajuda, você agora pode explorar a Embedded Tower!")	
    		return true
    	end
    
    	if getPlayerStorageValue(cid, 659875) == -1 then 
    		 selfSay("Antes de tudo preciso checar se eis forte o suficiente para poder entrar lá, você poderia trazer-me {50x Giant Ruby}, {100x Sharpe Leave}, {100x Pawn}, {100x Crimson Feather}, {200x Linearly Guided Hypnosis}, {2000x enchanted gem}, {2000x Rubber Ball}, {1500x Earth Ball}, {1000x Seed}, {1000x water gem}?", cid)
    		 talkState[cid] = 1
    	else
    		 selfSay("Você já fez seus pedidos?", cid)
    		 talkState[cid] = 2
    	end
    
    elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'sim')) and talkState[cid] == 1 and getPlayerStorageValue(cid, 659875) == -1 then
    
    	  if getPlayerAllTowerItens(cid) then
    	
    		doRemoveItensTower(cid)
    		selfSay("É dito uma lenda à qual a antiga civilização pokémon adorava 3 grandes deuses que trariam prosperidade, hoje são representado-os pelas {Pedra Sagrada da Floresta}, {Pedra Sagrada da Terra} e a {Pedra Sagrada do Mar}, volte quando feito seus {pedidos}!", cid)
    		setPlayerStorageValue(cid, 659875, 1)
    	  
    	  else
    	 
             selfSay("Lembre-se, os itens são {50x Giant Ruby}, {100x Sharpe Leave}, {100x Pawn}, {100x Crimson Feather}, {200x Linearly Guided Hypnosis}, {2000x enchanted gem}, {2000x Rubber Ball}, {1500x Earth Ball}, {1000x Seed}, {1000x water gem}...", cid)
             talkState[cid] = 0
             return true
          end
       
    elseif msgcontains(msg, 'pedidos') and getPlayerStorageValue(cid, 659875) == 1 then
           selfSay("Você já fez seus pedidos?", cid)
           talkState[cid] = 2
           
    elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'sim')) and talkState[cid] == 2 and getPlayerStorageValue(cid, 659875) == 1 then
    
    		if getPlayerStorageValue(cid, 60900) >= 1 and getPlayerStorageValue(cid, 60901) >= 1 and getPlayerStorageValue(cid, 60902) >= 1 then
    			setPlayerStorageValue(cid, 509001, 1)
    			setPlayerStorageValue(cid, 78501, 1)
    			selfSay("Pronto agora você pode acessar a tower!", cid)
    			talkState[talkUser] = 0		
    		else
    			selfSay("Você não fez seus pedidos às 3x pedras sagradas;", cid)
    			talkState[talkUser] = 0	
    		end
        
    elseif (msgcontains(msg, 'no') or msgcontains(msg, 'nao')) then
         selfSay("So good bye...", cid)
         talkState[cid] = 0
         return false 
    end
    
    end
    npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
    npcHandler:addModule(FocusModule:new())

    tipo ai eu tenho que adicionar apenas essa funçao que vc falou ou refazer todos os npc mesmo?

    Ele respondeu: é para cada npc que você deseje que o modulo de dialogo funcione.

  3. 14 minutos atrás, Polguilo disse:

    @BlazerX
    eu to usando o OT Client as vezes irmão,vlw pela resposta rs
    eu to curtindo até,mas não tem todas as HK igual ao client classico do Tibia =|

    fora que não sei gerenciar,tipo "importar" HK e o minimap :x

    Entao, tem diferença entre o otclient e o v8 na hotkey, o v8 ele ja tem a opção de vc escolher na hoktkey qual usar e faz tudo automatizado

  4. Esse do chat ai, ja testou se o cara toda hora escrever e apertar enter vai fechar o chat que é uma coisa chata e

    também ja testou quando você tem um item e arrasta pra bag ou chao e na hora aparece aquela tela de Item Contaveis e vc apertar enter vai entrar em conflito com o enter chat outra coisa chata também que você tem que rever, so uma dica mesmo.

  5. 2 horas atrás, mister17 disse:

    entendi, eu tenho 1 do mesmo perfil que esta rodando 100%

    tentei adicionar a parte do valores mas mesmo assim qual eu insiro o paragrafo da cobrança do dinheiro ai ele me reporta este erro

    Abaixo é o codigo que tenho para apena a fusão esta funcionando 100% sem cobrar o valor necessario

      Ocultar conteúdo

    -- Held Fusion 0.1 by Marcot
    -- Se encontrou algum erro no script, favor enviar PM explicando os erros
    -- http://www.tibiaking.com/forum/profile/120572-marcot/

    -- Configuracoes necessarias para o script
    local config = {
        quest = { -- Precisa fazer quest? (Nao mexa caso negativo)
            necessaria = false, -- Eh necessario fazer uma quest para liberar o sistema?
            storageID = 10006, -- Qual o storageID dessa quest? (caso true, anteriormente)
        },
        chestPos = {x = 1017, y = 1072, z = 13, stackpos = 1},-- Posicao do Bau (certifique-se que nao tenha nada encima dele)
                --{x = 1005, y = 1072, z = 13, stackpos = 1},-- Posicao do Bau (certifique-se que nao tenha nada encima dele)
        
        -- Tenha atencao para que a soma das chances dos helds em cada tier seja igual a 100
        prices = {
            ["tier_1"] = 60000,
            ["tier_2"] = 150000,
            ["tier_3"] = 300000,
            ["tier_4"] = 700000,
            ["tier_5"] = 1000000,
            ["tier_6"] = 1500000,
        },
        
        
        helds = { -- Item IDs e chance de vir o held
            [1] = { -- Array Tier 1
                {ID = 13720, chance = 100},
                --{ID = 2160, chance = 80},
                --{ID = 2158, chance = 10},
            },
            [2] = { -- Array Tier 2
                {ID = 13818, chance = 100},
                --{ID = 2001, chance = 20},
                --{ID = 2002, chance = 20},
                --{ID = 2003, chance = 20},
                --{ID = 2004, chance = 20},
            },
            [3] = { -- Array Tier 3

            },
            [4] = { -- Array Tier 4

            },
            [5] = { -- Array Tier 5

            },
            [6] = { -- Array Tier 6

            },
            [7] = { -- Array Tier 7

            },
        },
    }

    function onUse(cid, item, fromPosition, itemEx, toPosition)
        if config.quest.necessaria and getPlayerStorageValue (cid, config.quest.storageID) == 0 then
            -- Erro caso a pessoa use a maquina sem ter feito a quest
            -- Valido apenas quando a opcao esta ativada
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You don\'t have permission to use this machine.")
            return false
        end

        items = {nil, nil, nil}
        container = getThingFromPos(config.chestPos)
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Item selecionado: " .. container.itemid)

        for i = 0, 2 do
            items[i + 1] = getContainerItem (container.uid, i)
            if items [i + 1].itemid == 0 or items [i + 1].itemid == nil then
                -- Erro quando tem menos de 3 itens no bau
                doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need 3 held items to fuse.")
                return false
            end
        end

        heldType = {nil, nil, nil}

        for j=1, 3 do
            for i=1, 7 do
                for k = 1, #config.helds do
                    if config.helds[k].ID == items[j].itemid then
                        heldType[j] = i
                    end
                end
            end
            if heldType [j] == nil then
                -- Erro a ser exibido caso o jogador coloque algum item que nao seja um held na maquina
                doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "This machine works only to held items.")
                return false
            end

        end

        if heldType[1] ~= heldType[2] or heldType[2] ~= heldType[3] then
            -- Erro a ser exibido caso o jogador coloque helds de tiers diferentes
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need helds with the same tier.")
            return false
        elseif heldType[1] == 7 or heldType[2] == 7 or heldType[3] == 7 then
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You cannot fuse tier 7 held items.")
            return false
        end
        

        -- Sortear qual held vira
        for i = 1, 3 do
            doRemoveItem(items.uid, 1)
        end

        tierSorteado = heldType[1] + 1
        numeroSorte = math.random(1, 100)

        itemIDSorteado = sorteiaValor (tierSorteado, numeroSorte)

        doPlayerAddItem(cid, itemIDSorteado, 1)

        -- Mensagem exibida ao fundir com sucesso
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You received your new held item.")
        return true
    end

    -- Função retirada de https://pt.stackoverflow.com/questions/147884/sorteio-aleatório-mas-com-diferentes-probabilidades
    function sorteiaValor (tierSorteado, numeroSorte)
        x = numeroSorte
        for i = 1, #config.helds[tierSorteado] do
            x = x - config.helds[tierSorteado].chance
            if x <= 0 then
                return config.helds[tierSorteado].ID
            end
        end
    end

     

    O problema é quando eu insiro as linhas abaixo

      Ocultar conteúdo
    
    
    if not doPlayerRemoveMoney(cid, config.prices.tier_..heldType[1]) then -- Se nao for possivel retirar a quantia de dinheiro do jogador, finalizar script
    		doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. config.prices.tier_..heldType[1] .. " gold to fuse tier ".. heldType[1].. " held items.")
            return false
        end
    

      detalhe que se voce ver é o mesmo script porem ao inserir a parte de cobrar o valor que da erro

     

    Veja se resolve:

    if not doPlayerRemoveMoney(cid, config.prices["tier_"..heldType[1]]) then -- Se nao for possivel retirar a quantia de dinheiro do jogador, finalizar script
    	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need " .. config.prices["tier_"..heldType[1]] .. " gold to fuse tier ".. heldType[1].. " held items.")
    	return false
    end

     

     

  6. Em 06/01/2020 em 01:26, Walox disse:

    É triste ver que hoje em dia é só isso que sobra desta comunidade, pessoas tentando derrubar outras pessoas..... 

    cara hoje em dia este fórum se baseia em pegarem coisas de sei lá quem e dizer "ESTOU AJUDANDO A COMUNIDADE"

    o xtibia hoje em dia nem tem mais programadores interessados em interagir com a comunidade por conta disso...... inves de tentar ajudar vocês só cagam em cima das coisas e sempre tentam sair como certos e santos.

    tenho muita saudade de quando o PDA foi lançado.... a galera sim se juntava para fazer algo ou criar algo novo, e não pegavam coisas aqui ou ali e postava avulsamente.

     

    Eu sinceramente estava montando alguns mini projetinhos para ajudar a comunidade inteira como um editor exclusivo de clientes feito em JAVASCRIP onde você pode editar toda a UI do cliente em uma unica interface facil facil.

    Ou até mesmo alguns sistemas complexos que ninguém postaria nos fóruns.

    mas oque adianta postar um conteudo desse tipo aqui ?

     

    Por favor... vou pedir para que todos que estão me citando em posts, atacando ou falando algo sobre ou relacionado a mim, parem!!!

    Eu já sai a bastante tempo dessa comunidade e cansa ficar recebendo mensagens de amigos dizendo que fulano ou ciclano ta falando de mim sendo que nem me conhecer, conhece.

    Sinceramente eu não me importo com opiniões de fora até porque quem fala sobre mim vivia atrás de mim pedindo ajuda.

    e em relação aos designs, já não é mais minha responsabilidade e quando era eu nunca dei bola......

    eu cresci muito com essa comunidade e com algumas pessoas que estavam aqui, então todos me conhecem e sabe quem realmente sou não tentem me difamar sem motivos...

    erros todos nós cometemos, agora é o seu caráter que vai determinar quem você realmente é.

     

     

     

     Vai por mim, não posta esses conteudos exclusivos aqui ou nem em outro forum, fazendo isso os a galera que se alta denomina "programador", vai fazer merda com seu conteudo e vai falar bosta que não foi você ou algo do tipo, vende que é melhor, mas vende pra pessoas que tem atitudes.

  7. 57 minutos atrás, lSainty disse:

    Acho justo falar que negociei com ele e não tive problemas, inclusive o cara é muito gente boa, conversamos bastante sobre a área de T.I

    Essa isabelle fala demais então?, só se no passado ele agiu como criança e agora ja está com atitude de homem.

    Vou editar o topico e deixar de lado essas treta que geral arrumam pra cima.

  8. 2 horas atrás, brazvct disse:

    O proprio fulano de quem voce kibou, ele pega as coisas dos outros e edita e só muda a imagem e fala que foi ele que fez kk

    Se está exposto ao publico então posso compartilhar kkkkkk.
    E assim acaba a mafia dele de vender as coisas anunciada e na hora passar o que não tinha anunciado, conforme estão falando por ai. 

  9. 1 hora atrás, isabelle disse:

     

     

     Não entendi esse comentario que foi feito, nao estou vendendo nada, so estou compartilhando conteudo para a comunidade kkk

    2 horas atrás, brazvct disse:

    Boa! Tme gente que pega as coisas prontas no forum e poe na base mas não admitem que fizeram isso. Ai agorinha vai ter nego chorando por conta do seu post só pq pegaram coisa q ele fez em cima das coisas dos outros kkk

    O que houve? Não entendi esse comentario kkkkk

  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...