[MOD] Inquisition Quest

Postado Fevereiro 25, 2012 13 anos

Ele é feito em mod , ou seja 1000% mais facil de configurar que os demais.


<?xml version="1.0" encoding="UTF-8"?>

<mod name="Inquisition" version="1.0" author="Tommy" contact="[email protected]" enabled="yes">


        <event type="login" name="inquisitionRegister" event="script"><![CDATA[

        function onLogin(cid)

    registerCreatureEvent(cid, "Inquisition")

        return true

end]]></event>


    <event type="kill" name="Inquisition" event="script"><![CDATA[

local config = {


    message = "Go into the teleporter in 3 minutes, else it will disappear.", -- Frase que vai aparecer apos matar o bicho


    timeToRemove = 180, -- Tempo para Remover o Teleporte em segundos


    teleportId = 1387, -- O ID do teleporte


    bosses = { -- Nome do Monstro, A posicao do Telporte, Aonde ele teleportara


["Ushuriel"] = { { x=1173, y=1141, z=12}, { x=1097, y=1214, z=12, stackpos=1 } },


["Annihilon"] = { { x=1244, y=1297, z=12 }, { x=1187, y=1198, z=12, stackpos=1 } },


["Hellgorak"] = { { x=1067, y=1307, z=13 }, { x=1192, y=1240, z=12, stackpos=1 } },


["Madareth"] = { { x=1045, y=1130, z=13}, { x=1111, y=1240, z=12, stackpos=1 } },


["Zugurosh"] = { { x=1126, y=1151, z=12 }, { x=1149, y=1213, z=12, stackpos=1 } },


["Latrivan"] = { { x=1153, y=1196, z=13}, { x=1147, y=1244, z=12, stackpos=1 } }


    }


}




local function removal(position)


    if getThingfromPos(position).itemid == config.teleportId then


        doRemoveItem(getThingfromPos(position).uid)


    end


    return TRUE


end




function onKill(cid, target, lastHit)

if lastHit == true then


    local position = getCreaturePosition(target)


    for name, pos in pairs(config.bosses) do


        if name == getCreatureName(target) then


            teleport = doCreateTeleport(config.teleportId, pos[1], pos[2])


            doCreatureSay(cid, config.message, TALKTYPE_ORANGE_1)


            addEvent(removal, config.timeToRemove * 1000, pos[2])

            doSendMagicEffect(pos[2], 10)


        end


    end

end


    return TRUE


end]]></event>


         <action fromuid="1300" touid="1308" event="script"><![CDATA[

       if item.uid == 1300 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found robe of the underworld.")


               doPlayerAddItem(cid,8890,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


       elseif item.uid == 1301 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a Spellbook of Dark Mysteries.")


               doPlayerAddItem(cid,8918,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


       elseif item.uid == 1302 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a Fireborn Giant Armor.")


               doPlayerAddItem(cid,8881,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


        end


       elseif item.uid == 1303 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a Master Archer's Armor.")


               doPlayerAddItem(cid,8888,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


      elseif item.uid == 1304 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a Royal Crossbow.")


               doPlayerAddItem(cid,8851,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


    elseif item.uid == 1305 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found an emerald sword.")


               doPlayerAddItem(cid,8930,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


    elseif item.uid == 1306 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a obsidian truncheon.")


               doPlayerAddItem(cid,8928,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


    elseif item.uid == 1307 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


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


               doPlayerAddItem(cid,8924,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


    elseif item.uid == 1308 then


        queststatus = getPlayerStorageValue(cid,50301)


           if queststatus == -1 then


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a Warsinger Bow.")


               doPlayerAddItem(cid,8854,1)


               setPlayerStorageValue(cid,50301,1)


           else


               doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")


           end


    end


       return TRUE]]></action>

</mod>

Créditos: