anger_fang.lua 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647
  1. --[[
  2. Script Name : Quests/Ruins/anger_fang.lua
  3. Script Purpose : Handles the quest, "Anger-Fang"
  4. Script Author : Scatman
  5. Script Date : 2009.07.28
  6. Zone : The Ruins
  7. Quest Giver: Mardyp Prunt
  8. Preceded by: None
  9. Followed by: None
  10. --]]
  11. function Init(Quest)
  12. AddQuestStepKill(Quest, 1, "I need 20 orc fangs.", 20, 100, "Mardyp would like me to collect some orc fangs for him.", 102, 1270012, 1270153, 1270055, 1270013, 1270131, 1270035, 1270045, 1270095, 1270044, 1270010, 1270130, 1270027, 1270039, 1270022, 1270019, 1270087, 1270050, 1270066, 1270053, 1270047, 1270096, 1270067, 1270058, 1270068, 1270046, 1270057, 1270037, 1270056, 1270093, 1270170, 1270161, 1270114, 1270112, 1270082, 1270063, 1270081, 1270117, 1270118, 1270049, 1270048, 1270059, 1270041, 1270051, 1270052, 1270116, 1270113, 1270133, 1270115, 1270119, 1270120, 1270181)
  13. AddQuestStepCompleteAction(Quest, 1, "Step1_Complete_KilledOrcs")
  14. end
  15. function Accepted(Quest, QuestGiver, Player)
  16. FaceTarget(QuestGiver, Player)
  17. conversation = CreateConversation()
  18. AddConversationOption(conversation, "I'll go get your fangs.")
  19. StartConversation(conversation, QuestGiver, Player, "Good! Mardyp go back to crushing.")
  20. end
  21. function Declined(Quest, QuestGiver, Player)
  22. end
  23. function Step1_Complete_KilledOrcs(Quest, QuestGiver, Player)
  24. UpdateQuestStepDescription(Quest, 1, "I have collected the orc fangs.")
  25. AddQuestStepChat(Quest, 2, "I need to bring the orc fangs to Mardyp.", 1, "Mardyp would like me to collect some orc fangs for him.", 0, 1270016)
  26. AddQuestStepCompleteAction(Quest, 2, "Quest_Complete")
  27. end
  28. function Quest_Complete(Quest, QuestGiver, Player)
  29. UpdateQuestStepDescription(Quest, 2, "I have given Mardyp the fangs he asked for.")
  30. UpdateQuestTaskGroupDescription(Quest, 1, "I collected the orc fangs for Mardyp.")
  31. GiveQuestReward(Quest, Player)
  32. UpdateQuestDescription(Quest, "I have gotten the orc fangs for Mardyp. He was pleased.")
  33. end
  34. function Reload(Quest, QuestGiver, Player, Step)
  35. if Step == 1 then
  36. Step1_Complete_KilledOrcs(Quest, QuestGiver, Player)
  37. end
  38. end