Made _00E_AchievementsEnabled constant, removed all refs

source/scripts/_00E_AffinityControl.psc

@@ -292,14 +292,12 @@ Endfunction
 
 Function AddAchievementForAffinityUnlock(int nTotalUnlockedAffinityCount)
 
-    If  _00E_AchievementsEnabled.GetValueInt() == 1
+	If nTotalUnlockedAffinityCount >= 1
-        If nTotalUnlockedAffinityCount >= 1
+		Steam.UnlockAchievement("END_AFFINITY_01")
-            Steam.UnlockAchievement("END_AFFINITY_01")
+	EndIf
-        EndIf
+	If nTotalUnlockedAffinityCount >= 2
-        If nTotalUnlockedAffinityCount >= 2
+		Steam.UnlockAchievement("END_AFFINITY_02")
-            Steam.UnlockAchievement("END_AFFINITY_02")
+	EndIf
-        EndIf
-    EndIf
 
 EndFunction
 
@@ -327,7 +325,7 @@ Function GetPlayerClass()
 
     UpdateClassIndices(PerkDistribution)
     
-    If _00E_AchievementsEnabled.GetValueInt() == 1 && !bMemoryTreeAchievementUnlocked
+    If !bMemoryTreeAchievementUnlocked
         Int[] MaxPerkDistribution = GetMaxPerkDistribution()
         AddAchievementForFullMemoryTree(PerkDistribution, MaxPerkDistribution)
     EndIf
@@ -569,8 +567,6 @@ Spell Property _00E_FS_Affinity_AbRavager Auto
 Spell Property _00E_FS_Affinity_AbScourge Auto
 Spell Property _00E_FS_Affinity_AbSoulcaller Auto
 
-GlobalVariable Property _00E_AchievementsEnabled Auto
-
 Sound Property UIQuestCompleteM Auto
 
 Quest Property NQ31 Auto

source/scripts/_00E_SkillControl.psc

@@ -173,9 +173,7 @@ Function TeachTalent(int iLevel, Shout TaughtTalent, Perk Perk01, Perk Perk02, P
 	
 	TalentPoints.Mod(-1)
 	
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_TALENT_BOOK_01")
-		Steam.UnlockAchievement("END_TALENT_BOOK_01")
-	EndIf
 	
 EndFunction
 
@@ -198,7 +196,7 @@ Function ShowSynergyMessage()
 	_00E_Levelsystem_sSynergyDiscovered.Show()
 	_00E_EPHandler.GiveEP(150)
 
-	If _00E_AchievementsEnabled.GetValueInt() == 1 && !bUnlockedSynergyAchievement
+	If !bUnlockedSynergyAchievement
 		Steam.UnlockAchievement("END_SYNERGY_01")
 		bUnlockedSynergyAchievement = true
 	EndIf
@@ -243,7 +241,6 @@ FormList Property ManipulationPerks  Auto
 GlobalVariable Property Handwerkspunkte  Auto  
 GlobalVariable Property Lernpunkte  Auto  
 GlobalVariable Property TalentPoints  Auto  
-GlobalVariable Property _00E_AchievementsEnabled  Auto  
 
 Message Property _00E_Levelsystem_sNoMoreCraftingPoints  Auto  
 Message Property _00E_Levelsystem_sNoMoreLearningPoints  Auto  

source/scripts/_00e_a0_banksystemquest.psc

@@ -201,7 +201,7 @@ Event OnUpdateGameTime()
 	if REFdepositBox.GetItemCount(Gold) != 0
 		RegisterForSingleUpdateGameTime(24)
 		
-		If !bDoneAchievement && REFdepositBox.GetItemCount(Gold) >= 100000 && _00E_AchievementsEnabled.GetValueInt() == 1
+		If !bDoneAchievement && REFdepositBox.GetItemCount(Gold) >= 100000
 			Steam.UnlockAchievement("END_BANKACCOUNT_01")
 			bDoneAchievement = true
 		EndIf
@@ -235,7 +235,6 @@ Sound Property SFXgoldWithdraw Auto
 
 GlobalVariable Property GLBcurrent Auto 
 GlobalVariable Property _00E_BankSystem_Beteiligungen Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 MiscObject Property Gold Auto 
 
 ReferenceAlias Property Bankier Auto

source/scripts/_00e_altiniathachievementsc.psc

@@ -2,11 +2,7 @@ ScriptName _00E_AltIniathAchievementSC extends ObjectReference
 
 Event OnTriggerEnter(ObjectReference akActionRef)
 
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_PEAK_01")
-		Steam.UnlockAchievement("END_PEAK_01")
-	EndIf
 	self.Disable()
 
 EndEvent
-
-GlobalVariable Property _00E_AchievementsEnabled Auto

source/scripts/_00e_ark_specialbreadsc.psc

@@ -2,7 +2,7 @@ Scriptname _00E_Ark_SpecialBreadSC extends activemagiceffect
 
 Event OnEffectStart(Actor akTarget, Actor akCaster)
 
-	if akTarget == Game.GetPlayer() && _00E_Ark_SpecialBread_Achievement.GetValueInt() == 0 && _00E_AchievementsEnabled.GetValueInt() == 1
+	if akTarget == Game.GetPlayer() && _00E_Ark_SpecialBread_Achievement.GetValueInt() == 0
 		
 		Steam.UnlockAchievement("END_BREEEAD_01")
 		
@@ -11,4 +11,3 @@ Event OnEffectStart(Actor akTarget, Actor akCaster)
 EndEvent
 
 GlobalVariable Property _00E_Ark_SpecialBread_Achievement Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto

source/scripts/_00e_cqc05_functions.psc

@@ -258,9 +258,7 @@ Function CompleteAndGiveEP()
 	_00E_EPHandler.GiveEP(__Config_iRewardEXP)
     SetObjectiveCompleted(5)
 	
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_COMPLETE_CALIA_01")
-		Steam.UnlockAchievement("END_COMPLETE_CALIA_01")
-	EndIf
 	
 EndFunction
 
@@ -299,7 +297,6 @@ SoundCategory Property AudioCategorySFX Auto
 GlobalVariable Property CaliaRomance Auto
 GlobalVariable Property CaliaFlirtCounter Auto
 GlobalVariable Property RomanceLockedCalia Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 Weapon Property _01E_20Huetergrossschwert Auto
 

source/scripts/_00e_cqc06_functions.psc

@@ -128,9 +128,7 @@ Function CompleteAndGiveEP()
 
 	Utility.Wait(3)
 	_00E_EPHandler.GiveEP(__Config_iRewardEXP)
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_ROMANCE_CALIA_01")
-		Steam.UnlockAchievement("END_ROMANCE_CALIA_01")
-	EndIf
 	
 EndFunction
 
@@ -202,5 +200,3 @@ Outfit Property _00E_CQC06_CaliaDanceOutfit Auto
 ImageSpaceModifier Property FadeToBlackIMOD Auto
 ImageSpaceModifier Property FadeToBlackHoldIMOD Auto
 ImageSpaceModifier Property FadeToBlackBackIMOD Auto
-
-GlobalVariable Property _00E_AchievementsEnabled Auto

source/scripts/_00e_cqj05_functions.psc

@@ -156,9 +156,7 @@ Function CompleteAndGiveEP()
 
 	_00E_EPHandler.GiveEP(__Config_iRewardEXP)
 	
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_COMPLETE_JESPAR_01")
-		Steam.UnlockAchievement("END_COMPLETE_JESPAR_01")
-	EndIf
 
 EndFunction
 ;=====================================================================================
@@ -189,7 +187,6 @@ Idle Property pa_Idle_Kiss_MaleMale Auto
 Idle Property pa_Idle_Kiss_MaleFemale Auto
 
 GlobalVariable Property JesparRomance Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 SoundCategory Property AudioCategoryMAG Auto
 SoundCategory Property AudioCategorySFX Auto

source/scripts/_00e_cqj06_functions.psc

@@ -52,9 +52,7 @@ EndFunction
 Function GiveEPAndCleanUp()
 
 	_00E_EPHandler.GiveEP(__Config_iRewardEXP)
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_ROMANCE_JESPAR_01")
-		Steam.UnlockAchievement("END_ROMANCE_JESPAR_01")
-	EndIf
 
 EndFunction
 
@@ -102,5 +100,3 @@ Scene Property CQJ06_SC01_JesparTavernSC Auto
 ImageSpaceModifier Property FadeToBlackImod Auto
 ImageSpaceModifier Property FadeToBlackHoldImod Auto
 ImageSpaceModifier Property FadeToBlackBackImod Auto
-
-GlobalVariable Property _00E_AchievementsEnabled Auto

source/scripts/_00e_diggershollowskywalkeractivatorsc.psc

@@ -6,7 +6,7 @@ Event OnActivate(ObjectReference akActionRef)
 		
 		_00E_DiggersHollowSkywalkerMessage.Show()
 		
-		If !bUnlockedAchievement && _00E_AchievementsEnabled.GetValueInt() == 1
+		If !bUnlockedAchievement
 			Steam.UnlockAchievement("END_LUKE_SKYWALKER_01")
 			bUnlockedAchievement = true
 		EndIf
@@ -17,5 +17,4 @@ EndEvent
 bool bUnlockedAchievement
 
 Actor Property PlayerREF Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 Message Property _00E_DiggersHollowSkywalkerMessage Auto

source/scripts/_00e_dragonachievementsc.psc

@@ -2,10 +2,6 @@ Scriptname _00E_DragonAchievementSC extends Actor
 
 Event OnDeath(Actor akKiller)
 	
-	If _00E_AchievementsEnabled.getValueInt() == 1
+	Steam.UnlockAchievement("END_DRAGON_01")
-		Steam.UnlockAchievement("END_DRAGON_01")
-	EndIf
 	
 EndEvent
-
-GlobalVariable Property _00E_AchievementsEnabled Auto

source/scripts/_00e_eponmagicalsymboldis.psc

@@ -25,7 +25,7 @@ Event OnActivate(ObjectReference akActionRef)
 		int EXPBonus = (_00E_MagicalSymbolsGlobalCollected.GetValueInt() * 2)
 		_00E_EPHandler.GiveEp(RewardExp+EXPBonus)
 		
-		If _00E_MagicalSymbolsGlobalCollected.GetValueInt() == 100 && _00E_AchievementsEnabled.GetValueInt() == 1
+		If _00E_MagicalSymbolsGlobalCollected.GetValueInt() == 100
 			Steam.UnlockAchievement("END_FETCHQUEST_01")
 		EndIf
 		
@@ -53,7 +53,6 @@ Int Property RewardExp auto
 Bool DoOnce = false
 
 GlobalVariable Property _00E_MagicalSymbolsGlobalCollected Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 Sound Property _00E_MagicalSymbolSound Auto
 

source/scripts/_00e_epupdatefunctions.psc

@@ -48,7 +48,7 @@ State RealPlayer
 			_00E_Player_sEPGained_Discovery.Show()
 			receiveEP(40 * delta)
 
-			If MapMarkersDiscoveredCounter >= 50 && !bMapMarkersAchievementUnlocked && _00E_AchievementsEnabled.GetValueInt() == 1
+			If MapMarkersDiscoveredCounter >= 50 && !bMapMarkersAchievementUnlocked
 				bMapMarkersAchievementUnlocked = True
 				Steam.UnlockAchievement("END_LOCATIONS_01")
 			EndIf
@@ -116,7 +116,7 @@ State RealPlayer
 			_00E_Tutorial_EPSystem.ShowAsHelpMessage("Empty", 4.0, 3.0, 1)
 		EndIf
 		
-		If _00E_OreVeinsMined.GetValueInt() >= 50 && !bOreAchievementUnlocked && _00E_AchievementsEnabled.GetValueInt() == 1
+		If _00E_OreVeinsMined.GetValueInt() >= 50 && !bOreAchievementUnlocked
 			bOreAchievementUnlocked = true
 			Steam.UnlockAchievement("END_ORE_01")
 		EndIf
@@ -124,13 +124,13 @@ State RealPlayer
 		delta = Game.QueryStat("Quests Completed") - QuestsCompletedCounter
 		if delta > 0
 			QuestsCompletedCounter += delta
-			If QuestsCompletedCounter >= 50 && !bDoneQuestCompleted && _00E_AchievementsEnabled.GetValueInt() == 1
+			If QuestsCompletedCounter >= 50 && !bDoneQuestCompleted
 				bDoneQuestCompleted = true
 				Steam.UnlockAchievement("END_QUESTS_01")
 			EndIf
 		EndIf
 		
-		If _00E_RhetorikCounter.GetValueInt() >= 15 && !bRhetoricAchievementUnlocked && _00E_AchievementsEnabled.GetValueInt() == 1
+		If _00E_RhetorikCounter.GetValueInt() >= 15 && !bRhetoricAchievementUnlocked
 			bRhetoricAchievementUnlocked = true
 			Steam.UnlockAchievement("END_RHETORIC_01")
 		EndIf
@@ -142,7 +142,7 @@ State RealPlayer
 			isdead = True
 			Player.Kill()
 			_00E_Player_sArcaneFever_Death.Show()
-			If _00E_AchievementsEnabled.GetValueInt() == 1 && !bDoneArcanistsFever
+			If !bDoneArcanistsFever
 				bDoneArcanistsFever = true
 				Steam.UnlockAchievement("END_ARCANISTS_FEVER_01")
 			EndIf
@@ -352,7 +352,6 @@ GlobalVariable Property EXPMultSlope auto
 GlobalVariable Property SoulsCaught Auto
 GlobalVariable Property _00E_DisableMenuTutorials Auto
 GlobalVariable Property _00E_DisableQuestTutorials Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 GlobalVariable Property _00E_OreVeinsMined Auto
 GlobalVariable Property _00E_RhetorikCounter Auto
 GlobalVariable Property TalentPoints Auto

source/scripts/_00e_frozenmescript.psc

@@ -152,7 +152,7 @@ Function ShatterEnemy()
 	Utility.Wait(0.5)
 	FrozenActor.SetCriticalStage(FrozenActor.CritStage_DisintegrateEnd)
 	
-	If _00E_AchievementsEnabled.GetValueInt() == 1 && _00E_FrozenAchievementUnlocked.GetValueInt() == 0
+	If _00E_FrozenAchievementUnlocked.GetValueInt() == 0
 		Steam.UnlockAchievement("END_FROZEN_01")
 		_00E_FrozenAchievementUnlocked.SetValueInt(1)
 	EndIf
@@ -198,7 +198,6 @@ Float Property __Config_ShatterChanceOnslaughtSpellBonus  = 0.04 AutoReadOnly
 
 GlobalVariable Property _00E_Synergy_ArcticWindOnslaught Auto
 GlobalVariable Property _00E_FrozenAchievementUnlocked Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 Spell Property _00E_A1_OnslaughtCloakDMG Auto
 

source/scripts/_00e_fs_mq18c_dreamflowersc.psc

@@ -24,9 +24,7 @@ Function AddDreamflowerEffect()
 	MAGPowerRacialHitskinM.Play(PlayerREF)
 	_00E_FS_NQ01_EventualityShiftIMOD.Apply()
 	
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_DREAMFLOWER_01")
-		Steam.UnlockAchievement("END_DREAMFLOWER_01")
-	EndIf
 	
 EndFunction
 
@@ -39,7 +37,6 @@ bool Property bCleaned Auto
 Actor Property PlayerREF Auto
 
 GlobalVariable Property _00E_FS_DreamflowerConsumed Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 ImageSpaceModifier Property _00E_FS_NQ01_EventualityShiftIMOD Auto
 

source/scripts/_00e_fs_mq18c_functions.psc

@@ -184,9 +184,7 @@ EndFunction
 Function ShowCredits()
 
 	Debug.ToggleMenus()
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_COMPLETE_MQ18C_01")
-		Steam.UnlockAchievement("END_COMPLETE_MQ18C_01")
-	EndIf
 	FadeToBlackHoldIMOD.Apply()
 	Utility.Wait(8)
 	Game.PlayBink("Enderal_Credits.bik")
@@ -265,7 +263,6 @@ EffectShader Property FireFXShader Auto
 
 GlobalVariable Property Timescale Auto
 GlobalVariable Property MQ17_JesparFinalCompanion Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 Scene Property FS_MQ18c_SC01_QyraSC Auto
 Scene Property FS_MQ18c_SC00_CorpseSC Auto

source/scripts/_00e_fs_mysticalspellbooksc.psc

@@ -27,7 +27,7 @@ Event OnRead()
 			PlayerREF.AddSpell(spellToTeach, true)
 			UISpellLearnedM.Play(PlayerREF)
 			
-			If _00E_AchievementsEnabled.GetValueInt() == 1 && _00E_MysticalSpellAchievementUnlocked.GetValueInt() == 0
+			If _00E_MysticalSpellAchievementUnlocked.GetValueInt() == 0
 				Steam.UnlockAchievement("END_MYTHICAL_SPELL_01")
 				_00E_MysticalSpellAchievementUnlocked.SetValueInt(1)
 			EndIf
@@ -51,5 +51,4 @@ Message Property _00E_FS_AlreadyKnowMysticalSpellMSG Auto
 Sound Property UISpellLearnedM Auto
 Book Property selfRef Auto ;needs property because the objectreference can't be obtained and removed in the inventory
 Spell Property spellToTeach Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 GlobalVariable Property _00E_MysticalSpellAchievementUnlocked Auto

source/scripts/_00e_fs_mysticalsymbolsc.psc

@@ -24,7 +24,7 @@ Event OnActivate(ObjectReference akActionRef)
 		int EXPBonus = (_00E_FS_MysticalSymbolsGlobalCollected.GetValueInt() * 2)
 		_00E_EPHandler.GiveEp(RewardExp+EXPBonus)
 		
-		If _00E_FS_MysticalSymbolsGlobalCollected.GetValueInt() == 15 && _00E_AchievementsEnabled.GetValueInt() == 1
+		If _00E_FS_MysticalSymbolsGlobalCollected.GetValueInt() == 15
 			Steam.UnlockAchievement("END_FETCHQUEST_02")
 		EndIf
 		
@@ -55,7 +55,6 @@ Bool DoOnce = false
 
 GlobalVariable Property _00E_FS_MysticalSymbolsGlobalCollected Auto
 GlobalVariable Property _00E_FS_MysticalSymbolsGlobalTotal Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 Light Property _00E_FS_MysticalSymbolLight Auto
 

source/scripts/_00e_fs_nq01_functions.psc

@@ -590,9 +590,7 @@ Function StartSC09()
 
 	FS_NQ01_SC09_Qyra_02.ForceStart()
 	
-	If _00E_AchievementsEnabled.GetValueInt() == 1
+	Steam.UnlockAchievement("END_NAEA_01")
-		Steam.UnlockAchievement("END_NAEA_01")
-	EndIf
 
 EndFunction
 
@@ -963,7 +961,6 @@ GlobalVariable Property _00E_TeleportGlobal Auto
 GlobalVariable Property Timescale Auto
 GlobalVariable Property _00E_FS_NQ01_RespectedYuslansWish Auto
 GlobalVariable Property _00E_FS_NQ01_YuslanSecretEnding Auto
-GlobalVariable Property _00E_AchievementsEnabled Auto
 
 ImageSpaceModifier Property FadeToBlackHoldIMOD Auto
 ImageSpaceModifier Property FadeToBlackIMOD Auto