EQ2EMu/server/Quests/Antonica/strange_mutations.lua

--[[
    Script Name    : Quests/Antonica/strange_mutations.lua
    Script Author  : Dorbin
    Script Date    : 2023.05.16 04:05:43
    Script Purpose : 

        Zone       : Antonica
        Quest Giver: 
        Preceded by: None
        Followed by: 
--]]

function Init(Quest)
	SetQuestFeatherColor(Quest, 3)
	SetQuestRepeatable(Quest)
	AddQuestStepKill(Quest, 1, "Kill the mutated rats", 13, 100, "Something has caused the rats in this region to change.", 611, 120176)
	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
end

function Accepted(Quest, QuestGiver, Player)
    if HasItem(Player,1001093) then
        RemoveItem(Player,1001093,1)
    end
    SendMessage(Player,"You roll up the drawing and stuff it in your quest satchle.")
end

function Declined(Quest, QuestGiver, Player)
	-- Add dialog here for when the quest is declined
end

function Deleted(Quest, QuestGiver, Player)
	-- Remove any quest specific items here when the quest is deleted
end

function QuestComplete(Quest, QuestGiver, Player)
	-- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
	UpdateQuestStepDescription(Quest, 1, "I've killed enough mutated rats")
	UpdateQuestTaskGroupDescription(Quest, 1, "I have eliminated some of the mutated rats.")

	UpdateQuestDescription(Quest, "I wonder what could have caused these strange mutations...")
	GiveQuestReward(Quest, Player)
end

function Reload(Quest, QuestGiver, Player, Step)
	if Step == 1 then
		QuestComplete(Quest, QuestGiver, Player)
	end
end