IF
  See("SK#Neht")
  CombatCounter(0)
  Global("RelicVidu2","LOCALS",0)
THEN
RESPONSE #100
SetInterrupt(FALSE)   

MoveToObject("SK#Neht")
Dialog([PC])
END

IF
See(Player1)
!InParty("SK#Neht")
Global("NehtJustLeft","GLOBAL",0)
THEN
RESPONSE #100
ReallyForceSpell(Myself,DRYAD_TELEPORT)
Wait(1)
SetGlobal("NehtJustLeft","GLOBAL",1)
SetGlobal("ViduHelp","GLOBAL",1)
DestroySelf()
END
