IF
	OnCreation()
	!Global("Over","GLOBAL",0)
THEN
	RESPONSE #100
		SetGlobal("Over","GLOBAL",0)
END

IF
	OnCreation()
	!Global("lh1000","GLOBAL",1)
THEN
	RESPONSE #100
		SetGlobal("lh1000","GLOBAL",1)
		GiveItemCreate("lhMIS7b",Player1,1,1,1)
		TakePartyItemAll("lhMIS7a")
		GiveItemCreate("lhRIF1",Player1,1,1,1)
		Deactivate("Viconia")
		Deactivate("Jan")
		SetGlobal("Noble","AR1000",0)
		SetGlobal("Sniped","GLOBAL",0)
END

IF
	Global("Over","GLOBAL",7)
THEN
	RESPONSE #100
		SetGlobal("Over","GLOBAL",0)
		TakePartyItemAll("lhMIS7b")
		TakePartyItemAll("lhRIF1")
		TakePartyItemAll("lhMIS7c")
		ClearAllActions()
		StartCutSceneMode()
		StartCutScene("LHRT1502")
END

IF
	True()
THEN
	RESPONSE #100
		Deactivate("Viconia")
		Deactivate("Jan")
		Continue()
END


