Ir para conteúdo

passu

Campones
  • Total de itens

    10
  • Registro em

  • Última visita

1 Seguidor

Sobre passu

Informações

  • Char no Tibia
    Estilo Tarzan
  • Forma que conheci o xTibia
    Amigos
  • Sou
    OT-Admin

Últimos Visitantes

3286 visualizações

passu's Achievements

  1. passu

    colocar tempo e...

    Lua Script Error: [Action Interface] data/actions/scripts/anihi2.lua:onUse data/actions/scripts/anihi2.lua:4: attempt to call global 'isInRange' (a nil value) stack traceback: [C]: in function 'isInRange' data/actions/scripts/anihi2.lua:4: in function 'getAmountPlayersInArea' data/actions/scripts/anihi2.lua:31: in function <data/actions/scripts/anihi2.lua:29> pq? deu esse erro

  2. --------------------------------------------------------------------------------------------
    ------------------------------------ Advanced Addon NPC ------------------------------------
    -------------------------------- Script made by teh_pwnage ---------------------------------
    --------------- Special thanks to: mokerhamer, Xidaozu and Jiddo, deaths'life --------------
    ------------------------------- Thanks also to everyone else -------------------------------
    ------------------------------ NPC based on Evolutions V0.7.7 ------------------------------
    --------------------------------------------------------------------------------------------

    local keywordHandler = KeywordHandler:new()
    local npcHandler = NpcHandler:new(keywordHandler)
    NpcSystem.parseParameters(npcHandler)

    -- OTServ event handling functions start
    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

    -- OTServ event handling functions end

    local function Kick(cid)
    if isPlayer(cid) == TRUE then
    doRemoveCreature(cid)
    end
    end

    function creatureSayCallback(cid, type, msg)
        -- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
        if(npcHandler.focus ~= cid) then
            return false
        end

        preco = getPlayerLevel(cid)*4
            bless = getPlayerBlessing(cid,1)
        vezes = getResets(cid)
        rubys = (getPlayerLevel(cid)*4000)*(vezes*30*5)/1000000
        if vezes == 0 then
        dmspirits = 15
        shessences = 10
        else
        dmspirits = (15+(20*vezes))
        shessences = (10+(20*vezes))
        end
            if msgcontains(msg, 'necklace') then
                selfSay('I only need a mysterious, dragon breath, scorpion, platinum, fluids and vampire tooth, accept change all for a Elemental necklace?')
                talk_state = 1

            elseif msgcontains(msg, 'amulet') then
                selfSay('I only need a Ialamar, frozzen, sickness, Samantha, Mastafar, priest and eletric, accept change all for a Spirit Elemental amulet?')
                talk_state = 2

            elseif msgcontains(msg, 'magic') then
                selfSay('I only need a Merlian, relic of the hell, Broonier, Thordain, dark wyzard, angel and gaya, accept change all for a Elemental magic amulet?')
                talk_state = 3

            elseif msgcontains(msg, 'energyze') then
                selfSay('I can energyze your necklace for 50k, amulet for 100k or your magic amulet for 150k, do you want energyze?')
                talk_state = 4

            elseif msgcontains(msg, 'bless') or msgcontains(msg, 'blessing') then
                selfSay('Desculpe eu nao tenho mas o poder de bless')
                talk_state = 5

            elseif msgcontains(msg, 'reset') then
            if vezes == -1 or vezes == 0 then
                selfSay('\nResetar um Deus? Hmm... Primeira vez? Ok, eu vou fazê-lo libertar desta vez, mas preciso que você me entregue 100 demonic essences,tudo bem?!Nao se esquece que no primeiro reset apos virar deus vou lhe cobrar 15 shadow herbs e 10 blood herbs!')
                talk_state = 6
            else
                selfSay('\nResetar um Deus? Hmm ... Claro que posso, mas preciso que você me entregue ' .. dmspirits .. ' shadow herbs, ' .. shessences .. ' blood herbs e ' .. rubys .. ' ruby coins, tudo bem?')
                talk_state = 6
            end


            elseif msgcontains(msg, 'job') then
                selfSay('I am a servent of Merlian!')

            elseif msgcontains(msg, 'offer') then
                selfSay('I can do an element item or energyze your element item, i only need all "necklace", "amulet" ou "magic" amulet, also can bless a little mortal and reset a god!')

            elseif msgcontains(msg, 'sell') then
                selfSay('I am not a merchant!')

            elseif msgcontains(msg, 'buy') then
                selfSay('I am not a merchant!')

            elseif msgcontains(msg, 'quest') then
                selfSay('Ha! You are only a novice!')

            elseif msgcontains(msg, 'mission') then
                selfSay('Ha! You are only a novice!')

    -- neck
        elseif talk_state == 1 then
        if msgcontains(msg, 'yes') then
            if getPlayerItemCount(cid,2198) >= 1 and getPlayerItemCount(cid,2161) >= 1 and getPlayerItemCount(cid,2170) >= 1 and getPlayerItemCount(cid,2171) >= 1 and getPlayerItemCount(cid,2172) >= 1 and getPlayerItemCount(cid,2201) >= 1 then
                selfSay('Its all yours!')
                doPlayerSendTextMessage(cid,22,"Voce recebeu um Elemental necklace.")
                  doSendMagicEffect(getPlayerPosition(cid),12)
                doPlayerRemoveItem(cid,2198,1)
                doPlayerRemoveItem(cid,2161,1)
                doPlayerRemoveItem(cid,2170,1)
                doPlayerRemoveItem(cid,2171,1)
                doPlayerRemoveItem(cid,2172,1)
                doPlayerRemoveItem(cid,2201,1)
                doPlayerAddItem(cid,2197,1)
                talk_state = 0
                else
                selfSay('You dont have this itens!')
                talk_state = 0
                end
            end
    -- amulet

        elseif talk_state == 2 then
        if msgcontains(msg, 'yes') then
            if getPlayerItemCount(cid,2129) >= 1 and getPlayerItemCount(cid,2133) >= 1 and getPlayerItemCount(cid,2130) >= 1 and getPlayerItemCount(cid,2199) >= 1 and getPlayerItemCount(cid,2135) >= 1 and getPlayerItemCount(cid,2126) >= 1 and getPlayerItemCount(cid,2131) >= 1 then
                selfSay('Its all yours!')
                doPlayerSendTextMessage(cid,22,"Voce recebeu um Spirit Elemental amulet.")
                  doSendMagicEffect(getPlayerPosition(cid),12)
                doPlayerRemoveItem(cid,2129,1)
                doPlayerRemoveItem(cid,2133,1)
                doPlayerRemoveItem(cid,2130,1)
                doPlayerRemoveItem(cid,2199,1)
                doPlayerRemoveItem(cid,2135,1)
                doPlayerRemoveItem(cid,2126,1)
                doPlayerRemoveItem(cid,2131,1)
                doPlayerAddItem(cid,2173,1)
                talk_state = 0
                else
                selfSay('You dont have this itens!')
                talk_state = 5
                end
            end

        elseif talk_state == 3 then
        if msgcontains(msg, 'yes') then
            if getPlayerItemCount(cid,2218) >= 1 and getPlayerItemCount(cid,2142) >= 1 and getPlayerItemCount(cid,2132) >= 1 and getPlayerItemCount(cid,2136) >= 1 and getPlayerItemCount(cid,2138) >= 1 and getPlayerItemCount(cid,2200) >= 1 and getPlayerItemCount(cid,2196) >= 1 then
                selfSay('Its all yours!')
                doPlayerSendTextMessage(cid,22,"Voce recebeu um Elemental magic amulet.")
                  doSendMagicEffect(getPlayerPosition(cid),12)
                doPlayerRemoveItem(cid,2218,1)
                doPlayerRemoveItem(cid,2142,1)
                doPlayerRemoveItem(cid,2132,1)
                doPlayerRemoveItem(cid,2136,1)
                doPlayerRemoveItem(cid,2138,1)
                doPlayerRemoveItem(cid,2200,1)
                doPlayerRemoveItem(cid,2196,1)
                doPlayerAddItem(cid,2125,1)
                talk_state = 0
                else
                selfSay('You dont have this itens!')
                talk_state = 5
                end
            end
    -- energ

        elseif talk_state == 4 then
        if msgcontains(msg, 'yes') and getPlayerItemCount(cid,2197) >= 1 then
            if pay(cid,50000) then
                selfSay('Its all yours!')
                doPlayerSendTextMessage(cid,22,"Voce energizou seu Elemental necklace.")
                  doSendMagicEffect(getPlayerPosition(cid),12)
                doPlayerRemoveItem(cid,2197,1)
                doPlayerAddItem(cid,13682,1)
                talk_state = 0
                else
                selfSay('You dont have this money!')
                talk_state = 0
                end

        elseif msgcontains(msg, 'yes') and getPlayerItemCount(cid,2173) >= 1 then
            if pay(cid,100000) then
                selfSay('Its all yours!')
                doPlayerSendTextMessage(cid,22,"Voce energizou seu Spirit Elemental amulet.")
                  doSendMagicEffect(getPlayerPosition(cid),12)
                doPlayerRemoveItem(cid,2173,1)
                doPlayerAddItem(cid,13683,1)
                talk_state = 0
                else
                selfSay('You dont have this money!')
                talk_state = 0
                end

        elseif msgcontains(msg, 'yes') and getPlayerItemCount(cid,2125) >= 1 then
            if pay(cid,150000) then
                selfSay('Its all yours!')
                doPlayerSendTextMessage(cid,22,"Voce energizou seu Elemental magic amulet.")
                  doSendMagicEffect(getPlayerPosition(cid),12)
                doPlayerRemoveItem(cid,2125,1)
                doPlayerAddItem(cid,13684,1)
                talk_state = 0
                else
                selfSay('You dont have this money!')
                talk_state = 0
                end

        elseif msgcontains(msg, 'yes') and getPlayerItemCount(cid,2197) >= 0 and getPlayerItemCount(cid,2125) >= 0 and getPlayerItemCount(cid,2173) >= 0 then
                selfSay('You dont have this item!')
                talk_state = 0

            end

    -- bless

        elseif talk_state == 5 then
        if msgcontains(msg, 'afsdgsdufhfush2212121') then
        if bless then
            selfSay('You are already blessed my little mortal.')
            talk_state = 0
            else
            if isPremium(cid) then
        if pay(cid,preco*700000000000) then
            selfSay('Receive this bless mortal, with the gods touch i bless you!')
            doPlayerSendTextMessage(cid,22,"Voce nao recebeu a benção de Isolda.")
              doSendMagicEffect(getPlayerPosition(cid),12)
            talk_state = 0
            else
            selfSay('Desculpe me,mas nao trabalho com bless')
            talk_state = 0
            end
            else
            selfSay('Sorry but only can bless a mortal premmy.')
            talk_state = 0
            end

            end
            end

    -- reset
          local exhaustedstorage = 401504
        if getResets(cid) == 7 then
        selfSay('voce so pode resetar 7 vezes comigo!')
        return true
        end
        elseif talk_state == 6 then
        --rubys = (getPlayerLevel(cid)*4000)*(vezes*10)/1000000)
        if msgcontains(msg, 'yes') then
        
            if(os.time() < getPlayerStorageValue(cid, exhaustedstorage)) then
            doPlayerSendCancel(cid,"Tempo restante para poder resetar novamente " .. getPlayerStorageValue(cid, exhaustedstorage) - os.time() .. " segundos.")
            selfSay('Desculpe, voce precisa esperar 12hrs para resetar novamente!')
            talk_state = 0
            return TRUE
            end
        
            if isPremium(cid) then
            if getPlayerLevel(cid) >= 500 then
            if getPlayerVocation(cid) >= 9 then
        --if pay(cid,(getPlayerLevel(cid)*4000)*(vezes*10)) then
        

            if getPlayerVocation(cid) == 13 then    -- deuses
            if getPlayerLevel(cid) >= 500 then
        if getPlayerItemCount(cid,13685) >= rubys and getPlayerItemCount(cid,2804) >= dmspirits and getPlayerItemCount(cid,2798) >= shessences then
            selfSay('Welcome new god!')
            doPlayerSendTextMessage(cid,22,"Você resetou seu personagem.")
            health = getPlayerMaxHealth(cid)
            mana = getPlayerMaxMana(cid)
                    doResetLevel(cid)
            setPlayerMaxHealth(cid, (health/10)*(vezes+1))
            doPlayerAddHealth(cid,(health/10)*(vezes+1))
            setPlayerMaxMana(cid, (mana/15)*(vezes+1))
            doPlayerAddMana(cid,(mana/15)*(vezes+1))
                   setPlayerMaxCapacity(cid,360)
                                  setPlayerStorageValue(cid, exhaustedstorage, os.time() + 1) ------------ tempo reset segundos 
            doPlayerAddMagicLevel(cid,10)
              doSendMagicEffect(getPlayerPosition(cid),12)
            doPlayerAddResets(cid,1)
            doPlayerRemoveItem(cid,13685,rubys)
            doPlayerRemoveItem(cid,2804,dmspirits)
            doPlayerRemoveItem(cid,2798,shessences)
                    addEvent(Kick, 1*2000,cid)
            talk_state = 0
            else
            selfSay('Você não trouxe o que eu pedi...')
            talk_state = 0
            end
            else
            selfSay('Volte aqui quando estiver mais forte, jovem aprendiz.')
            talk_state = 0
            end
        end
            if getPlayerVocation(cid) == 14 then
            if getPlayerLevel(cid) >= 500 then
        if getPlayerItemCount(cid,13685) >= rubys and getPlayerItemCount(cid,2804) >= dmspirits and getPlayerItemCount(cid,2798) >= shessences then
            selfSay('Welcome new god!')
            doPlayerSendTextMessage(cid,22,"Você resetou seu personagem.")
            health = getPlayerMaxHealth(cid)
            mana = getPlayerMaxMana(cid)
                    doResetLevel(cid)
            setPlayerMaxHealth(cid, (health/10)*(vezes+1))
            doPlayerAddHealth(cid,(health/10)*(vezes+1))
            setPlayerMaxMana(cid, (mana/15)*(vezes+1))
            doPlayerAddMana(cid,(mana/15)*(vezes+1))
               setPlayerMaxCapacity(cid,360)
            doPlayerAddMagicLevel(cid,10)
              doSendMagicEffect(getPlayerPosition(cid),12)
            doPlayerAddResets(cid,1)
            doPlayerRemoveItem(cid,13685,rubys)
            doPlayerRemoveItem(cid,2804,dmspirits)
            doPlayerRemoveItem(cid,2798,shessences)
                    addEvent(Kick, 1*2000,cid)
                    setPlayerStorageValue(cid, exhaustedstorage, os.time() + 1) ------------ tempo reset segundos 
            talk_state = 0
            else
            selfSay('Você não trouxe o que eu pedi...')
            talk_state = 0
            end
            else
            selfSay('Volte aqui quando estiver mais forte, jovem aprendiz.')
            talk_state = 0
            end
        end
            if getPlayerVocation(cid) == 15 then
            if getPlayerLevel(cid) >= 500 then
        if getPlayerItemCount(cid,13685) >= rubys and getPlayerItemCount(cid,2804) >= dmspirits and getPlayerItemCount(cid,2798) >= shessences then
            selfSay('Welcome new god!')
            doPlayerSendTextMessage(cid,22,"Você resetou seu personagem.")
               
            health = getPlayerMaxHealth(cid)
            mana = getPlayerMaxMana(cid)
                    doResetLevel(cid)
            setPlayerMaxHealth(cid, (health/10)*(vezes+1))
            doPlayerAddHealth(cid,(health/10)*(vezes+1))
            setPlayerMaxMana(cid, (mana/15)*(vezes+1))
            doPlayerAddMana(cid,(mana/15)*(vezes+1))
                    setPlayerMaxCapacity(cid,360)
            doPlayerAddMagicLevel(cid,1)
            doPlayerAddSkill(cid,4,10) 
            doPlayerAddSkill(cid,5,10) 
              doSendMagicEffect(getPlayerPosition(cid),12)
            doPlayerAddResets(cid,1)
            doPlayerRemoveItem(cid,13685,rubys)
            doPlayerRemoveItem(cid,2804,dmspirits)
            doPlayerRemoveItem(cid,2798,shessences)
                    addEvent(Kick, 1*2000,cid)
                    setPlayerStorageValue(cid, exhaustedstorage, os.time() + 1) ------------ tempo reset segundos 
            talk_state = 0
            else
            selfSay('Você não trouxe o que eu pedi...')
            talk_state = 0
            end
            else
            selfSay('Volte aqui quando estiver mais forte, jovem aprendiz.')
            talk_state = 0
            end
        end
            if getPlayerVocation(cid) == 16 then
            if getPlayerLevel(cid) >= 500 then
        if getPlayerItemCount(cid,13685) >= rubys and getPlayerItemCount(cid,2804) >= dmspirits and getPlayerItemCount(cid,2798) >= shessences then
            selfSay('Welcome new god!')
            doPlayerSendTextMessage(cid,22,"Você resetou seu personagem.")
            health = getPlayerMaxHealth(cid)
            mana = getPlayerMaxMana(cid)
                    doResetLevel(cid)
            setPlayerMaxHealth(cid, (health/10)*(vezes+1))
            doPlayerAddHealth(cid,(health/10)*(vezes+1))
            setPlayerMaxMana(cid, (mana/15)*(vezes+1))
            doPlayerAddMana(cid,(mana/15)*(vezes+1))
                    setPlayerMaxCapacity(cid,360)
            doPlayerAddSkill(cid,0,10) 
            doPlayerAddSkill(cid,1,10) 
            doPlayerAddSkill(cid,2,10) 
            doPlayerAddSkill(cid,3,10) 
            doPlayerAddSkill(cid,5,10) 
              doSendMagicEffect(getPlayerPosition(cid),12)
            doPlayerAddResets(cid,1)
            doPlayerRemoveItem(cid,13685,rubys)
            doPlayerRemoveItem(cid,2804,dmspirits)
            doPlayerRemoveItem(cid,2798,shessences)
                    addEvent(Kick, 1*2000,cid)
                    setPlayerStorageValue(cid, exhaustedstorage, os.time() + 1) ------------ tempo reset segundos 
            talk_state = 0
            else
            selfSay('Você não trouxe o que eu pedi...')
            talk_state = 0
            end
            else
            selfSay('Volte aqui quando estiver mais forte, jovem aprendiz.')
            talk_state = 0
            end
        end

        if getResets(cid) <= 0 and getPlayerVocation(cid) >= 13 and getPlayerLevel(cid) >= 500 then
            setPlayerStorageValue(cid,7777,1)
        end
        
            if getPlayerVocation(cid) >= 9 and getPlayerVocation(cid) < 13 then    -- semis
        if getPlayerItemCount(cid,6500) >= 100 then
            selfSay('Oh! Now you are a god!')

                if getPlayerVocation(cid) >= 9 and getPlayerVocation(cid) < 11 then
            doPlayerAddMagicLevel(cid,5)
                    setPlayerMaxCapacity(cid,360)
            end
                if getPlayerVocation(cid) == 11 then
            doPlayerAddMagicLevel(cid,1)
            doPlayerAddSkill(cid,4,5)
            doPlayerAddSkill(cid,5,5)
                    setPlayerMaxCapacity(cid,360)
            end
                if getPlayerVocation(cid) == 12 then
                    doPlayerAddSkill(cid,0,5)
                    doPlayerAddSkill(cid,1,5)
                    doPlayerAddSkill(cid,2,5)
                    doPlayerAddSkill(cid,3,5)
                    doPlayerAddSkill(cid,5,5)
                    setPlayerMaxCapacity(cid,360)
            end

            doPlayerSendTextMessage(cid,22,"Você evoluiu seu espírito a Deus.")
                    doResetLevel(cid)
            setPlayerMaxHealth(cid,185)
            doPlayerAddHealth(cid,185)
            setPlayerMaxMana(cid,35)
            doPlayerAddMana(cid,35)
            doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
              doSendMagicEffect(getPlayerPosition(cid),12)
            doPlayerRemoveItem(cid,6500,100)
                    addEvent(Kick, 1*2000,cid)
            talk_state = 0

            else
            selfSay('Sorry, but you dont have the 100 demoniac essense!')
            talk_state = 0
            end
        end

            else
            selfSay('Sorry, but only gods i can do that!')
            talk_state = 0
            end
            else
            selfSay('Volte aqui quando estiver mais forte, jovem aprendiz.')
            talk_state = 0
            end
            else
            selfSay('Sorry but only can reset a god premmy.')
            talk_state = 0
            end

            end
            --end

    ------------------------------------------------ confirm no ------------------------------------------------
            elseif msgcontains(msg, 'no') and (talk_state >= 1 and talk_state <= 34) then
                selfSay('Ok than.')
                talk_state = 0
            end
        -- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
        return true
    end

    function teste(cid)

    end

    npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
    npcHandler:addModule(FocusModule:new())

    1. passu

      passu

      como faz pra coloca esse npc pra [TFS 1.5] QUEM PODE ME AJUDAR

       

  3. passu

    Stamina Potion

    function onUse(cid, item, frompos, item2, topos) doPlayerSetStamina(cid, 2520) -- 2520 = 42 horas, se você colocar 1 o item ira curar 1 minuto da stamina. doCreatureSay(cid, "O Jogador "..getPlayerName(cid).." usou uma stamina up.") doSendMagicEffect(frompos, 35) -- Efeito, para mudar basta alterar o número 1 para o efeito que você quiser, /z 1 para ver o efeito no tibia. doRemoveItem(item.uid, 1) -- Se quiser que o item fique infinito, basta alterar o número 1 para 0 return 1 end ele add mais so que trava no numero tipo sua stamina ta full vc coloca pra curar 10 minutos em vez de curar ele zera sua stamina em 10 minutos.
  4. Outra Coisa Voce Tem Que Add Voc Nas Vocation Tipo Ali Ta 16 ai vc clica ele vai para Voc 17 com o novo Reset assin por diante Tipo A pozicao pode ser em couquer Logar A Poziçao Pode Ser Em Couquer Lugar ;D RESET.txt
  5. Tipo Vc Coloca Uma Alavanca E Coloca Ali Na Alavanca Coloca O Id Do action uniqueid="2806 Que Vc Escolheu Eu Escolhi Este 2806 Se Voce Kiser Muda Pode Mudar Ai Voce Coloca pega um Char level 510 Se vc Kiser Muda Level Tbm Pode Mudar Se vc kiser Muda a Vida Ea Mana Coloca para coando vc reseta ganha + vida e mana Ai Depende de cada 1 se vc kiser coloca direta mente na voc que nem eu fis exenplo Mage Ganha 15/45 vai ganha 30/90 E isto Ai ;D
  6. Coloke o Scrpit Em Uma Alavanca ;D
  7. vo posta o mapa todo com scrpits e tauz
  8. Ai Galerinha Tamos Ai Mapa Ds Para quem Gosta De Ds O MAPA fico Massa Carlin , Tirith , Bree , etc... Em breve Teremos Mais Mapa Ai Vo faser Auguns Scripts Massa Versao 7.92 Para Quem Kiser Ajuda Email passu_bk@hotmail.com Link \/ http://www.4shared.com/file/y172xsjG/dragon_souls_word.html
  9. Tipo Assin Eu Vo Manda Link Das Pasta E so Subistitui Para Tibia 7.92 Recomendo Para Mapa Pex Ou Dragon Souls apasta Actions Movements Weapons Talkactions Npc Link http://www.megaupload.com/?d=K75TIVFC ou Script.rar
  10. passu

    [Fechado]

    Flood removido.
  • Quem Está Navegando   0 membros estão online

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