eq2emu-content/SpawnScripts/FallenGate/tomelocationexaminebed.lua
2024-10-26 11:37:28 +00:00

44 lines
No EOL
1.4 KiB
Lua
Executable file

--[[
Script Name : SpawnScripts/FallenGate/tomelocationexaminebed.lua
Script Author : Premierio015
Script Date : 2021.07.09 09:07:18
Script Purpose :
:
--]]
local TheBloodOfTheBearPartOne = 13958
function spawn(NPC)
SetPlayerProximityFunction(NPC, 10, "InRange", Spawn)
end
function InRange(NPC, Spawn)
if not HasItem(Spawn, TheBloodOfTheBearPartOne) then
SpawnSet(NPC, "show_command_icon", 1)
SpawnSet(NPC, "display_hand_icon", 1)
SetAccessToEntityCommand(Spawn,NPC,"Search Bed", 1)
elseif HasItem(Spawn, TheBloodOfTheBearPartOne) then
SpawnSet(NPC, "show_command_icon", 0)
SpawnSet(NPC, "display_hand_icon", 0)
SetAccessToEntityCommand(Spawn,NPC,"Search Bed", 0)
end
end
function casted_on(NPC, Spawn, SpellName)
if SpellName == 'Search Bed' then
if not HasItem(Spawn, TheBloodOfTheBearPartOne) then
SendMessage(Spawn, "You find an old tattered book.")
SendPopUpMessage(Spawn, "You receive The Blood of The Bear, Part One.", 255, 255, 255)
SummonItem(Spawn, TheBloodOfTheBearPartOne)
elseif HasItem(Spawn, ZatirresFirstZombie) then
SpawnSet(NPC, "show_command_icon", 0)
SpawnSet(NPC, "display_hand_icon", 0)
SetAccessToEntityCommand(Spawn,NPC,"Search Urn", 0)
end
end
end
function respawn(NPC)
spawn(NPC)
end