1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556 |
- --[[
- Script Name : ItemScripts/abrokenmusicbox.lua
- Script Author : Premierio015
- Script Date : 2021.06.25 06:06:14
- Script Purpose :
- :
- --]]
- local RewardForAMissingMusicBox = 5261
- function examined(Item, Player)
- if CanReceiveQuest(Player,RewardForAMissingMusicBox) then
- Dialog1(Item,Player)
- else
- conversation = CreateConversation()
- AddConversationOption(conversation, "[Keep the musicbox]")
- AddConversationOption(conversation, "[Destroy the musicbox]", "QuestFinish")
- StartDialogConversation(conversation, 2, Item, Player, "This floral designed music box is broken like one you found before. Perhaps it is the same one? Oh well.")
- end
- end
- function Dialog1(Item,Player)
- conversation = CreateConversation()
- if CanReceiveQuest(Player,RewardForAMissingMusicBox) then
- AddConversationOption(conversation, "[Open the musicbox]", "Dialog2")
- end
- AddConversationOption(conversation, "[Put the box away]", "CloseItemConversation")
- StartDialogConversation(conversation, 2, Item, Player, "The music box is decorated with gold trim and a floral design is carved into the lid. The lid is unlocked.")
- end
- function Dialog2(Item,Player)
- conversation = CreateConversation()
- if CanReceiveQuest(Player,RewardForAMissingMusicBox) then
- AddConversationOption(conversation, "[Write the name in your journal]", "Offer")
- end
- AddConversationOption(conversation, "[Put the music box away.]", "CloseItemConversation")
- StartDialogConversation(conversation, 2, Item, Player, "Inside the music box is a small engraving of the name \"Lucilla Quietus\" on a little gold plate. You also discover that the music box no longer plays music.")
- end
- function Offer(Item,Player)
- if CanReceiveQuest(Player,RewardForAMissingMusicBox) then
- OfferQuest(nil,Player,RewardForAMissingMusicBox)
- end
- CloseItemConversation(Item,Player)
- end
- function QuestFinish(Item,Player)
- CloseItemConversation(Item,Player)
- if HasItem(Player,1286,1) then
- RemoveItem(Player,1286)
- end
- end
|