Scriptname _00E_Teleport_SuntempleME extends activemagiceffect

;=====================================================================================
;              							EVENTS                  					 
;=====================================================================================

Event OnEffectStart (Actor akTarket, Actor akCaster)

	bool bHasCompanion = false
	int i = NoTeleportCompanions.GetSize()
	while i > 0 && ! bHasCompanion
		i -= 1
		bHasCompanion = (NoTeleportCompanions.GetAt(i) as Actor).IsPlayerTeammate()
	endwhile

	If bHasCompanion || (_00E_TeleportGlobal.GetValueInt() == 1 && ! MQ12b.IsRunning()) || PlayerREF.GetWorldSpace() == Akropolis || MQ03.GetCurrentStageID() < 30
        _00E_Teleport_sTeleportNotPossible.Show()
		MAGVampireSunlight.Play(PlayerREF)
		PlayerREF.AddItem(_01E_TeleportrolleSonnentempel, 1)
	Elseif ((_00E_TeleportGlobal.GetValueInt() == 1) && (MQ12b.GetCurrentStageID() == 115) ||(MQ12b.GetCurrentStageID() == 120))
		_00E_PlayerFunctions.GetTeleportControl().TeleportPlayer(_00E_TeleportMarker_Suntemple)
	ElseIf (_00E_TeleportGlobal.GetValueInt() == 0)
		_00E_PlayerFunctions.GetTeleportControl().TeleportPlayer(_00E_TeleportMarker_Suntemple)
	EndIf

EndEvent

;=====================================================================================
;              							PROPERTIES                  					 
;=====================================================================================

Worldspace Property Akropolis Auto

Actor Property PlayerREF Auto

Quest Property MQ12b Auto

Quest Property MQ03 Auto

GlobalVariable Property _00E_TeleportGlobal Auto

Sound Property MAGVampireSunlight Auto

ObjectReference Property _00E_TeleportMarker_Suntemple Auto
{Set this to be the XMarkerHeading where the player arrives}

Message Property _00E_Teleport_sTeleportNotPossible Auto 

Scroll Property _01E_TeleportrolleSonnentempel Auto

Formlist Property NoTeleportCompanions Auto