EQ2EMu/Lua/SpawnScripts/Darklight/Sableveinrubblenode.lua

--[[
	Script Name		:	SpawnScripts/Darklight/Sableveinrubble.lua
	Script Purpose	:	Sablevein Rubble
	Script Author	:	Cynnar
	Script Date		:	10/13/2015
	Script Notes	:	
--]]

local SableveinRubble = 137

function spawn(NPC)
	AddSpawnAccess(NPC, NPC)
	SetPlayerProximityFunction(NPC, 20, "SpawnAccess", "SpawnAccess")
    SetRequiredQuest(NPC, SableveinRubble, 1)
end

function respawn(NPC)
    spawn(NPC)
end

function SpawnAccess(NPC, Spawn)
	if HasQuest(Spawn, SableveinRubble) and tonumber(GetTempVariable(Spawn, "SableOre")) <= 6 then
		AddSpawnAccess(NPC, Spawn)
	end
end

function casted_on(Target, Caster, SpellName)
    local SableOreCount = tonumber(GetTempVariable(Player, "SableOre"))
    if SpellName == "harvest " then
	    if HasQuest(Spawn, SableveinRubble) and tonumber(GetTempVariable(Spawn, "SableOre")) <= 6 then
		Despawn(NPC)
		SummonItem(Spawn, 11836)
		SetTempVariable(Spawn, "SableOre", SableOreCount + 1)
	    elseif HasQuest(Spawn, SableveinRubble) and tonumber(GetTempVariable(Spawn, "SableOre")) == 6 then
		RemoveSpawnAccess(NPC, Player)
	    end
    end
end