• TibiaFace

    Tibiaface | Una comunidad Open Tibia donde encontras : mapas, scripts, Otserver, npc y amigos etc ...

    .
    demo menumenu

    Apps


    Afiliados



    TibiaFace » Descargas de Otserv y Ayuda » Pedidos de Scripts » demon oak tfs 1.3

    Votar:

    demon oak tfs 1.3

    Iniciado por ,
    Compartir:

    Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje (Página 1 de 1.)

    1demon oak tfs 1.3 Empty demon oak tfs 1.3 Vie Jun 30, 2017 3:12 pm

    God Aries

    God Aries
    Miembro
    Miembro
    Hola comunidad de tf, vengo a pedirles ayuda a hacer que el script de demon oak al darle el ultimo clic al demon oak te lleve a la sala de premios.

    Espero y puedan ayudarme porque solo me falta tener esta quest como a la anterior versión de mi server Smile


    Código:
    local config = {
     demonOakIds = {8288, 8289, 8290, 8291},
     sounds = {
     'MY ROOTS ARE SHARP AS A SCYTHE! FEEL IT?!?',
     'CURSE YOU!',
     'RISE, MINIONS, RISE FROM THE DEAD!!!!',
     'AHHHH! YOUR BLOOD MAKES ME STRONG!',
     'GET THE BONES, HELLHOUND! GET THEM!!',
     'GET THERE WHERE I CAN REACH YOU!!!',
     'ETERNAL PAIN AWAITS YOU! NICE REWARD, HUH?!?!',
     'YOU ARE GOING TO PAY FOR EACH HIT WITH DECADES OF TORTURE!!',
     'ARGG! TORTURE IT!! KILL IT SLOWLY MY MINION!!'
     },
     bonebeastChance = 90,
     bonebeastCount = 4,
     waves = 10,
     questArea = {
     fromPosition = {x = 32706, y = 32345, z = 7},
     toPosition = {x = 32725, y = 32357, z = 7}
     },
     summonPositions = {
     {x = 32714, y = 32348, z = 7},
     {x = 32712, y = 32349, z = 7},
     {x = 32711, y = 32351, z = 7},
     {x = 32713, y = 32354, z = 7},
     {x = 32716, y = 32354, z = 7},
     {x = 32719, y = 32354, z = 7},
     {x = 32721, y = 32351, z = 7},
     {x = 32719, y = 32348, z = 7}
     },
     summons = {
     [8288] = {
     [5] = {'Spectre', 'Blightwalker', 'Braindeath', 'Demon'},
     [10] = {'Betrayed Wraith', 'Betrayed Wraith'}
     },
     [8289] = {
     [5] = {'Plaguesmith', 'Plaguesmith', 'Blightwalker'},
     [10] = {'Dark Torturer', 'Blightwalker'}
     },
     [8290] = {
     [5] = {'Banshee', 'Plaguesmith', 'Hellhound'},
     [10] = {'Grim Reaper'}
     },
     [8291] = {
     [5] = {'Plaguesmith', 'Hellhound', 'Hellhound'},
     [10] = {'Undead Dragon', 'Hand of Cursed Fate'}
     }
     },
     storages = {
     [8288] = Storage.DemonOak.AxeBlowsBird,
     [8289] = Storage.DemonOak.AxeBlowsLeft,
     [8290] = Storage.DemonOak.AxeBlowsRight,
     [8291] = Storage.DemonOak.AxeBlowsFace
     }
    }

    local function getRandomSummonPosition()
     return config.summonPositions[math.random(#config.summonPositions)]
    end

    function onUse(player, item, fromPosition, target, toPosition, isHotkey)
     if not isInArray(config.demonOakIds, target.itemid) then
     return true
     end

     local totalProgress = 0
     for k,v in pairs(config.storages) do
     totalProgress = totalProgress + math.max(0, player:getStorageValue(v))
     end

     local spectators, hasMonsters = Game.getSpectators(DEMON_OAK_POSITION, false, false, 9, 9, 6, 6), false
     for i = 1, #spectators do
     if spectators[i]:isMonster() then
     hasMonsters = true
     break
     end
     end

     local isDefeated = totalProgress == (#config.demonOakIds * (config.waves + 1))
     if (config.killAllBeforeCut or isDefeated)
     and hasMonsters then
     player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You need to kill all monsters first.')
     return true
     end

     if isDefeated then
     player:teleportTo(DEMON_OAK_KICK_POSITION)
     player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'Tell Oldrak about your great victory against the demon oak.')
     player:setStorageValue(Storage.DemonOak.Done, 1)
     player:setStorageValue(Storage.DemonOak.Progress, 3)
     return true
     end

     local cStorage = config.storages[target.itemid]
     local progress = math.max(player:getStorageValue(cStorage), 1)
     if progress >= config.waves + 1 then
     toPosition:sendMagicEffect(CONST_ME_POFF)
     return true
     end

     local isLastCut = totalProgress == (#config.demonOakIds * (config.waves + 1) - 1)
     local summons = config.summons[target.itemid]
     if summons and summons[progress] then
     -- Summon a single demon on the last hit
     if isLastCut then
     Game.createMonster('Demon', getRandomSummonPosition(), false, true)

     -- Summon normal monsters otherwise
     else
     for i = 1, #summons[progress] do
     Game.createMonster(summons[progress][i], getRandomSummonPosition(), false, true)
     end
     end

     -- if it is not the 5th or 10th there is only a chance to summon bonebeasts
     elseif math.random(100) >= config.bonebeastChance then
     for i = 1, config.bonebeastCount do
     Game.createMonster('Bonebeast', getRandomSummonPosition(), false, true)
     end
     end

     player:say(isLastCut and 'HOW IS THAT POSSIBLE?!? MY MASTER WILL CRUSH YOU!! AHRRGGG!' or config.sounds[math.random(#config.sounds)], TALKTYPE_MONSTER_YELL, false, player, DEMON_OAK_POSITION)
     toPosition:sendMagicEffect(CONST_ME_DRAWBLOOD)
     player:setStorageValue(cStorage, progress + 1)
     player:say('-krrrrak-', TALKTYPE_MONSTER_YELL, false, player, toPosition)
     doTargetCombatHealth(0, player, COMBAT_EARTHDAMAGE, -170, -210, CONST_ME_BIGPLANTS)
     return true
    end

    2 participantes

    2demon oak tfs 1.3 Empty Re: demon oak tfs 1.3 Vie Jun 30, 2017 5:06 pm

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    prueba aqui le modique algo

    Código:
                local config = {
                demonOakIds = {8288, 8289, 8290, 8291},
                sounds = {
                'MY ROOTS ARE SHARP AS A SCYTHE! FEEL IT?!?',
                'CURSE YOU!',
                'RISE, MINIONS, RISE FROM THE DEAD!!!!',
                'AHHHH! YOUR BLOOD MAKES ME STRONG!',
                'GET THE BONES, HELLHOUND! GET THEM!!',
                'GET THERE WHERE I CAN REACH YOU!!!',
                'ETERNAL PAIN AWAITS YOU! NICE REWARD, HUH?!?!',
                'YOU ARE GOING TO PAY FOR EACH HIT WITH DECADES OF TORTURE!!',
                'ARGG! TORTURE IT!! KILL IT SLOWLY MY MINION!!'
                },
                bonebeastChance = 90,
                bonebeastCount = 4,
                waves = 10,
                questArea = {
                fromPosition = {x = 32706, y = 32345, z = 7},
                toPosition = {x = 32725, y = 32357, z = 7}
                },
                summonPositions = {
                {x = 32714, y = 32348, z = 7},
                {x = 32712, y = 32349, z = 7},
                {x = 32711, y = 32351, z = 7},
                {x = 32713, y = 32354, z = 7},
                {x = 32716, y = 32354, z = 7},
                {x = 32719, y = 32354, z = 7},
                {x = 32721, y = 32351, z = 7},
                {x = 32719, y = 32348, z = 7}
                },
                summons = {
                [8288] = {
                [5] = {'Spectre', 'Blightwalker', 'Braindeath', 'Demon'},
                [10] = {'Betrayed Wraith', 'Betrayed Wraith'}
                },
                [8289] = {
                [5] = {'Plaguesmith', 'Plaguesmith', 'Blightwalker'},
                [10] = {'Dark Torturer', 'Blightwalker'}
                },
                [8290] = {
                [5] = {'Banshee', 'Plaguesmith', 'Hellhound'},
                [10] = {'Grim Reaper'}
                },
                [8291] = {
                [5] = {'Plaguesmith', 'Hellhound', 'Hellhound'},
                [10] = {'Undead Dragon', 'Hand of Cursed Fate'}
                }
                },
                storages = {
                [8288] = Storage.DemonOak.AxeBlowsBird,
                [8289] = Storage.DemonOak.AxeBlowsLeft,
                [8290] = Storage.DemonOak.AxeBlowsRight,
                [8291] = Storage.DemonOak.AxeBlowsFace
                }
                }
    local quest = {x = 32360, y = 31782, z = 7}  ---------> posicion del cuarto de premios


                local function getRandomSummonPosition()
                return config.summonPositions[math.random(#config.summonPositions)]
                end

                function onUse(player, item, fromPosition, target, toPosition, isHotkey)
                if not isInArray(config.demonOakIds, target.itemid) then
                return true
                end

                local totalProgress = 0
                for k,v in pairs(config.storages) do
                totalProgress = totalProgress + math.max(0, player:getStorageValue(v))
                end

                local spectators, hasMonsters = Game.getSpectators(DEMON_OAK_POSITION, false, false, 9, 9, 6, 6), false
                for i = 1, #spectators do
                if spectators[i]:isMonster() then
                hasMonsters = true
                break
                end
                end

                local isDefeated = totalProgress == (#config.demonOakIds * (config.waves + 1))
                if (config.killAllBeforeCut or isDefeated)
                and hasMonsters then
                player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You need to kill all monsters first.')
                return true
                end

                if isDefeated then
                player:teleportTo(quest)
                player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'Tell Oldrak about your great victory against the demon oak.')
                player:setStorageValue(Storage.DemonOak.Done, 1)
                player:setStorageValue(Storage.DemonOak.Progress, 3)
                return true
                end

                local cStorage = config.storages[target.itemid]
                local progress = math.max(player:getStorageValue(cStorage), 1)
                if progress >= config.waves + 1 then
                toPosition:sendMagicEffect(CONST_ME_POFF)
                return true
                end

                local isLastCut = totalProgress == (#config.demonOakIds * (config.waves + 1) - 1)
                local summons = config.summons[target.itemid]
                if summons and summons[progress] then
                -- Summon a single demon on the last hit
                if isLastCut then
                Game.createMonster('Demon', getRandomSummonPosition(), false, true)

                -- Summon normal monsters otherwise
                else
                for i = 1, #summons[progress] do
                Game.createMonster(summons[progress][i], getRandomSummonPosition(), false, true)
                end
                end

                -- if it is not the 5th or 10th there is only a chance to summon bonebeasts
                elseif math.random(100) >= config.bonebeastChance then
                for i = 1, config.bonebeastCount do
                Game.createMonster('Bonebeast', getRandomSummonPosition(), false, true)
                end
                end

                player:say(isLastCut and 'HOW IS THAT POSSIBLE?!? MY MASTER WILL CRUSH YOU!! AHRRGGG!' or config.sounds[math.random(#config.sounds)], TALKTYPE_MONSTER_YELL, false, player, DEMON_OAK_POSITION)
                toPosition:sendMagicEffect(CONST_ME_DRAWBLOOD)
                player:setStorageValue(cStorage, progress + 1)
                player:say('-krrrrak-', TALKTYPE_MONSTER_YELL, false, player, toPosition)
                doTargetCombatHealth(0, player, COMBAT_EARTHDAMAGE, -170, -210, CONST_ME_BIGPLANTS)
                return true
                end


    local quest = {x = 32360, y = 31782, z = 7} ---------> posicion del cuarto de premios

    posicion de los premios



    demon oak tfs 1.3 YNU5B25
    2 participantes
    http://www.tibiaface.com

    3demon oak tfs 1.3 Empty Re: demon oak tfs 1.3 Vie Jun 30, 2017 6:33 pm

    God Aries

    God Aries
    Miembro
    Miembro
    eres el puto amo, si funciono Very Happy, muchas gracias maya

    2 participantes

    Contenido patrocinado


    2 participantes

    Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje (Página 1 de 1.)

    TibiaFace » Descargas de Otserv y Ayuda » Pedidos de Scripts » demon oak tfs 1.3

    Permisos de este foro:
    No puedes responder a temas en este foro.

     

    BienvenidosTibiaFace es una comunidad de Open Tibia. Para participar debes estar registrado (click para Regístrate).