===========PI-Summary===========================

Nutzt die Macht der Gestirne. Setzt das beschdigte Planetarium wieder instand und enthllt die Geheimnisse dieses hchsten Heiligtums der Magiergilde.

===========Cellnames============================

Erzmagier-Eingangshalle
Kaiserliches Planetarium

==========Mapmarker=============================

Bodean-Lager  
Brotch-Lager  
Ales-Lager  
Dagnys Lager  
Varus-Lager  

=========Door===================================

ArchitectureOrreryDoor -> Dwemerische Metalltr

=========Activator==============================

Imperial Orrery Console -> Bedienfeld des Planetariums
Orrery Console Button -> Schalter am Bedienfeld
Orrery Console -> Bedienfeld des Planetariums

========NPC-Names===============================

Bandit Carrier(1-5) -> Banditenbote

=======Misc-Items===============================

Dwemer-Zahnrad
Dwemerischer Detektor
Dwemer-Zylinder
Dwemer-Rhre

========Spellnames==============================

Massers Macht
Massers Gunst
Secundas Wille
Secundas Chance
Massers Eifer
Secundas Anziehungskraft
Secundas Scharfsinn
Massers Tapferkeit

=========Books==================================

---------Nicht zugestellter Brief---------------

<font face=5><br><br>Die Sachen sollten versteckt bleiben bis ein Kufer gefunden ist.<br>
<br>
Verteilt sie, damit die Bastarde der Kaiserlichen Legion sie nicht so leicht aufspren knnen. Nutzt dazu unsere Verstecke in den folgenden Lagern:<br>
<br>
Dagnys Lager<br>
Brotch Lager<br>
Bodean Lager<br>
Varus Lager<br>
<br>
Ihr erhaltet nachricht, sobald es an der Zeit ist die Sachen loszuwerden.<br>



---------Notiz von Bothiel----------------------

<font face=5><br><br>An den, den es betrifft: <br><br>
Diese Notiz erreicht Euch, weil Ihr der Magiergilde hilfreich sein knntet. Der Gildenrat besitzt nicht die ntigen Mittel und die kaiserliche Legion ist entweder nicht willens, oder nicht imstande uns zu untersttzen.<br>
<br>
Eine Lieferung Dwemer-Artefakte aus Morrowind, die fr die Geheime Universitt bestimmt war, wurde krzlich von Banditen abgefangen. Mit der Absicht diese Artefakte zu veruern, gelangten dabei Gegenstnde in den Besitz der Baditen, welche fr die Instandsetzung des kaiserlichen Planetariums in der Hauptstadt unerlsslich sind.
<br>
Der einzig bekannte Unterschlupf der Banditen ist das Ales-Lager, nrdlich von Kvatch. Wenn Ihr diese Raufbolde ausfindig machen- und die gestohlenen Gegenstnde bergen knntet, stnde ich auf ewig in Eurer Schuld.<br>
Das Planetarium ist mein Lebenswerk und ich wrde es nicht ertragen es jetzt scheitern zu sehen.<br><br>
Vermisste Gegenstnde:<br><br>
2 Dwemer-Zahnrder<br>
1 Dwemerischer Detektor<br>
1 Dwemer-Zylinder<br>
1 Dwemer-Rhre<br>
<br>
-Bothiel<br>

====Quest: Instandsetzung des Planetariums=======

Quest Stages:

10:

Ich habe eine Notiz von Bothiel aus der Geheimen Universitt erhalten. Wenn ich die vermissten Dwemer-Artefakte wiederbeschaffen kann, knnte sich das fr mich lohnen. Ich sollte zum Ales-Lager reisen und versuchen diese Banditen aufzuspren.

20:

Ich habe eine Liste von Orten gefunden, an denen die Dwemer-Artefakte fr das Planetarium versteckt gehalten werden. Ich sollte Dagnys Lager, das Brotch-Lager, das Bodean-Lager und das Varus-Lager aufsuchen, um die brigen Banditen aufzuspren.

30:

Ich habe alle vermissten Dwemer-Artefakte zurckerlangt. Ich sollte sie zu Bothiel an der Geheimen Universitt bringen, damit sie das Planetarium reparieren kann.

40:

Bothiel wurden die zur Reparatur des Planetariums bentigten Dwemer-Artefakte bergeben. Ich sollte ihr einen Tag Zeit geben, die notwendigen Reparaturen durchzufhren und dann wieder das Planetarium an der Geheimen Universitt aufsuchen.

100:

Das Planetarium an der Geheimen Universitt sollte nun wieder einwandfrei funktionieren. Ich kann es so oft ich will aufsuchen, um, abhngig von den Phasen der Monde, neue magische Fertigkeiten zu empfangen.

110:

Ich habe das kaiserliche Planetarium in Betrieb gesetzt.


Topics:

GREETING:
Ihr habt sie? Die Gegenstnde, nach denen ich suche? Gebt sie mir, bitte! Ja... ja, scheint alles zu sein. Hier ist Eure Belohnung. Habt nochmals Dank!

Ich werde grozgig sein, wenn Ihr die Gegenstnde auf dieser Liste beschaffen knnt. Findet alles fr mich und Ihr werdet reich entlohnt. Guten Tag.

Es freut mich Euch zu sehen, aber Ihr kommt mit leeren Hnden, oder nicht? Erinnert Euch an die Gegenstnde, ber die wir sprachen! Bitte, ich warte!


==========Skripts===============================

ScriptName DLCOrreryConsoleScript

;This script handles the activation of the console for the Orrery, and determines which power the player gets
;It also controls animations for the various pieces of the Orrery

short dayspassed			;check against GameDaysPassed to monitor passage of time
short phasevar				;end result of calculation for moon phase -- values 0 to 7 correspond to moon phases
short initialize				;set when script is run for the first time
short phasecalc			;temp var used to calculate phasevar
short calcdone				;incremented as phase is calculated
short buttonvar				;set to determine results of messagebox
short powercheck			;set based on current power; checked against phasevar to determine which messagebox comes up when player activates console

short state					;variable for tracking animation states, updated initially by using console for the first time
short phaseanim 			;updates console animation for moon phases when set to something other than phasevar
short consoleinit			;initialize the console display when the Orrery is first activated; allows player to get power right away

short irisdisable			;flag set when DLCOrreryIrisRef is disabled

float statetimer				;variable for delaying animation changes
float iristimer				;variable for timer that determines when DLCOrreryIrisRef gets disabled


Begin Gamemode


;initialize the appropriate  variables

if ( initialize == 0 )

	set initialize to 1
	set buttonvar to -1
	set powercheck to -1
endif

;perform calculations to determine current phase of moons

if ( GetStage DLCOrrery > 30 )
	if ( dayspassed != GameDaysPassed )
		set dayspassed to GameDaysPassed
		set phasecalc to dayspassed
		set calcdone to 1
	endif
	if ( calcdone == 1 )
		if ( phasecalc == 0 )
			set phasevar to 0
			set calcdone to 2
			set buttonvar to -1
		elseif ( phasecalc < 24 )
			set phasevar to ( phasecalc / 3 )
			set calcdone to 2
			set buttonvar to -1
		elseif ( phasecalc == 24 )
			set phasevar to 0
			set calcdone to 2
			set buttonvar to -1
		else
			set phasecalc to ( phasecalc - 24 )
			return
		endif
	endif
endif

;Once the player has entered a choice in the messagebox generated in OnActivate block, apply the results.

if ( calcdone == 2 )

if ( DLCOrrery.Activated == 1 )
	DLCOrreryConsoleButtonRef.playgroup forward 1
	set buttonvar to GetButtonPressed
	if ( consoleinit == 3 )
		set buttonvar to 0
		set consoleinit to 4
	endif
	if ( buttonvar == 1 )

;If player selects "no", reset variables so he can activate it again

		set calcdone to 2
		set buttonvar to -1
		set DLCOrrery.activated to 0
		return
	elseif ( buttonvar == 0 )

;If player selects "yes":

;Start by wiping all powers the player might have gained so far
	
		Player.removespell DLCOrreryPower1
		Player.removespell DLCOrreryPower2
		Player.removespell DLCOrreryPower3
		Player.removespell DLCOrreryPower4
		Player.removespell DLCOrreryPower5
		Player.removespell DLCOrreryPower6
		Player.removespell DLCOrreryPower7
		Player.removespell DLCOrreryPower8
		
;add new power based on current phasevar

		if ( phasevar == 0 )
			Player.addspell DLCOrreryPower1
			set powercheck to 0
		elseif ( phasevar == 1 )
			Player.addspell DLCOrreryPower2
			set powercheck to 1
		elseif ( phasevar == 2 )
			Player.addspell DLCOrreryPower3
			set powercheck to 2
		elseif ( phasevar == 3 )
			Player.Addspell DLCOrreryPower4
			set powercheck to 3
		elseif ( phasevar == 4 )
			Player.addspell DLCOrreryPower5
			set powercheck to 4
		elseif ( phasevar == 5 )
			Player.addspell DLCOrreryPower6
			set powercheck to 5
		elseif ( phasevar == 6 )
			Player.addspell DLCOrreryPower7
			set powercheck to 6
		elseif (phasevar == 7 )
			Player.addspell DLCOrreryPower8
			set powercheck to 7
		endif

		MessageBox "Ihr erhaltet eine neue Fhigkeit vom Planetarium."
		set calcdone to 0
		set buttonvar to -1
		set DLCOrrery.activated to 0
	endif
endif

endif

;----------------ANIMATION CONTROLS------------------------

;after initial activation of Orrery, play startup animations


if ( state == 1 )
	DLCOrreryConsoleButtonRef.playgroup forward 1
	DLCOrreryRef.playgroup forward 1
	DLCOrreryDomeRef.playgroup forward 1
	DLCOrreryStarsRef.playgroup forward 1
	DLCOrreryIrisRef.playgroup forward 1
	DLCOrreryPanelRef.playgroup forward 1
	DLCOrreryPanelLightRef1.Enable
	DLCOrreryPanelLightRef2.Enable
	DLCOrreryDomeLightRef1.Enable
	DLCOrreryDomeLightRef2.Enable
	DLCOrreryDomeLightRef3.Enable
	DLCOrreryACTSoundGearsMedRef.Enable
	DLCOrreryACTSoundGearsSmallRef.Enable
	DLCOrreryACTSoundMainRef.Enable
	DLCOrreryACTSoundStartupRef.Enable
	DLCOrreryACTSoundGearLoopRef.Enable
	set state to 2
	set iristimer to 60
elseif ( state == 2 )

;Run a timer to wait until current animations are completed and begin playing the looping 'running' animations

	if ( statetimer > 0 )
		set statetimer to ( statetimer - GetSecondsPassed )
	else
		set state to 3
	endif
elseif ( state == 3 )
	DLCOrreryConsoleButtonRef.playgroup forward 1
	if ( DLCOrreryRef.IsAnimPlaying == 0 )
		DLCOrreryRef.playgroup fastforward 0
	endif
	if ( DLCOrreryDomeRef.IsAnimPlaying == 0 )
		DLCOrreryDomeRef.playgroup fastforward 0
	endif
	if ( DLCOrreryStarsRef.IsAnimPlaying == 0 )
		DLCOrreryStarsRef.playgroup fastforward 0
	endif
	if ( DLCOrreryPanelRef.IsAnimPlaying == 0 )
		DLCOrreryPanelRef.playgroup fastforward 1
	endif
endif

;handle animation updates for console (moon display) so they match current phase of the actual moons

if ( state >= 3 )

	if ( phaseanim != phasevar )
		if ( phasevar == 0 )
			DLCOrreryConsoleRef2.playgroup fastforward 1
		elseif ( phasevar == 1 )
			DLCOrreryConsoleRef2.playgroup backward 1
		elseif ( phasevar == 2 )
			DLCOrreryConsoleRef2.playgroup fastbackward 1
		elseif ( phasevar == 3 )
			DLCOrreryConsoleRef2.playgroup left 1
		elseif ( phasevar == 4 )
			DLCOrreryConsoleRef2.playgroup fastleft 1
		elseif ( phasevar == 5 )	
			DLCOrreryConsoleRef2.playgroup right 1
		elseif ( phasevar == 6 )
			DLCOrreryConsoleRef2.playgroup fastright 1
		elseif ( phasevar == 7 )
			DLCOrreryConsoleRef2.playgroup turnleft 1

		endif
		set phaseanim to phasevar
	endif
endif	

if ( consoleinit == 1 )
	if ( phasevar == 0 )
		DLCOrreryConsoleRef2.playgroup fastforward 1
	elseif ( phasevar == 1 )
		DLCOrreryConsoleRef2.playgroup backward 1
	elseif ( phasevar == 2 )
		DLCOrreryConsoleRef2.playgroup fastbackward 1
	elseif ( phasevar == 3 )
		DLCOrreryConsoleRef2.playgroup left 1
	elseif ( phasevar == 4 )
		DLCOrreryConsoleRef2.playgroup fastleft 1
	elseif ( phasevar == 5 )	
		DLCOrreryConsoleRef2.playgroup right 1
	elseif ( phasevar == 6 )
		DLCOrreryConsoleRef2.playgroup fastright 1
	elseif ( phasevar == 7 )
		DLCOrreryConsoleRef2.playgroup turnleft 1

	endif
	set consoleinit to 2
	set phaseanim to phasevar
endif

;Run a timer to count down and disable DLCOrreryIrisRef at the end

if ( irisdisable == 0 )
	if ( state > 2 )
		if ( iristimer > 0 )
			set iristimer to ( iristimer - GetSecondsPassed )
		else
			if ( DLCOrreryIrisRef.GetDisabled == 0 )
				DLCOrreryIrisRef.Disable
				DLCOrreryACTSoundStartupRef.Disable
				set irisdisable to 1
			endif
		endif
	endif
endif


End


Begin OnActivate Player


;Upon initial Activation, play the appropriate animation for the button and update state var so rest of animations begin playing
;Also update quest stage so quest completes

if ( state == 0 )

	set state to 1
	set statetimer to 5
	set consoleinit to 1
endif


if ( GetStage DLCOrrery == 100 )
	SetStage DLCOrrery 110
endif

;On second activation (first activation after completing quest), automatically give the player the Orrery's current power

if ( consoleinit == 2 )
	set consoleinit to 3
	set DLCOrrery.Activated to 1

endif


;On Activation, bring up message box allowing player to swap power 
;if player has current power, give him a messagebox telling him so

if ( consoleinit == 4 )

if ( state == 3 )
	if ( calcdone == 2 )
		if ( Powercheck != phasevar )
			MessageBox "Wollt Ihr Eure derzeitige Fhigkeit gegen eine neue- eintauschen?" "Ja" "Nein"
			set DLCOrrery.Activated to 1
		elseif ( powercheck == phasevar )
			MessageBox "Ihr besitzt diese Fhigkeit bereits."
		endif
	elseif ( calcdone == 0 )
		MessageBox "Ihr besitzt diese Fhigkeit bereits."
	endif
endif

endif

End

=======================================================

