EQ2EMu/server/ItemScripts/anightbloodshackle.lua

--[[
    Script Name    : ItemScripts/anightbloodshackle.lua
    Script Author  : AussieGlen
    Script Date    : 2022.01.01 12:01:01
    Script Purpose : 
                   : 
--]]

local LoreAndLegendNightblood = 5406

function examined(Item, Player)
if not HasQuest(Player, LoreAndLegendNightblood) and not HasCompletedQuest(Player, LoreAndLegendNightblood) then
OfferQuest(nil, Player, LoreAndLegendNightblood)
elseif not QuestStepIsComplete(Player, LoreAndLegendNightblood, 7) then
conversation = CreateConversation()    
AddConversationOption(conversation, "Begin to study...", "Step_Complete")
AddConversationOption(conversation, "No, put away", "CloseItemConversation")
StartDialogConversation(conversation, 2, Item, Player, "This item can be used to learn the secrets of the nightblood. Do you wish to study it?")
end
   end

function Step_Complete(Item, Player)
SetStepComplete(Player, LoreAndLegendNightblood, 7)
RemoveItem(Player, 2337)
end


function item_description(Item, Spawn)
    return "You have already examined this item."
end