Update to Spells/Quests Lua

server/Quests/FarJourneyFreeport/TasksaboardtheFarJourney.lua

@@ -143,6 +143,9 @@ function Accepted(Quest, QuestGiver, Player)
 	FaceTarget(NPC, Waulon)
 end
 
+function Deleted(Quest, QuestGiver, Player)
+end
+
 function Declined(Quest, QuestGiver, Player)
 	-- Add dialog here for when the quest is declined
 end

server/Quests/Freeport/BarbarianJustice.lua

@@ -0,0 +1,73 @@
+--[[
+	Script Name		:	Quests/Freeport/BarbarianJustice.lua
+	Script Purpose	        :	Handles the quest, "Barbarian Justice"
+	Script Author	        :	premierio015
+	Script Date		:	27.08.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	The City of Freeport
+	Quest Giver		:	Selyse Brazenroot
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepKill(Quest, 1, "Kill the greedy, corrupt guards", 8, 100, "I should liberate the stolen Halasian antiques within Scale Yard: Traitors' End and deal with the corrupt guards.", 11, 6490005)
+        AddQuestStep(Quest, 2, "Gather Halasian antiques", 6, 100, "I should liberate the stolen Halasian antiques within Scale Yard: Traitors' End and deal with the corrupt guards.", 11)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+        AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "")
+        CheckProgress(Quest, QuestGiver, Player)
+	AddQuestStepChat(Quest, 3, "Return to Selyse Brazenroot", 1, "I should return to Selyse Brazenroot, at the Freeport Militia House in the city of Freeport.", 11, 5590142)
+	AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
+end
+
+
+function Step2Complete(Quest, QuestGiver, Player)
+        UpdateQuestStepDescription(Quest, 2, "")
+         CheckProgress(Quest, QuestGiver, Player)
+end
+
+
+function CheckProgress(Quest, QuestGiver, Player)
+ if QuestStepIsComplete(Player, 577, 1) and QuestStepIsComplete(Player, 577, 2) then
+        UpdateQuestTaskGroupDescription(Quest, 1, "")
+        AddQuestStepChat(Quest, 3, "Return to Selyse Brazenroot", 1, "I should return to Selyse Brazenroot, at the Freeport Militia House in the city of Freeport.", 11, 5590142)
+	AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
+end
+   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, 2, "")
+	UpdateQuestTaskGroupDescription(Quest, 2, "I returned to Selyse Brazenroot, the barbarian mentor.")
+
+	UpdateQuestDescription(Quest, "Selyse Brazenroot, the barbarian mentor in Freeport, was pleased that I was able to recover so many Halasian antiques and heirlooms that were left behind within Scale Yard.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Quest2Complete(Quest, QuestGiver, Player)
+        elseif Step == 3 then
+                QuestComplete(Quest, QuestGiver, Player)
+	end
+end

server/Quests/Freeport/BattleOfWits.lua

@@ -0,0 +1,92 @@
+--[[
+	Script Name		:	battle_of_wits.lua
+	Script Purpose      	:	Handles the quest, "Battle of Wits"
+	Script Author	        :	premierio015
+	Script Date		:	12.08.2020
+	Script Notes	        :	
+	Zone			:	The City of Freeport
+	Quest Giver		:	
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepLocation(Quest, 1, "Enter Temple Street", 10, "I will need to enter Temple Street, and deipher the equations of the gnomes left on the walls there.", 11, 17.68, 2.92, 22.76)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "")
+
+	AddQuestStepObtainItem(Quest, 2, "Search for the gnomish equations on the walls of Temple Street, and copy them.", 3, 100, "I will need to enter Temple Street, and deipher the equations of the gnomes left on the walls there.", 374, 12090)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "")
+
+	AddQuestStep(Quest, 3, "Use the study materials in the library to decipher and solve the gnomish equations.", 1, 100, "I will need to enter Temple Street, and deipher the equations of the gnomes left on the walls there.", 3040)
+	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
+end
+
+function Step3Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 3, "That was easy enough.  Back to Temple Street.")
+
+	AddQuestStepChat(Quest, 4, "Return to Temple Street, and activate the broken clockwork.", 1, "I will need to enter Temple Street, and deipher the equations of the gnomes left on the walls there.", 1040, 5590218)
+	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
+end
+
+function Step4Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 4, "")
+
+	AddQuestStepKill(Quest, 5, "Use the activated clockwork to destroy the necromachines in Temple Street.", 6, 100, "I will need to enter Temple Street, and deipher the equations of the gnomes left on the walls there.", 3109, 6460005)
+	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
+end
+
+function Step5Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 5, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I was able to decipher the equations, and have rebuilt one of the gnomish inventions.")
+
+	AddQuestStepChat(Quest, 6, "Return to Sneel in Freeport", 1, "I should return to Sneel in Freeport, and inform him of my success.", 11, 5590218)
+	AddQuestStepCompleteAction(Quest, 6, "QuestComplete")
+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, 6, "")
+	UpdateQuestTaskGroupDescription(Quest, 2, "I was able to prove the superior intelligence of the ratongas.")
+
+	UpdateQuestDescription(Quest, "I was able to solve the equations left by the gnomes in Temple Street, simplistic as they were.  With my quick thinking, I was able to defeat the inferior ones assembled by the gnomes themselves, which will pose no threat to Freeport now.  ")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		Step3Complete(Quest, QuestGiver, Player)
+	elseif Step == 4 then
+		Step4Complete(Quest, QuestGiver, Player)
+	elseif Step == 5 then
+		Step5Complete(Quest, QuestGiver, Player)
+	elseif Step == 6 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+
+

server/Quests/Freeport/DeadlyLegacy.lua

@@ -0,0 +1,114 @@
+--[[
+        Script Name    : Quests/Freeport/DeadlyLegacy.lua
+   	Script Purpose :	Handles the quest, "Deadly Legacy"
+	Script Author  :	premierio015
+	Script Date		:	18.08.2020
+	Script Notes   :	Auto generated with QuestParser.
+
+	Zone			:	The City of Freeport
+	Quest Giver		:	Sneel Vaylin
+	Preceded by		:	None
+	Followed by		:	Battle of Wits (574)
+--]]
+
+
+function Init(Quest)
+	AddQuestStep(Quest, 1, "Collect the writing slates", 5, 100, "I should look for the writing slates the ratonga have handed down through our history.  There should be some in Temple Street, if I look there.", 371)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	FaceTarget(QuestGiver, Player)
+        conversation = CreateConversation()
+        AddConversationOption(conversation, "I know.  I'll return once I have the slates.  Farewell until then.")
+        StartConversation(conversation, QuestGiver, Player, "Yes.  Remember, we have tried to warn the other races of the threat from the roekillik in the past.  There's nothing stopping them from wiping us all out if we do nothing.  As ignorant as the other races are, we cannot survive if they do not, and the only thing between the roekillik and all of Norrath is us.")
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "")
+
+	AddQuestStepChat(Quest, 2, "Return the slates to Sneel in Freeport", 1, "I should look for the writing slates the ratonga have handed down through our history.  There should be some in Temple Street, if I look there.", 11, 5590218)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I was able to find the slates, and it seems that they've been damaged intentionally.  It looks like the Roekillik might be closer than we thought.")
+
+	AddQuestStepChat(Quest, 3, "Speak with Salla", 1, "I should speak with the frightened ratonga in Freeport.  I should be able to find them in the shadowy places of the city.", 11, 5590445)
+	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
+end
+
+function Step3Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 3, "I was able to speak to the fightened ratonga, and have found out some disturbing information.")
+ 
+	AddQuestStepChat(Quest, 4, "Speak with Cles", 1, "I should speak with the frightened ratonga in Freeport.  I should be able to find them in the shadowy places of the city.", 11, 5590268)
+	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
+end
+
+function Step4Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 4, "")
+
+	AddQuestStepChat(Quest, 5, "Speak with Feepsin", 1, "I should speak with the frightened ratonga in Freeport.  I should be able to find them in the shadowy places of the city.", 11, 5590095)
+	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
+end
+
+function Step5Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 5, "")
+	UpdateQuestTaskGroupDescription(Quest, 2, "I was able to speak to the fightened ratonga, and have found out some disturbing information.")
+
+	AddQuestStepChat(Quest, 6, "I should return to Sneel, and tell him what his associates had to say.", 1, "It seems that Sneel's friends believe the roekillik are here in Freeport.  I should report what they said to me to Sneel, over near the Academy of Arcane Science library.", 11, 5590218)
+	AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
+end
+
+function Step6Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 6, "")
+
+	AddQuestStep(Quest, 7, "I must root out the false roekillik in the streets of Freeport.", 3, 100, "It seems that Sneel's friends believe the roekillik are here in Freeport.  I should report what they said to me to Sneel, over near the Academy of Arcane Science library.", 2482)
+	AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
+end
+
+function Step7Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 7, "")
+
+	AddQuestStepChat(Quest, 8, "Return to Sneel in Freeport, and report the roekillik followers", 1, "It seems that Sneel's friends believe the roekillik are here in Freeport.  I should report what they said to me to Sneel, over near the Academy of Arcane Science library.", 11, 5590218)
+	AddQuestStepCompleteAction(Quest, 8, "QuestComplete")
+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, 8, "")
+	UpdateQuestTaskGroupDescription(Quest, 3, "I found some false roekillik, and defeated them.  Sneel believes there may be some merit to what his friends had to say.  This might not bode well for any of us.")
+
+	UpdateQuestDescription(Quest, "I eliminated some of the false roekillik who showed up in Freeport, trying to frighten others with their charade.  However, their arrival in the city is a stark reminder to us - the roekillik are still out there, and they would like nothing more than to find a way into the cities of Norrath.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		Step3Complete(Quest, QuestGiver, Player)
+	elseif Step == 4 then
+		Step4Complete(Quest, QuestGiver, Player)
+	elseif Step == 5 then
+		Step5Complete(Quest, QuestGiver, Player)
+	elseif Step == 6 then
+		Step6Complete(Quest, QuestGiver, Player)
+	elseif Step == 7 then
+		Step7Complete(Quest, QuestGiver, Player)
+	elseif Step == 8 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+

server/Quests/Freeport/SearchForTheMissing.lua

@@ -0,0 +1,72 @@
+--[[
+	Script Name		:	Quests/Freeport/SearchForTheMissing.lua
+	Script Purpose	        :	Handles the quest, "Search for the Missing"
+	Script Author	        :	premierio015
+	Script Date		:	08.08.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	City of Freeport
+	Quest Giver		:	a weary Kor shaman
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepChat(Quest, 1, "Search for the froglok the shaman mentioned.", 1, "The froglok shaman has asked that I find his companion out in the Commons.", 11, 5590146)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+         FaceTarget(QuestGiver, Player)
+	 conversation = CreateConversation()
+
+         PlayFlavor(QuestGiver, "a_weary_kor_shaman/rivervale/a_froglok_kor_shaman006.mp3", "", "", 2271895946, 2901122965, Player)
+         AddConversationOption(conversation, "I will find her.")
+         StartConversation(conversation, QuestGiver, Player, "Then search the land for my mate Kraofla. She only barely managed to escape the guards when we washed up on the shores of the great barren land beyond these walls. Surely she would have sought the comfort of shade and water.")
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "I.O. Gezlowe has informed me of a new duty.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "Before I could search out the froglok, I.O. Gezlowe flagged me down. I now have a new assignment...")
+
+	AddQuestStepKill(Quest, 2, "Search for the froglok the shaman mentioned.", 1, 100, "Intelligence Officer Gezlowe has given me instructions to continue my search for the froglok, but instead of helping it... I must murder it.", 2465, 330291)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "I've found and murdered the froglok.")
+	UpdateQuestTaskGroupDescription(Quest, 2, "Kraofla's lifeless body rests under the shade of the statues of her beloved Marr.")
+
+	AddQuestStepChat(Quest, 3, "Return to the shaman and tell him of Kraofla's untimely death.", 1, "With Kraofla dead, I'll need to return to the frog and sorrowfully inform it of its mate's passing.", 11, 5590139)
+	AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
+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, 3, "I've spoken to the shaman and informed him of Kraofla's death.")
+	UpdateQuestTaskGroupDescription(Quest, 3, "The death of his mate has saddened the shaman.")
+
+	UpdateQuestDescription(Quest, "After speaking with I.O. Gezlowe, I managed to hunt down the froglok. Perhaps the shaman didn't catch on with what I did to its mate. It certainly doesn't seem to have.  One thing is for certain, Lucan doesn't want this relic of a race among the living.  <br>")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+
+

server/Quests/Freeport/TeirDalTurncoats.lua

@@ -0,0 +1,65 @@
+--[[
+	Script Name		:	teirdal_turncoats.lua
+	Script Purpose	        :	Handles the quest, "Teir'Dal Turncoats"
+	Script Author          	:	premierio015
+	Script Date		:	07.06.2020
+	Script Notes	        :	Dark Elf Racial Questline
+
+	Zone			:	The City of Freeport
+	Quest Giver		:	
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepKill(Quest, 1, "Kill Thexians", 8, 100, "The Arasai and other Teir'Dal are busy hunting down and torturing the remaining Thexians in Longshadow Alley.", 611, 6480003, 6480012, 6480013)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "")
+
+	AddQuestStepHarvest(Quest, 2, "Gather Arasai torture instruments", 6, 100, "The Arasai and other Teir'Dal are busy hunting down and torturing the remaining Thexians in Longshadow Alley.", 11, 6480036)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I helped reduce the number of remaining Thexians in Longshadow Alley and obtained some Arasai torture instruments for Dyymona K'Vexx.")
+
+	AddQuestStepChat(Quest, 3, "Return to Dyymona K'Vexx", 1, "I should return to Dyymona K'Vexx, at the Academy of Arcane Science in the city of Freeport.", 11, 5590238)
+	AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
+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, 3, "")
+	UpdateQuestTaskGroupDescription(Quest, 2, "I returned to Dyymona K'Vexx, the dark elf mentor.")
+
+	UpdateQuestDescription(Quest, "Dyymona K'Vexx was pleased with my accomplishments within Longshadow Alley, but she warned me against letting the fun I had experienced overshadow the lesson to be learned. We Teir'Dal are deceitful, opportunistic and power hungry by nature, but we must temper these useful and admirable traits with patience and measure the consequences.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+

server/Quests/Freeport/TheyreHere.lua

@@ -0,0 +1,109 @@
+--[[
+	Script Name		: Quests/Freeport/TheyreHere.lua
+	Script Purpose	:	Handles the quest, "They're Here..."
+	Script Author	:	premierio015
+	Script Date		:	22.08.2020
+	Script Notes	:	Auto generated with QuestParser.
+
+	Zone			:	The City of Freeport
+	Quest Giver		:	Sneel Valyin
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStep(Quest, 1, "Search for a sickened citizen in one of the taverns.", 1, 100, "I should follow Sneel's warning, and see if I can find any of these sickened citizens.  I'll search through the city and see what I can find.", 2492)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "")
+
+	AddQuestStep(Quest, 2, "There's likely a sickened citizen near the Temple of War", 1, 100, "I should follow Sneel's warning, and see if I can find any of these sickened citizens.  I'll search through the city and see what I can find.", 11)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "")
+
+	AddQuestStep(Quest, 3, "Perhaps there is a sickened citizen dying alone in the streets of the city.", 1, 100, "I should follow Sneel's warning, and see if I can find any of these sickened citizens.  I'll search through the city and see what I can find.", 11)
+	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
+end
+
+function Step3Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 3, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I found a few of the sickened citizens, and the news I have for Sneel does not appear to be good.")
+
+	AddQuestStepChat(Quest, 4, "Return to Sneel in Freeport with the news.", 1, "I should return to Sneel, and inform him of what I found.", 11, 5590218)
+	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
+end
+
+function Step4Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 4, "")
+
+	AddQuestStep(Quest, 5, "Search for the strangely acting ratonga in Freeport.", 1, 100, "I should return to Sneel, and inform him of what I found.", 11)
+	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
+end
+
+function Step5Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 5, "")
+
+	AddQuestStepLocation(Quest, 6, "I should investigate the door that the ratonga were standing close to.", 1, "I should return to Sneel, and inform him of what I found.", 11, 123) -- need ID
+	AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
+end
+
+function Step6Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 6, "")
+
+	AddQuestStepKill(Quest, 7, "Defeat the roekillik", 1, 100, "I should return to Sneel, and inform him of what I found.", 2483, 123) -- need ID
+	AddQuestStepCompleteAction(Quest, 7, "Step7Complete")
+end
+
+function Step7Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 7, "")
+
+	AddQuestStepChat(Quest, 8, "Return to Sneel with the news of your discovery", 1, "I should return to Sneel, and inform him of what I found.", 11, 5590218)
+	AddQuestStepCompleteAction(Quest, 8, "QuestComplete")
+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, 8, "")
+	UpdateQuestTaskGroupDescription(Quest, 2, "It seems that the roekillik have already infiltrated Freeport.  Hopefully, our warning will not fall on deaf ears.")
+
+	UpdateQuestDescription(Quest, "That was frighteningly close - the roekillik HAD broken into Freeport, and were beginning to unleash their own diabolical plans.  It might not have been the Dark Agenda, but it's clear they are testing the civilized races of Norrath.  Hopefully our evidence will convince the Overlord of the seriousness of this situation - if not, I doubt any of the ratonga will remain in Freeport, and the citizens will find themselves facing the Roekillik without us.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		Step3Complete(Quest, QuestGiver, Player)
+	elseif Step == 4 then
+		Step4Complete(Quest, QuestGiver, Player)
+	elseif Step == 5 then
+		Step5Complete(Quest, QuestGiver, Player)
+	elseif Step == 6 then
+		Step6Complete(Quest, QuestGiver, Player)
+	elseif Step == 7 then
+		Step7Complete(Quest, QuestGiver, Player)
+	elseif Step == 8 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end

server/Quests/Freeport/VibiasWailingCaveIngridients.lua

@@ -0,0 +1,68 @@
+--[[
+	Script Name		:	vibias_wailing_cave_ingredients.lua
+	Script Purpose	:	Handles the quest, "Vibia's Wailing Cave Ingredients"
+	Script Author	:	QuestParser (Replace this)
+	Script Date		:	10.07.2020
+	Script Notes	:	Auto generated with QuestParser.
+
+	Zone			:	The City of Freeport
+	Quest Giver		:	
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepKill(Quest, 1, "I must collect two samples of primordial seep bile within the Wailing Caves.", 2, 100, "I must collect two samples of primordial seep bile and one venom sac from a spider called Soulspike within the Wailing Caves.", 178, 2580010)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+conversation = CreateConversation()
+PlayFlavor(QuestGiver, " voiceover/english/optional1/merchant_vibia_valens/fprt_north/quests/vibiavalens/vibiavalens_x1_accept.mp3", "", "", 135454425, 3886964070, Player)  
+AddConversationOption(conversation, "I understand.")
+StartConversation(conversation, QuestGiver, Player, "Excellent! You've put all my worries to rest. Make sure that you gather two samples of primordial seep bile, and we only need one venom sac from Soulspike.")
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "I have collected two samples of primordial seep bile.")
+
+	AddQuestStepKill(Quest, 2, "I must hunt down and slay the elusive spider named Soulspike.", 1, 100, "I must collect two samples of primordial seep bile and one venom sac from a spider called Soulspike within the Wailing Caves.", 146, 2580037)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "I have slain Soulspike and collected the venom sac.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I have collected the primordial seep bile samples and the venom sac from Soulspike.")
+
+	AddQuestStepChat(Quest, 3, "I should return to Vibia Valens.", 1, "I should return to Vibia Valens.", 11, 1440065, 5590320)
+	AddQuestStepCompleteAction(Quest, 3, "QuestComplete")
+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, 3, "I have returned to Vibia Valens.")
+	-- UpdateQuestTaskGroupDescription(Quest, 2, "I have returned to Vibia Valens.")
+
+	UpdateQuestDescription(Quest, "I have successfully collected two primordial seep bile samples and the venom sac from Soulspike the spider queen of the Wailing Caves. Vibia rewarded me with a dagger and some coin for a job well done. ")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+

server/Quests/FrostfangSea/boatload_of_work.lua

@@ -33,7 +33,7 @@ end
 function TalkedYasha(Quest, QuestGiver, Player)
     UpdateQuestTaskGroupDescription(Quest, 1, "Yasha was able to craft a makeshift barricade piece out of the planks of wood I gave her.")
 	SummonItem(Player, Barricade, 1)
-	AddQuestStep(Quest, 3, "Complete the Pilgrims' Landing barricade.", 1, 100, "I am to set the makeshift barricade piece on the ground where the break in the barricade line, south of Yasha, is lit by two torches", 0)
+	AddQuestStep(Quest, 3, "Complete the Pilgrims' Landing barricade.", 1, 100, "I am to set the makeshift barricade piece on the ground where the break in the barricade line, south of Yasha, is lit by two torches", 0 ,46842)
 	AddQuestStepCompleteAction(Quest, 3, "SetBarricade")
 end
 

server/Quests/FrostfangSea/tutorial_learning_to_harvest.lua

@@ -19,7 +19,7 @@ function Init(Quest)
 	AddQuestStepHarvest(Quest, 4, "Mine some lead clusters.", 3, 100, "I must harvest some crafting supplies in a nearby low-risk adventure area. Harvest nodes can generally be found on the ground in most outdoor adventure regions.", 1086, 8808)
 	AddQuestStepHarvest(Quest, 5, "Fish up some sunfish.", 3, 100, "I must harvest some crafting supplies in a nearby low-risk adventure area. Harvest nodes can generally be found on the ground in most outdoor adventure regions.", 2540, 13586)
 	AddQuestStepHarvest(Quest, 6, "Harvest jumjum from a shrub or garden.", 3, 100, "I must harvest some crafting supplies in a nearby low-risk adventure area. Harvest nodes can generally be found on the ground in most outdoor adventure regions.", 816, 8486)
-	AddQuestStepHarvest(Quest, 7, "Trap some rawhide leather pelts from an animal den.", 3, 100, "I must harvest some crafting supplies in a nearby low-risk adventure area. Harvest nodes can generally be found on the ground in most outdoor adventure regions.", 125 , 11267)
+	AddQuestStepHarvest(Quest, 7, "Trap some rawhide leather pelts from an animal den.", 3, 100, "I must harvest some crafting supplies in a nearby low-risk adventure area. Harvest nodes can generally be found on the ground in most outdoor adventure regions.", 125 , 11280, 11267)
     AddQuestStepCompleteAction(Quest, 1, "Lumber")
 	AddQuestStepCompleteAction(Quest, 2, "Root")
 	AddQuestStepCompleteAction(Quest, 3, "TinCluster")

server/Quests/GMHall/TestQuest.lua

@@ -12,7 +12,7 @@
 
 function Init(Quest)
     	SetQuestFeatherColor(Quest, 2)
-        AddQuestStepKill(Quest, 1, "I need to help clean up the area.", 1, 100, "The Gods have asked that i help with cleanup around the mythical hall.", 2693, 1970017)
+        AddQuestStepKill(Quest, 1, "I need to help clean up the area.", 1, 100, "The Gods have asked that i help with clean up around the mythical hall.", 2693, 1970017)
 end
 
 function Accepted(Quest, QuestGiver, Player)

server/Quests/MultipleZones/BarkLikeAGnoll.lua

@@ -0,0 +1,47 @@
+--[[
+	Script Name		:	Quests/MultipleZones/BarkLikeAGnoll.lua
+	Script Purpose	        :	Handles the quest, "Bark Like a Gnoll"
+	Script Author	        :	premierio015
+	Script Date		:	04.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Language
+	Quest Giver		:	Chirannite Threat Totem
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepObtainItem(Quest, 1, "Hunt gnolls of Norrath for threat totems to study.", 5, 100, "I must collect and study more Chirannite Threat Totems from the gnolls of Norrath to learn the Gnollish language.", 860, 4963)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 have a studied a Chirannite Threat Totem.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I have learned Gnollish, language of the gnoll race.")
+
+	UpdateQuestDescription(Quest, "I have studied a great amount of gnoll runes written in both Norrathian and Gnollish. I now understand the language of the gnolls. <br> <br>")
+	GiveQuestReward(Quest, Player)
+        AddLanguage(Player, 18)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+

server/Quests/PeatBog/Reinforcements.lua

@@ -0,0 +1,42 @@
+--[[
+	Script Name		:	Reinforcements.lua
+	Script Purpose	:	Handles the quest, "Reinforcements"
+	Script Author	:	Shatou
+	Script Date		:	1/8/2020
+	Script Notes	:	
+
+	Zone			:	Caves
+	Quest Giver		:	Lieutenant Dawson
+	Preceded by		:	A Final Foe
+	Followed by		:	A Lack of Information (in the Caves)
+--]]
+
+local CONSUL_BREE_ID = 1970004
+
+function Init(Quest)
+	AddQuestStepChat(Quest, 1, "I must report to Consul Bree in The Caves.", 1, "I must report to Consul Bree in The Caves to help in the defense of Qeynos.", 11, CONSUL_BREE_ID)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+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 have spoken with Consul Bree.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I have spoken with Consul Bree.")
+
+	UpdateQuestDescription(Quest, "I have spoken with Consul Bree.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+end
+
+function Declined(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is declined
+end

server/Quests/PeatBog/ambushed.lua

@@ -1,80 +1,93 @@
 --[[
-	Script Name		:	Ambushed.lua
-	Script Purpose	:	Handles the quest, "Ambushed"
-	Script Author	:	Shatou
-	Script Date		:	1/8/2020
-	Script Notes	:	
-
-	Zone			:	Peat Bog
-	Quest Giver		:	Lieutenant Dawson
-	Preceded by		:	Mysterious Machine
-	Followed by		:	On The Move
+	Script Name	: Quests/PeatBog/ambushed.lua
+	Script Purpose	: Handles the quest, "Ambushed"
+	Script Author	: Scatman
+	Script Date	: 2009.05.10
+	
+	Zone       : The Peat Bog
+	Quest Giver: Lieutenant Dawson
+	Preceded by: Mysterious Machine (mysterious_machine.lua)
+	Followed by: On the Move (on_the_move.lua)
 --]]
 
-local LIEUTENANT_DAWSON_ID = 1980012
-local ENTITY_COMMAND_INSPECT = 61
-local AMBUSHED_QUEST_ID = 509
 
 function Init(Quest)
-	AddQuestStepSpell(Quest, 1, "I need to investigate the ambush site west of Two Logs Pond, which is south of the sewer grate.", 1, 100, "Lieutenant Dawson has asked me to investigate three ambush sites.", 11, ENTITY_COMMAND_INSPECT)
-	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
-	
-	AddQuestStepSpell(Quest, 2, "I need to investigate the ambush site in the north eastern corner of the area east of Two Logs Pond.", 1, 100, "Lieutenant Dawson has asked me to investigate three ambush sites.", 11, ENTITY_COMMAND_INSPECT)
-	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+
+
+	AddQuestStep(Quest, 1, "I need to investigate the ambush site west of Two Logs Pond, which is south of the sewer grate.", 1, 100, "Lieutenant Dawson has asked me to investigate three ambush sites.", 0)
+	AddQuestStep(Quest, 2, "I need to investigate the ambush site in the north eastern corner of the area east of Two Logs Pond.", 1, 100, "Lieutenant Dawson has asked me to investigate three ambush sites.", 0)
+	AddQuestStep(Quest, 3, "I need to investigate the ambush site in the south end of the area east of Two Logs Pond.", 1, 100, "Lieutenant Dawson has asked me to investigate three ambush sites.", 0)
+	AddQuestStepCompleteAction(Quest, 1, "Step1_Complete_Site1")
+	AddQuestStepCompleteAction(Quest, 2, "Step2_Complete_Site2")
+	AddQuestStepCompleteAction(Quest, 3, "Step3_Complete_Site3")
+
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	FaceTarget(QuestGiver, Player)
+	conversation = CreateConversation()
 	
-	AddQuestStepSpell(Quest, 3, "I need to investigate the ambush site in the south end of the area east of Two Logs Pond.", 1, 100, "Lieutenant Dawson has asked me to investigate three ambush sites.", 11, ENTITY_COMMAND_INSPECT)
-	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
+	PlayFlavor(QuestGiver, "voiceover/english/tutorial_revamp/lieutenant_dawson/qey_adv04_bog/quests/dawson/dawson011a.mp3", "", "", 3239354610, 1196418998, Player)
+	AddConversationOption(conversation, "You're welcome, and thank you.")
+	StartConversation(conversation, QuestGiver, Player, "Thank you for your help, be safe.")
 end
 
-function CheckProgress(Quest, QuestGiver, Player)
-	if QuestStepIsComplete(Player, AMBUSHED_QUEST_ID, 1) and QuestStepIsComplete(Player, AMBUSHED_QUEST_ID, 2) and QuestStepIsComplete(Player, AMBUSHED_QUEST_ID, 3) then
-		UpdateQuestTaskGroupDescription(Quest, 1, "I have investigated all three ambush sites.")
-		
-		AddQuestStepChat(Quest, 4, "I need to return to Lieutenant Dawson.", 1, "I need to tell Lieutenant Dawson of what I found at one of the ambush sites.", 11, ENTITY_COMMAND_INSPECT)
-		AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
-	end
+function Declined(Quest, QuestGiver, Player)
 end
 
-function Step1Complete(Quest, QuestGiver, Player)
+function Step1_Complete_Site1(Quest, QuestGiver, Player)
 	UpdateQuestStepDescription(Quest, 1, "I have investigated the ambush site near Two Logs Pond.")
-	CheckProgress(Quest, QuestGiver, Player)
+
+	if QuestIsComplete(Player, 217) then
+		Multiple_Steps_Complete(Quest, QuestGiver, Player)
+	end
 end
 
-function Step2Complete(Quest, QuestGiver, Player)
+function Step2_Complete_Site2(Quest, QuestGiver, Player)
 	UpdateQuestStepDescription(Quest, 2, "I have investigated the ambush site in the area east of Two Logs Pond.")
-	CheckProgress(Quest, QuestGiver, Player)
+
+	if QuestIsComplete(Player, 217) then
+		Multiple_Steps_Complete(Quest, QuestGiver, Player)
+	end
 end
 
-function Step3Complete(Quest, QuestGiver, Player)
+function Step3_Complete_Site3(Quest, QuestGiver, Player)
 	UpdateQuestStepDescription(Quest, 3, "I have investigated the ambush site in the southern end of the area east of Two Logs Pond.")
-	CheckProgress(Quest, QuestGiver, Player)
+	
+	if QuestIsComplete(Player, 217) then
+		Multiple_Steps_Complete(Quest, QuestGiver, Player)
+	end
 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, 4, "I have spoken with Lieutenant Dawson.")
-	UpdateQuestTaskGroupDescription(Quest, 2, "I have spoken with Lieutenant Dawson.")
+function Multiple_Steps_Complete(Quest, QuestGiver, Player)
+	UpdateQuestTaskGroupDescription(Quest, 1, "I have investigated all three ambush sites.")
+	
+	-- a gnoll paw
+	if not HasItem(Player, 1711) then
+		SummonItem(Player, 1711)
+		SendMessage(Player, "You receieve [a gnoll paw].", "yellow")
+	end
 
+	AddQuestStepChat(Quest, 4, "I need to return to Lieutenant Dawson.", 1, "I need to tell Lieutenant Dawson of what I found at one of the ambush sites.", 0, 1980022) 
+	AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
+end
+
+function QuestComplete(Quest, QuestGiver, Player)
+	-- a gnoll paw
+	while HasItem(Player, 1711) do
+		RemoveItem(Player, 1711)
+	end
+	
 	UpdateQuestDescription(Quest, "I found evidence of gnolls at one of the ambush sites.")
 	GiveQuestReward(Quest, Player)
 end
 
 function Reload(Quest, QuestGiver, Player, Step)
 	if Step == 1 then
-		Step1Complete(Quest, QuestGiver, Player)
+		Step1_Complete_Site1(Quest, QuestGiver, Player)
 	elseif Step == 2 then
-		Step2Complete(Quest, QuestGiver, Player)
+		Step2_Complete_Site2(Quest, QuestGiver, Player)
 	elseif Step == 3 then
-		Step3Complete(Quest, QuestGiver, Player)
-	elseif Step == 4 then
-		QuestComplete(Quest, QuestGiver, Player)
+		Step3_Complete_Site3(Quest, QuestGiver, Player)
 	end
 end
-
-function Accepted(Quest, QuestGiver, Player)
-	-- Add dialog here for when the quest is accepted
-end
-
-function Declined(Quest, QuestGiver, Player)
-	-- Add dialog here for when the quest is declined
-end

server/Quests/SerpentSewers/BackAndForth.lua

@@ -0,0 +1,75 @@
+--[[
+	Script Name		:  Quests/SerpentSewers/BackAndForth.lua
+	Script Purpose	        :	Handles the quest, "Back and Forth"
+	Script Author	        :	premierio015
+	Script Date		:	17.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Access Quests
+	Quest Giver		:	Cicero Puer
+	Preceded by		:	Murkwater Uniform
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepKill(Quest, 1, "Kill Crazy Peepers.", 1, 100, "Cicero would like me to dispatch of some gnome known only as "Crazy Peepers."  If I take care of this Peepers character Cicero will tell me where I can find a secret room with plenty of loot.", 611, 1550074)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "I've taken care of Peepers.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've taken care of that Peepers character, I should return to Cicero.")
+
+	AddQuestStepChat(Quest, 2, "Return to Cicero.", 1, "I've dispatched of that Crazy Peepers character for Cicero, I should go back to him and get the location of this "secret" room.", 11, 1550022, 1550059)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "I've spoken with Cicero.")
+	UpdateQuestTaskGroupDescription(Quest, 2, "I've returned to Cicero and informed him of that crazy gnome's demise.")
+
+	AddQuestStepChat(Quest, 3, "Deliver the letter to Merchant Tula Mawh.", 1, "Cicero says that I have to take this letter to a merchant down here in the sewers by the name of Tula, and she will give me the directions I need.", 1223, 1550014)
+	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
+end
+
+function Step3Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 3, "I delivered the letter to Tula.")
+	UpdateQuestTaskGroupDescription(Quest, 3, "I delivered the letter for that pesky little rodent, and it turned out to be some sort of love letter.")
+
+	AddQuestStepChat(Quest, 4, "Return to Cicero, again.", 1, "That dirty little rat is either trying to pull a fast one over on me, or he thinks he can use me as a personal letter carrier.", 11, 1550022, 1550059)
+	AddQuestStepCompleteAction(Quest, 4, "QuestComplete")
+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, 4, "I've spoken with Cicero, again.")
+	UpdateQuestTaskGroupDescription(Quest, 4, "It turns out he just needed a letter delivered.  Cicero gave me the directions to the Serpent's Lair.")
+
+	UpdateQuestDescription(Quest, "Well after killing a crazy gnome and playing love letter messenger, Cicero finally gave me directions to the Serpent's Lair.  I only hope the place was worth the trouble.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		Step3Complete(Quest, QuestGiver, Player)
+	elseif Step == 4 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end

server/Quests/SerpentSewers/CrazyIsAsCrazyDoes.lua

@@ -0,0 +1,47 @@
+--[[
+	Script Name		:	Quests/SerpentSewers/CrazyIsAsCrazyDoes.lua
+	Script Purpose	:	Handles the quest, "Crazy is as Crazy Does"
+	Script Author	:	premierio015
+	Script Date		:	16.06.2020
+	Script Notes	:	Auto generated with QuestParser.
+
+	Zone			:	Serpent Sewer
+	Quest Giver		:	final notice
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	SetQuestFeatherColor(Quest, 3)
+	SetQuestRepeatable(Quest)
+	AddQuestStepKill(Quest, 1, "Find and kill Crazy Peepers.", 1, 100, "This note was apparently meant for someone else.", 611, --[[ ID's --]])
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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 Crazy Peepers.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've carried out the tasks stated in the note.")
+
+	UpdateQuestDescription(Quest, "Interesting... I guess it was worth it for the experience.  I suppose it couldn't hurt to take on adventures such as these.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end

server/Quests/SerpentSewers/MurkwaterUniform.lua

@@ -0,0 +1,104 @@
+--[[
+	Script Name		:	Quests/SerpentSewers/MurkwaterUniform.lua
+	Script Purpose	        :	Handles the quest, "Murkwater Uniform"
+	Script Author	        :	premierio015
+	Script Date		:	16.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Serpent Sewer
+	Quest Giver		:	Cicero Puer
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	AddQuestStepKill(Quest, 1, "Boots off a Murkwater abettor.", 1, 25, "I need to get all of the pieces that make up the Murkwater uniform while here in the Serpent's Sewers.", 1398, 1550045, 1550008, 1550046, 1550009)
+	AddQuestStepCompleteAction(Quest, 1, "Step1Complete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	conversation = CreateConversation()
+        PlayFlavor(QuestGiver, "voiceover/english/cicero_puer/fprt_sewer02/ciceropuer006.mp3", "", "", 611926151, 2666895781, Player)
+        AddConversationOption(conversation, "I'll return soon.")
+        StartConversation(conversation, QuestGiver, Player, "Excellent!  Hurry now, there isn't much time!  The Murkwaters are down in the Serpent Sewers. I can smell them.")
+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 Step1Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 1, "I've got the Boots.")
+
+	AddQuestStepKill(Quest, 2, "Leggings off a Murkwater steward.", 1, 25, "I need to get all of the pieces that make up the Murkwater uniform while here in the Serpent's Sewers.", 1402, 1550047, 1550010)
+	AddQuestStepCompleteAction(Quest, 2, "Step2Complete")
+end
+
+function Step2Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 2, "I've got the Leggings.")
+
+	AddQuestStepKill(Quest, 3, "Bracers off a Murkwater induct.", 1, 25, "I need to get all of the pieces that make up the Murkwater uniform while here in the Serpent's Sewers.", 1399, 1550011, 1550048)
+	AddQuestStepCompleteAction(Quest, 3, "Step3Complete")
+end
+
+function Step3Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 3, "I've got the Bracers.")
+
+	AddQuestStepKill(Quest, 4, "Gloves off a Murkwater induct.", 1, 25, "I need to get all of the pieces that make up the Murkwater uniform while here in the Serpent's Sewers.", 1400, 1550011, 1550048 )
+	AddQuestStepCompleteAction(Quest, 4, "Step4Complete")
+end
+
+function Step4Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 4, "I've got the Gloves.")
+
+	AddQuestStepKill(Quest, 5, "Sleeves off a Murkwater steward.", 1, 25, "I need to get all of the pieces that make up the Murkwater uniform while here in the Serpent's Sewers.", 1417, 1550047, 1550010)
+	AddQuestStepCompleteAction(Quest, 5, "Step5Complete")
+end
+
+function Step5Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 5, "I've got the Sleeves .")
+
+	AddQuestStepKill(Quest, 6, "Chest piece off a Murkwater abettor.", 1, 25, "I need to get all of the pieces that make up the Murkwater uniform while here in the Serpent's Sewers.", 1397, 1550045, 1550008, 1550046, 1550009)
+	AddQuestStepCompleteAction(Quest, 6, "Step6Complete")
+end
+
+function Step6Complete(Quest, QuestGiver, Player)
+	UpdateQuestStepDescription(Quest, 6, "I've got the chest piece.")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've gathered all of the pieces that make up the Murkwater uniform.")
+
+	AddQuestStepChat(Quest, 7, "I should get this stuff back to Cicero Puer.", 1, "I need to get this uniform to that ratonga, Cicero.", 11, 1550022, 1550059)
+	AddQuestStepCompleteAction(Quest, 7, "QuestComplete")
+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, 7, "I've given Cicero the clothes.")
+	UpdateQuestTaskGroupDescription(Quest, 2, "I've given the uniform to Cicero.")
+
+	UpdateQuestDescription(Quest, "I've given the ratonga the Murkwater uniform, now he's busy scheming who knows what.  Anyway, he stuck to his end of the bargain, and that's all that matters.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		Step1Complete(Quest, QuestGiver, Player)
+	elseif Step == 2 then
+		Step2Complete(Quest, QuestGiver, Player)
+	elseif Step == 3 then
+		Step3Complete(Quest, QuestGiver, Player)
+	elseif Step == 4 then
+		Step4Complete(Quest, QuestGiver, Player)
+	elseif Step == 5 then
+		Step5Complete(Quest, QuestGiver, Player)
+	elseif Step == 6 then
+		Step6Complete(Quest, QuestGiver, Player)
+	elseif Step == 7 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+

server/Quests/VerminsSnye/BigPests.lua

@@ -0,0 +1,49 @@
+--[[
+        Script Name		:       Quests/VerminsSnye/BigPests.lua
+	Script Purpose	        :	Handles the quest, "Big Pests"
+	Script Author	        :	premierio015
+	Script Date		:	20.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Vermin's Snye
+	Quest Giver		:	large vermin notice
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	SetQuestFeatherColor(Quest, 3)
+	SetQuestRepeatable(Quest)
+	AddQuestStepKill(Quest, 1, "Terminate some large tomb vermin", 5, 100, "This note was apparently meant for someone else here in these catacombs.", 611, 2000014)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've carried out the task stated in the note.")
+
+	UpdateQuestDescription(Quest, "Interesting... I guess it was worth it for the experience. I suppose it couldn't hurt to take on adventures such as these.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+
+

server/Quests/VerminsSnye/LittlePests.lua

@@ -0,0 +1,47 @@
+--[[
+	Script Name		:	little_pests.lua
+	Script Purpose	        :	Handles the quest, "Little Pests"
+	Script Author	        :	premierio015
+	Script Date		:	05.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Vermin's Snye
+	Quest Giver		:	little vermin notice
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	SetQuestFeatherColor(Quest, 3)
+	SetQuestRepeatable(Quest)
+	AddQuestStepKill(Quest, 1, "Terminate tomb vermin", 10, 100, "This note was apparently meant for someone else here in these catacombs.", 611, 2000009)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've carried out the task stated in the note.")
+
+	UpdateQuestDescription(Quest, "Interesting... I guess it was worth it for the experience. I suppose it couldn't hurt to take on adventures such as these.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end

server/Quests/VerminsSnye/PaperPuzzle.lua

@@ -0,0 +1,49 @@
+--[[
+	Script Name		:	paper_puzzle.lua
+	Script Purpose	        :	Handles the quest, "Paper Puzzle"
+	Script Author	        :	premierio015
+	Script Date		:	20.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Vermin's Snye
+	Quest Giver		:	Scrap of Paper
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	SetQuestFeatherColor(Quest, 3)
+	SetQuestRepeatable(Quest)
+	AddQuestStepKill(Quest, 1, "Look for the missing pieces of this journal entry", 5, 100, "I'm looking for scraps of paper that make up a journal entry.", 2179, 2000014, 2000009, 2000005, 2000003)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've recovered all of the scrap of paper.")
+
+	UpdateQuestDescription(Quest, "I found the remaining scraps and was able to piece the page together. It turns out it was someone's shopping list. Well, that's what I get for being nosy I guess.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+
+

server/Quests/VerminsSnye/PopulationControl.lua

@@ -0,0 +1,47 @@
+--[[
+	Script Name		:	population_control.lua
+	Script Purpose	        :	Handles the quest, "Population Control"
+	Script Author	        :	premierio015
+	Script Date		:	05.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Vermin's Snye
+	Quest Giver		:	nusiance notice
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	SetQuestFeatherColor(Quest, 3)
+	SetQuestRepeatable(Quest)
+	AddQuestStepKill(Quest, 1, "Terminate grave scorpius", 7, 100, "This note was apparently meant for someone else here in these catacombs.", 611, 2000003)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've carried out the task stated in the note.")
+
+	UpdateQuestDescription(Quest, "Interesting... I guess it was worth it for the experience.  I suppose it couldn't hurt to take on adventures such as these.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end

server/Quests/VerminsSnye/RavenousReport.lua

@@ -0,0 +1,48 @@
+--[[
+	Script Name		:	Quests/VerminsSnye/RavenousReport.lua
+	Script Purpose         	:	Handles the quest, "Ravenous Report"
+	Script Author	        :	premierio015
+	Script Date		:	04.06.2020
+	Script Notes	        :	Auto generated with QuestParser.
+
+	Zone			:	Vermin's Snye
+	Quest Giver		:	Ravenous report
+	Preceded by		:	None
+	Followed by		:	None
+--]]
+
+
+function Init(Quest)
+	SetQuestFeatherColor(Quest, 3)
+	SetQuestRepeatable(Quest)
+	AddQuestStepKill(Quest, 1, "Destroy ravenous cubes", 6, 100, "This note was apparently meant for someone else here in these catacombs.", 611, 2000005)
+	AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
+end
+
+function Accepted(Quest, QuestGiver, Player)
+	-- Add dialog here for when the quest is accepted
+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, "")
+	UpdateQuestTaskGroupDescription(Quest, 1, "I've carried out the task stated in the note.")
+
+	UpdateQuestDescription(Quest, "Interesting... I guess it was worth it for the experience. I suppose it couldn't hurt to take on adventures such as these.")
+	GiveQuestReward(Quest, Player)
+end
+
+function Reload(Quest, QuestGiver, Player, Step)
+	if Step == 1 then
+		QuestComplete(Quest, QuestGiver, Player)
+	end
+end
+

server/Spells/BristlebanesWork.lua

@@ -0,0 +1,14 @@
+--[[
+    Script Name    : Spells/BristlebanesWork.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:32
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Grants the skill Disarm Trap.
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/ChargingintoBattle.lua

@@ -0,0 +1,21 @@
+--[[
+    Script Name    : Spells/ChargingintoBattle.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:08
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Increases speed of caster by 5.0%
+
+function cast(Caster, Target, Speed)
+    AddSpellBonus(Target, 609, Speed)
+
+end
+
+function remove(Caster, Target)
+    RemoveSpellBonus(Target)
+
+end
+

server/Spells/Commoner/ArcaneEnlightenment.lua

@@ -20,6 +20,8 @@ SetSpellTriggerCount(Triggers, 1)
 end
 
 function proc(Caster, Target, Type, Power, Triggers)
+    Say(Caster, "this casts a test spell")
+
 CastSpell(Caster, 22, 1)
 RemoveTriggerFromSpell()
 end

server/Spells/Commoner/AuraSense.lua

@@ -0,0 +1,14 @@
+--[[
+    Script Name    : Spells/Commoner/AuraSense.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 10:08:00
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Grants Aura Vision to caster
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/AuraoftheRatonga.lua

@@ -0,0 +1,18 @@
+--[[
+    Script Name    : Spells/Commoner/AuraoftheRatonga.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.23 08:08:57
+    Script Purpose : 
+                   : 
+--]]
+
+-- pass tier 1 for evil, tier 2 for good
+
+function cast(Caster, Target, Aura)
+  SpawnSet(Target, "visual_state", Aura)
+end
+
+
+function remove(Caster, Target)
+  SpawnSet(Target, "visual_state", 0)
+end

server/Spells/Commoner/BlackSpottedWargwithPurpleArmor.lua

@@ -29,6 +29,11 @@ SetMountColor(Caster, 153, 76, 0, 127, 0, 255)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 --Increases damage done by spells and combat arts by upto 75.
     AddSpellBonus(Caster, 704, Dmg)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
 end
 
 function remove(Caster, Target)

server/Spells/Commoner/BrownNightmareWargwithBlueArmor.lua

@@ -29,6 +29,12 @@ SetMountColor(Caster, 153, 76, 0, 0, 0, 255)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 --Increases damage done by spells and combat arts by upto 75.
     AddSpellBonus(Caster, 704, Dmg)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
+
 end
 
 function remove(Caster, Target)

server/Spells/Commoner/BrownNightmareWargwithIndigoArmor.lua

@@ -29,6 +29,10 @@ SetMountColor(Caster, 153, 76, 0, 51, 51, 255)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 --Increases damage done by spells and combat arts by upto 75.
     AddSpellBonus(Caster, 704, Dmg)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
 end
 
 function remove(Caster, Target)

server/Spells/Commoner/BrownNightmareWargwithRedArmor.lua

@@ -29,6 +29,12 @@ SetMountColor(Caster, 153, 76, 0, 255, 0, 0)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 --Increases damage done by spells and combat arts by upto 75.
     AddSpellBonus(Caster, 704, Dmg)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
+
 end
 
 function remove(Caster, Target)

server/Spells/Commoner/ClockworkDisguise.lua

@@ -0,0 +1,14 @@
+--[[
+    Script Name    : Spells/Commoner/ClockworkDisguise.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 04:08:23
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Shapechanges caster
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/CobaltArmoredSaliraptor.lua

@@ -44,5 +44,5 @@ function remove(Caster, Target)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
 SetMount(Caster, 0)
-  RemoveControlEffect(Caster, 13)
+  RemoveControlEffect(Caster, 12)
 end

server/Spells/Commoner/CommandingPresence.lua

@@ -0,0 +1,14 @@
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end
+--[[
+    Script Name    : Spells/Commoner/CommandingPresence.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 10:08:54
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Enlarges caster by 20.0%

server/Spells/Commoner/CraftKeepersDiscofFlight.lua

@@ -17,6 +17,7 @@ end
 function cast(Caster, Target, HP, MP, Speed, Multi, Cast)
 -- Summons a mount to ride
 SetMount(Caster, 11059)
+-- Reduces maximum falling speed of caster.
  AddControlEffect(Caster, 13)
 -- Increases Max Health of caster by 200.
     AddSpellBonus(Caster, 606, HP)

server/Spells/Commoner/CrimsonHandsDiscofVoyage.lua

@@ -17,7 +17,8 @@ end
 function cast(Caster, Target, HP, MP, Speed, Reuse, Crit)
 -- Summons a mount to ride
 SetMount(Caster, 10983)
- AddControlEffect(Caster, 13)
+ -- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
 -- Increases Max Health of caster by 200.
     AddSpellBonus(Caster, 606, HP)
 -- Increases Max Power by 200.0

server/Spells/Commoner/DarkRedNightmareBlackSaddle.lua

@@ -30,6 +30,11 @@ AddSpellBonus(Caster, 619, MP)
     AddSkillBonus(Caster, GetSkillIDByName("Piercing"), SkillAmt)
 --Increases your ground speed by 130%    
     AddSpellBonus(Caster, 611, Speed)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
 end
 
 function remove(Caster, Target)

server/Spells/Commoner/DarkRedNightmareRedSaddle.lua

@@ -30,6 +30,11 @@ AddSpellBonus(Caster, 619, MP)
     AddSkillBonus(Caster, GetSkillIDByName("Piercing"), SkillAmt)
 --Increases your ground speed by 130%    
     AddSpellBonus(Caster, 611, Speed)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
 end
 
 function remove(Caster, Target)

server/Spells/Commoner/Diplomacy.lua

@@ -0,0 +1,15 @@
+--[[
+    Script Name    : Spells/Commoner/Diplomacy.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 10:08:05
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Reduces Awareness of Enemies 
+-- Dispelled when target takes damage
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/ElementalDiscofAir.lua

@@ -32,7 +32,7 @@ AddSkillBonus(Caster, GetSkillIDByName("Focus"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Aggression"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 
---Increases your ground speed by 130%
+--Increases your ground speed by 75%
 --Increases your air speed by 150%
     AddSpellBonus(Caster, 611, Ground)
     AddSpellBonus(Target, 612, Air)

server/Spells/Commoner/ExperimentalAirPocket.lua

@@ -0,0 +1,18 @@
+--[[
+    Script Name    : Spells/Commoner/ExperimentalAirPocket.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:13
+    Script Purpose : 
+                   : 
+--]]
+
+-- Allows caster to breathe under water
+
+function cast(Caster, Target)
+BreatheUnderwater(Target, true)
+end
+
+
+function remove(Caster, Target)
+BreatheUnderwater(Target, false)
+end

server/Spells/Commoner/FallingGrace.lua

@@ -0,0 +1,15 @@
+--[[
+    Script Name    : Spells/Commoner/FallingGrace.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:39
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Reduces maximum falling speed of caster
+-- You cannot use this spell while riding on a mount.
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/FeralRage.lua

@@ -0,0 +1,22 @@
+--[[
+    Script Name    : Spells/Commoner/FeralRage.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 04:08:06
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Increases in-combat movement speed of caster by 50.0%
+-- Increases speed of caster by 50.0%
+function cast(Caster, Target, Speed)
+    AddSpellBonus(Target, 616, Speed)
+    AddSpellBonus(Target, 609, Speed)
+
+end
+
+
+function remove(Caster, Target)
+    RemoveSpellBonus(Target)
+
+end

server/Spells/Commoner/Glide.lua

@@ -0,0 +1,17 @@
+--[[
+    Script Name    : Spells/Commoner/Glide.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:32
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Allows caster to jump farther
+-- If not on a mount
+-- Must not be engaged in pvp combat
+-- This ability may not be used in a PvP zone.
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/HolySteed.lua

@@ -2,21 +2,20 @@
     Script Name    : Spells/Commoner/HolySteed.lua
     Script Author  : Jabantiz
     Script Date    : 2014.05.31 07:05:18
-    Script Purpose : 
+    Script Purpose : updated 7/20/20 by Neatz09
                    : 
 --]]
 
--- Info from spell_display_effects (remove from script when done)
 -- Summons a mount to ride
 --     Increases your ground speed by 130%
 
-function cast(Caster, Target, Mount)
-    -- Test for aerakyn
-    SetMount(Caster, 17509)
-    AddControlEffect(Caster, 12)
+function cast(Caster, Target, Speed)
+    SetMount(Caster, 6852)
+       AddSpellBonus(Target, 609, Speed)
+
 end
 
 function remove(Caster, Target)
     SetMount(Caster, 0)
-    RemoveControlEffect(Caster, 12)
+    RemoveSpellBonus(Target)
 end

server/Spells/Commoner/Hover.lua

@@ -9,3 +9,11 @@
 -- Info from spell_display_effects (remove from script when done)
 -- Reduces maximum falling speed of caster
 -- You cannot use this spell while riding on a mount.
+
+function cast(Caster, Target)
+AddControlEffect(Target, 13)
+end
+
+function remove(Caster, Target)
+RemoveControlEffect(Target, 13)
+end

server/Spells/Commoner/HuntersFury.lua

@@ -0,0 +1,22 @@
+--[[
+    Script Name    : Spells/Commoner/HuntersFury.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 04:08:01
+    Script Purpose : 
+                   : 
+--]]
+
+-- Increases in-combat movement speed of caster by 50.0%
+-- Increases speed of caster by 50.0%
+
+function cast(Caster, Target, Speed)
+    AddSpellBonus(Target, 616, Speed)
+    AddSpellBonus(Target, 609, Speed)
+
+end
+
+
+function remove(Caster, Target)
+    RemoveSpellBonus(Target)
+
+end

server/Spells/Commoner/Hydromotion.lua

@@ -0,0 +1,24 @@
+--[[
+    Script Name    : Spells/Commoner/Hydromotion.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:54
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Allows caster to walk under water
+-- Allows caster to jump under water
+
+function cast(Caster, Target)
+    AddControlEffect(Target, 7)
+    AddControlEffect(Target, 8)
+
+end
+
+
+function remove(Caster, Target)
+    RemoveControlEffect(Target, 7)
+    RemoveControlEffect(Target, 8)
+
+end

server/Spells/Commoner/IgnoreTerror.lua

@@ -0,0 +1,18 @@
+--[[
+    Script Name    : Spells/Commoner/IgnoreTerror.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:48
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Makes caster immune to Fear effects
+function cast(Caster, Target)
+AddImmunitySpell(6, Target)
+end
+
+
+function remove(Caster, Target)
+RemoveImmunitySpell(6, Target)
+end

server/Spells/Commoner/ImpenetrableWill.lua

@@ -0,0 +1,19 @@
+--[[
+    Script Name    : Spells/Commoner/ImpenetrableWill.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 03:08:36
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Makes caster immune to Stun effects
+
+function cast(Caster, Target)
+AddImmunitySpell(4, Target)
+end
+
+
+function remove(Caster, Target)
+RemoveImmunitySpell(4, Target)
+end

server/Spells/Commoner/InterdimensionalPortal.lua

@@ -0,0 +1,16 @@
+--[[
+    Script Name    : Spells/Commoner/InterdimensionalPortal.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:54
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Teleports caster to target
+-- This effect cannot be cast during combat
+-- Must not be engaged in combat
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/LemTestScript.lua

@@ -0,0 +1,17 @@
+--[[
+    Script Name    : Spells/Commoner/LemTestScript.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.23 08:08:35
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- On a hostile spell cast this spell will cast Malefic Fury on target of spell.  
+--     Inflicts 229 mental damage on target
+--     Increases Threat to target by 1,660 
+--     Cannot be modified except by direct means
+
+function cast(Caster, Target)
+
+end

server/Spells/Commoner/MagicalStormWhistle.lua

@@ -30,6 +30,10 @@ AddSkillBonus(Caster, GetSkillIDByName("Focus"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Aggression"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
+
     --Increases your Ground Speed by 135%
     AddSpellBonus(Caster, 611, Speed)
 
@@ -39,5 +43,7 @@ end
 function remove(Caster, Target)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
+RemoveControlEffect(Caster, 13)
+
 SetMount(Caster, 0)
 end

server/Spells/Commoner/MalevolentDisc.lua

@@ -30,6 +30,10 @@ AddSkillBonus(Caster, GetSkillIDByName("Focus"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Aggression"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
+
     --Increases your Ground Speed by 135%
     AddSpellBonus(Caster, 611, Speed)
 
@@ -38,6 +42,7 @@ end
 
 function remove(Caster, Target)
     RemoveSpellBonus(Caster)
+RemoveControlEffect(Caster, 13)
     RemoveSkillBonus(Caster)
 SetMount(Caster, 0)
 end

server/Spells/Commoner/MindoverMatter.lua

@@ -0,0 +1,15 @@
+--[[
+    Script Name    : Spells/Commoner/MindoverMatter.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 11:08:06
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Reduces maximum falling speed of caster
+-- You cannot use this spell while riding on a mount.
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/NightmareBlackSaddle.lua

@@ -23,6 +23,9 @@ SetMountColor(Caster, 0, 0, 0, 0, 0, 0)
 AddSpellBonus(Caster, 201, Mit)
     AddSpellBonus(Caster, 202, Mit)
     AddSpellBonus(Caster, 203, Mit)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
 end
 
 

server/Spells/Commoner/NightmarePlainSaddle.lua

@@ -23,6 +23,11 @@ SetMountColor(Caster, 0, 0, 0, 255, 255, 255)
 AddSpellBonus(Caster, 201, Mit)
     AddSpellBonus(Caster, 202, Mit)
     AddSpellBonus(Caster, 203, Mit)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
 end
 
 

server/Spells/Commoner/NightmareRedSaddle.lua

@@ -24,6 +24,11 @@ SetMountColor(Caster, 0, 0, 0, 220, 20, 60)
 AddSpellBonus(Caster, 201, Mit)
     AddSpellBonus(Caster, 202, Mit)
     AddSpellBonus(Caster, 203, Mit)
+
+--Requires Evil Alignment.
+    Say(Caster, "Alignment not implemented.")
+
+
 end
 
 

server/Spells/Commoner/OrderFlameLavathreadedCarpet.lua

@@ -37,11 +37,17 @@ AddSpellBonus(Caster, 313, Melee)
  --Increases your Ground Speed by 130%
     AddSpellBonus(Caster, 611, Speed)
 
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
+
 end
 
 
 function remove(Caster, Target)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
+RemoveControlEffect(Caster, 13)
+
 SetMount(Caster, 0)
 end

server/Spells/Commoner/OrnateMajdulCarpet.lua

@@ -26,6 +26,11 @@ AddSpellBonus(Caster, 611, Speed)
  AddSkillBonus(Caster, GetSkillIDByName("Crushing"), SkillAmt)
  AddSkillBonus(Caster, GetSkillIDByName("Aggression"), SkillAmt)
  AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
+
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
+
 end
 
 
@@ -33,4 +38,6 @@ function remove(Caster, Target)
 SetMount(Caster, 0)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
+RemoveControlEffect(Caster, 13)
+
 end

server/Spells/Commoner/OverclockedGnomishHoveringDevice.lua

@@ -25,12 +25,18 @@ SetMount(Caster, 5997)
    --Increases your Ground Speed by 130%
     AddSpellBonus(Caster, 611, Speed)
 
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
+
 end
 
 
 function remove(Caster, Target)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
+RemoveControlEffect(Caster, 13)
+
 SetMount(Caster, 0)
 
 end

server/Spells/Commoner/PaleArmoredRhino.lua

@@ -17,6 +17,8 @@ end
 function cast(Caster, Target, Speed, SkillAmt)
 --Summons a mount to ride    
 SetMount(Caster, 7206)
+    Say(Caster, "Model might be incorrect")
+
 
 -- Increases your ground speed by 130%    
 AddSpellBonus(Caster, 611, Speed)

server/Spells/Commoner/PickPocket.lua

@@ -0,0 +1,14 @@
+--[[
+    Script Name    : Spells/Commoner/PickPocket.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.14 03:08:08
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Gives the caster a chance to steal something from the target.  The chance is based on the level difference of the opponent.  Be wary, though, some creatures may not take kindly to being robbed.
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/PinkUnicorn.lua

@@ -18,6 +18,8 @@ function cast(Caster, Target, Speed, SkillAmt)
 --Summons a mount to ride    
 SetMount(Caster, 9112)
 SetMountColor(Caster, 255, 105, 180, 0, 0, 0)
+    Say(Caster, "Model might be incorrect")
+
 
 -- Increases your ground speed by 130%    
 AddSpellBonus(Caster, 611, Speed)

server/Spells/Commoner/ReinforcedWarg.lua

@@ -17,7 +17,8 @@ end
 function cast(Caster, Target, Speed, SkillAmt)
 --Summons a mount to ride    
 SetMount(Caster, 8191)
-SetMountColor(Caster, 0, 0, 0, 255, 0, 0)
+SetMountColor(Caster, 0, 0, 0, 220, 20, 60)
+
 
 -- Increases your ground speed by 130%    
 AddSpellBonus(Caster, 611, Speed)
@@ -28,3 +29,12 @@ AddSpellBonus(Caster, 611, Speed)
  AddSkillBonus(Caster, GetSkillIDByName("Aggression"), SkillAmt)
  AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 end
+
+
+
+
+function remove(Caster, Target)
+SetMount(Caster, 0)
+    RemoveSpellBonus(Caster)
+    RemoveSkillBonus(Caster)
+end

server/Spells/Commoner/RevealInnerDemon.lua

@@ -0,0 +1,14 @@
+--[[
+    Script Name    : Spells/Commoner/RevealInnerDemon.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.15 12:08:20
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Reveals the vampire's inner demon!
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/Rob.lua

@@ -8,3 +8,7 @@
 
 -- Info from spell_display_effects (remove from script when done)
 -- Gives the caster a chance to steal something from the target.  The chance is based on the level difference of the opponent.  Be wary, though, some creatures may not take kindly to being robbed.
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/RujarkianHillrunner.lua

@@ -17,7 +17,7 @@ end
 function cast(Caster, Target, Speed, SkillAmt)
 --Summons a mount to ride    
 SetMount(Caster, 6848)
-SetMountColor(Caster, 0, 0, 0, 255, 255, 255)
+SetMountColor(Caster, 188, 143, 143, 255, 255, 255)
 
 
 -- Increases your ground speed by 130%    

server/Spells/Commoner/ScornDiskDeathmage.lua

@@ -38,6 +38,9 @@ SetMount(Caster, 10978)
 
     AddSpellBonus(Caster, 611, Speed)
 
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
 
 end
 
@@ -45,5 +48,7 @@ end
 function remove(Caster, Target)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
+RemoveControlEffect(Caster, 13)
+
 SetMount(Caster, 0)
 end

server/Spells/Commoner/SeekerDiscDarktruth.lua

@@ -33,6 +33,10 @@ SetMount(Caster, 10985)
 
     AddSpellBonus(Caster, 611, Speed)
 
+-- Reduces maximum falling speed of caster.
+AddControlEffect(Caster, 13)
+
+
 
 end
 
@@ -41,4 +45,6 @@ function remove(Caster, Target)
     RemoveSpellBonus(Caster)
     RemoveSkillBonus(Caster)
 SetMount(Caster, 0)
+RemoveControlEffect(Caster, 13)
+
 end

server/Spells/Commoner/ShadowWalk.lua

@@ -0,0 +1,16 @@
+--[[
+    Script Name    : Spells/Commoner/ShadowWalk.lua
+    Script Author  : neatz09
+    Script Date    : 2020.08.15 12:08:58
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Teleports caster to target
+-- This effect cannot be cast during combat
+-- Must not be engaged in combat
+
+function cast(Caster, Target)
+    Say(Target, "Hah, nice try! That's not implemented yet!")
+end

server/Spells/Commoner/SteedBlazingSun.lua

@@ -17,10 +17,10 @@ end
 
 function cast(Caster, Target, Potency, Speed)   
 -- Summons a mount
-SetMount(Caster, 8226)
+SetMount(Caster, 14054)
 
 --Increases Potency of caster by 2.0% 
-    AddSpellBonus(Caster, 659, Health)
+    AddSpellBonus(Caster, 659, Potency)
 
     --Increases your Ground Speed by 130%
     AddSpellBonus(Caster, 611, Speed)

server/Spells/Commoner/SummonSatyr.lua

@@ -0,0 +1,21 @@
+--[[
+    Script Name    : Spells/Commoner/SummonSatyr.lua
+    Script Author  : TyroneSWG
+    Script Date    : 2020.06.15 11:06:37
+    Script Purpose : 
+                   : 
+--]]
+
+-- Info from spell_display_effects (remove from script when done)
+-- Summons a pet Dancing Satyr
+function cast(Caster, Target)
+	SummonCosmeticPet(Caster, 6538)
+
+end
+
+function remove(Caster, Target)
+	pet = GetCosmeticPet(Caster)
+	if pet ~= nil then
+		DismissPet(pet)
+	end
+end

server/Spells/Commoner/Sun-BlazonedPegasus.lua

@@ -33,7 +33,7 @@ AddSkillBonus(Caster, GetSkillIDByName("Focus"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Aggression"), SkillAmt)
     AddSkillBonus(Caster, GetSkillIDByName("Ranged"), SkillAmt)
 
-    --Increases your Ground Speed by 75%
+    --Increases your Ground Speed by 130%
     --Increases your Air Speed by 150% 
     AddSpellBonus(Caster, 611, Speed)
     AddSpellBonus(Target, 612, Air)