IF
	Die()
	Global("Lich2","ARC012",0)
	!PartyHasItem("CUJAR01") // Phylactery of Koroval Na'Krugen
THEN
	RESPONSE #100
		Wait(2)
		CreateCreature("LICH1",[-2.-2],0)
                SetGlobal("LichResurect","GLOBAL",1)
                SetGlobal("Lich2","ARC012",1)
END

IF
	Die()
	Global("Lich2","ARC012",1)
	!PartyHasItem("CUJAR01") // Phylactery of Koroval Na'Krugen
THEN
	RESPONSE #100
		Wait(2)
		CreateCreature("LICH2",[-2.-2],0)
                SetGlobal("Lich3","ARC012",1)
END

IF
	Die()
	Global("Lich3","ARC012",1)
	!PartyHasItem("CUJAR01") // Phylactery of Koroval Na'Krugen
THEN
	RESPONSE #100
		Wait(2)
		CreateCreature("LICH3",[-2.-2],0)
                SetGlobal("Lich1","ARC012",0)
                SetGlobal("Lich2","ARC012",0)
                SetGlobal("Lich3","ARC012",0)
END

IF
	Die()
	PartyHasItem("CUJAR01") // Phylactery of Koroval Na'Krugen
THEN
	RESPONSE #100
		ReallyForceSpell(Myself,RED_SWIRL)
		AddexperienceParty(9500)
		SetGlobal("LichDead","GLOBAL",1)
END


