--[[ Script Name : SpawnScripts/Antonica/HartokWoolyman.lua Script Author : Premierio015 Script Date : 2021.08.22 07:08:44 Script Purpose : : --]] local PatchworkRugs = 5344 -- Patchwork Rugs quest local DoorToDoorDelivery = 5346 -- Door to Door Delivery quest local AttackOfTheKillerBear = 5347 -- Attack of the Killer Bear quest function spawn(NPC) SetPlayerProximityFunction(NPC, 15, "InRange") end function InRange(NPC, Spawn) if not HasQuest(Spawn, PatchworkRugs) and not HasCompletedQuest(Spawn, PatchworkRugs) then ProvidesQuest(NPC, PatchworkRugs) SetInfoFlag(NPC) SetVisualFlag(NPC) elseif HasCompletedQuest(Spawn, PatchworkRugs) then ProvidesQuest(NPC, DoorToDoorDelivery) SetInfoFlag(NPC) SetVisualFlag(NPC) elseif HasCompletedQuest(Spawn, DoorToDoorDelivery) then ProvidesQuest(NPC, AttackOfTheKillerBear) SetInfoFlag(NPC) SetVisualFlag(NPC) end end function hailed(NPC, Spawn) FaceTarget(NPC, Spawn) local choice = MakeRandomInt(1, 3) if choice == 1 then PlayFlavor(NPC, "voiceover/english/voice_emotes/greetings/greetings_2_1010.mp3", "", "", 0, 0, Spawn) elseif choice == 2 then PlayFlavor(NPC, "voiceover/english/voice_emotes/greetings/greetings_1_1010.mp3", "", "", 0, 0, Spawn) elseif choice == 3 then PlayFlavor(NPC, "voiceover/english/voice_emotes/greetings/greetings_3_1010.mp3", "", "", 0, 0, Spawn) end if not HasQuest(Spawn, PatchworkRugs) and not HasCompletedQuest(Spawn, PatchworkRugs) then Option1(NPC, Spawn) elseif HasCompletedQuest(Spawn, PatchworkRugs) and not HasQuest(Spawn, DoorToDoorDelivery) and not HasCompletedQuest(Spawn, DoorToDoorDelivery) then Option7(NPC, Spawn) elseif HasCompletedQuest(Spawn, PatchworkRugs) and HasCompletedQuest(Spawn, DoorToDoorDelivery) and not HasQuest(Spawn, AttackOfTheKillerBear) and not HasCompletedQuest(Spawn, AttackOfTheKillerBear) then Option11(NPC, Spawn) elseif GetQuestStep(Spawn, PatchworkRugs) == 1 or GetQuestStep(Spawn, DoorToDoorDelivery) == 1 or GetQuestStep(Spawn, AttackOfTheKillerBear)==1 then Quest_Progress(NPC, Spawn) elseif GetQuestStep(Spawn, PatchworkRugs) == 2 then Option6(NPC, Spawn) elseif GetQuestStep(Spawn, DoorToDoorDelivery) == 2 then Option10(NPC, Spawn) elseif GetQuestStep(Spawn, AttackOfTheKillerBear) == 2 then Option16(NPC, Spawn) elseif HasCompletedQuest(Spawn, PatchworkRugs) and HasCompletedQuest(Spawn, DoorToDoorDelivery) and HasCompletedQuest(Spawn, AttackOfTheKillerBear) then PlayFlavor(NPC, "", "Thanks again! I think I'll be safe for the time being.", "", 1689589577, 4560189, Spawn) end end function Option1(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Actually, I am looking for work.", "Option2") AddConversationOption(conversation, "Well, if you're going to be like that....") StartConversation(conversation, NPC, Spawn, "Hello, adventurer! Would you care for a nice bearskin rug for your abode? I made them myself. If you don't want one, get lost! I have things to do.") end function Option2(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Maybe, if the price is right.", "Option3") AddConversationOption(conversation, "I don't feel like it.") StartConversation(conversation, NPC, Spawn, "Looking for work, huh? I think I can find something for you to do. You see, I make these here bearskin rugs, and I am finding less and less time to gather the pelts myself. Perhaps you can help.") end function Option3(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Okay, so what do you need?", "Option4") AddConversationOption(conversation, "Bye.") StartConversation(conversation, NPC, Spawn, "Look, don't get ahead of yourself. It's not like Holly Windstalker is going to be chasing you down for killing her precious bears! Ha! As a matter of fact, I have been killing every bear I have seen for years, and nothing has stopped me yet!") end function Option4(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Sure, that doesn't sound so bad.", "Option5") AddConversationOption(conversation, "Bye.") StartConversation(conversation, NPC, Spawn, "I need you to kill some bears for me, of course. You see, I have so many orders to fill, I can't even think of going out and getting them myself. So, from time to time, I look to adventurers such as yourself to help me out a little bit.") end function Option5(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Okay, kill bears. Got it.", "offer") AddConversationOption(conversation, "Bye.") StartConversation(conversation, NPC, Spawn, "There are plenty of bears out around these parts. These parts were protected for so long, it seems like it's instinct for them to come here and gather. Business is booming and there is no end of supply in sight!") end function Option6(NPC, Spawn) SetStepComplete(Spawn, PatchworkRugs, 2) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "I just might have the time, thank you.") StartConversation(conversation, NPC, Spawn, "Great! These pelts are beautiful. Good job. You know, you do pretty good work for a whelp. I think I could use some more help if you have the time.") end function Option7(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Sure, what do you have for me?", "Option8") AddConversationOption(conversation, "Bye, then.") StartConversation(conversation, NPC, Spawn, "Okay, look. I have work to do. If you want a task, just ask. Otherwise, please be on your way.") end function Option8(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Sure. Anything else?", "Option9") AddConversationOption(conversation, "Bye.") StartConversation(conversation, NPC, Spawn, "So, I just got an order for another 10 rugs. I don't have the time to run all over the place delivering these things to everybody. I need you to run over to The Keep of the Gnollslayers and deliver these rugs to Lord Bennet. Give him this note and make sure you collect payment.") end function Option9(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Things to take care of?", "offer2") StartConversation(conversation, NPC, Spawn, "Yeah, he may ask where I have been lately. Just tell him I have been... uhhh... Tell him I have been busy. Oh, and also tell him that I won't be by this week. I have things to take care of.") end function Option10(NPC, Spawn) SetStepComplete(Spawn, DoorToDoorDelivery, 2) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "No problem, I guess.") StartConversation(conversation, NPC, Spawn, "Ahh, good work! I was afraid you wouldn't return! I mean... that you might... umm... never mind. Thanks for the favor!") end function Option11(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Sure, what is it?", "Option12") AddConversationOption(conversation, "I don't feel like it.") StartConversation(conversation, NPC, Spawn, "Hey there. Umm...let me be straight with you. You seem to be able to handle yourself quite well. I umm... I need a favor. ") end function Option12(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "I don't understand.", "Option13") AddConversationOption(conversation, "Bye.") StartConversation(conversation, NPC, Spawn, "You see, business is doing rather well, but that's not why I can't leave this place. See, business is doing so well, that uhh... I think something is after me.") end function Option13(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Okay, so it hated you. What's the point?", "Option14") AddConversationOption(conversation, "Bye.") StartConversation(conversation, NPC, Spawn, "I have only seen it once. On my last trip out to get some more pelts, she came running out of some trees. I have never seen actual hate in the eyes of any of the game I have hunted, but this creature... This creature hated me.") end function Option14(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Okay, but it's going to cost you.", "Option15") AddConversationOption(conversation, "Not this time.") StartConversation(conversation, NPC, Spawn, "I believe that this bear has grown to recognize me, and wants nothing more than to see me dead. I have seen it in her eyes. When I saw those eyes, I felt as though Holly Windstalker herself was looking at me through that beast's eyes. Please, just rid this world of that beast, so I can get back to my business in peace. ") end function Option15(NPC, Spawn) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "I will seek this beast out.", "offer3") StartConversation(conversation, NPC, Spawn, "If you make it past that beast alive I will be happy to reward you. Just please, get rid of that thing! I last saw her in the Shattered Vale located within the mountain range to the southeast. If you find a Giantslayer messenger on the way, you may find a way to \"ask\" them how to get inside the vale.") end function Option16(NPC, Spawn) SetStepComplete(Spawn, AttackOfTheKillerBear, 2) FaceTarget(NPC, Spawn) local conversation = CreateConversation() AddConversationOption(conversation, "Good luck with that.") StartConversation(conversation, NPC, Spawn, "You did it! Thank you so much, friend. I must have just been imagining things. To think, I actually thought that somehow old Holly Windstalker sent that creature after me. Can you believe it? I guess sometimes those old myths can get to even the best of us. Now, I can get back to business. I have lots of orders to fill! Haha! ") end function offer(NPC, Spawn) OfferQuest(NPC, Spawn, PatchworkRugs) end function offer2(NPC, Spawn) OfferQuest(NPC, Spawn, DoorToDoorDelivery) end function offer3(NPC, Spawn) OfferQuest(NPC, Spawn, AttackOfTheKillerBear) end function Quest_Progress(NPC, Spawn) PlayFlavor(NPC, "", "Hey! What are you doing back here so soon? I don't want to hear any excuses. Come back when you finish the task I have given you, or don't return at all!", "", 1689589577, 4560189, Spawn) end function respawn(NPC) spawn(NPC) end