EQ2EMu/server/ItemScripts/ChugglesToolbox.lua

--[[
    Script Name    : ItemScripts/ChugglesToolbox.lua
    Script Author  : Premierio015
    Script Date    : 2021.06.29 09:06:59
    Script Purpose : 
                   : 
--]]

local ChugglesToolbox = 483

--
function examined(Item, Player)
if not HasQuest(Player, ChugglesToolbox) and not HasCompletedQuest(Player, ChugglesToolbox) then
OfferQuest(nil, Player, ChugglesToolbox)
end
   end


local ChugglesToolbox = 483


function examined(Item, Player)
	if CanReceiveQuest(Player,ChugglesToolbox) then
    Dialog1(Item,Player)
    else
    conversation = CreateConversation()
    AddConversationOption(conversation, "[Put the toolbox away.]", "CloseItemConversation")
    StartDialogConversation(conversation, 2, Item, Player, "This toolbox is similar to one you've found before. You can't fathom a need for it, but someone else might be able to use it.")
	end
end

function Dialog1(Item,Player)
    conversation = CreateConversation()
    if CanReceiveQuest(Player,ChugglesToolbox) then
    AddConversationOption(conversation, "[Inspect the toolbox.]", "Dialog2")
    end
    AddConversationOption(conversation, "[Put the toolbox away.]", "CloseItemConversation")
    StartDialogConversation(conversation, 2, Item, Player, "This box feels lighter than you expected.")
end

function Dialog2(Item,Player)
    conversation = CreateConversation()
    if CanReceiveQuest(Player,ChugglesToolbox) then
    AddConversationOption(conversation, "[Write the list in your journal.]", "Offer")
    end
    AddConversationOption(conversation, "[Put the toolbox away.]", "CloseItemConversation")
    StartDialogConversation(conversation, 2, Item, Player, "The words \"Chuggle of Temple Street\" are inscribed on a plate on top of the lid. The box is empty except for a handwritten note stuck to the inside of the box's top; the note lists the tools that once belonged in the box, and who among the denizens of Thieves' Way they were allocated to.")
end

function Offer(Item,Player)
    if CanReceiveQuest(Player,ChugglesToolbox) then
    OfferQuest(nil,Player,ChugglesToolbox)
    end
    CloseItemConversation(Item,Player)
end



function QuestFinish(Item,Player)
    CloseItemConversation(Item,Player)
    if HasItem(Player,5014) then
        RemoveItem(Player,5014,1)
    end
end