enderalse/scripts/source/_00e_nq03_skullspheresc.psc

58 lines
1.6 KiB
Plaintext

Scriptname _00E_NQ03_SkullSphereSC extends ObjectReference
Event OnActivate(ObjectReference akActionRef)
If NQ03.GetStage() == 30 && !PlayerREF.IsInCombat() && !bInteracting
bInteracting = true
If (GameHour.GetValue() >= 20) || (GameHour.GetValue() < 5)
int iButton = _00E_NQ03_MasterSkullBox.Show()
if iButton == 0
_00E_MagicRandomM.Play(PlayerREF)
AlchArmorMagickaFXS.Play(PlayerREF)
FadeToBlackAndBackIMOD.Apply()
Lernpunkte.SetValueInt(Lernpunkte.GetValueInt() + 2)
Levelsystem.GiveEP(75)
PlayerREF.AddItem(_01E_CraftingPlan_01EUNI_SchattenfingerForged, 1)
PlayerREF.RemoveItem(_00E_MasterTeacher, 1)
_00E_MQP03_sLearningPointGained.Show(2)
Utility.Wait(2)
AlchArmorMagickaFXS.Stop(PlayerREF)
If _00E_AchievementsEnabled.GetValueInt() == 1
Game.UnlockAchievement("END_MASTER_SKULL_01")
EndIf
Self.Delete()
EndIf
Else
_00E_MQ07_sWaitUntilNightfall.Show()
EndIf
bInteracting = false
EndIf
EndEvent
bool bInteracting = false
_00E_QuestFunctions Property Levelsystem Auto
Actor Property PlayerREF Auto
_00E_NQ03_Functions Property NQ03 Auto
EffectShader Property AlchArmorMagickaFXS Auto
Sound Property _00E_MagicRandomM Auto
MiscObject Property _00E_MasterTeacher Auto
MiscObject Property _01E_CraftingPlan_01EUNI_SchattenfingerForged Auto
Message Property _00E_NQ03_MasterSkullBox Auto
Message Property _00E_MQP03_sLearningPointGained Auto
Message Property _00E_MQ07_sWaitUntilNightfall Auto
GlobalVariable Property GameHour Auto
GlobalVariable Property Lernpunkte Auto
GlobalVariable Property _00E_AchievementsEnabled Auto
ImageSpaceModifier Property FadeToBlackAndBackIMOD Auto