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

IF
	!Global("lh1607","GLOBAL",1)
THEN
	RESPONSE #100
		SetGlobal("lh1607","GLOBAL",1)
		GiveItemCreate("lhMIS3b",Player1,1,1,1)
		TakePartyItemAll("lhMIS3a")
		SetGlobal("BComm","GLOBAL",0)
		SetGlobal("PirShip","GLOBAL",0)
END

IF
	Global("Over","GLOBAL",3)
THEN
	RESPONSE #100
		SetGlobal("Over","GLOBAL",0)
		TakePartyItemAll("lhMIS3b")
		ClearAllActions()
		StartCutSceneMode()
		StartCutScene("LHRT1502")
END

IF
	Global("Cont3a","GLOBAL",1)
THEN
	RESPONSE #100
		SetGlobal("Cont3a","GLOBAL",0)
		TakePartyItemAll("lhMIS3c")
		ClearAllActions()
		MultiPlayerSync()
		FadeToColor([20.0],0)
		RestParty()
		SetGlobal("PirShip","GLOBAL",1)
		StartCutSceneMode()
		StartCutScene("lhCUTM3C")
END
