AnnihilatorQuest

[PedroPr 1]

ai galera Fiz a reprogramação da quest anihilator com outro bicho deu certo ele esta teletrasportando os player mais quando ele cai na sala os montro não summona , o.O alguem ai pode ma ajudar nesse problema me tbm o scripts do quest ta dando error !vou colocar os dois aqui !

 

  -- CONFIG --

 

        local room = {     -- room with Anihilators

        fromX = 629,

        fromY = 214,

        fromZ = 10,

        --------------

        toX = 636,

        toY = 222,

        toZ = 10

        }

 

        local monster_pos = {

        [1] = {pos = {x=631, y=216, z=10}, monster = "Anihilator"},

        [2] = {pos = {x=633, y=216, z=10}, monster = "Anihilator"},

        [3] = {pos = {x=632, y=220, z=10}, monster = "Anihilator"},

        [4] = {pos = {x=634, y=220, z=10}, monster = "Anihilator"},

        [5] = {pos = {x=635, y=218, z=10}, monster = "Anihilator"},

        [6] = {pos = {x=636, y=218, z=10}, monster = "Anihilator"}

        }

 

        local players_pos = {

        {x = 634, y =230, z = 10, stackpos = 253},

        {x = 635, y =230, z = 10, stackpos = 253},

        {x = 636, y =230, z = 10, stackpos = 253},

        {x = 637, y =230, z = 10, stackpos = 253}

        }

 

        local new_player_pos = {

        {x = 631, y = 218, z = 10},

        {x = 632, y = 218, z = 10},

        {x = 633, y = 218, z = 10},

        {x = 634, y = 218, z = 10}

        }

 

        local playersOnly = "yes"

        local questLevel = 100

 

        ------------------------------------------------------

        --- CONFIG END ---------------------------------------

        ------------------------------------------------------

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

        local all_ready, monsters, player, level = 0, 0, {}, 0

        if item.itemid == 1945 then

                for i = 1, #players_pos do

                        table.insert(player, 0)

                end

                for i = 1, #players_pos do

                        player = getThingfromPos(players_pos)

                        if player.itemid > 0 then

                                if string.lower(playersOnly) == "yes" then

                                        if isPlayer(player.uid) == TRUE then

                                                all_ready = all_ready+1

                                        else

                                                monsters = monsters+1

                                        end

                                else

                                        all_ready = all_ready+1

                                end

                        end

                end

                if all_ready == #players_pos then

                        for i = 1, #players_pos do

                                player = getThingfromPos(players_pos)

                                if isPlayer(player.uid) == TRUE then

                                        if getPlayerLevel(player.uid) >= questLevel then

                                                level = level+1

                                        end

                                else

                                        level = level+1

                                end

                        end

                        if level == #players_pos then

                                if string.lower(playersOnly) == "yes" and monsters == 0 or string.lower(playersOnly) == "no" then

                                        local door = getTileItemById({x=637, y=218, z=10}, 5109).uid

if door > 0 then

doTransformItem(door, 5108)

end

 

for _, area in pairs(monster_pos) do

                                                        doSummonCreature(area.monster,{x=area.pos[1],y=area.pos[2],z=area.pos[3]})

                                        end

                                        for i = 1, #players_pos do

                                                doSendMagicEffect(players_pos, CONST_ME_POFF)

                                                doTeleportThing(player.uid, new_player_pos, FALSE)

                                                doSendMagicEffect(new_player_pos, CONST_ME_ENERGYAREA)

                                                doTransformItem(item.uid,1946)

                                        end

                                else

                                        doPlayerSendTextMessage(cid,19,"Only players can do this quest.")

                                end

                        else

                                doPlayerSendTextMessage(cid,19,"All Players have to be level "..questLevel.." to do this quest.")

                        end

                else

                        doPlayerSendTextMessage(cid,19,"You need "..table.getn(players_pos).." players to do this quest.")

                end

        elseif item.itemid == 1946 then

                local player_room = 0

                for x = room.fromX, room.toX do

                        for y = room.fromY, room.toY do

                                for z = room.fromZ, room.toZ do

                                        local pos = {x=x, y=y, z=z,stackpos = 253}

                                        local thing = getThingfromPos(pos)

                                        if thing.itemid > 0 then

                                                if isPlayer(thing.uid) == TRUE then

                                                        player_room = player_room+1

                                                end

                                        end

                                end

                        end

                end

                if player_room >= 1 then

                        doPlayerSendTextMessage(cid,19,"There is already a team in the quest room.")

                elseif player_room == 0 then

                        for x = room.fromX, room.toX do

                                for y = room.fromY, room.toY do

                                        for z = room.fromZ, room.toZ do

                                                local pos = {x=x, y=y, z=z,stackpos = 253}

                                                local thing = getThingfromPos(pos)

                                                if thing.itemid > 0 then

                                                        doRemoveCreature(thing.uid)

                                                end

                                        end

                                end

                        end

                        doTransformItem(item.uid,1945)

                end

        end

        return TRUE

end

no distro da esse error !

 

< luacreatemoster  >connot create monster .dai o nome do monster

 

 

 

 

E essa a do premioé esse 

 

function onUse(cid, item, frompos, item2, topos)

if getPlayerStorageValue(cid,5000) == -1 then

    AddStageExp(cid,100000)

end

    if item.uid == 49111 then

        queststatus = getPlayerStorageValue(cid,5000)

        if queststatus == -1 then

doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a demon armor.")

            doPlayerAddItem(cid,2494,1)

            setPlayerStorageValue(cid,5000,1)

        else

             doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "The chest is empty.")

        end

    elseif item.uid == 49112 then

   

        queststatus = getPlayerStorageValue(cid,5000)

       

        if queststatus == -1 then

doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a magic sword.")

            doPlayerAddItem(cid,2400,1)

            setPlayerStorageValue(cid,5000,1)

        else

             doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "The chest is empty.")

        end

    elseif item.uid == 49113 then

   

        queststatus = getPlayerStorageValue(cid,5000)

       

        if queststatus == -1 then

doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a stonecutter axe.")

            doPlayerAddItem(cid,2431,1)

            setPlayerStorageValue(cid,5000,1)

        else

             doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "The chest is empty.")

        end

    elseif item.uid == 49114 then

   

        queststatus = getPlayerStorageValue(cid,5000)

       

        if queststatus == -1 then

doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a present box.")

            box = doPlayerAddItem(cid,1990,1)

doAddContainerItem(box, 2326, 1)

            setPlayerStorageValue(cid,5000,1)

        else

             doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "The chest is empty.")

        end

    end

    return true

end