Scriptname SuH_MCM extends SKI_ConfigBase

;ent/ Quests
Quest Property SuH_Main_ auto
Quest Property SuH_MCM_ auto
;end/
;ent/ Actors
Actor Property PlayerAlias auto
Actor Property PlayerRef Auto
;end/
;ent/ Spells
Spell property SuH_ss_focusshot auto
Spell property SuH_ss_darkpierce auto
Spell property SuH_sp_healthydelights auto
Spell property SuH_sp_shiningdelights auto
Spell property SuH_sp_sugarydelights auto
Spell property SuH_sp_perfectorgasm auto
Spell property SuH_sp_speciallover auto
Spell property SuH_sp_caringlover auto
Spell property SuH_sp_magicallover auto
Spell property SuH_sp_lastinglover auto
Spell property SuH_sp_trainingstate auto
Spell property SuH_sp_hungerstate auto
Spell property SuH_sp_focusedstate auto
Spell property SuH_sp_bracingstate auto
Spell property SuH_spt_trainingstate auto
Spell property SuH_spt_hungerstate auto
Spell property SuH_spt_focusedstate auto
Spell property SuH_spt_bracingstate auto
Spell property SuH_sp_seductivedelights auto
Spell property SuH_sp_succubusprowl auto
Spell property SuH_ss_silentkiss auto
Spell property SuH_ss_sexualenrage auto
Spell property SuH_ss_creatureclaim auto
Spell property SuH_sp_humandesires auto
Spell property SuH_sp_animaldesires auto
Spell property SuH_sst_manashroud auto
Spell property SuH_ss_consumehealth auto
Spell property SuH_ss_consumemagicka auto
Spell property SuH_sp_healthydelights2 auto
Spell property SuH_sp_shiningdelights2 auto
Spell property SuH_sp_sugarydelights2 auto
Spell property SuH_ss_manabreak auto
Spell property SuH_sp_healthymilk auto
Spell property SuH_sp_shiningmilk auto
Spell property SuH_sp_sugarymilk auto
Spell property SuH_sp_healthymilk2 auto
Spell property SuH_sp_shiningmilk2 auto
Spell property SuH_sp_sugarymilk2 auto
Spell property SuH_sp_seductivemilk auto
Spell property SuH_ss_blooddrop auto
Spell property SuH_ss_manadrop auto
Spell property SuH_ss_powerdrop auto
;end/
;ent/ Magic Effects
MagicEffect property SuH_sp_healthydelightseffect auto
MagicEffect property SuH_sp_shiningdelightseffect auto
MagicEffect property SuH_sp_sugarydelightseffect auto
MagicEffect property SuH_sp_perfectorgasmeffect auto
MagicEffect property SuH_sp_speciallovereffect auto
MagicEffect property SuH_sp_caringlovereffect auto
MagicEffect property SuH_sp_magicallovereffect auto
MagicEffect property SuH_sp_lastinglovereffect auto
MagicEffect property SuH_sp_seductivedelightseffect auto
MagicEffect property SuH_sp_succubusprowleffect auto
MagicEffect property SuH_sp_humandesireseffect auto
MagicEffect property SuH_sp_animaldesireseffect auto
MagicEffect property SuH_sp_healthydelights2effect auto
MagicEffect property SuH_sp_shiningdelights2effect auto
MagicEffect property SuH_sp_sugarydelights2effect auto
MagicEffect property SuH_sp_healthymilkeffect auto
MagicEffect property SuH_sp_shiningmilkeffect auto
MagicEffect property SuH_sp_sugarymilkeffect auto
MagicEffect property SuH_sp_healthymilk2effect auto
MagicEffect property SuH_sp_shiningmilk2effect auto
MagicEffect property SuH_sp_sugarymilk2effect auto
MagicEffect property SuH_sp_seductivemilkeffect auto
;end/
;ent/ Global Var
GlobalVariable Property SuH_MODversion auto
GlobalVariable Property SuH_PCSheartXP auto
GlobalVariable Property SuH_PCSheartXPgain auto
GlobalVariable Property SuH_PCShpabsorb auto
GlobalVariable Property SuH_PCSmpabsorb auto
GlobalVariable Property SuH_PCSspabsorb auto
GlobalVariable Property SuH_PCSspermhvalue auto
GlobalVariable Property SuH_PCSspermmvalue auto
GlobalVariable Property SuH_PCSspermsvalue auto
GlobalVariable Property SuH_PCSseductionpoints auto
GlobalVariable Property SuH_PCShearttier auto
GlobalVariable Property SuH_PCSmilkhvalue auto
GlobalVariable Property SuH_PCSmilkmvalue auto
GlobalVariable Property SuH_PCSmilksvalue auto
GlobalVariable Property SuH_PCSgenders auto
;end/
;ent/ Pages
; Status
; Skill Levels
; Heart Levels
; Spells and Passives
; Help
;end/
;ent/ Menu ID
	;ent/ Status
		int playerHealthID
		int playerMagickaID
		int playerStaminaID
		int playerHeartXPID
		int playerHeartXPgainID
		int absorbheffectID
		int absorbmeffectID
		int absorbseffectID
		int spermheffectID
		int spermmeffectID
		int spermseffectID
		int spermfeffectID
		int seductivepointsID
		int milkheffectID
		int milkmeffectID
		int milkseffectID
		int charactergenderID
	;end/
	;ent/ Skill Levels
		int soulHealthID
		int soulMagickaID
		int soulStaminaID
		int soulHeartID
		int alchemyHID
		int alchemyMID
		int alchemySID
		int alchemyXID
		int alterationHID
		int alterationMID
		int alterationSID
		int alterationXID
		int blockHID
		int blockMID
		int blockSID
		int blockXID
		int conjurationHID
		int conjurationMID
		int conjurationSID
		int conjurationXID
		int destructionHID
		int destructionMID
		int destructionSID
		int destructionXID
		int enchantingHID
		int enchantingMID
		int enchantingSID
		int enchantingXID
		int heavyarmorHID
		int heavyarmorMID
		int heavyarmorSID
		int heavyarmorXID
		int illusionHID
		int illusionMID
		int illusionSID
		int illusionXID
		int lightarmorHID
		int lightarmorMID
		int lightarmorSID
		int lightarmorXID
		int lockpickingHID
		int lockpickingMID
		int lockpickingSID
		int lockpickingXID
		int marksmanHID
		int marksmanMID
		int marksmanSID
		int marksmanXID
		int onehandedHID
		int onehandedMID
		int onehandedSID
		int onehandedXID
		int pickpocketHID
		int pickpocketMID
		int pickpocketSID
		int pickpocketXID
		int restorationHID
		int restorationMID
		int restorationSID
		int restorationXID
		int smithingHID
		int smithingMID
		int smithingSID
		int smithingXID
		int sneakHID
		int sneakMID
		int sneakSID
		int sneakXID
		int speechcraftHID
		int speechcraftMID
		int speechcraftSID
		int speechcraftXID
		int twohandedHID
		int twohandedMID
		int twohandedSID
		int twohandedXID
	;end/
	;ent/ Heart Levels
		int heartHeartXPID
		int incabsorbHID
		int incabsorbMID
		int incabsorbSID
		int incXPgainID
		int spermehID
		int spermemID
		int spermesID
		int hlsHXPgain
		int hlsHabsorb
		int hlsMabsorb
		int hlsSabsorb
		int hlsHsperm
		int hlsMsperm
		int hlsSsperm
		int hlsHmilk
		int hlsMmilk
		int hlsSmilk
		int milkehID
		int milkemID
		int milkesID
	;end/
	;ent/ Spells and Passives
		int ssFocusShotID
		int ssDarkPierceID
		int spHealthyDelightID
		int spShiningDelightID
		int spSugaryDelightID
		int spPerfectOrgasmID
		int spSpecialLoverID
		int spCaringLoverID
		int spMagicalLoverID
		int spLastingLoverID
		int spTrainingStateId
		int spHungerStateID
		int spFocusedStateID
		int spBracingStateID
		int sapsHeartXP
		int stHeartTier2ID
		int spSeductiveDelightsID
		int spSuccubusProwlID
		int ssSilentKissID
		int ssSexualEnrageID
		int ssCreatureClaimID
		int spHumanDesiresID
		int spAnimalDesiresID
		int sstManaShroudID
		int ssConsumeHealthID
		int ssConsumeMagickaID
		int spHealthyDelight2ID
		int spShiningDelight2ID
		int spSugaryDelight2ID
		int ssManaBreakID
		int spHealthyMilkID
		int spShiningMilkID
		int spSugaryMilkID
		int spSeductiveMilkID
		int spHealthyMilk2ID
		int spShiningMilk2ID
		int spSugaryMilk2ID
		int ssBloodDropID
		int ssManaDropID
		int ssPowerDropID
	;end/
	;ent/ Help
		int creditsID
		int credits2ID
		int hb1
		int hb2
		int hb3
		int hb4
		int he1
		int he2
		int he3
		int he4
		int he5
		int he6
		int he7
		int he8
		int he9
		int he10
		int he11
		int he12
		int he13
		int he14
		int he15
	;end/
;end/

;ent/ OnInit
event OnConfigInit()
	Pages = new string[5]
    Pages[0] = "Status"
    Pages[1] = "Skill Levels"
	Pages[2] = "Heart Levels"
	Pages[3] = "Spells and Passives"
	Pages[4] = "Help"
endEvent
;end/
;ent/ Version Update
	;OnVersionUpdate doesn't fucking work, thanks for wasting my time SDK!
;end/

;ent/ OnPageReset
Event OnPageReset(string page)

	;ent/ Initial Page ("")
	if (page == "")
        ;LoadCustomContent("skyui/skyui_splash.swf")
        return
    else
		UnloadCustomContent()
	endIf
	;end/
	;ent/ Status Page
	If (page == "Status")
		SetCursorFillMode(TOP_TO_Bottom)
		;ent/ Left Side
			SetCursorPosition(0)
			;ent/ Status
			AddHeaderOption("Status")
				int playerHealth = Math.Floor(playerRef.GetBaseActorValue("Health"))
				int playerMagicka = Math.Floor(playerRef.GetBaseActorValue("Magicka"))
				int playerStamina = Math.Floor(playerRef.GetBaseActorValue("Stamina"))
				int HeartXP = Math.Floor(SuH_PCSheartXP.GetValue())
				int HeartXPgain = Math.Floor(SuH_PCSheartXPgain.GetValue())
				int pSeductivePoints = Math.Floor(SuH_PCSseductionpoints.GetValue())
			playerHealthID = AddTextOption("Health ", playerHealth)
			playerMagickaID = AddTextOption("Magicka ", playerMagicka)
			playerStaminaID = AddTextOption("Stamina ", playerStamina)
			playerHeartXPID = AddTextOption("HeartXP ", HeartXP)
			playerHeartXPgainID = AddTextOption("HeartXP Gain", HeartXPgain+"%")
			seductivepointsID = AddTextOption("Seduction Points",pSeductivePoints)
			AddEmptyOption()
			;end/
			;ent/ Character Options
			AddHeaderOption("Character Options")
				int cgender = Math.Floor(SuH_PCSgenders.GetValue())
				string chargender = "Undefined"
				if cgender == 1
					chargender = "Female"
				elseIf cgender == 2
					chargender = "Male"
				elseIf cgender == 12
					chargender = "Trans-Gender"
				endIf
			charactergenderID = AddTextOption("Character Gender", chargender)
			;end/
		;end/
		;ent/ Right Side
			SetCursorPosition(1)
			;ent/ Absorb Effects
			AddHeaderOption("Absorb Effects")
				int HealthAbsorb = Math.Floor(SuH_PCShpabsorb.GetValue())
				int MagickaAbsorb = Math.Floor(SuH_PCSmpabsorb.GetValue())
				int StaminaAbsorb = Math.Floor(SuH_PCSspabsorb.GetValue())
			absorbheffectID = AddTextOption("Health Absorb",HealthAbsorb)
			absorbmeffectID = AddTextOption("Magicka Absorb",MagickaAbsorb)
			absorbseffectID = AddTextOption("Stamina Absorb",StaminaAbsorb)
			AddEmptyOption()
			;end/
			;ent/ Sperm Effects
			AddHeaderOption("Sperm Effects")
				int SpermHealth = Math.Floor(SuH_PCSspermhvalue.GetValue())
				int SpermMagicka = Math.Floor(SuH_PCSspermmvalue.GetValue())
				int SpermStamina = Math.Floor(SuH_PCSspermsvalue.GetValue())
			spermheffectID = AddTextOption("Health Bonus",SpermHealth)
			spermmeffectID = AddTextOption("Magicka Bonus",SpermMagicka)
			spermseffectID = AddTextOption("Stamina Bonus",SpermStamina)
			AddEmptyOption()
			;end/
			;ent/ Milk Effects
			AddHeaderOption("Milk Effects")
				int MilkHealth = Math.Floor(SuH_PCSmilkhvalue.GetValue())
				int MilkMagicka = Math.Floor(SuH_PCSmilkmvalue.GetValue())
				int MilkStamina = Math.Floor(SuH_PCSmilksvalue.GetValue())
			milkheffectID = AddTextOption("Health Bonus",MilkHealth)
			milkmeffectID = AddTextOption("Magicka Bonus",MilkMagicka)
			milkseffectID = AddTextOption("Stamina Bonus",MilkStamina)
			AddEmptyOption()
			;end/
		;end/
	;end/
	;ent/ Skill Levels
	elseIf (page == "Skill Levels")
	
		;ent/ public var
		int lvlupMatch = 5
		float lvlAdjust = 1.8
		float lvlM = 0.5
		float lvlN = 1
		int lvlX = 25
		
		int alchemylvl = Math.Floor(playerRef.GetActorValue("alchemy"))
		int alchemyMcost = Math.Floor(lvlupMatch*lvlM*(alchemylvl*lvlAdjust))
		int alchemyXcost = Math.Floor(lvlupMatch*lvlX*(alchemylvl*lvlAdjust))
		int alterationlvl = Math.Floor(playerRef.GetActorValue("alteration"))
		int alterationMcost = Math.Floor(lvlupMatch*lvlM*(alterationlvl*lvlAdjust))
		int alterationNcost = Math.Floor(lvlupMatch*lvlN*(alterationlvl*lvlAdjust))
		int alterationXcost = Math.Floor(lvlupMatch*lvlX*(alterationlvl*lvlAdjust))
		int blocklvl = Math.Floor(playerRef.GetActorValue("block"))
		int blockMcost = Math.Floor(lvlupMatch*lvlM*(blocklvl*lvlAdjust))
		int blockNcost = Math.Floor(lvlupMatch*lvlN*(blocklvl*lvlAdjust))
		int blockXcost = Math.Floor(lvlupMatch*lvlX*(blocklvl*lvlAdjust))
		int conjurationlvl = Math.Floor(playerRef.GetActorValue("conjuration"))
		int conjurationMcost = Math.Floor(lvlupMatch*lvlM*(conjurationlvl*lvlAdjust))
		int conjurationNcost = Math.Floor(lvlupMatch*lvlN*(conjurationlvl*lvlAdjust))
		int conjurationXcost = Math.Floor(lvlupMatch*lvlX*(conjurationlvl*lvlAdjust))
		int destructionlvl = Math.Floor(playerRef.GetActorValue("destruction"))
		int destructionMcost = Math.Floor(lvlupMatch*lvlM*(destructionlvl*lvlAdjust))
		int destructionNcost = Math.Floor(lvlupMatch*lvlN*(destructionlvl*lvlAdjust))
		int destructionXcost = Math.Floor(lvlupMatch*lvlX*(destructionlvl*lvlAdjust))
		int enchantinglvl = Math.Floor(playerRef.GetActorValue("enchanting"))
		int enchantingMcost = Math.Floor(lvlupMatch*lvlM*(enchantinglvl*lvlAdjust))
		int enchantingXcost = Math.Floor(lvlupMatch*lvlX*(enchantinglvl*lvlAdjust))
		int heavyarmorlvl = Math.Floor(playerRef.GetActorValue("heavyarmor"))
		int heavyarmorMcost = Math.Floor(lvlupMatch*lvlM*(heavyarmorlvl*lvlAdjust))
		int heavyarmorNcost = Math.Floor(lvlupMatch*lvlN*(heavyarmorlvl*lvlAdjust))
		int heavyarmorXcost = Math.Floor(lvlupMatch*lvlX*(heavyarmorlvl*lvlAdjust))
		int illusionlvl = Math.Floor(playerRef.GetActorValue("illusion"))
		int illusionMcost = Math.Floor(lvlupMatch*lvlM*(illusionlvl*lvlAdjust))
		int illusionNcost = Math.Floor(lvlupMatch*lvlN*(illusionlvl*lvlAdjust))
		int illusionXcost = Math.Floor(lvlupMatch*lvlX*(illusionlvl*lvlAdjust))
		int lightarmorlvl = Math.Floor(playerRef.GetActorValue("lightarmor"))
		int lightarmorMcost = Math.Floor(lvlupMatch*lvlM*(lightarmorlvl*lvlAdjust))
		int lightarmorNcost = Math.Floor(lvlupMatch*lvlN*(lightarmorlvl*lvlAdjust))
		int lightarmorXcost = Math.Floor(lvlupMatch*lvlX*(lightarmorlvl*lvlAdjust))
		int lockpickinglvl = Math.Floor(playerRef.GetActorValue("lockpicking"))
		int lockpickingMcost = Math.Floor(lvlupMatch*lvlM*(lockpickinglvl*lvlAdjust))
		int lockpickingNcost = Math.Floor(lvlupMatch*lvlN*(lockpickinglvl*lvlAdjust))
		int lockpickingXcost = Math.Floor(lvlupMatch*lvlX*(lockpickinglvl*lvlAdjust))
		int marksmanlvl = Math.Floor(playerRef.GetActorValue("marksman"))
		int marksmanMcost = Math.Floor(lvlupMatch*lvlM*(marksmanlvl*lvlAdjust))
		int marksmanNcost = Math.Floor(lvlupMatch*lvlN*(marksmanlvl*lvlAdjust))
		int marksmanXcost = Math.Floor(lvlupMatch*lvlX*(marksmanlvl*lvlAdjust))
		int onehandedlvl = Math.Floor(playerRef.GetActorValue("onehanded"))
		int onehandedMcost = Math.Floor(lvlupMatch*lvlM*(onehandedlvl*lvlAdjust))
		int onehandedNcost = Math.Floor(lvlupMatch*lvlN*(onehandedlvl*lvlAdjust))
		int onehandedXcost = Math.Floor(lvlupMatch*lvlX*(onehandedlvl*lvlAdjust))
		int pickpocketlvl = Math.Floor(playerRef.GetActorValue("pickpocket"))
		int pickpocketMcost = Math.Floor(lvlupMatch*lvlM*(pickpocketlvl*lvlAdjust))
		int pickpocketXcost = Math.Floor(lvlupMatch*lvlX*(pickpocketlvl*lvlAdjust))
		int restorationlvl = Math.Floor(playerRef.GetActorValue("restoration"))
		int restorationMcost = Math.Floor(lvlupMatch*lvlM*(restorationlvl*lvlAdjust))
		int restorationNcost = Math.Floor(lvlupMatch*lvlN*(restorationlvl*lvlAdjust))
		int restorationXcost = Math.Floor(lvlupMatch*lvlX*(restorationlvl*lvlAdjust))	
		int smithinglvl = Math.Floor(playerRef.GetActorValue("smithing"))
		int smithingMcost = Math.Floor(lvlupMatch*lvlM*(smithinglvl*lvlAdjust))
		int smithingXcost = Math.Floor(lvlupMatch*lvlX*(smithinglvl*lvlAdjust))
		int sneaklvl = Math.Floor(playerRef.GetActorValue("sneak"))
		int sneakMcost = Math.Floor(lvlupMatch*lvlM*(sneaklvl*lvlAdjust))
		int sneakNcost = Math.Floor(lvlupMatch*lvlN*(sneaklvl*lvlAdjust))
		int sneakXcost = Math.Floor(lvlupMatch*lvlX*(sneaklvl*lvlAdjust))
		int speechcraftlvl = Math.Floor(playerRef.GetActorValue("speechcraft"))
		int speechcraftMcost = Math.Floor(lvlupMatch*lvlM*(speechcraftlvl*lvlAdjust))
		int speechcraftXcost = Math.Floor(lvlupMatch*lvlX*(speechcraftlvl*lvlAdjust))
		int twohandedlvl = Math.Floor(playerRef.GetActorValue("twohanded"))
		int twohandedMcost = Math.Floor(lvlupMatch*lvlM*(twohandedlvl*lvlAdjust))
		int twohandedNcost = Math.Floor(lvlupMatch*lvlN*(twohandedlvl*lvlAdjust))
		int twohandedXcost = Math.Floor(lvlupMatch*lvlX*(twohandedlvl*lvlAdjust))
		int playerHealth = Math.Floor(playerRef.GetBaseActorValue("Health"))
		int playerMagicka = Math.Floor(playerRef.GetBaseActorValue("Magicka"))
		int playerStamina = Math.Floor(playerRef.GetBaseActorValue("Stamina"))
		int HeartXP = Math.Floor(SuH_PCSheartXP.GetValue())
		;end/
		
		SetCursorFillMode(TOP_TO_BOTTOM)
		
		;ent/ Left Side
		
			SetCursorPosition(0)
			
			;ent/ Status
			AddHeaderOption("Status")
				
			soulHealthID = AddTextOption("Health ", playerHealth)
			soulMagickaID = AddTextOption("Magicka ", playerMagicka)
			soulStaminaID = AddTextOption("Stamina ", playerStamina)
			soulHeartID = AddTextOption("HeartXP ", HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Alchemy
				
			AddHeaderOption("Alchemy Knowledge "+alchemylvl)
			alchemyHID = AddTextOption("Spend Health", alchemyMcost+" / "+playerHealth)
			alchemyMID = AddTextOption("Spend Magicka", alchemyMCost+" / "+playerMagicka)
			alchemySID = AddTextOption("Spend Stamina", alchemyMCost+" / "+playerStamina)
			alchemyXID = AddTextOption("Spend HeartXP", alchemyXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Block
				
			AddHeaderOption("Block Knowledge "+blocklvl)
			blockHID = AddTextOption("Spend Health", blockMcost+" / "+playerHealth)
			blockMID = AddTextOption("Spend Magicka", blockNcost+" / "+playerMagicka)
			blockSID = AddTextOption("Spend Stamina", blockNcost+" / "+playerStamina)
			blockXID = AddTextOption("Spend HeartXP", blockXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Destruction
				
			AddHeaderOption("Destruction Knowledge "+destructionlvl)
			destructionHID = AddTextOption("Spend Health", destructionNcost+" / "+playerHealth)
			destructionMID = AddTextOption("Spend Magicka", destructionMcost+" / "+playerMagicka)
			destructionSID = AddTextOption("Spend Stamina", destructionNcost+" / "+playerStamina)
			destructionXID = AddTextOption("Spend HeartXP", destructionXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Heavy Armor
				
			AddHeaderOption("Heavy Armor Knowledge "+heavyarmorlvl)
			heavyarmorHID = AddTextOption("Spend Health", heavyarmorMcost+" / "+playerHealth)
			heavyarmorMID = AddTextOption("Spend Magicka", heavyarmorNcost+" / "+playerMagicka)
			heavyarmorSID = AddTextOption("Spend Stamina", heavyarmorNcost+" / "+playerStamina)
			heavyarmorXID = AddTextOption("Spend HeartXP", heavyarmorXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Light Armor
				
			AddHeaderOption("Light Armor Knowledge "+lightarmorlvl)
			lightarmorHID = AddTextOption("Spend Health", lightarmorNcost+" / "+playerHealth)
			lightarmorMID = AddTextOption("Spend Magicka", lightarmorNcost+" / "+playerMagicka)
			lightarmorSID = AddTextOption("Spend Stamina", lightarmorMcost+" / "+playerStamina)
			lightarmorXID = AddTextOption("Spend HeartXP", lightarmorXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Marksman
				
			AddHeaderOption("Marksman Knowledge "+marksmanlvl)
			marksmanHID = AddTextOption("Spend Health", marksmanNcost+" / "+playerHealth)
			marksmanMID = AddTextOption("Spend Magicka", marksmanNcost+" / "+playerMagicka)
			marksmanSID = AddTextOption("Spend Stamina", marksmanMcost+" / "+playerStamina)
			marksmanXID = AddTextOption("Spend HeartXP", marksmanXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Pickpocket
			AddHeaderOption("Pickpocket Knowledge "+pickpocketlvl)
			pickpocketHID = AddTextOption("Spend Health", pickpocketMcost+" / "+playerHealth)
			pickpocketMID = AddTextOption("Spend Magicka", pickpocketMcost+" / "+playerMagicka)
			pickpocketSID = AddTextOption("Spend Stamina", pickpocketMcost+" / "+playerStamina)
			pickpocketXID = AddTextOption("Spend HeartXP", pickpocketXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Smithing	
			AddHeaderOption("Smithing Knowledge "+smithinglvl)
			smithingHID = AddTextOption("Spend Health", smithingMcost+" / "+playerHealth)
			smithingMID = AddTextOption("Spend Magicka", smithingMcost+" / "+playerMagicka)
			smithingSID = AddTextOption("Spend Stamina", smithingMcost+" / "+playerStamina)
			smithingXID = AddTextOption("Spend HeartXP", smithingXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Speechcraft
			AddHeaderOption("Speechcraft Knowledge "+speechcraftlvl)
			speechcraftHID = AddTextOption("Spend Health", speechcraftMcost+" / "+playerHealth)
			speechcraftMID = AddTextOption("Spend Magicka", speechcraftMcost+" / "+playerMagicka)
			speechcraftSID = AddTextOption("Spend Stamina", speechcraftMcost+" / "+playerStamina)
			speechcraftXID = AddTextOption("Spend HeartXP", speechcraftXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
		;end/
		;ent/ Right Side
			
			SetCursorPosition(1)
			
			;ent/ Empty Space
			AddEmptyOption()
			AddEmptyOption()
			AddEmptyOption()
			AddEmptyOption()
			AddEmptyOption()
			AddEmptyOption()
			;end/
			;ent/ Alteration
			AddHeaderOption("Alteration Knowledge "+alterationlvl)
			alterationHID = AddTextOption("Spend Health", alterationNcost+" / "+playerHealth)
			alterationMID = AddTextOption("Spend Magicka", alterationMcost+" / "+playerMagicka)
			alterationSID = AddTextOption("Spend Stamina", alterationNcost+" / "+playerStamina)
			alterationXID = AddTextOption("Spend HeartXP", alterationXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Conjuration
				
			AddHeaderOption("Conjuration Knowledge "+conjurationlvl)
			conjurationHID = AddTextOption("Spend Health", conjurationNcost+" / "+playerHealth)
			conjurationMID = AddTextOption("Spend Magicka", conjurationMcost+" / "+playerMagicka)
			conjurationSID = AddTextOption("Spend Stamina", conjurationNcost+" / "+playerStamina)
			conjurationXID = AddTextOption("Spend HeartXP", conjurationXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Enchanting
			AddHeaderOption("Enchanting Knowledge "+enchantinglvl)
			enchantingHID = AddTextOption("Spend Health", enchantingMcost+" / "+playerHealth)
			enchantingMID = AddTextOption("Spend Magicka", enchantingMcost+" / "+playerMagicka)
			enchantingSID = AddTextOption("Spend Stamina", enchantingMcost+" / "+playerStamina)
			enchantingXID = AddTextOption("Spend HeartXP", enchantingXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Illusion
				
			AddHeaderOption("Illusion Knowledge "+illusionlvl)
			illusionHID = AddTextOption("Spend Health", illusionNcost+" / "+playerHealth)
			illusionMID = AddTextOption("Spend Magicka", illusionMcost+" / "+playerMagicka)
			illusionSID = AddTextOption("Spend Stamina", illusionNcost+" / "+playerStamina)
			illusionXID = AddTextOption("Spend HeartXP", illusionXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Lockpicking
			AddHeaderOption("Lockpicking Knowledge "+lockpickinglvl)
			lockpickingHID = AddTextOption("Spend Health", lockpickingNcost+" / "+playerHealth)
			lockpickingMID = AddTextOption("Spend Magicka", lockpickingNcost+" / "+playerMagicka)
			lockpickingSID = AddTextOption("Spend Stamina", lockpickingMcost+" / "+playerStamina)
			lockpickingXID = AddTextOption("Spend HeartXP", lockpickingXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ One-Handed
			AddHeaderOption("One-Handed Knowledge "+onehandedlvl)
			onehandedHID = AddTextOption("Spend Health", onehandedMcost+" / "+playerHealth)
			onehandedMID = AddTextOption("Spend Magicka", onehandedNcost+" / "+playerMagicka)
			onehandedSID = AddTextOption("Spend Stamina", onehandedNcost+" / "+playerStamina)
			onehandedXID = AddTextOption("Spend HeartXP", onehandedXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Restoration
			AddHeaderOption("Restoration Knowledge "+restorationlvl)
			restorationHID = AddTextOption("Spend Health", restorationNcost+" / "+playerHealth)
			restorationMID = AddTextOption("Spend Magicka", restorationMcost+" / "+playerMagicka)
			restorationSID = AddTextOption("Spend Stamina", restorationNcost+" / "+playerStamina)
			restorationXID = AddTextOption("Spend HeartXP", restorationXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Sneak
			AddHeaderOption("Sneak Knowledge "+sneaklvl)
			sneakHID = AddTextOption("Spend Health", sneakNcost+" / "+playerHealth)
			sneakMID = AddTextOption("Spend Magicka", sneakNcost+" / "+playerMagicka)
			sneakSID = AddTextOption("Spend Stamina", sneakMcost+" / "+playerStamina)
			sneakXID = AddTextOption("Spend HeartXP", sneakXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
			;ent/ Two-Handed
			AddHeaderOption("Two-Handed Knowledge "+twohandedlvl)
			twohandedHID = AddTextOption("Spend Health", twohandedMcost+" / "+playerHealth)
			twohandedMID = AddTextOption("Spend Magicka", twohandedNcost+" / "+playerMagicka)
			twohandedSID = AddTextOption("Spend Stamina", twohandedNcost+" / "+playerStamina)
			twohandedXID = AddTextOption("Spend HeartXP", twohandedXcost+" / "+HeartXP)
			AddEmptyOption()
			;end/
		;end/
	;end/
	;ent/ Heart Levels
	elseIf (page == "Heart Levels")
	
		SetCursorFillMode(TOP_TO_BOTTOM)
		
		;ent/ public var
		int lvlupMatch = 5
		float lvlAdjust = 1.8
		float lvlM = 0.5
		float lvlN = 1
		int lvlX = 25
		
		int HeartXP = Math.Floor(SuH_PCSheartXP.GetValue())
		int healthlvl = Math.Floor(SuH_PCShpabsorb.GetValue())
		int healthXcost = Math.Floor(lvlupMatch*lvlX*(healthlvl*lvlAdjust))
		int magiclvl = Math.Floor(SuH_PCSmpabsorb.GetValue())
		int magicXcost = Math.Floor(lvlupMatch*lvlX*(magiclvl*lvlAdjust))
		int energylvl = Math.Floor(SuH_PCSspabsorb.GetValue())
		int energyXcost = Math.Floor(lvlupMatch*lvlX*(energylvl*lvlAdjust))
		int HeartXPlvl = Math.Floor(SuH_PCSheartXPgain.GetValue() - 99)
		int HeartXPcost = Math.Floor(lvlupMatch*lvlX*(HeartXPlvl*lvlAdjust))
		int spermHlvl = Math.Floor(SuH_PCSspermhvalue.GetValue())
		int spermHcost = Math.Floor(lvlupMatch*lvlX*(spermHlvl*lvlAdjust))
		int spermMlvl = Math.Floor(SuH_PCSspermmvalue.GetValue())
		int spermMcost = Math.Floor(lvlupMatch*lvlX*(spermMlvl*lvlAdjust))
		int spermSlvl = Math.Floor(SuH_PCSspermsvalue.GetValue())
		int spermScost = Math.Floor(lvlupMatch*lvlX*(spermSlvl*lvlAdjust))
		int milkHlvl = Math.Floor(SuH_PCSmilkhvalue.GetValue())
		int milkHcost = Math.Floor(lvlupMatch*lvlX*(milkHlvl*lvlAdjust))
		int milkMlvl = Math.Floor(SuH_PCSmilkmvalue.GetValue())
		int milkMcost = Math.Floor(lvlupMatch*lvlX*(milkMlvl*lvlAdjust))
		int milkSlvl = Math.Floor(SuH_PCSmilksvalue.GetValue())
		int milkScost = Math.Floor(lvlupMatch*lvlX*(milkSlvl*lvlAdjust))
		
		;end/
		
		;ent/ Left Side
		
			SetCursorPosition(0)
			
			AddHeaderOption("Heart Levels")
			heartHeartXPID = AddTextOption("HeartXP ", HeartXP)
			hlsHXPgain = AddTextOption("HeartXP Gain", HeartXPlvl+99+"%")
			AddEmptyOption()
			hlsHabsorb = AddTextOption("Health Absorption",healthlvl)
			hlsMabsorb = AddTextOption("Magicka Absorption",magiclvl)
			hlsSabsorb = AddTextOption("Stamina Absorption",energylvl)
			AddEmptyOption()
			hlsHsperm = AddTextOption("Sperm Health Bonus",spermHlvl)
			hlsMsperm = AddTextOption("Sperm Magicka Bonus",spermMlvl)
			hlsSsperm = AddTextOption("Sperm Stamina Bonus",spermSlvl)
			AddEmptyOption()
			hlsHmilk = AddTextOption("Milk Health Bonus",milkHlvl)
			hlsMmilk = AddTextOption("Milk Magicka Bonus",milkMlvl)
			hlsSmilk = AddTextOption("Milk Stamina Bonus",milkSlvl)
			AddEmptyOption()
		;end/
		;ent/ Right Side
		
			SetCursorPosition(1)
			
			AddEmptyOption()
			AddEmptyOption()
			incXPgainID = AddTextOption("+1%", HeartXPcost+" HeartXP")
			AddEmptyOption()
			incabsorbHID = AddTextOption("+1", healthXcost+" HeartXP")
			incabsorbMID = AddTextOption("+1", magicXcost+" HeartXP")
			incabsorbSID = AddTextOption("+1", energyXcost+" HeartXP")
			AddEmptyOption()
			spermehID = AddTextOption("+1", spermHcost+" HeartXP")
			spermemID = AddTextOption("+1", spermMcost+" HeartXP")
			spermesID = AddTextOption("+1", spermScost+" HeartXP")
			AddEmptyOption()
			milkehID = AddTextOption("+1", milkHcost+" HeartXP")
			milkemID = AddTextOption("+1", milkMcost+" HeartXP")
			milkesID = AddTextOption("+1", milkScost+" HeartXP")
			AddEmptyOption()
		;end/
	;end/
	;ent/ Spells and Passives
	elseIf (page == "Spells and Passives")
	
		int HeartXP = Math.Floor(SuH_PCSheartXP.GetValue())
		int pHeartTier = Math.Floor(SuH_PCShearttier.GetValue())
	
		;ent/ Cost Strings
			;ent/ Spells
				string LfocusShot = "Free"
				string LpierceShot = "600 HeartXP"
				string LsilentKiss = "Free"
				string LsexualEnrage = "Free"
				string LcreatureClaim = "8000 HeartXP"
				string LmanaShroud = "4500 HeartXP"
				string LconsumeHealth = "3500 HeartXP"
				string LconsumeMagicka = "3500 HeartXP"
				string LmanaBreak = "5000 HeartXP"
				string LbloodDrop = "500 HeartXP"
				string LmanaDrop = "500 HeartXP"
				string LpowerDrop = "500 HeartXP"
				
				If(playerRef.HasSpell(SuH_ss_focusshot))
					LfocusShot = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_darkpierce))
					LpierceShot = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_silentkiss))
					LsilentKiss = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_sexualenrage))
					LsexualEnrage = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_creatureclaim))
					LcreatureClaim = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_sst_manashroud))
					LmanaShroud = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_consumehealth))
					LconsumeHealth = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_consumemagicka))
					LconsumeMagicka = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_manabreak))
					LmanaBreak = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_blooddrop))
					LbloodDrop = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_manadrop))
					LmanaDrop = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_ss_powerdrop))
					LpowerDrop = "Learned"
				endIf
			;end/
			;ent/ Heart Passives
				string LsuccubusProwl = "Free"
				string LhealthyDelights = "800 HeartXP"
				string LshiningDelights = "800 HeartXP"
				string LsugaryDelights = "800 HeartXP"
				string LperfectOrgasm = "1400 HeartXP"
				string LspecialLover = "600 HeartXP"
				string LcaringLover = "1000 HeartXP"
				string LmagicalLover = "1000 HeartXP"
				string LlastingLover = "1000 HeartXP"
				string LheartTier2 = "3500 HeartXP"
				string LseductiveDelights = "3000 HeartXP"
				string LhumanDesires = "2500 HeartXP"
				string LanimalDesires = "2500 HeartXP"
				string LhealthyDelights2 = "2000 HeartXP"
				string LshiningDelights2 = "2000 HeartXP"
				string LsugaryDelights2 = "2000 HeartXP"
				string LhealthyMilk = "800 HeartXP"
				string LshiningMilk = "800 HeartXP"
				string LsugaryMilk = "800 HeartXP"
				string LseductiveMilk = "3000 HeartXP"
				string LhealthyMilk2 = "2000 HeartXP"
				string LshiningMilk2 = "2000 HeartXP"
				string LsugaryMilk2 = "2000 HeartXP"
				
				If(playerRef.HasMagicEffect(SuH_sp_succubusprowleffect))
					LsuccubusProwl = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_healthydelightseffect) || playerRef.HasMagicEffect(SuH_sp_healthydelights2effect))
					LhealthyDelights = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_shiningdelightseffect) || playerRef.HasMagicEffect(SuH_sp_shiningdelights2effect))
					LshiningDelights = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_sugarydelightseffect) || playerRef.HasMagicEffect(SuH_sp_sugarydelights2effect))
					LsugaryDelights = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_perfectorgasmeffect))
					LperfectOrgasm = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_speciallovereffect))
					LspecialLover = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_caringlovereffect))
					LcaringLover = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_magicallovereffect))
					LmagicalLover = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_lastinglovereffect))
					LlastingLover = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_healthymilkeffect) || playerRef.HasMagicEffect(SuH_sp_healthymilk2effect))
					LhealthyMilk = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_shiningmilkeffect) || playerRef.HasMagicEffect(SuH_sp_shiningmilk2effect))
					LshiningMilk = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_sugarymilkeffect) || playerRef.HasMagicEffect(SuH_sp_sugarymilk2effect))
					LsugaryMilk = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_seductivemilkeffect))
					LseductiveMilk = "Learned"
				endIf
				If(SuH_PCShearttier.GetValue() > 1)
					LheartTier2 = "Learned"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_seductivedelightseffect))
					LseductiveDelights = "Learned"
				elseIf(pHeartTier < 2)
					LseductiveDelights = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_humandesireseffect))
					LhumanDesires = "Learned"
				elseIf(pHeartTier < 2)
					LhumanDesires = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_animaldesireseffect))
					LanimalDesires = "Learned"
				elseIf(pHeartTier < 2)
					LanimalDesires = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_healthydelights2effect))
					LhealthyDelights2 = "Learned"
				elseIf(pHeartTier < 2)
					LhealthyDelights2 = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_shiningdelights2effect))
					LshiningDelights2 = "Learned"
				elseIf(pHeartTier < 2)
					LshiningDelights2 = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_sugarydelights2effect))
					LsugaryDelights2 = "Learned"
				elseIf(pHeartTier < 2)
					LsugaryDelights2 = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_seductivemilkeffect))
					LseductiveMilk = "Learned"
				elseIf(pHeartTier < 2)
					LseductiveMilk = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_healthymilk2effect))
					LhealthyMilk2 = "Learned"
				elseIf(pHeartTier < 2)
					LhealthyMilk2 = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_shiningmilk2effect))
					LshiningMilk2 = "Learned"
				elseIf(pHeartTier < 2)
					LshiningMilk2 = "Locked"
				endIf
				If(playerRef.HasMagicEffect(SuH_sp_sugarymilk2effect))
					LsugaryMilk2 = "Learned"
				elseIf(pHeartTier < 2)
					LsugaryMilk2 = "Locked"
				endIf
			;end/
			;ent/ Toggle Passives
				string LtrainingState = "4000 HeartXP"
				string LhungerState = "2000 HeartXP"
				string LfocusedState = "2000 HeartXP"
				string LbracingState = "2000 HeartXP"
				
				If(playerRef.HasSpell(SuH_spt_trainingstate))
					LtrainingState = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_spt_hungerstate))
					LhungerState = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_spt_focusedstate))
					LfocusedState = "Learned"
				endIf
				If(playerRef.HasSpell(SuH_spt_bracingstate))
					LbracingState = "Learned"
				endIf
			;end/
		;end/
	
        SetCursorFillMode(TOP_TO_BOTTOM)
		
		;ent/ Left Side
			SetCursorPosition(0)
			sapsHeartXP = AddTextOption("HeartXP ", HeartXP)
			AddEmptyOption()
			
			AddHeaderOption("Battle Spells")
			ssFocusShotID = AddTextOption("Focus Shot",LfocusShot)
			ssDarkPierceID = AddTextOption("Dark Pierce", LpierceShot)
			ssManaBreakID = AddTextOption("Mana Break", LmanaBreak)
			AddEmptyOption()
			
			AddHeaderOption("Seduction Spells")
			ssSexualEnrageID = AddTextOption("Sexual Enrage", LsexualEnrage)
			ssSilentKissID = AddTextOption("Silent Kiss", LsilentKiss)
			ssCreatureClaimID = AddTextOption("Creature Claim", LcreatureClaim)
			AddEmptyOption()
			
			AddHeaderOption("Utility Spells")
			ssConsumeHealthID = AddTextOption("Consume Health",LconsumeHealth)
			ssConsumeMagickaID = AddTextOption("Consume Magicka", LconsumeMagicka)
			sstManaShroudID = AddTextOption("Mana Shroud", LmanaShroud)
			AddEmptyOption()
			
			AddHeaderOption("Conversion Spells")
			ssBloodDropID = AddTextOption("Blood Drop", LbloodDrop)
			ssManaDropID = AddTextOption("Mana Drop", LmanaDrop)
			ssPowerDropID = AddTextOption("Power Drop", LpowerDrop)
			AddEmptyOption()
			
			AddHeaderOption("Meditation Passives")
			spTrainingStateID = AddTextOption("Training State",LtrainingState)
			spHungerStateID = AddTextOption("Hunger State",LhungerState)
			spFocusedStateID = AddTextOption("Focused State",LfocusedState)
			spBracingStateID = AddTextOption("Bracing State",LbracingState)
		;end/
		;ent/ Right Side
			SetCursorPosition(1)
			
			AddHeaderOption("Heart Passives")
			spSuccubusProwlID = AddTextOption("Succubus Prowl", LsuccubusProwl)
			spHealthyDelightID = AddTextOption("Healthy Delight",LhealthyDelights)
			spShiningDelightID = AddTextOption("Shining Delight",LshiningDelights)
			spSugaryDelightID = AddTextOption("Sugary Delight",LsugaryDelights)
			spHealthyMilkID = AddTextOption("Healthy Milk", LhealthyMilk)
			spShiningMilkID = AddTextOption("Shining Milk", LshiningMilk)
			spSugaryMilkID = AddTextOption("Sugary Milk", LsugaryMilk)
			spPerfectOrgasmID = AddTextOption("Perfect Orgasm",LperfectOrgasm)
			spSpecialLoverID = AddTextOption("Special Lover",LspecialLover)
			spCaringLoverID = AddTextOption("Caring Lover",LcaringLover)
			spMagicalLoverID = AddTextOption("Magical Lover",LmagicalLover)
			spLastingLoverID = AddTextOption("Lasting Lover",LlastingLover)
			AddEmptyOption()
			
			AddHeaderOption("Heart Passives Tier 2")
			stHeartTier2ID = AddTextOption("Heart Tier 2",LheartTier2)
			if pHeartTier > 1
			spSeductiveDelightsID = AddTextOption("Seductive Delights",LseductiveDelights)
			spHealthyDelight2ID = AddTextOption("Healthy Delights II", LhealthyDelights2)
			spShiningDelight2ID = AddTextOption("Shining Delights II", LshiningDelights2)
			spSugaryDelight2ID = AddTextOption("Sugary Delights II", LsugaryDelights2)
			spSeductiveMilkID = AddTextOption("Seductive Milk", LseductiveMilk)
			spHealthyMilk2ID = AddTextOption("Healthy Milk II", LhealthyMilk2)
			spShiningMilk2ID = AddTextOption("Shining Milk II", LshiningMilk2)
			spSugaryMilk2ID = AddTextOption("Sugary Milk II", LsugaryMilk2)
			spHumanDesiresID = AddTextOption("Human Desires", LhumanDesires)
			spAnimalDesiresID = AddTextOption("Animal Desires", LanimalDesires)
			endIf
		;end/
	;end/
	;ent/ Help
	elseIf (page == "Help")
	
		SetCursorFillMode(TOP_TO_BOTTOM)
		;Left Side
		SetCursorPosition(0)
		
		AddHeaderOption("The Basics")
		hb1 = AddTextOption("Absorption Effect"," ")
		hb2 = AddTextOption("Sperm Mechanics"," ")
		he15 = AddTextOption("Milk Mechanic", " ")
		hb3 = AddTextOption("Passives Mechanic"," ")
		hb4 = AddTextOption("Seduction Points"," ")
		AddEmptyOption()
		creditsID = AddTextOption("Created By: Michael aka Spirit Shard","")
		credits2ID = AddTextOption("michaelpstanich.com // loverslab.com","")
		
		;Right Side
		SetCursorPosition(1)
		
		AddHeaderOption("Sperm System")
		he14 = AddTextOption("Sperm Types", " ")
		AddEmptyOption()
		AddHeaderOption("HeartXP System")
		he1 = AddTextOption("Earning HeartXP"," ")
		he2 = AddTextOption("Sexual Act Values"," ")
		he5 = AddTextOption("Spell and Passive Values"," ")
		he3 = AddTextOption("Using HeartXP"," ")
		he4 = AddTextOption("HeartXP Gain Stat"," ")
		AddEmptyOption()
		AddHeaderOption("Absorption System")
		he6 = AddTextOption("How It Works"," ")
		he7 = AddTextOption("Sex Type Effect"," ")
		he8 = AddTextOption("Increasing the Effect"," ")
		he9 = AddTextOption("Killing the Enemy"," ")
		AddEmptyOption()
		AddHeaderOption("Succubus Spells")
		he10 = AddTextOption("Battle Type"," ")
		AddEmptyOption()
		AddHeaderOption("Passives Mechanic")
		he11 = AddTextOption("How It Works"," ")
		he12 = AddTextOption("Cancel a Passive"," ")
		he13 = AddTextOption("Meditation Passives"," ")
		
	else
	endIf
	;end/

endEvent
;end/
;ent/ OnOptionSelect
Event OnOptionSelect(int option)
	;ent/ public var
		int lvlupMatch = 5
		float lvlAdjust = 1.8
		float lvlM = 0.5
		float lvlN = 1
		int lvlX = 25
		int playerHealth = Math.Floor(playerRef.GetBaseActorValue("Health"))
		int playerMagicka = Math.Floor(playerRef.GetBaseActorValue("Magicka"))
		int playerStamina = Math.Floor(playerRef.GetBaseActorValue("Stamina"))
		int HeartXP = Math.Floor(SuH_PCSheartXP.GetValue())
		;end/
		;ent/ Status Character Options
		if(option == charactergenderID)
				int cgender = Math.Floor(SuH_PCSgenders.GetValue())
			if cgender == 1
				SuH_PCSgenders.SetValue(2)
				ForcePageReset()
			elseIf cgender == 2
				SuH_PCSgenders.SetValue(12)
				ForcePageReset()
			elseIf cgender == 12
				SuH_PCSgenders.SetValue(1)
				ForcePageReset()
			endIf
		;end/
	;ent/ Skill Levels
		;ent/ Alchemy
		elseIf(option == alchemyHID)
				int alchemylvl = Math.Floor(playerRef.GetActorValue("alchemy"))
				int alchemyMcost = Math.Floor(lvlupMatch*lvlM*(alchemylvl*lvlAdjust))
				int alchemyXcost = Math.Floor(lvlupMatch*lvlX*(alchemylvl*lvlAdjust))
			if playerHealth >= alchemyMcost
				playerHealth -= alchemyMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",alchemyMcost)
				Game.IncrementSkill("alchemy")
				Debug.MessageBox("Alchemy Increased to "+(alchemylvl+1))
				ForcePageReset()
			endIf
		elseIf(option == alchemyMID)
				int alchemylvl = Math.Floor(playerRef.GetActorValue("alchemy"))
				int alchemyMcost = Math.Floor(lvlupMatch*lvlM*(alchemylvl*lvlAdjust))
				int alchemyXcost = Math.Floor(lvlupMatch*lvlX*(alchemylvl*lvlAdjust))
			if playerMagicka >= alchemyMcost
				playerMagicka -= alchemyMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",alchemyMcost)
				Game.IncrementSkill("alchemy")
				Debug.MessageBox("Alchemy Increased to "+(alchemylvl+1))
				ForcePageReset()
			endIf
		elseIf(option == alchemySID)
				int alchemylvl = Math.Floor(playerRef.GetActorValue("alchemy"))
				int alchemyMcost = Math.Floor(lvlupMatch*lvlM*(alchemylvl*lvlAdjust))
				int alchemyXcost = Math.Floor(lvlupMatch*lvlX*(alchemylvl*lvlAdjust))
			if playerStamina >= alchemyMcost
				playerStamina -= alchemyMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",alchemyMcost)
				Game.IncrementSkill("alchemy")
				Debug.MessageBox("Alchemy Increased to "+(alchemylvl+1))
				ForcePageReset()
			endIf
		elseIf(option == alchemyXID)
				int alchemylvl = Math.Floor(playerRef.GetActorValue("alchemy"))
				int alchemyMcost = Math.Floor(lvlupMatch*lvlM*(alchemylvl*lvlAdjust))
				int alchemyXcost = Math.Floor(lvlupMatch*lvlX*(alchemylvl*lvlAdjust))
			if HeartXP >= alchemyXcost
				HeartXP -= alchemyXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("alchemy")
				Debug.MessageBox("Alchemy Increased to "+(alchemylvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Alteration
		elseIf(option == alterationHID)
				int alterationlvl = Math.Floor(playerRef.GetActorValue("alteration"))
				int alterationMcost = Math.Floor(lvlupMatch*lvlM*(alterationlvl*lvlAdjust))
				int alterationNcost = Math.Floor(lvlupMatch*lvlN*(alterationlvl*lvlAdjust))
				int alterationXcost = Math.Floor(lvlupMatch*lvlX*(alterationlvl*lvlAdjust))
			if playerHealth >= alterationNcost
				playerHealth -= alterationNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",alterationNcost)
				Game.IncrementSkill("alteration")
				Debug.MessageBox("Alteration Increased to "+(alterationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == alterationMID)
				int alterationlvl = Math.Floor(playerRef.GetActorValue("alteration"))
				int alterationMcost = Math.Floor(lvlupMatch*lvlM*(alterationlvl*lvlAdjust))
				int alterationNcost = Math.Floor(lvlupMatch*lvlN*(alterationlvl*lvlAdjust))
				int alterationXcost = Math.Floor(lvlupMatch*lvlX*(alterationlvl*lvlAdjust))
			if playerMagicka >= alterationMcost
				playerMagicka -= alterationMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",alterationMcost)
				Game.IncrementSkill("alteration")
				Debug.MessageBox("Alteration Increased to"+(alterationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == alterationSID)
				int alterationlvl = Math.Floor(playerRef.GetActorValue("alteration"))
				int alterationMcost = Math.Floor(lvlupMatch*lvlM*(alterationlvl*lvlAdjust))
				int alterationNcost = Math.Floor(lvlupMatch*lvlN*(alterationlvl*lvlAdjust))
				int alterationXcost = Math.Floor(lvlupMatch*lvlX*(alterationlvl*lvlAdjust))
			if playerStamina >= alterationNcost
				playerStamina -= alterationNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",alterationNcost)
				Game.IncrementSkill("alteration")
				Debug.MessageBox("Alteration Increased to "+(alterationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == alterationXID)
				int alterationlvl = Math.Floor(playerRef.GetActorValue("alteration"))
				int alterationMcost = Math.Floor(lvlupMatch*lvlM*(alterationlvl*lvlAdjust))
				int alterationNcost = Math.Floor(lvlupMatch*lvlN*(alterationlvl*lvlAdjust))
				int alterationXcost = Math.Floor(lvlupMatch*lvlX*(alterationlvl*lvlAdjust))
			if HeartXP >= alterationXcost
				HeartXP -= alterationXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("alteration")
				Debug.MessageBox("Alteration Increased to "+(alterationlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Block
		elseIf(option == blockHID)
				int blocklvl = Math.Floor(playerRef.GetActorValue("block"))
				int blockMcost = Math.Floor(lvlupMatch*lvlM*(blocklvl*lvlAdjust))
				int blockNcost = Math.Floor(lvlupMatch*lvlN*(blocklvl*lvlAdjust))
				int blockXcost = Math.Floor(lvlupMatch*lvlX*(blocklvl*lvlAdjust))
			if playerHealth >= blockMcost
				playerHealth -= blockMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",blockMcost)
				Game.IncrementSkill("block")
				Debug.MessageBox("Block Increased to "+(blocklvl+1))
				ForcePageReset()
			endIf
		elseIf(option == blockMID)
				int blocklvl = Math.Floor(playerRef.GetActorValue("block"))
				int blockMcost = Math.Floor(lvlupMatch*lvlM*(blocklvl*lvlAdjust))
				int blockNcost = Math.Floor(lvlupMatch*lvlN*(blocklvl*lvlAdjust))
				int blockXcost = Math.Floor(lvlupMatch*lvlX*(blocklvl*lvlAdjust))
			if playerMagicka >= blockNcost
				playerMagicka -= blockNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",blockNcost)
				Game.IncrementSkill("block")
				Debug.MessageBox("Block Increased to "+(blocklvl+1))
				ForcePageReset()
			endIf
		elseIf(option == blockSID)
				int blocklvl = Math.Floor(playerRef.GetActorValue("block"))
				int blockMcost = Math.Floor(lvlupMatch*lvlM*(blocklvl*lvlAdjust))
				int blockNcost = Math.Floor(lvlupMatch*lvlN*(blocklvl*lvlAdjust))
				int blockXcost = Math.Floor(lvlupMatch*lvlX*(blocklvl*lvlAdjust))
			if playerStamina >= blockNcost
				playerStamina -= blockNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",blockNcost)
				Game.IncrementSkill("block")
				Debug.MessageBox("Block Increased to "+(blocklvl+1))
				ForcePageReset()
			endIf
		elseIf(option == blockXID)
				int blocklvl = Math.Floor(playerRef.GetActorValue("block"))
				int blockMcost = Math.Floor(lvlupMatch*lvlM*(blocklvl*lvlAdjust))
				int blockNcost = Math.Floor(lvlupMatch*lvlN*(blocklvl*lvlAdjust))
				int blockXcost = Math.Floor(lvlupMatch*lvlX*(blocklvl*lvlAdjust))
			if HeartXP >= blockXcost
				HeartXP -= blockXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("block")
				Debug.MessageBox("Block Increased to "+(blocklvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Conjuration
		elseIf(option == conjurationHID)
				int conjurationlvl = Math.Floor(playerRef.GetActorValue("conjuration"))
				int conjurationMcost = Math.Floor(lvlupMatch*lvlM*(conjurationlvl*lvlAdjust))
				int conjurationNcost = Math.Floor(lvlupMatch*lvlN*(conjurationlvl*lvlAdjust))
				int conjurationXcost = Math.Floor(lvlupMatch*lvlX*(conjurationlvl*lvlAdjust))
			if playerHealth >= conjurationNcost
				playerHealth -= conjurationNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",conjurationNcost)
				Game.IncrementSkill("conjuration")
				Debug.MessageBox("Conjuration Increased to "+(conjurationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == conjurationMID)
				int conjurationlvl = Math.Floor(playerRef.GetActorValue("conjuration"))
				int conjurationMcost = Math.Floor(lvlupMatch*lvlM*(conjurationlvl*lvlAdjust))
				int conjurationNcost = Math.Floor(lvlupMatch*lvlN*(conjurationlvl*lvlAdjust))
				int conjurationXcost = Math.Floor(lvlupMatch*lvlX*(conjurationlvl*lvlAdjust))
			if playerMagicka >= conjurationMcost
				playerMagicka -= conjurationMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",conjurationMcost)
				Game.IncrementSkill("conjuration")
				Debug.MessageBox("Conjuration Increased to "+(conjurationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == conjurationSID)
				int conjurationlvl = Math.Floor(playerRef.GetActorValue("conjuration"))
				int conjurationMcost = Math.Floor(lvlupMatch*lvlM*(conjurationlvl*lvlAdjust))
				int conjurationNcost = Math.Floor(lvlupMatch*lvlN*(conjurationlvl*lvlAdjust))
				int conjurationXcost = Math.Floor(lvlupMatch*lvlX*(conjurationlvl*lvlAdjust))
			if playerStamina >= conjurationNcost
				playerStamina -= conjurationNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",conjurationNcost)
				Game.IncrementSkill("conjuration")
				Debug.MessageBox("Conjuration Increased to "+(conjurationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == conjurationXID)
				int conjurationlvl = Math.Floor(playerRef.GetActorValue("conjuration"))
				int conjurationMcost = Math.Floor(lvlupMatch*lvlM*(conjurationlvl*lvlAdjust))
				int conjurationNcost = Math.Floor(lvlupMatch*lvlN*(conjurationlvl*lvlAdjust))
				int conjurationXcost = Math.Floor(lvlupMatch*lvlX*(conjurationlvl*lvlAdjust))
			if HeartXP >= conjurationXcost
				HeartXP -= conjurationXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("conjuration")
				Debug.MessageBox("Conjuration Increased to "+(conjurationlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Destruction
		elseIf(option == destructionHID)
				int destructionlvl = Math.Floor(playerRef.GetActorValue("destruction"))
				int destructionMcost = Math.Floor(lvlupMatch*lvlM*(destructionlvl*lvlAdjust))
				int destructionNcost = Math.Floor(lvlupMatch*lvlN*(destructionlvl*lvlAdjust))
				int destructionXcost = Math.Floor(lvlupMatch*lvlX*(destructionlvl*lvlAdjust))
			if playerHealth >= destructionNcost
				playerHealth -= destructionNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",destructionNcost)
				Game.IncrementSkill("destruction")
				Debug.MessageBox("Destruction Increased to "+(destructionlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == destructionMID)
				int destructionlvl = Math.Floor(playerRef.GetActorValue("destruction"))
				int destructionMcost = Math.Floor(lvlupMatch*lvlM*(destructionlvl*lvlAdjust))
				int destructionNcost = Math.Floor(lvlupMatch*lvlN*(destructionlvl*lvlAdjust))
				int destructionXcost = Math.Floor(lvlupMatch*lvlX*(destructionlvl*lvlAdjust))
			if playerMagicka >= destructionMcost
				playerMagicka -= destructionMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",destructionMcost)
				Game.IncrementSkill("destruction")
				Debug.MessageBox("Destruction Increased to "+(destructionlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == destructionSID)
				int destructionlvl = Math.Floor(playerRef.GetActorValue("destruction"))
				int destructionMcost = Math.Floor(lvlupMatch*lvlM*(destructionlvl*lvlAdjust))
				int destructionNcost = Math.Floor(lvlupMatch*lvlN*(destructionlvl*lvlAdjust))
				int destructionXcost = Math.Floor(lvlupMatch*lvlX*(destructionlvl*lvlAdjust))
			if playerStamina >= destructionNcost
				playerStamina -= destructionNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",destructionNcost)
				Game.IncrementSkill("destruction")
				Debug.MessageBox("Destruction Increased to "+(destructionlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == destructionXID)
				int destructionlvl = Math.Floor(playerRef.GetActorValue("destruction"))
				int destructionMcost = Math.Floor(lvlupMatch*lvlM*(destructionlvl*lvlAdjust))
				int destructionNcost = Math.Floor(lvlupMatch*lvlN*(destructionlvl*lvlAdjust))
				int destructionXcost = Math.Floor(lvlupMatch*lvlX*(destructionlvl*lvlAdjust))
			if HeartXP >= destructionXcost
				HeartXP -= destructionXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("destruction")
				Debug.MessageBox("Destruction Increased to "+(destructionlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Enchanting
		elseIf(option == enchantingHID)
				int enchantinglvl = Math.Floor(playerRef.GetActorValue("enchanting"))
				int enchantingMcost = Math.Floor(lvlupMatch*lvlM*(enchantinglvl*lvlAdjust))
				int enchantingXcost = Math.Floor(lvlupMatch*lvlX*(enchantinglvl*lvlAdjust))
			if playerHealth >= enchantingMcost
				playerHealth -= enchantingMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",enchantingMcost)
				Game.IncrementSkill("enchanting")
				Debug.MessageBox("Enchanting Increased to "+(enchantinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == enchantingMID)
				int enchantinglvl = Math.Floor(playerRef.GetActorValue("enchanting"))
				int enchantingMcost = Math.Floor(lvlupMatch*lvlM*(enchantinglvl*lvlAdjust))
				int enchantingXcost = Math.Floor(lvlupMatch*lvlX*(enchantinglvl*lvlAdjust))
			if playerMagicka >= enchantingMcost
				playerMagicka -= enchantingMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",enchantingMcost)
				Game.IncrementSkill("enchanting")
				Debug.MessageBox("Enchanting Increased to "+(enchantinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == enchantingSID)
				int enchantinglvl = Math.Floor(playerRef.GetActorValue("enchanting"))
				int enchantingMcost = Math.Floor(lvlupMatch*lvlM*(enchantinglvl*lvlAdjust))
				int enchantingXcost = Math.Floor(lvlupMatch*lvlX*(enchantinglvl*lvlAdjust))
			if playerStamina >= enchantingMcost
				playerStamina -= enchantingMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",enchantingMcost)
				Game.IncrementSkill("enchanting")
				Debug.MessageBox("Enchanting Increased to "+(enchantinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == enchantingXID)
				int enchantinglvl = Math.Floor(playerRef.GetActorValue("enchanting"))
				int enchantingMcost = Math.Floor(lvlupMatch*lvlM*(enchantinglvl*lvlAdjust))
				int enchantingXcost = Math.Floor(lvlupMatch*lvlX*(enchantinglvl*lvlAdjust))
			if HeartXP >= enchantingXcost
				HeartXP -= enchantingXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("enchanting")
				Debug.MessageBox("Enchanting Increased to "+(enchantinglvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Heavy Armor
		elseIf(option == heavyarmorHID)
				int heavyarmorlvl = Math.Floor(playerRef.GetActorValue("heavyarmor"))
				int heavyarmorMcost = Math.Floor(lvlupMatch*lvlM*(heavyarmorlvl*lvlAdjust))
				int heavyarmorNcost = Math.Floor(lvlupMatch*lvlN*(heavyarmorlvl*lvlAdjust))
				int heavyarmorXcost = Math.Floor(lvlupMatch*lvlX*(heavyarmorlvl*lvlAdjust))
			if playerHealth >= heavyarmorMcost
				playerHealth -= heavyarmorMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",heavyarmorMcost)
				Game.IncrementSkill("heavyarmor")
				Debug.MessageBox("Heavy Armor Increased to "+(heavyarmorlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == heavyarmorMID)
				int heavyarmorlvl = Math.Floor(playerRef.GetActorValue("heavyarmor"))
				int heavyarmorMcost = Math.Floor(lvlupMatch*lvlM*(heavyarmorlvl*lvlAdjust))
				int heavyarmorNcost = Math.Floor(lvlupMatch*lvlN*(heavyarmorlvl*lvlAdjust))
				int heavyarmorXcost = Math.Floor(lvlupMatch*lvlX*(heavyarmorlvl*lvlAdjust))
			if playerMagicka >= heavyarmorNcost
				playerMagicka -= heavyarmorNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",heavyarmorNcost)
				Game.IncrementSkill("heavyarmor")
				Debug.MessageBox("Heavy Armor Increased to "+(heavyarmorlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == heavyarmorSID)
				int heavyarmorlvl = Math.Floor(playerRef.GetActorValue("heavyarmor"))
				int heavyarmorMcost = Math.Floor(lvlupMatch*lvlM*(heavyarmorlvl*lvlAdjust))
				int heavyarmorNcost = Math.Floor(lvlupMatch*lvlN*(heavyarmorlvl*lvlAdjust))
				int heavyarmorXcost = Math.Floor(lvlupMatch*lvlX*(heavyarmorlvl*lvlAdjust))
			if playerStamina >= heavyarmorNcost
				playerStamina -= heavyarmorNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",heavyarmorNcost)
				Game.IncrementSkill("heavyarmor")
				Debug.MessageBox("Heavy Armor Increased to "+(heavyarmorlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == heavyarmorXID)
				int heavyarmorlvl = Math.Floor(playerRef.GetActorValue("heavyarmor"))
				int heavyarmorMcost = Math.Floor(lvlupMatch*lvlM*(heavyarmorlvl*lvlAdjust))
				int heavyarmorNcost = Math.Floor(lvlupMatch*lvlN*(heavyarmorlvl*lvlAdjust))
				int heavyarmorXcost = Math.Floor(lvlupMatch*lvlX*(heavyarmorlvl*lvlAdjust))
			if HeartXP >= heavyarmorXcost
				HeartXP -= heavyarmorXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("heavyarmor")
				Debug.MessageBox("Heavy Armor Increased to "+(heavyarmorlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Illusion
		elseIf(option == illusionHID)
				int illusionlvl = Math.Floor(playerRef.GetActorValue("illusion"))
				int illusionMcost = Math.Floor(lvlupMatch*lvlM*(illusionlvl*lvlAdjust))
				int illusionNcost = Math.Floor(lvlupMatch*lvlN*(illusionlvl*lvlAdjust))
				int illusionXcost = Math.Floor(lvlupMatch*lvlX*(illusionlvl*lvlAdjust))
			if playerHealth >= illusionNcost
				playerHealth -= illusionNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",illusionNcost)
				Game.IncrementSkill("illusion")
				Debug.MessageBox("Illusion Increased to "+(illusionlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == illusionMID)
				int illusionlvl = Math.Floor(playerRef.GetActorValue("illusion"))
				int illusionMcost = Math.Floor(lvlupMatch*lvlM*(illusionlvl*lvlAdjust))
				int illusionNcost = Math.Floor(lvlupMatch*lvlN*(illusionlvl*lvlAdjust))
				int illusionXcost = Math.Floor(lvlupMatch*lvlX*(illusionlvl*lvlAdjust))
			if playerMagicka >= illusionMcost
				playerMagicka -= illusionMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",illusionMcost)
				Game.IncrementSkill("illusion")
				Debug.MessageBox("Illusion Increased to "+(illusionlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == illusionSID)
				int illusionlvl = Math.Floor(playerRef.GetActorValue("illusion"))
				int illusionMcost = Math.Floor(lvlupMatch*lvlM*(illusionlvl*lvlAdjust))
				int illusionNcost = Math.Floor(lvlupMatch*lvlN*(illusionlvl*lvlAdjust))
				int illusionXcost = Math.Floor(lvlupMatch*lvlX*(illusionlvl*lvlAdjust))
			if playerStamina >= illusionNcost
				playerStamina -= illusionNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",illusionNcost)
				Game.IncrementSkill("illusion")
				Debug.MessageBox("Illusion Increased to "+(illusionlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == illusionXID)
				int illusionlvl = Math.Floor(playerRef.GetActorValue("illusion"))
				int illusionMcost = Math.Floor(lvlupMatch*lvlM*(illusionlvl*lvlAdjust))
				int illusionNcost = Math.Floor(lvlupMatch*lvlN*(illusionlvl*lvlAdjust))
				int illusionXcost = Math.Floor(lvlupMatch*lvlX*(illusionlvl*lvlAdjust))
			if HeartXP >= illusionXcost
				HeartXP -= illusionXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("illusion")
				Debug.MessageBox("Illusion Increased to "+(illusionlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Light Armor
		elseIf(option == lightarmorHID)
				int lightarmorlvl = Math.Floor(playerRef.GetActorValue("lightarmor"))
				int lightarmorMcost = Math.Floor(lvlupMatch*lvlM*(lightarmorlvl*lvlAdjust))
				int lightarmorNcost = Math.Floor(lvlupMatch*lvlN*(lightarmorlvl*lvlAdjust))
				int lightarmorXcost = Math.Floor(lvlupMatch*lvlX*(lightarmorlvl*lvlAdjust))
			if playerHealth >= lightarmorNcost
				playerHealth -= lightarmorNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",lightarmorNcost)
				Game.IncrementSkill("lightarmor")
				Debug.MessageBox("Light Armor Increased to "+(lightarmorlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == lightarmorMID)
				int lightarmorlvl = Math.Floor(playerRef.GetActorValue("lightarmor"))
				int lightarmorMcost = Math.Floor(lvlupMatch*lvlM*(lightarmorlvl*lvlAdjust))
				int lightarmorNcost = Math.Floor(lvlupMatch*lvlN*(lightarmorlvl*lvlAdjust))
				int lightarmorXcost = Math.Floor(lvlupMatch*lvlX*(lightarmorlvl*lvlAdjust))
			if playerMagicka >= lightarmorNcost
				playerMagicka -= lightarmorNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",lightarmorNcost)
				Game.IncrementSkill("lightarmor")
				Debug.MessageBox("Light Armor Increased to "+(lightarmorlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == lightarmorSID)
				int lightarmorlvl = Math.Floor(playerRef.GetActorValue("lightarmor"))
				int lightarmorMcost = Math.Floor(lvlupMatch*lvlM*(lightarmorlvl*lvlAdjust))
				int lightarmorNcost = Math.Floor(lvlupMatch*lvlN*(lightarmorlvl*lvlAdjust))
				int lightarmorXcost = Math.Floor(lvlupMatch*lvlX*(lightarmorlvl*lvlAdjust))
			if playerStamina >= lightarmorMcost
				playerStamina -= lightarmorMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",lightarmorMcost)
				Game.IncrementSkill("lightarmor")
				Debug.MessageBox("Light Armor Increased to "+(lightarmorlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == lightarmorXID)
				int lightarmorlvl = Math.Floor(playerRef.GetActorValue("lightarmor"))
				int lightarmorMcost = Math.Floor(lvlupMatch*lvlM*(lightarmorlvl*lvlAdjust))
				int lightarmorNcost = Math.Floor(lvlupMatch*lvlN*(lightarmorlvl*lvlAdjust))
				int lightarmorXcost = Math.Floor(lvlupMatch*lvlX*(lightarmorlvl*lvlAdjust))
			if HeartXP >= lightarmorXcost
				HeartXP -= lightarmorXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("lightarmor")
				Debug.MessageBox("Light Armor Increased to "+(lightarmorlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Lockpicking
		elseIf(option == lockpickingHID)
				int lockpickinglvl = Math.Floor(playerRef.GetActorValue("lockpicking"))
				int lockpickingMcost = Math.Floor(lvlupMatch*lvlM*(lockpickinglvl*lvlAdjust))
				int lockpickingNcost = Math.Floor(lvlupMatch*lvlN*(lockpickinglvl*lvlAdjust))
				int lockpickingXcost = Math.Floor(lvlupMatch*lvlX*(lockpickinglvl*lvlAdjust))
			if playerHealth >= lockpickingNcost
				playerHealth -= lockpickingNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",lockpickingNcost)
				Game.IncrementSkill("lockpicking")
				Debug.MessageBox("Lockpicking Increased to "+(lockpickinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == lockpickingMID)
				int lockpickinglvl = Math.Floor(playerRef.GetActorValue("lockpicking"))
				int lockpickingMcost = Math.Floor(lvlupMatch*lvlM*(lockpickinglvl*lvlAdjust))
				int lockpickingNcost = Math.Floor(lvlupMatch*lvlN*(lockpickinglvl*lvlAdjust))
				int lockpickingXcost = Math.Floor(lvlupMatch*lvlX*(lockpickinglvl*lvlAdjust))
			if playerMagicka >= lockpickingNcost
				playerMagicka -= lockpickingNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",lockpickingNcost)
				Game.IncrementSkill("lockpicking")
				Debug.MessageBox("Lockpicking Increased to "+(lockpickinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == lockpickingSID)
				int lockpickinglvl = Math.Floor(playerRef.GetActorValue("lockpicking"))
				int lockpickingMcost = Math.Floor(lvlupMatch*lvlM*(lockpickinglvl*lvlAdjust))
				int lockpickingNcost = Math.Floor(lvlupMatch*lvlN*(lockpickinglvl*lvlAdjust))
				int lockpickingXcost = Math.Floor(lvlupMatch*lvlX*(lockpickinglvl*lvlAdjust))
			if playerStamina >= lockpickingMcost
				playerStamina -= lockpickingMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",lockpickingMcost)
				Game.IncrementSkill("lockpicking")
				Debug.MessageBox("Lockpicking Increased to "+(lockpickinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == lockpickingXID)
				int lockpickinglvl = Math.Floor(playerRef.GetActorValue("lockpicking"))
				int lockpickingMcost = Math.Floor(lvlupMatch*lvlM*(lockpickinglvl*lvlAdjust))
				int lockpickingNcost = Math.Floor(lvlupMatch*lvlN*(lockpickinglvl*lvlAdjust))
				int lockpickingXcost = Math.Floor(lvlupMatch*lvlX*(lockpickinglvl*lvlAdjust))
			if HeartXP >= lockpickingXcost
				HeartXP -= lockpickingXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("lockpicking")
				Debug.MessageBox("Lockpicking Increased to "+(lockpickinglvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Marksman
		elseIf(option == marksmanHID)
				int marksmanlvl = Math.Floor(playerRef.GetActorValue("marksman"))
				int marksmanMcost = Math.Floor(lvlupMatch*lvlM*(marksmanlvl*lvlAdjust))
				int marksmanNcost = Math.Floor(lvlupMatch*lvlN*(marksmanlvl*lvlAdjust))
				int marksmanXcost = Math.Floor(lvlupMatch*lvlX*(marksmanlvl*lvlAdjust))
			if playerHealth >= marksmanNcost
				playerHealth -= marksmanNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",marksmanNcost)
				Game.IncrementSkill("marksman")
				Debug.MessageBox("Marksman Increased to "+(marksmanlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == marksmanMID)
				int marksmanlvl = Math.Floor(playerRef.GetActorValue("marksman"))
				int marksmanMcost = Math.Floor(lvlupMatch*lvlM*(marksmanlvl*lvlAdjust))
				int marksmanNcost = Math.Floor(lvlupMatch*lvlN*(marksmanlvl*lvlAdjust))
				int marksmanXcost = Math.Floor(lvlupMatch*lvlX*(marksmanlvl*lvlAdjust))
			if playerMagicka >= marksmanNcost
				playerMagicka -= marksmanNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",marksmanNcost)
				Game.IncrementSkill("marksman")
				Debug.MessageBox("Marksman Increased to "+(marksmanlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == marksmanSID)
				int marksmanlvl = Math.Floor(playerRef.GetActorValue("marksman"))
				int marksmanMcost = Math.Floor(lvlupMatch*lvlM*(marksmanlvl*lvlAdjust))
				int marksmanNcost = Math.Floor(lvlupMatch*lvlN*(marksmanlvl*lvlAdjust))
				int marksmanXcost = Math.Floor(lvlupMatch*lvlX*(marksmanlvl*lvlAdjust))
			if playerStamina >= marksmanMcost
				playerStamina -= marksmanMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",marksmanMcost)
				Game.IncrementSkill("marksman")
				Debug.MessageBox("Marksman Increased to "+(marksmanlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == marksmanXID)
				int marksmanlvl = Math.Floor(playerRef.GetActorValue("marksman"))
				int marksmanMcost = Math.Floor(lvlupMatch*lvlM*(marksmanlvl*lvlAdjust))
				int marksmanNcost = Math.Floor(lvlupMatch*lvlN*(marksmanlvl*lvlAdjust))
				int marksmanXcost = Math.Floor(lvlupMatch*lvlX*(marksmanlvl*lvlAdjust))
			if HeartXP >= marksmanXcost
				HeartXP -= marksmanXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("marksman")
				Debug.MessageBox("Marksman Increased to "+(marksmanlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ One-Handed
		elseIf(option == onehandedHID)
				int onehandedlvl = Math.Floor(playerRef.GetActorValue("onehanded"))
				int onehandedMcost = Math.Floor(lvlupMatch*lvlM*(onehandedlvl*lvlAdjust))
				int onehandedNcost = Math.Floor(lvlupMatch*lvlN*(onehandedlvl*lvlAdjust))
				int onehandedXcost = Math.Floor(lvlupMatch*lvlX*(onehandedlvl*lvlAdjust))
			if playerHealth >= onehandedMcost
				playerHealth -= onehandedMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",onehandedMcost)
				Game.IncrementSkill("onehanded")
				Debug.MessageBox("One-Handed Increased to "+(onehandedlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == onehandedMID)
				int onehandedlvl = Math.Floor(playerRef.GetActorValue("onehanded"))
				int onehandedMcost = Math.Floor(lvlupMatch*lvlM*(onehandedlvl*lvlAdjust))
				int onehandedNcost = Math.Floor(lvlupMatch*lvlN*(onehandedlvl*lvlAdjust))
				int onehandedXcost = Math.Floor(lvlupMatch*lvlX*(onehandedlvl*lvlAdjust))
			if playerMagicka >= onehandedNcost
				playerMagicka -= onehandedNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",onehandedNcost)
				Game.IncrementSkill("onehanded")
				Debug.MessageBox("One-Handed Increased to "+(onehandedlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == onehandedSID)
				int onehandedlvl = Math.Floor(playerRef.GetActorValue("onehanded"))
				int onehandedMcost = Math.Floor(lvlupMatch*lvlM*(onehandedlvl*lvlAdjust))
				int onehandedNcost = Math.Floor(lvlupMatch*lvlN*(onehandedlvl*lvlAdjust))
				int onehandedXcost = Math.Floor(lvlupMatch*lvlX*(onehandedlvl*lvlAdjust))
			if playerStamina >= onehandedNcost
				playerStamina -= onehandedNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",onehandedNcost)
				Game.IncrementSkill("onehanded")
				Debug.MessageBox("One-Handed Increased to "+(onehandedlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == onehandedXID)
				int onehandedlvl = Math.Floor(playerRef.GetActorValue("onehanded"))
				int onehandedMcost = Math.Floor(lvlupMatch*lvlM*(onehandedlvl*lvlAdjust))
				int onehandedNcost = Math.Floor(lvlupMatch*lvlN*(onehandedlvl*lvlAdjust))
				int onehandedXcost = Math.Floor(lvlupMatch*lvlX*(onehandedlvl*lvlAdjust))
			if HeartXP >= onehandedXcost
				HeartXP -= onehandedXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("onehanded")
				Debug.MessageBox("One-Handed Increased to "+(onehandedlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Pickpocket
		elseIf(option == pickpocketHID)
				int pickpocketlvl = Math.Floor(playerRef.GetActorValue("pickpocket"))
				int pickpocketMcost = Math.Floor(lvlupMatch*lvlM*(pickpocketlvl*lvlAdjust))
				int pickpocketXcost = Math.Floor(lvlupMatch*lvlX*(pickpocketlvl*lvlAdjust))
			if playerHealth >= pickpocketMcost
				playerHealth -= pickpocketMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",pickpocketMcost)
				Game.IncrementSkill("pickpocket")
				Debug.MessageBox("Pickpocket Increased to "+(pickpocketlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == pickpocketMID)
				int pickpocketlvl = Math.Floor(playerRef.GetActorValue("pickpocket"))
				int pickpocketMcost = Math.Floor(lvlupMatch*lvlM*(pickpocketlvl*lvlAdjust))
				int pickpocketXcost = Math.Floor(lvlupMatch*lvlX*(pickpocketlvl*lvlAdjust))
			if playerMagicka >= pickpocketMcost
				playerMagicka -= pickpocketMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",pickpocketMcost)
				Game.IncrementSkill("pickpocket")
				Debug.MessageBox("Pickpocket Increased to "+(pickpocketlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == pickpocketSID)
				int pickpocketlvl = Math.Floor(playerRef.GetActorValue("pickpocket"))
				int pickpocketMcost = Math.Floor(lvlupMatch*lvlM*(pickpocketlvl*lvlAdjust))
				int pickpocketXcost = Math.Floor(lvlupMatch*lvlX*(pickpocketlvl*lvlAdjust))
			if playerStamina >= pickpocketMcost
				playerStamina -= pickpocketMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",pickpocketMcost)
				Game.IncrementSkill("pickpocket")
				Debug.MessageBox("Pickpocket Increased to "+(pickpocketlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == pickpocketXID)
				int pickpocketlvl = Math.Floor(playerRef.GetActorValue("pickpocket"))
				int pickpocketMcost = Math.Floor(lvlupMatch*lvlM*(pickpocketlvl*lvlAdjust))
				int pickpocketXcost = Math.Floor(lvlupMatch*lvlX*(pickpocketlvl*lvlAdjust))
			if HeartXP >= pickpocketXcost
				HeartXP -= pickpocketXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("pickpocket")
				Debug.MessageBox("Pickpocket Increased to "+(pickpocketlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Restoration
		elseIf(option == restorationHID)
				int restorationlvl = Math.Floor(playerRef.GetActorValue("restoration"))
				int restorationMcost = Math.Floor(lvlupMatch*lvlM*(restorationlvl*lvlAdjust))
				int restorationNcost = Math.Floor(lvlupMatch*lvlN*(restorationlvl*lvlAdjust))
				int restorationXcost = Math.Floor(lvlupMatch*lvlX*(restorationlvl*lvlAdjust))
			if playerHealth >= restorationNcost
				playerHealth -= restorationNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",restorationNcost)
				Game.IncrementSkill("restoration")
				Debug.MessageBox("Restoration Increased to "+(restorationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == restorationMID)
				int restorationlvl = Math.Floor(playerRef.GetActorValue("restoration"))
				int restorationMcost = Math.Floor(lvlupMatch*lvlM*(restorationlvl*lvlAdjust))
				int restorationNcost = Math.Floor(lvlupMatch*lvlN*(restorationlvl*lvlAdjust))
				int restorationXcost = Math.Floor(lvlupMatch*lvlX*(restorationlvl*lvlAdjust))
			if playerMagicka >= restorationMcost
				playerMagicka -= restorationMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",restorationMcost)
				Game.IncrementSkill("restoration")
				Debug.MessageBox("Restoration Increased to "+(restorationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == restorationSID)
				int restorationlvl = Math.Floor(playerRef.GetActorValue("restoration"))
				int restorationMcost = Math.Floor(lvlupMatch*lvlM*(restorationlvl*lvlAdjust))
				int restorationNcost = Math.Floor(lvlupMatch*lvlN*(restorationlvl*lvlAdjust))
				int restorationXcost = Math.Floor(lvlupMatch*lvlX*(restorationlvl*lvlAdjust))
			if playerStamina >= restorationNcost
				playerStamina -= restorationNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",restorationNcost)
				Game.IncrementSkill("restoration")
				Debug.MessageBox("Restoration Increased to "+(restorationlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == restorationXID)
				int restorationlvl = Math.Floor(playerRef.GetActorValue("restoration"))
				int restorationMcost = Math.Floor(lvlupMatch*lvlM*(restorationlvl*lvlAdjust))
				int restorationNcost = Math.Floor(lvlupMatch*lvlN*(restorationlvl*lvlAdjust))
				int restorationXcost = Math.Floor(lvlupMatch*lvlX*(restorationlvl*lvlAdjust))
			if HeartXP >= restorationXcost
				HeartXP -= restorationXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("restoration")
				Debug.MessageBox("Restoration Increased to "+(restorationlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Smithing
		elseIf(option == smithingHID)
				int smithinglvl = Math.Floor(playerRef.GetActorValue("smithing"))
				int smithingMcost = Math.Floor(lvlupMatch*lvlM*(smithinglvl*lvlAdjust))
				int smithingXcost = Math.Floor(lvlupMatch*lvlX*(smithinglvl*lvlAdjust))
			if playerHealth >= smithingMcost
				playerHealth -= smithingMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",smithingMcost)
				Game.IncrementSkill("smithing")
				Debug.MessageBox("Smithing Increased to "+(smithinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == smithingMID)
				int smithinglvl = Math.Floor(playerRef.GetActorValue("smithing"))
				int smithingMcost = Math.Floor(lvlupMatch*lvlM*(smithinglvl*lvlAdjust))
				int smithingXcost = Math.Floor(lvlupMatch*lvlX*(smithinglvl*lvlAdjust))
			if playerMagicka >= smithingMcost
				playerMagicka -= smithingMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",smithingMcost)
				Game.IncrementSkill("smithing")
				Debug.MessageBox("Smithing Increased to "+(smithinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == smithingSID)
				int smithinglvl = Math.Floor(playerRef.GetActorValue("smithing"))
				int smithingMcost = Math.Floor(lvlupMatch*lvlM*(smithinglvl*lvlAdjust))
				int smithingXcost = Math.Floor(lvlupMatch*lvlX*(smithinglvl*lvlAdjust))
			if playerStamina >= smithingMcost
				playerStamina -= smithingMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",smithingMcost)
				Game.IncrementSkill("smithing")
				Debug.MessageBox("Smithing Increased to "+(smithinglvl+1))
				ForcePageReset()
			endIf
		elseIf(option == smithingXID)
				int smithinglvl = Math.Floor(playerRef.GetActorValue("smithing"))
				int smithingMcost = Math.Floor(lvlupMatch*lvlM*(smithinglvl*lvlAdjust))
				int smithingXcost = Math.Floor(lvlupMatch*lvlX*(smithinglvl*lvlAdjust))
			if HeartXP >= smithingXcost
				HeartXP -= smithingXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("smithing")
				Debug.MessageBox("Smithing Increased to "+(smithinglvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Sneak
		elseIf(option == sneakHID)
				int sneaklvl = Math.Floor(playerRef.GetActorValue("sneak"))
				int sneakMcost = Math.Floor(lvlupMatch*lvlM*(sneaklvl*lvlAdjust))
				int sneakNcost = Math.Floor(lvlupMatch*lvlN*(sneaklvl*lvlAdjust))
				int sneakXcost = Math.Floor(lvlupMatch*lvlX*(sneaklvl*lvlAdjust))
			if playerHealth >= sneakNcost
				playerHealth -= sneakNcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",sneakNcost)
				Game.IncrementSkill("sneak")
				Debug.MessageBox("Sneak Increased to "+(sneaklvl+1))
				ForcePageReset()
			endIf
		elseIf(option == sneakMID)
				int sneaklvl = Math.Floor(playerRef.GetActorValue("sneak"))
				int sneakMcost = Math.Floor(lvlupMatch*lvlM*(sneaklvl*lvlAdjust))
				int sneakNcost = Math.Floor(lvlupMatch*lvlN*(sneaklvl*lvlAdjust))
				int sneakXcost = Math.Floor(lvlupMatch*lvlX*(sneaklvl*lvlAdjust))
			if playerMagicka >= sneakNcost
				playerMagicka -= sneakNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",sneakNcost)
				Game.IncrementSkill("sneak")
				Debug.MessageBox("Sneak Increased to "+(sneaklvl+1))
				ForcePageReset()
			endIf
		elseIf(option == sneakSID)
				int sneaklvl = Math.Floor(playerRef.GetActorValue("sneak"))
				int sneakMcost = Math.Floor(lvlupMatch*lvlM*(sneaklvl*lvlAdjust))
				int sneakNcost = Math.Floor(lvlupMatch*lvlN*(sneaklvl*lvlAdjust))
				int sneakXcost = Math.Floor(lvlupMatch*lvlX*(sneaklvl*lvlAdjust))
			if playerStamina >= sneakMcost
				playerStamina -= sneakMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",sneakMcost)
				Game.IncrementSkill("sneak")
				Debug.MessageBox("Sneak Increased to "+(sneaklvl+1))
				ForcePageReset()
			endIf
		elseIf(option == sneakXID)
				int sneaklvl = Math.Floor(playerRef.GetActorValue("sneak"))
				int sneakMcost = Math.Floor(lvlupMatch*lvlM*(sneaklvl*lvlAdjust))
				int sneakNcost = Math.Floor(lvlupMatch*lvlN*(sneaklvl*lvlAdjust))
				int sneakXcost = Math.Floor(lvlupMatch*lvlX*(sneaklvl*lvlAdjust))
			if HeartXP >= sneakXcost
				HeartXP -= sneakXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("sneak")
				Debug.MessageBox("Sneak Increased to "+(sneaklvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Speechcraft
		elseIf(option == speechcraftHID)
				int speechcraftlvl = Math.Floor(playerRef.GetActorValue("speechcraft"))
				int speechcraftMcost = Math.Floor(lvlupMatch*lvlM*(speechcraftlvl*lvlAdjust))
				int speechcraftXcost = Math.Floor(lvlupMatch*lvlX*(speechcraftlvl*lvlAdjust))
			if playerHealth >= speechcraftMcost
				playerHealth -= speechcraftMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",speechcraftMcost)
				Game.IncrementSkill("speechcraft")
				Debug.MessageBox("Speechcraft Increased to "+(speechcraftlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == speechcraftMID)
				int speechcraftlvl = Math.Floor(playerRef.GetActorValue("speechcraft"))
				int speechcraftMcost = Math.Floor(lvlupMatch*lvlM*(speechcraftlvl*lvlAdjust))
				int speechcraftXcost = Math.Floor(lvlupMatch*lvlX*(speechcraftlvl*lvlAdjust))
			if playerMagicka >= speechcraftMcost
				playerMagicka -= speechcraftMcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",speechcraftMcost)
				Game.IncrementSkill("speechcraft")
				Debug.MessageBox("Speechcraft Increased to "+(speechcraftlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == speechcraftSID)
				int speechcraftlvl = Math.Floor(playerRef.GetActorValue("speechcraft"))
				int speechcraftMcost = Math.Floor(lvlupMatch*lvlM*(speechcraftlvl*lvlAdjust))
				int speechcraftXcost = Math.Floor(lvlupMatch*lvlX*(speechcraftlvl*lvlAdjust))
			if playerStamina >= speechcraftMcost
				playerStamina -= speechcraftMcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",speechcraftMcost)
				Game.IncrementSkill("speechcraft")
				Debug.MessageBox("Speechcraft Increased to "+(speechcraftlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == speechcraftXID)
				int speechcraftlvl = Math.Floor(playerRef.GetActorValue("speechcraft"))
				int speechcraftMcost = Math.Floor(lvlupMatch*lvlM*(speechcraftlvl*lvlAdjust))
				int speechcraftXcost = Math.Floor(lvlupMatch*lvlX*(speechcraftlvl*lvlAdjust))
			if HeartXP >= speechcraftXcost
				HeartXP -= speechcraftXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("speechcraft")
				Debug.MessageBox("Speechcraft Increased to "+(speechcraftlvl+1))
				ForcePageReset()
			endIf
		;end/
		;ent/ Two-Handed
		elseIf(option == twohandedHID)
				int twohandedlvl = Math.Floor(playerRef.GetActorValue("twohanded"))
				int twohandedMcost = Math.Floor(lvlupMatch*lvlM*(twohandedlvl*lvlAdjust))
				int twohandedNcost = Math.Floor(lvlupMatch*lvlN*(twohandedlvl*lvlAdjust))
				int twohandedXcost = Math.Floor(lvlupMatch*lvlX*(twohandedlvl*lvlAdjust))
			if playerHealth >= twohandedMcost
				playerHealth -= twohandedMcost
				playerRef.SetActorValue("health", playerHealth)
				playerRef.RestoreActorValue("health",twohandedMcost)
				Game.IncrementSkill("twohanded")
				Debug.MessageBox("Two-Handed Increased to "+(twohandedlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == twohandedMID)
				int twohandedlvl = Math.Floor(playerRef.GetActorValue("twohanded"))
				int twohandedMcost = Math.Floor(lvlupMatch*lvlM*(twohandedlvl*lvlAdjust))
				int twohandedNcost = Math.Floor(lvlupMatch*lvlN*(twohandedlvl*lvlAdjust))
				int twohandedXcost = Math.Floor(lvlupMatch*lvlX*(twohandedlvl*lvlAdjust))
			if playerMagicka >= twohandedNcost
				playerMagicka -= twohandedNcost
				playerRef.SetActorValue("magicka", playerMagicka)
				playerRef.RestoreActorValue("magicka",twohandedNcost)
				Game.IncrementSkill("twohanded")
				Debug.MessageBox("Two-Handed Increased to "+(twohandedlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == twohandedSID)
				int twohandedlvl = Math.Floor(playerRef.GetActorValue("twohanded"))
				int twohandedMcost = Math.Floor(lvlupMatch*lvlM*(twohandedlvl*lvlAdjust))
				int twohandedNcost = Math.Floor(lvlupMatch*lvlN*(twohandedlvl*lvlAdjust))
				int twohandedXcost = Math.Floor(lvlupMatch*lvlX*(twohandedlvl*lvlAdjust))
			if playerStamina >= twohandedNcost
				playerStamina -= twohandedNcost
				playerRef.SetActorValue("stamina", playerStamina)
				playerRef.RestoreActorValue("stamina",twohandedNcost)
				Game.IncrementSkill("twohanded")
				Debug.MessageBox("Two-Handed Increased to "+(twohandedlvl+1))
				ForcePageReset()
			endIf
		elseIf(option == twohandedXID)
				int twohandedlvl = Math.Floor(playerRef.GetActorValue("twohanded"))
				int twohandedMcost = Math.Floor(lvlupMatch*lvlM*(twohandedlvl*lvlAdjust))
				int twohandedNcost = Math.Floor(lvlupMatch*lvlN*(twohandedlvl*lvlAdjust))
				int twohandedXcost = Math.Floor(lvlupMatch*lvlX*(twohandedlvl*lvlAdjust))
			if HeartXP >= twohandedXcost
				HeartXP -= twohandedXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				Game.IncrementSkill("twohanded")
				Debug.MessageBox("Two-Handed Increased to "+(twohandedlvl+1))
				ForcePageReset()
			endIf
		;end/
	;end/
	;ent/ Heart Levels
		;ent/ Health Absorb
		elseIf(option == incabsorbHID)
				int healthlvl = Math.Floor(SuH_PCShpabsorb.GetValue())
				int healthXcost = Math.Floor(lvlupMatch*lvlX*(healthlvl*lvlAdjust))
			if HeartXP >= healthXcost
				HeartXP -= healthXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int playerAbsorbH = Math.Floor(SuH_PCShpabsorb.getValue())
				playerAbsorbH += 1
				SuH_PCShpabsorb.SetValue(playerAbsorbH)
				debug.MessageBox("Health Absorption Increased to "+playerAbsorbH)
				ForcePageReset()
			endIf
		;end/
		;ent/ Magicka Absorb
		elseIf(option == incabsorbMID)
				int magiclvl = Math.Floor(SuH_PCSmpabsorb.GetValue())
				int magicXcost = Math.Floor(lvlupMatch*lvlX*(magiclvl*lvlAdjust))
			if HeartXP >= magicXcost
				HeartXP -= magicXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int playerAbsorbM = Math.Floor(SuH_PCSmpabsorb.getValue())
				playerAbsorbM += 1
				SuH_PCSmpabsorb.SetValue(playerAbsorbM)
				debug.MessageBox("Magic Absorption Increased to "+playerAbsorbM)
				ForcePageReset()
			endIf
		;end/
		;ent/ Stamina Absorb
		elseIf(option == incabsorbSID)
				int energylvl = Math.Floor(SuH_PCSspabsorb.GetValue())
				int energyXcost = Math.Floor(lvlupMatch*lvlX*(energylvl*lvlAdjust))
			if HeartXP >= energyXcost
				HeartXP -= energyXcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int playerAbsorbS = Math.Floor(SuH_PCSspabsorb.getValue())
				playerAbsorbS += 1
				SuH_PCSspabsorb.SetValue(playerAbsorbS)
				debug.MessageBox("Stamina Absorption Increased to "+playerAbsorbS)
				ForcePageReset()
			endIf
		;end/
		;ent/ HeartXP Gain
		elseIf(option == incXPgainID)
				int HeartXPlvl = Math.Floor(SuH_PCSheartXPgain.GetValue() - 99)
				int HeartXPcost = Math.Floor(lvlupMatch*lvlX*(HeartXPlvl*lvlAdjust))
			if HeartXP >= HeartXPcost
				HeartXP -= HeartXPcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int playerXPgain = Math.Floor(SuH_PCSheartXPgain.getValue())
				playerXPgain += 1
				SuH_PCSheartXPgain.SetValue(playerXPgain)
				debug.MessageBox("HeartXP Gain Increased to "+playerXPgain+"%")
				ForcePageReset()
			endIf
		;end/
		;ent/ Sperm Health
		elseIf(option == spermehID)
				int spermHlvl = Math.Floor(SuH_PCSspermhvalue.GetValue())
				int spermHcost = Math.Floor(lvlupMatch*lvlX*(spermHlvl*lvlAdjust))
			if HeartXP >= spermHcost
				HeartXP -= spermHcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int spermh = Math.Floor(SuH_PCSspermhvalue.getValue())
				spermh += 1
				SuH_PCSspermhvalue.SetValue(spermh)
				debug.MessageBox("Health Sperm Effect Increased to "+spermh)
				ForcePageReset()
			endIf
		;end/
		;ent/ Sperm Magicka
		elseIf(option == spermemID)
				int spermMlvl = Math.Floor(SuH_PCSspermmvalue.GetValue())
				int spermMcost = Math.Floor(lvlupMatch*lvlX*(spermMlvl*lvlAdjust))
			if HeartXP >= spermMcost
				HeartXP -= spermMcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int spermm = Math.Floor(SuH_PCSspermmvalue.getValue())
				spermm += 1
				SuH_PCSspermmvalue.SetValue(spermm)
				debug.MessageBox("Magicka Sperm Effect Increased to "+spermm)
				ForcePageReset()
			endIf
		;end/
		;ent/ Sperm Stamina
		elseIf(option == spermesID)
				int spermSlvl = Math.Floor(SuH_PCSspermsvalue.GetValue())
				int spermScost = Math.Floor(lvlupMatch*lvlX*(spermSlvl*lvlAdjust))
			if HeartXP >= spermScost
				HeartXP -= spermScost
				SuH_PCSheartXP.SetValue(HeartXP)
				int sperms = Math.Floor(SuH_PCSspermsvalue.getValue())
				sperms += 1
				SuH_PCSspermsvalue.SetValue(sperms)
				debug.MessageBox("Stamina Sperm Effect Increased to "+sperms)
				ForcePageReset()
			endIf
		;end/
		;ent/ Milk Health
		elseIf(option == milkehID)
				int milkHlvl = Math.Floor(SuH_PCSmilkhvalue.GetValue())
				int milkHcost = Math.Floor(lvlupMatch*lvlX*(milkHlvl*lvlAdjust))
			if HeartXP >= milkHcost
				HeartXP -= milkHcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int milkh = Math.Floor(SuH_PCSmilkhvalue.GetValue())
				milkh += 1
				SuH_PCSmilkhvalue.SetValue(milkh)
				debug.MessageBox("Health Milk Effect Increased to "+milkh)
				ForcePageReset()
			endIf
		;end/
		;ent/ Milk Magicka
		elseIf(option == milkemID)
				int milkMlvl = Math.Floor(SuH_PCSmilkmvalue.GetValue())
				int milkMcost = Math.Floor(lvlupMatch*lvlX*(milkMlvl*lvlAdjust))
			if HeartXP >= milkMcost
				HeartXP -= milkMcost
				SuH_PCSheartXP.SetValue(HeartXP)
				int milkm = Math.Floor(SuH_PCSmilkmvalue.GetValue())
				milkm += 1
				SuH_PCSmilkmvalue.SetValue(milkm)
				debug.MessageBox("Magicka Milk Effect Increased to "+milkm)
				ForcePageReset()
			endIf
		;end/
		;ent/ Milk Stamina
		elseIf(option == milkesID)
				int milkSlvl = Math.Floor(SuH_PCSmilksvalue.GetValue())
				int milkScost = Math.Floor(lvlupMatch*lvlX*(milkSlvl*lvlAdjust))
			if HeartXP >= milkScost
				HeartXP -= milkScost
				SuH_PCSheartXP.SetValue(HeartXP)
				int milks = Math.Floor(SuH_PCSmilksvalue.GetValue())
				milks += 1
				SuH_PCSmilksvalue.SetValue(milks)
				debug.MessageBox("Stamina Milk Effect Increased to "+milks)
				ForcePageReset()
			endIf
		;end/
	;end/
	;ent/ Spells and Passives
		;ent/ Casting Spells
		elseIf(option == ssFocusShotID)
			If(playerRef.HasSpell(SuH_ss_focusshot))
			else
				playerRef.AddSpell(SuH_ss_focusshot)
				debug.MessageBox("Focus Shot has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssDarkPierceID)
			If(playerRef.HasSpell(SuH_ss_darkpierce))
			elseIf HeartXP >= 600
				HeartXP -= 600
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_darkpierce)
				debug.MessageBox("Dark Pierce has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssSilentKissID)
			If(playerRef.HasSpell(SuH_ss_silentkiss))
			else
				playerRef.AddSpell(SuH_ss_silentkiss)
				debug.MessageBox("Silent Kiss has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssSexualEnrageID)
			If(playerRef.HasSpell(SuH_ss_sexualenrage))
			else
				playerRef.AddSpell(SuH_ss_sexualenrage)
				debug.MessageBox("Sexual Enrage has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssCreatureClaimID)
			If(playerRef.HasSpell(SuH_ss_creatureclaim))
			elseIf HeartXP >= 8000
				HeartXP -= 8000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_creatureclaim)
				debug.MessageBox("Creature Claim has been learned")
				ForcePageReset()
			endIf
		elseIf(option == sstManaShroudID)
			If(playerRef.HasSpell(SuH_sst_manashroud))
			elseIf HeartXP >= 4500
				HeartXP -= 4500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sst_manashroud)
				debug.MessageBox("Mana Shroud has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssConsumeHealthID)
			If(playerRef.HasSpell(SuH_ss_consumehealth))
			elseIf HeartXP >= 3500
				HeartXP -= 3500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_consumehealth)
				debug.MessageBox("Consume Health has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssConsumeMagickaID)
			If(playerRef.HasSpell(SuH_ss_consumemagicka))
			elseIf HeartXP >= 3500
				HeartXP -= 3500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_consumemagicka)
				debug.MessageBox("Consume Magicka has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssManaBreakID)
			If(playerRef.HasSpell(SuH_ss_manabreak))
			elseIf HeartXP >= 5000
				HeartXP -= 5000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_manabreak)
				debug.MessageBox("Mana Break has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssBloodDropID)
			If(playerRef.HasSpell(SuH_ss_blooddrop))
			elseIf HeartXP >= 500
				HeartXP -= 500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_blooddrop)
				debug.MessageBox("Blood Drop has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssManaDropID)
			If(playerRef.HasSpell(SuH_ss_manadrop))
			elseIf HeartXP >= 500
				HeartXP -= 500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_manadrop)
				debug.MessageBox("Mana Drop has been learned")
				ForcePageReset()
			endIf
		elseIf(option == ssPowerDropID)
			If(playerRef.HasSpell(SuH_ss_powerdrop))
			elseIf HeartXP >= 500
				HeartXP -= 500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_ss_powerdrop)
				debug.MessageBox("Power Drop has been learned")
				ForcePageReset()
			endIf
		;end/
		;ent/ Heart Passives Tier 1
		elseIf(option == spSuccubusProwlID)
			if(playerRef.HasMagicEffect(SuH_sp_succubusprowleffect))
			else
				playerRef.AddSpell(SuH_sp_succubusprowl)
				debug.MessageBox("Succubus Prowl has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spHealthyDelightID)
			if(playerRef.HasMagicEffect(SuH_sp_healthydelightseffect) || playerRef.HasMagicEffect(SuH_sp_healthydelights2effect))
			elseIf HeartXP >= 800
				HeartXP -= 800
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_healthydelights)
				debug.MessageBox("Healthy Delights has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spShiningDelightID)
			if(playerRef.HasMagicEffect(SuH_sp_shiningdelightseffect) || playerRef.HasMagicEffect(SuH_sp_shiningdelights2effect))
			elseIf HeartXP >= 800
				HeartXP -= 800
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_shiningdelights)
				debug.MessageBox("Shining Delights has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spSugaryDelightID)
			if(playerRef.HasMagicEffect(SuH_sp_sugarydelightseffect) || playerRef.HasMagicEffect(SuH_sp_sugarydelights2effect))
			elseIf HeartXP >= 800
				HeartXP -= 800
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_sugarydelights)
				debug.MessageBox("Sugary Delights has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spHealthyMilkID)
			if(playerRef.HasMagicEffect(SuH_sp_healthymilkeffect) || playerRef.HasMagicEffect(SuH_sp_healthymilk2effect))
			elseIf HeartXP >= 800
				HeartXP -= 800
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_healthymilk)
				debug.MessageBox("Healthy Milk has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spShiningMilkID)
			if(playerRef.HasMagicEffect(SuH_sp_shiningmilkeffect) || playerRef.HasMagicEffect(SuH_sp_shiningmilk2effect))
			elseIf HeartXP >= 800
				HeartXP -= 800
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_shiningmilk)
				debug.MessageBox("Shining Milk has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spSugaryMilkID)
			if(playerRef.HasMagicEffect(SuH_sp_sugarymilkeffect) || playerRef.HasMagicEffect(SuH_sp_sugarymilk2effect))
			elseIf HeartXP >= 800
				HeartXP -= 800
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_sugarymilk)
				debug.MessageBox("Sugary Milk has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spPerfectOrgasmID)
			if(playerRef.HasMagicEffect(SuH_sp_perfectorgasmeffect))
			elseIf HeartXP >= 1400
				HeartXP -= 1400
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_perfectorgasm)
				debug.MessageBox("Perfect Orgasm has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spSpecialLoverID)
			if(playerRef.HasMagicEffect(SuH_sp_speciallovereffect))
			elseIf HeartXP >= 600
				HeartXP -= 600
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_speciallover)
				debug.MessageBox("Special Lover has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spCaringLoverID)
			if(playerRef.HasMagicEffect(SuH_sp_caringlovereffect))
			elseIf HeartXP >= 1000
				HeartXP -= 1000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_caringlover)
				debug.MessageBox("Caring Lover has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spMagicalLoverID)
			if(playerRef.HasMagicEffect(SuH_sp_magicallovereffect))
			elseIf HeartXP >= 1000
				HeartXP -= 1000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_magicallover)
				debug.MessageBox("Magical Lover has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spLastingLoverID)
			if(playerRef.HasMagicEffect(SuH_sp_lastinglovereffect))
			elseIf HeartXP >= 1000
				HeartXP -= 1000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_lastinglover)
				debug.MessageBox("Lasting Lover has been learned")
				ForcePageReset()
			endIf
		;end/
		;ent/ Heart Passives Tier 2
		elseIf(option == stHeartTier2ID)
			if(SuH_PCShearttier.GetValue() > 1)
			elseIf HeartXP >= 3500
				HeartXp -= 3500
				SuH_PCSheartXP.SetValue(HeartXP)
				SuH_PCShearttier.SetValue(2)
				debug.MessageBox("Heart Tier 2 has been unlocked")
				ForcePageReset()
			endIf
		elseIf(option == spSeductiveDelightsID)
			if((playerRef.HasMagicEffect(SuH_sp_seductivedelightseffect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 3000
				HeartXP -= 3000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_seductivedelights)
				debug.MessageBox("Seductive Delights has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spHumanDesiresID)
			if((playerRef.HasMagicEffect(SuH_sp_humandesireseffect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2500
				HeartXP -= 2500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_humandesires)
				debug.MessageBox("Human Desires has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spAnimalDesiresID)
			if((playerRef.HasMagicEffect(SuH_sp_animaldesireseffect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2500
				HeartXP -= 2500
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_animaldesires)
				debug.MessageBox("Animal Desires has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spHealthyDelight2ID)
			if((playerRef.HasMagicEffect(SuH_sp_healthydelights2effect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_healthydelights2)
				playerRef.RemoveSpell(SuH_sp_healthydelights)
				debug.MessageBox("Healthy Delights II has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spShiningDelight2ID)
			if((playerRef.HasMagicEffect(SuH_sp_shiningdelights2effect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_shiningdelights2)
				playerRef.RemoveSpell(SuH_sp_shiningdelights)
				debug.MessageBox("Shining Delights II has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spSugaryDelight2ID)
			if((playerRef.HasMagicEffect(SuH_sp_sugarydelights2effect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_sugarydelights2)
				playerRef.RemoveSpell(SuH_sp_sugarydelights)
				debug.MessageBox("Sugary Delights II has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spSeductiveMilkID)
			if((playerRef.HasMagicEffect(SuH_sp_seductivemilkeffect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 3000
				HeartXP -= 3000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_seductivedelights)
				debug.MessageBox("Seductive Milk has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spHealthyMilk2ID)
			if((playerRef.HasMagicEffect(SuH_sp_healthymilk2effect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_healthymilk2)
				playerRef.RemoveSpell(SuH_sp_healthymilk)
				debug.MessageBox("Healthy Milk II has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spShiningMilk2ID)
			if((playerRef.HasMagicEffect(SuH_sp_shiningmilk2effect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_shiningmilk2)
				playerRef.RemoveSpell(SuH_sp_shiningmilk)
				debug.MessageBox("Shining Milk II has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spSugaryMilk2ID)
			if((playerRef.HasMagicEffect(SuH_sp_sugarymilk2effect)) && (SuH_PCShearttier.GetValue() > 1))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_sp_sugarymilk2)
				playerRef.RemoveSpell(SuH_sp_sugarymilk)
				debug.MessageBox("Sugary Milk II has been learned")
				ForcePageReset()
			endIf
		;end/
		;ent/ Meditation Passives
		elseIf(option == spTrainingStateID)
			If(playerRef.HasSpell(SuH_spt_trainingstate))
			elseIf HeartXP >= 4000
				HeartXP -= 4000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_spt_trainingstate)
				debug.MessageBox("Training State has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spHungerStateID)
			If(playerRef.HasSpell(SuH_spt_hungerstate))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_spt_hungerstate)
				debug.MessageBox("Hunger State has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spFocusedStateID)
			If(playerRef.HasSpell(SuH_spt_focusedstate))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_spt_focusedstate)
				debug.MessageBox("Focused State has been learned")
				ForcePageReset()
			endIf
		elseIf(option == spBracingStateID)
			If(playerRef.HasSpell(SuH_spt_bracingstate))
			elseIf HeartXP >= 2000
				HeartXP -= 2000
				SuH_PCSheartXP.SetValue(HeartXP)
				playerRef.AddSpell(SuH_spt_bracingstate)
				debug.MessageBox("Bracing State has been learned")
				ForcePageReset()
			endIf
		;end/
	;end/
	;Help
	
	endIf
endEvent
;end/
;ent/ OnOptionDefault
Event OnOptionDefault(int option)
	
endEvent
;end/
;ent/ OnOptionHighlight
Event OnOptionHighlight(int option)
	
	;ent/ Status
		;ent/ Character Options
			if(option == charactergenderID)
				SetInfoText("Your character's selected gender. This option effects various spells and passives.")
		;end/
	;ent/
	;ent/ Heart Spells
		;ent/ Battle Spells
			elseIf(option == ssFocusShotID)
				SetInfoText("Sacrifice 1 Stamina and damage the target for 10 Health (+1 HeartXP on hit)")
			elseIf(option == ssDarkPierceID)
				SetInfoText("Consume 20% of your Health/Magicka/Stamina and damage the target's Health/Magicka/Stamina by that amount")
			elseIf(option == ssManaBreakID)
				SetInfoText("Sacrifice 20 Magicka and drop the target's Magicka to 0")
		;end/
		;ent/ Seduction Spells
			elseIf(option == ssSilentKissID)
				SetInfoText("Attempt to seduce a consensual target by touch (100% Seduction Cost)")
			elseIf(option == ssSexualEnrageID)
				SetInfoText("Provoke a target to rape you by touch (100% Seduction Cost)")
			elseIf(option == ssCreatureClaimID)
				SetInfoText("Attempt to seduce a consensual creature by touch (60% Seduction Cost)")
		;end/
		;ent/ Utility Spells
			elseIf(option == ssConsumeHealthID)
				SetInfoText("Sacrifice 5 Health to recover 50% of missing Health")
			elseIf(option == ssConsumeMagickaID)
				SetInfoText("Sacrifice 5 Magicka to recover 50% of missing Magicka")
			elseIf(option == sstManaShroudID)
				SetInfoText("Turn Invisible by sacrificing 5 Magicka a second")
		;end/
		;ent/ Conversion Spells
			elseIf(option == ssBloodDropID)
				SetInfoText("Convert 100 Health into 200 HeartXP")
			elseIf(option == ssManaDropID)
				SetInfoText("Convert 100 Magicka into 200 HeartXP")
			elseIf(option == ssPowerDropID)
				SetInfoText("Convert 100 Stamina into 200 HeartXP")
		;end/
		;ent/ Heart Passives
			elseIf(option == spSuccubusProwlID)
				SetInfoText("Generate 1 Seduction Point every 5 seconds")
			elseIf(option == spHealthyDelightID)
				SetInfoText("Sperm will recover 25% of missing Health when consumed")
			elseIf(option == spShiningDelightID)
				SetInfoText("Sperm will recover 25% of missing Magicka when consumed")
			elseIf(option == spSugaryDelightID)
				SetInfoText("Sperm will recover 25% of missing Stamina when consumed")
			elseIf(option == spPerfectOrgasmID)
				SetInfoText("Orgasms will recover 75% of missing Health/Magicka/Stamina")
			elseIf(option == spSpecialLoverID)
				SetInfoText("Consensual partners recover 10% missing Health/Magicka/Stamina every 5 seconds")
			elseIf(option == spCaringLoverID)
				SetInfoText("Grants consensual partners with bonus Health (1/5sec)")
			elseIf(option == spMagicalLoverID)
				SetInfoText("Grants consensual partners with bonus Magicka (1/5sec)")
			elseIf(option == spLastingLoverID)
				SetInfoText("Grants consensual partners with bonus Stamina (1/5sec)")
			elseIf(option == stHeartTier2ID)
				SetInfoText("Unlock Tier 2 Heart Passives")
			elseIf(option == spSeductiveDelightsID)
				SetInfoText("Sperm grants 5 Seduction Points")
			elseIf(option == spHumanDesiresID)
				SetInfoText("Acts with Humanoids yields 50% more base HeartXP")
			elseIf(option == spAnimalDesiresID)
				SetInfoText("Acts with creatures yields 50% more base HeartXP")
			elseIf(option == spHealthyDelight2ID)
				SetInfoText("Sperm recovers 5% more Health (Requires Healthy Delights)")
			elseIf(option == spShiningDelight2ID)
				SetInfoText("Sperm recovers 5% more Magicka (Requires Shining Delights)")
			elseIf(option == spSugaryDelight2ID)
				SetInfoText("Sperm recovers 5% more Stamina (Requires Sugary Delights)")
			elseIf(option == spHealthyMilkID)
				SetInfoText("Breast Milk recovers 25% of missing Health when consumed")
			elseIf(option == spShiningMilkID)
				SetInfoText("Breast Milk recovers 25% of missing Magicka when consumed")
			elseIf(option == spSugaryMilkID)
				SetInfoText("Breast Milk recovers 25% of missing Stamina when consumed")
			elseIf(option == spHealthyMilk2ID)
				SetInfoText("Breast Milk recovers 5% more Health (Requires Healthy Milk)")
			elseIf(option == spShiningMilk2ID)
				SetInfoText("Breast Milk recovers 5% more Magicka (Requires Shining Milk)")
			elseIf(option == spSugaryMilk2ID)
				SetInfoText("Breast Milk recovers 5% more Stamina (Requires Sugary Milk)")
			elseIf(option == spSeductiveMilkID)
				SetInfoText("Breast Milk grants 5 Seduction Points")
		;end/
		;ent/ Meditation Passives
			elseIf(option == spTrainingStateID)
				SetInfoText("Grants HeartXP at 1/5sec")
			elseIf(option == spHungerStateID)
				SetInfoText("Consumes Health at 1/5sec for HeartXP at 5/5sec")
			elseIf(option == spFocusedStateID)
				SetInfoText("Consumes Magicka at 1/5sec for HeartXP at 5/5sec")
			elseIf(option == spBracingStateID)
				SetInfoText("Consumes Stamina at 1/5sec for HeartXP at 5/5sec")
		;end/
	;end/
	;ent/ Help
		;ent/ The Basics
			elseIf(option == hb1)
				SetInfoText("During sex you'll absorb the target's stats, this amount is effected by your absorption stats and the sex type. (100% for aggressor, 50% for consensual, 20% for victim. Consensual targets take no harm)")
			elseIf(option == hb2)
				SetInfoText("Upon orgasm male characters will give their partners sperm. There is a chance the character of receiving double and a chance of receiving none. Each male is polled separately (2 males will give 1 female 2 amounts).")
			elseIf(option == he15)
				SetInfoText("Upon orgasm female characters will give their partners breast milk. 2 breast milk items are always given. Each female is polled separately (2 females will give 1 male 2 amounts)")
			elseIf(option == hb3)
				SetInfoText("As a Succubus passives can be learned which have different effects. All passives are permanent however, with the exception of Heart passives, only one of each type may be active at a time (same-type passives will cancel eachother out).")
			elseIf(option == hb4)
				SetInfoText("In order to be successful with any seduction spells or dialogue you need to have enough Seduction Points. Upon a successful seduction the cost is taken from your current amount. Seduction Points are generated passively with the Succubus Prowl passive (learned automatically) and other passives / spells can also generate more.")
		;end/
		;ent/ Sperm System
			elseIf(option == he14)
				SetInfoText("Currently there are 4 normal types of sperm, Sweet, Sticky, Thick, and Warm. Each normal sperm has different alchemy related properties but all grant the same passives. There is also 1 rare type of sperm which gives additional HeartXP and double the stat bonus.")
		;end/
		;ent/ HeartXP System
			elseIf(option == he1)
				SetInfoText("HeartXP is earned though either sexual acts or succubus abilities. This amount varies from action to action.")
			elseIf(option == he2)
				SetInfoText("Being an aggressor grants 10/5sec, being a victim grands 2/5sec, and consensual grants 5/5sec. Consuming normal sperm will grant 2, perfect sperm will grant 20. (Note: These values are effected by the HeartXP Gain value)")
			elseIf(option == he3)
				SetInfoText("HeartXP is not used automatically, instead, once you've earned enough you can use this MCM to either level character Skills or improve your Succubus Abilities. Check out the other menus!")
			elseIf(option == he4)
				SetInfoText("The HeartXP Gain stat is the percentage of HeartXP you will earn through tasks. All native functions (sexual acts and Succubus Heart Spells) are effected by this stat unless specially noted. External mods may not use this modifier.")
			elseIf(option == he5)
				SetInfoText("Succubus Spells and Passives may also provide HeartXP when used. If a spell or passive does it will say so in its description.")
		;end/	
		;ent/ Absorption	
			elseIf(option == he6)
				SetInfoText("When in a sexual act you'll 'absorb' Health, Magicka, and Stamina along with earning HeartXP. Any act triggered by SexLab will trigger this effect.")
			elseIf(option == he7)
				SetInfoText("Different types of sex will have a different effect on the values. As an Aggressor absorb is at 100%, as a Victim absorb is at 20%, and in consensual absorb is at 50% but neither character is harmed.")
			elseIf(option == he8)
				SetInfoText("To increase absorption effects they must be leveled in the Heart Levels menu with HeartXP. These values represent 100% effect.")
			elseIf(option == he9)
				SetInfoText("Absorption will take Health, Magicka, and Stamina from the enemy. When they run out of health they will die, however they won't be killed (by Succubus Heart) until after sex ends. If the character runs out of Magicka or Stamina during drain it will then drain the desired amount out of health. (when out of stat the player won't absorb any more of said stat)")
		;end/
		;ent/ Succubus Spells
			elseIf(option == he10)
				SetInfoText("Battle Type Spells focus on damaging the enemy using your succubus powers. These spells work well with characters trying for a mage-like class, some spells even give HeartXP.")
		;end/
		;ent/ Passives
			elseIf(option == he11)
				SetInfoText("New passives can be learned in the Spells and Passives MCM menu. Heart Passives will take instant effect and always be active, however other types will need to be manually activated with the given spell. Only one passive of each type, aside from Heart passives, may be active at a time.")
			elseIf(option == he12)
				SetInfoText("To Cancel a passive simply re-cast the passive you wish to cancel. This is useful for passives that have drain or de-buffs attached. (Note: Heart passives can not be cancelled since there is no spell attached)")
			elseIf(option == he13)
				SetInfoText("Meditation Type Passives provide a way to earn HeartXP passively. Most Meditation Passives will have drain on them so make sure to cancel them when you're done using them!")
		;end/
			endIf
	;end/
	
	endEvent
;end/ 