bark_like_a_gnoll_classic.lua 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  1. --[[
  2. Script Name : Quests/MultipleZones/bark_like_a_gnoll_classic.lua
  3. Script Author : Dorbin
  4. Script Date : 2022.05.29 01:05:00
  5. Script Notes : CLASSIC Version of quest. Gives Studied version of item that actually counts for update.
  6. Zone : MultipleZones
  7. Quest Giver:
  8. Preceded by: None
  9. Followed by:
  10. --]]
  11. function Init(Quest)
  12. 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, 13525)
  13. AddQuestStepCompleteAction(Quest, 1, "QuestComplete")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. if HasItem(Player, 4963) then
  17. RemoveItem(Player, 4963,1)
  18. end
  19. end
  20. function Declined(Quest, QuestGiver, Player)
  21. -- Add dialog here for when the quest is declined
  22. end
  23. function Deleted(Quest, QuestGiver, Player)
  24. -- Remove any quest specific items here when the quest is deleted
  25. end
  26. function QuestComplete(Quest, QuestGiver, Player)
  27. -- The following UpdateQuestStepDescription and UpdateTaskGroupDescription are not needed, parser adds them for completion in case stuff needs to be moved around
  28. UpdateQuestStepDescription(Quest, 1, "I have a studied a Chirannite Threat Totem.")
  29. UpdateQuestTaskGroupDescription(Quest, 1, "I have learned Gnollish, language of the gnoll race.")
  30. if not HasLanguage(Player,18) then
  31. AddLanguage(Player, 18)
  32. SendMessage(Player, "You have learned the basics of the Gnollish language.", "White")
  33. end
  34. 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.")
  35. GiveQuestReward(Quest, Player)
  36. AddLanguage(Player, 18)
  37. end
  38. function Reload(Quest, QuestGiver, Player, Step)
  39. if Step == 1 then
  40. QuestComplete(Quest, QuestGiver, Player)
  41. end
  42. end