glife/locations/Cheatmenu_din

# Cheatmenu_din
!All the active dynamics for the cheat menu are here
$cheatmenu['empty'] = {
	!Yes, intentionally empty, do not remove it
}

$cheatmenu['work'] = {
	if cheatWork = 0:
		cheatWork = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatWork = 1:
		cheatWork = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['hair'] = {
	if cheatHapri = 0:
		cheatHapri = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatHapri = 1:
		cheatHapri = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['enema'] = {
	if cheatKlisma = 0:
		cheatKlisma = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatKlisma = 1:
		cheatKlisma = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['nomakeup'] = {
	if cheatNomakeup = 0:
		cheatNomakeup = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatNomakeup = 1:
		cheatNomakeup = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['nosweat'] = {
	if cheatNosweat = 0:
		cheatNosweat = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatNosweat = 1:
		cheatNosweat = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['noEat'] = {
	if cheatNoEat = 0:
		cheatNoEat = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatNoEat = 1:
		cheatNoEat = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['noSleep'] = {
	if cheatNoSleep = 0:
		cheatNoSleep = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatNoSleep = 1:
		cheatNoSleep = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['health'] = {
	if cheatHealth = 0:
		cheatHealth = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatHealth = 1:
		cheatHealth = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['Pirate'] = {
	if cheatPirate = 0:
		cheatPirate = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatPirate = 1:
		cheatPirate = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['age'] = {
!!	age = input("How many years you are now?")
!!	if age <= 15:age = 15
	dynamic $cheatmenu['looks']
}

$cheatmenu['visualage'] = {
	vidage = input("For how many years you want to look?")
	if vidage <= 14:vidage = 14
	dynamic $cheatmenu['looks']
}

$cheatmenu['money'] = {
	money = input("How much money do you want to have?")
	if money < 0:money = 0
	dynamic $cheatmenu
}

$cheatmenu['bodyMod'] = {
   dounspell = 1
   TaliaDoun = input ("Waist in cm?")
   if TaliaDoun <= 0:TaliaDoun = 20
   bedraDoun = input ("Hips in cm?")
   if bedraDoun <= 0:bedraDoun = 40
}

$cheatmenu['addict'] = {
	if NarkImmune = 0:
		NarkImmune = 1
		dynamic $cheatmenu['permanent']
		exit
	elseif NarkImmune = 1:
		NarkImmune = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['slutshot'] = {
	if cheatSlut = 0:
		cheatSlut = 1
		cycle = 6
		dynamic $cheatmenu['permanent']
		exit
	elseif cheatSlut = 1:
		cheatSlut = 0
		cycle = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['Vibrator'] = {
	if cheatVib = 0:
		cheatVib = 1
		dynamic $cheatmenu['permanent']
	elseif cheatVib = 1:
		cheatVib = 0
		dynamic $cheatmenu['permanent']
	end
}

$cheatmenu['permanent'] = {
	gs'stat'
	clr
	if cheatWork = 0:$cheatWork = 'OFF'
	if cheatWork = 1:$cheatWork = '<b>ON</b>'
	if cheatHapri = 0:$cheatHapri = 'OFF'
	if cheatHapri = 1:$cheatHapri = '<b>ON</b>'
	if cheatKlisma = 0:$cheatKlisma = 'OFF'
	if cheatKlisma = 1:$cheatKlisma = '<b>ON</b>'
	if cheatNomakeup = 0:$cheatNomakeup = 'OFF'
	if cheatNomakeup = 1:$cheatNomakeup = '<b>ON</b>'
	if cheatNosweat = 0:$cheatNosweat = 'OFF'
	if cheatNosweat = 1:$cheatNosweat = '<b>ON</b>'
	if cheatNoEat = 0:$cheatNoEat = 'OFF'
	if cheatNoEat = 1:$cheatNoEat = '<b>ON</b>'
	if cheatNoSleep = 0:$cheatNoSleep = 'OFF'
	if cheatNoSleep = 1:$cheatNoSleep = '<b>ON</b>'
	if cheatHealth = 0:$cheatHealth = 'OFF'
	if cheatHealth = 1:$cheatHealth = '<b>ON</b>'
	if NarkImmune = 0:$NarkImmune = 'OFF'
	if NarkImmune = 1:$NarkImmune = '<b>ON</b>'
	if cheatSlut = 0:$cheatSlut = 'NO'
	if cheatSlut = 1:$cheatSlut = '<b>YES</b>'
	if cheatVib = 0:$cheatVib = 'NO'
	if cheatVib = 1:$cheatVib = '<b>YES</b>'
	if cheatpirate = 0:$cheatpirate = 'NO'
	if cheatpirate = 1:$cheatpirate = '<b>YES</b>'

	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''work'']">More than one job is possible</a>: <<$cheatWork>>'
	pl'<a href="exec:dynamic $cheatmenu[''hair'']">Always combed</a>: <<$cheatHapri>>'
	pl'<a href="exec:dynamic $cheatmenu[''enema'']">Always do an enema</a>: <<$cheatKlisma>>'
	pl'<a href="exec:dynamic $cheatmenu[''nomakeup'']">Cosmetics never smeared</a>: <<$cheatNomakeup>>'
	pl'<a href="exec:dynamic $cheatmenu[''nosweat'']">Never sweat</a>: <<$cheatNosweat>>'
	pl'<a href="exec:dynamic $cheatmenu[''noEat'']">Never eat or drink</a>: <<$cheatNoEat>>'
	pl'<a href="exec:dynamic $cheatmenu[''noSleep'']">Never sleep</a>: <<$cheatNoSleep>>'
	pl'<a href="exec:dynamic $cheatmenu[''health'']">Disable STDs</a>: <<$cheatHealth>>'
	pl'<a href="exec:dynamic $cheatmenu[''addict'']">Never get addicted</a>: <<$NarkImmune>>'
	if Enable_sforma = 1:
		pl' <a href="exec:Enable_sforma = 0 & dynamic $cheatmenu[''permanent'']">Allow any clothing for school: ON</a>'
	else
		pl' <a href="exec:Enable_sforma = 1 & dynamic $cheatmenu[''permanent'']">Allow any clothing for school: OFF</a>'
	end   
    pl''
	pl'<a href="exec:alko = 0 & dynamic $cheatmenu[''permanent'']">Sober</a>'
	pl'<a href="exec:alko = 2 & dynamic $cheatmenu[''permanent'']">Fluster</a>'
	pl'<a href="exec:alko = 4 & dynamic $cheatmenu[''permanent'']">Intoxicated</a>'
	pl'<a href="exec:alko = 7 & dynamic $cheatmenu[''permanent'']">Strongly drunk</a>'
	pl'<a href="exec:alko = 11 & dynamic $cheatmenu[''permanent'']">Drunk in dyminu</a>'
	pl'<a href="exec:dynamic $cheatmenu[''Vibrator'']">Enable sleeping with vibrator inserted</a>: <<$cheatVib>>'
	pl'<a href="exec:dynamic $cheatmenu[''Pirate'']">Pirate always horny</a>: <<$cheatpirate>>'
	pl''
	pl'<a href="exec:pcs_horny = 100 & dynamic $cheatmenu[''permanent'']">Excite</a>'
	pl'<a href="exec:pcs_horny = 0 & dynamic $cheatmenu[''permanent'']">Soothe</a>'
	pl'<a href="exec:dynamic $cheatmenu[''bodyMod''] & dynamic $cheatmenu[''permanent'']">Body Modification</a>'
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''slutshot'']">Slut shot: Turn off pregnancy and periods</a>: <<$cheatSlut>>'
	pl''
	if Enable_autotampon = 1:
		pl' <a href="exec:Enable_autotampon = 0 & dynamic $cheatmenu[''permanent'']">Automatic cheat on Tampon: ON</a>'
	else
		pl' <a href="exec:Enable_autotampon = 1 & dynamic $cheatmenu[''permanent'']">Automatic cheat on Tampon: OFF</a>'
	end
	pl''
	if Enable_nodream > 0:
		pl'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']"><<din_cheat_nodream>>%</a>, <a href="exec:din_cheat_nodream=0 & dynamic $cheatmenu[''permanent'']">ON</a>'
	else
		pl'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']">OFF</a>'
	end & !1.2.3 new function
	if Enable_skipnoevclass > 0:
		pl'Only allow Class event with (Anatoly E.), with chance : <a href="exec:Enable_skipnoevclass=input(''Enter event chance (%)'') & dynamic $cheatmenu[''permanent'']"><<Enable_skipnoevclass>>%</a>, <a href="exec:Enable_skipnoevclass=0 & dynamic $cheatmenu[''permanent'']">ON</a>'
	else
		pl'Only allow Class event with (Anatoly E.): <a href="exec:Enable_skipnoevclass=input(''Enter event chance (%)'') & dynamic $cheatmenu[''permanent'']">OFF</a>'
	end
	nl
	pl'<B>WARNING</B>:some events need cum/sweat/non-Virgin to trigger. These cheat may cause bug'
	!{
	if Enable_clearcum = 1:
		pl' <a href="exec:Enable_clearcum = 0 & dynamic $cheatmenu[''permanent'']">Clean cum Instantly: ON</a>'
	else
		pl' <a href="exec:Enable_clearcum = 1 & dynamic $cheatmenu[''permanent'']">Clean cum Instantly: OFF</a>'
	end
	if Enable_fbreath = 1:
		pl' <a href="exec:Enable_fbreath = 0 & dynamic $cheatmenu[''permanent'']">Always breath fresh: ON</a>'
	else
		pl' <a href="exec:Enable_fbreath = 1 & dynamic $cheatmenu[''permanent'']">Always breath fresh: OFF</a>'
	end
	!remove them, add later after OOx system done
	}
	if Enable_clearwrite = 1:
		pl' <a href="exec:Enable_clearwrite = 0 & dynamic $cheatmenu[''permanent'']">Clean body write Instantly: ON</a>'
	else
		pl' <a href="exec:Enable_clearwrite = 1 & dynamic $cheatmenu[''permanent'']">Clean body write Instantly: OFF</a>'
	end
	if Enable_lockhorny > 0:
		pl'Lock arousal: <a href="exec:input(''Input horny value to lock PC at'') & dynamic $cheatmenu[''permanent'']">Set horny value</a>, Lock is currently <a href="exec:Enable_lockhorny = 0 & dynamic $cheatmenu[''permanent'']">ON</a>'
	else
		pl'Lock arousal: Lock is currently <a href="exec:Enable_lockhorny=1+input(''Input horny value to lock PC at'') & dynamic $cheatmenu[''permanent'']">OFF</a>'
	end
	if Enable_Hymenrestore = 1:
		pl' <a href="exec:Enable_Hymenrestore = 0 & dynamic $cheatmenu[''permanent'']">Restore Hymen Instantly: ON</a>'
	else
		pl' <a href="exec:Enable_Hymenrestore = 1 & dynamic $cheatmenu[''permanent'']">Restore Hymen Instantly: OFF</a>'
	end
	if Enable_tightrestore = 1:
		pl' <a href="exec:Enable_tightrestore = 0 & dynamic $cheatmenu[''permanent'']">Tighten Instantly: ON</a>'
	else
		pl' <a href="exec:Enable_tightrestore = 1 & dynamic $cheatmenu[''permanent'']">Tighten Instantly: OFF</a>'
	end
}
 
$cheatmenu['avatar_hair_set'] = {
	$av_hair = input("Input your custom hair:")
	if $av_hair='':exit
	avatar_hair = 1
	dynamic $cheatmenu['looks']
}

$cheatmenu['rename'] = {
	$pcs_firstname = input("What is your first name? (Leave blank for default)")

	if $pcs_firstname = '':$pcs_firstname = 'Svetlana'

	$pcs_lastname = input("What is your last name? (Leave blank for default)")

	if $pcs_lastname = '':$pcs_lastname = 'Lebedev'

	!!!0.2.6 addition
	$pcs_nickname = input("What is your nickname? (Note: If you chose a custom name, you have to enter something here!)")

	if $pcs_nickname = '':$pcs_nickname = 'Sveta'
}

$cheatmenu['looks'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	pl'<<$pcs_nickname>> <<$pcs_lastname>> (<<$pcs_nickname>>). <a href="exec:dynamic $cheatmenu[''rename'']">Rename</a>'
	if player_avatar = 1:
		pl' <a href="exec:player_avatar = 0 & dynamic $cheatmenu[''looks'']">Custom Avatar: ON</a>'
	else
		pl' <a href="exec:player_avatar = 1 & dynamic $cheatmenu[''looks'']">Custom Avatar: OFF</a>'
	end	
	if avatar_hair = 1:
		pl'<a href="exec:avatar_hair = 0 & dynamic $cheatmenu[''looks'']">Custom Hair: ON</a>'
		pl'<<$av_hair>>'
	else
		pl'<a href="exec:dynamic $cheatmenu[''avatar_hair_set'']">Custom Hair: OFF</a>'
	end
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''parameters'']">Show design parameters of body</a>'
	pl'<a href="exec:dynamic $cheatmenu[''vneshpara'']">Show beauty parameters</a>'
	pl''
	pl'Now you are <<age>> years old'
	!!if age >= 0:pl'<a href="exec:dynamic $cheatmenu[''age'']">Change age</a>'
	pl'<a href=>You look for <<vidage>> years</a>'
	if vidage >= 0:pl'<a href="exec:dynamic $cheatmenu[''visualage'']">Change Visible age</a>'
	pl''
	pl 'You have <<$titsize>> breasts'
	if tits => 0 and tits < 10:pl'<a href="exec:silicone += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(silicone)</a>'
	if silicone => 1:pl'<a href="exec:silicone -= 5 & dynamic $cheatmenu[''looks'']">Shrink breasts(silicone)</a>'
	if tits => 0 and tits < 10:pl'<a href="exec:nbsize += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(natural)</a>'
	if nbsize => 1:pl'<a href="exec:nbsize -= 5 & dynamic $cheatmenu[''looks'']">Shrink breasts(natural)</a>'
	pl''
	pl'<<$lip>>'
	if lip < 4:pl'<a href="exec:lip += 1 & dynamic $cheatmenu[''looks'']">Enlarge lips</a>'
	if lip > 0:pl'<a href="exec:lip -= 1 & dynamic $cheatmenu[''looks'']">Shrink lips</a>'
	pl''
	pl'<<$skin>>'
	if skinvan < 100: pl'<a href="exec:skinvan += 20 & gs ''body_shape'', ''basebeautycalc'', 1 & dynamic $cheatmenu[''looks'']">Improve skin</a>'
	if skinvan > 0: pl'<a href="exec:skinvan -= 20 & gs ''body_shape'', ''basebeautycalc'', 1 & dynamic $cheatmenu[''looks'']">Worsen skin</a>'
	if pcs_tan >= 0:pl'<a href="exec:pcs_tan += 10 & dynamic $cheatmenu[''looks'']">Become sunburnt</a>'
	if pcs_tan > 0:pl'<a href="exec:pcs_tan = 0 & dynamic $cheatmenu[''looks'']">Remove pcs_tan</a>'
	pl''
	pl'<<$throat>>'
	if throat <= 31:pl'<a href="exec:throat += 5 & dynamic $cheatmenu[''looks'']">Increase throat capacity</a>'
	if throat >= 5:pl'<a href="exec:throat -= 5 & dynamic $cheatmenu[''looks'']">Decrease throat capacity</a>'
	if dounspell = 1:
		pl''
		pl'<a href="exec:dounsplkil = 2 & gs ''body_shape'', ''hardreset''">Hard Reset body shape</a>'
	end
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''looks2'']">Go to page 2</a>                <a href="exec:dynamic $cheatmenu[''looks3'']">Go to page 3</a>'
}
	
$cheatmenu['looks2'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	pl'<<$vagina>>'
	if vagina > 0:pl'<a href="exec:vagina = 0 & dynamic $cheatmenu[''looks2'']">Reinstate virginity</a>'
	if vagina <= 31:pl'<a href="exec:vagina += 5 & dynamic $cheatmenu[''looks2'']">Enlarge the vagina</a>'
	if vagina >= 5:pl'<a href="exec:vagina -= 5 & dynamic $cheatmenu[''looks2'']">Reduce the vagina</a>'
	pl 'Your vagina will shrink by <<vshrink>> every <<vshrinkdays>> days.'
	if vshrink < 10:pl'<a href="exec:vshrink += 1 & dynamic $cheatmenu[''looks2'']">Increase the amount to shrink</a>'
	if vshrink > 0:pl'<a href="exec:vshrink -= 1 & dynamic $cheatmenu[''looks2'']">Reduce the amount to shrink</a>'
	if vshrinkdays < 10:pl'<a href="exec:vshrinkdays += 1 & dynamic $cheatmenu[''looks2'']">Increase the number of days it takes</a>'
	if vshrinkdays > 1:pl'<a href="exec:vshrinkdays -= 1 & dynamic $cheatmenu[''looks2'']">Reduce the number of days it takes</a>'
	pl''
	pl'<<$anus>>'
	if anus <= 31:pl'<a href="exec:anus += 5 & dynamic $cheatmenu[''looks2'']">Enlarge anus</a>'
	if anus >= 5:pl'<a href="exec:anus -= 5 & dynamic $cheatmenu[''looks2'']">Reduce the anus</a>'
	pl 'Your anus will shrink by <<ashrink>> every <<ashrinkdays>> days.'
	if ashrink < 10:pl'<a href="exec:ashrink += 1 & dynamic $cheatmenu[''looks2'']">Increase the amount to shrink</a>'
	if ashrink > 0:pl'<a href="exec:ashrink -= 1 & dynamic $cheatmenu[''looks2'']">Reduce the amount to shrink</a>'
	if ashrinkdays < 10:pl'<a href="exec:ashrinkdays += 1 & dynamic $cheatmenu[''looks2'']">Increase the number of days it takes</a>'
	if ashrinkdays > 1:pl'<a href="exec:ashrinkdays -= 1 & dynamic $cheatmenu[''looks2'']">Reduce the number of days it takes</a>'
	pl''
	if salo ! fat:pl'<a href="exec:fat = salo & dynamic $cheatmenu[''looks2'']">Balance fat</a>'
	if salo > 0:pl'<a href="exec:salo -= 5 & fat = salo & gs ''body_shape'' & dynamic $cheatmenu[''looks2'']">Decrease the fat</a>'
	if salo > 0:pl'<a href="exec:salo = 0 & fat = salo & gs ''body_shape'' & dynamic $cheatmenu[''looks2'']">Zero fat</a>'
	pl'Fat (<<salo>>): <a href="exec:salo += 5 & fat = salo & gs ''body_shape'' & dynamic $cheatmenu[''looks2'']">+5</a> <a href="exec:salo += 10 & fat = salo & gs ''body_shape'' & dynamic $cheatmenu[''looks2'']">+10</a> <a href="exec:salo += 25 & fat = salo & gs ''body_shape'' & dynamic $cheatmenu[''looks2'']">+25</a> <a href="exec:salo += 50 & fat = salo & gs ''body_shape'' & dynamic $cheatmenu[''looks2'']">+50</a>'
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''tatoo'']">Tattoo removal</a>'
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''looks'']">Go to page 1</a>                <a href="exec:dynamic $cheatmenu[''looks3'']">Go to page 3</a>'
}

$cheatmenu['looks3'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	pl'<<$hair>>'
	if pcs_haircol =< 0:
		pl'Your hair is now (prev) <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks3'']">(next)</a>'
	elseif pcs_haircol > 0 and pcs_haircol < 3:
		pl'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks3'']">(prev)</a> <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks3'']">(next)</a>'
	elseif pcs_haircol => 3:
		pl'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks3'']">(prev)</a> <<$pcs_haircol>> (next)'
	end
	if pcs_hairlng > 575:
		pl'pcs_hairlng (<<pcs_hairlng>>)  <a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks3'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks3'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks3'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks3'']">+5</a>'
	elseif pcs_hairlng > 500 and pcs_hairlng =< 575:
		pl'pcs_hairlng (<<pcs_hairlng>>)  <a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks3'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks3'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks3'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks3'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks3'']">+25</a>'
	elseif pcs_hairlng =< 500 and pcs_hairlng => 100:
		pl'pcs_hairlng (<<pcs_hairlng>>)  <a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks3'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks3'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks3'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks3'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks3'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks3'']">+100</a>'
	elseif pcs_hairlng < 100 and pcs_hairlng => 25:
		pl'pcs_hairlng (<<pcs_hairlng>>)  <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks3'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks3'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks3'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks3'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks3'']">+100</a>'
	elseif pcs_hairlng < 100 and pcs_hairlng => 25:
		pl'pcs_hairlng (<<pcs_hairlng>>)  <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks3'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks3'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks3'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks3'']">+100</a>'
	elseif pcs_hairlng < 25:
		pl'pcs_hairlng (<<pcs_hairlng>>)  <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks3'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks3'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks3'']">+100</a>'
	end
	pl''
	pl'<<$glaza>>'
	if resnic < 2:pl'<a href="exec:resnic += 1 & dynamic $cheatmenu[''looks3'']">Enlarge lashes</a>'
	if resnic > 0:pl'<a href="exec:resnic -= 1 & dynamic $cheatmenu[''looks3'']">Shrink lashes</a>'
	if glaraz < 3:pl'<a href="exec:glaraz += 1 & dynamic $cheatmenu[''looks3'']">Increase the size of the eye</a>'
	if glaraz > 0:pl'<a href="exec:glaraz -= 1 & dynamic $cheatmenu[''looks3'']">Reduce the size of the eye</a>'
	if glacol <= 0:
		pl'Your eyes are now (prev) <<$glacol>> <a href="exec:glacol +=1 & dynamic $cheatmenu[''looks3'']">(next)</a>'
	elseif glacol > 0 and glacol < 3:
		pl'Your eyes are now <a href="exec:glacol -=1 & dynamic $cheatmenu[''looks3'']">(prev)</a> <<$glacol>> <a href="exec:glacol +=1 & dynamic $cheatmenu[''looks3'']">(next)</a>'
	elseif glacol >= 3:
		pl'Your eyes are now <a href="exec:glacol -=1 & dynamic $cheatmenu[''looks3'']">(prev)</a> <<$glacol>> (next)'
	end
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''looks'']">Go to page 1</a>                <a href="exec:dynamic $cheatmenu[''looks2'']">Go to page 2</a>'
}

$cheatmenu['parameters'] = {
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''looks'']"><b>Outward Appearance</b></a></center>'
	pl''
	pl'Body Shape Parameters'
	pl'<<grudi>> - <<talia>> - <<bedra>>, <<$titsize>> breasts, the difference between the hips and waist <<bedra-talia>> cm'
	pl'Muscularity: musle = <<musle>>, salo =  <<salo>>, fat = <<fat>>'
	pl'Variable List:'
	pl'agilbuf = <<agilbuf>>'
	pl'strenbuf = <<strenbuf>>'
	pl'vitalbuf = <<vitalbuf>>'
	pl'weight (ves) = <<ves>>'
	pl'bust (grudi) = <<grudi>>'
	pl'band (grutal) = <<grutal>>'
	pl'waist (talia) = <<talia>>'
	pl'hips (bedra) = <<bedra>>'
	pl'bust - band (titK) = <<titK>>'
	pl'silicone = <<silicone>>'
	pl'nbsize = <<nbsize>>'
	pl'magicf2b = <<magicf2b>>'
	pl'genbsize = <<genbsize>>'
	pl'vhips = <<vhips>>'
	pl'vhtmp = <<vhtmp>>'
	pl'wratio = <<wratio>>'
	pl'bratio = <<bratio>>'
	pl'hratio = <<hratio>>'
	pl'vofat = <<vofat>>'
	pl'salocatnow = <<salocatnow>>'
	pl'salocatlast = <<salocatlast>>'
	pl'magf2bdo = <<magf2bdo>>'
	pl'mgf2bnocnt = <<mgf2bnocnt>>'
	pl'magtarcup = <<magtarcup>>'
	pl'normbuffpick = <<normbuffpick>>'
	pl'nrmbfpckct = <<nrmbfpckct>>'
	pl'btwarn = <<btwarn>>'
	pl'salolast = <<salolast>>'
}

$cheatmenu['vneshpara'] = {
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''looks'']"><b>Outward Appearance</b></a></center>'
	pl''
	pl 'Appearance Parameters'
	pl 'vidage = <<vidage>>'
	pl 'resnic = <<resnic>>'
	pl 'glaraz = <<glaraz>>'
	pl 'lip = <<lip>>'
	pl 'vneshbase = <<vneshbase>>'
	pl 'PXCloThinness = <<PXCloThinness>>'
	pl 'PXCloTopCut = <<PXCloTopCut>>'
	pl 'PXCloSkirtShortness = <<PXCloSkirtShortness>>'
	pl 'PXCloPantsShortness = <<PXCloPantsShortness>>'
	pl 'CloAdjustedBeauty = <<CloAdjustedBeauty>>'
	pl 'mopkoef = <<mopkoef>>'
	pl 'hapri = <<hapri>>'
	pl 'lipbalmKoef = <<lipbalmKoef>>'
	pl 'fbreath = <<fbreath>>'
	pl 'sweatKoef = <<sweatKoef>>'
	pl 'glassvnesh = <<glassvnesh>>'
	pl 'dyevmod = <<dyevmod>>'
	pl 'hairkoef = <<hairkoef>>'
	pl 'legkoef = <<legkoef>>'
}

$cheatmenu['tatoo'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''looks2'']"><b>Outward Appearance</b></a></center>'
	pl''
	if tatarm = 0:pl'You do not have a tattoo on your arm</a>'
	if tatarm >= 1:pl'<a href="exec:tatarm = 0 & dynamic $cheatmenu[''tatoo'']">Remove your arm tattoo</a>'
	if tatass = 0:pl'You do not have a tattoo on your ass</a>'
	if tatass >= 1:pl'<a href="exec:tatass = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ass tattoo</a>'
	if tatback = 0:pl'You do not have a tattoo on your back</a>'
	if tatback >= 1:pl'<a href="exec:tatback = 0 & dynamic $cheatmenu[''tatoo'']">Remove your back tattoo</a>'
	if tatblly = 0:pl'You do not have a tattoo on your belly</a>'
	if tatblly >= 1:pl'<a href="exec:tatblly = 0 & dynamic $cheatmenu[''tatoo'']">Remove your belly tattoo</a>'
	if tatbrst = 0:pl'You do not have a tattoo on your breast</a>'
	if tatbrst >= 1:pl'<a href="exec:tatbrst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your breast tattoo</a>'
	if tatchst = 0:pl'You do not have a tattoo on your chest</a>'
	if tatchst >= 1:pl'<a href="exec:tatchst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your chest tattoo</a>'
	if tatfce = 0:pl'You do not have a tattoo on your face</a>'
	if tatfce >= 1:pl'<a href="exec:tatfce = 0 & dynamic $cheatmenu[''tatoo'']">Remove your face tattoo</a>'
	if tatankle = 0:pl'You do not have a tattoo on your ankle</a>'
	if tatankle >= 1:pl'<a href="exec:tatankle = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ankle tattoo</a>'
	if tatleg = 0:pl'You do not have a tattoo on your leg</a>'
	if tatleg >= 1:pl'<a href="exec:tatleg = 0 & dynamic $cheatmenu[''tatoo'']">Remove your leg tattoo</a>'
	if tatlip = 0:pl'You do not have a tattoo on your lip</a>'
	if tatlip >= 1:pl'<a href="exec:tatlip = 0 & dynamic $cheatmenu[''tatoo'']">Remove your lip tattoo</a>'
	if tatneck = 0:pl'You do not have a tattoo on your neck</a>'
	if tatneck >= 1:pl'<a href="exec:tatneck = 0 & dynamic $cheatmenu[''tatoo'']">Remove your neck tattoo</a>'
	if tatvag = 0:pl'You do not have a public tattoo</a>'
	if tatvag >= 1:pl'<a href="exec:tatvag = 0 & dynamic $cheatmenu[''tatoo'']">Remove your pubic tattoo</a>'
	if tatlech = 0:pl'You do not have a tattoo on your shoulder</a>'
	if tatlech >= 1:pl'<a href="exec:tatlech = 0 & dynamic $cheatmenu[''tatoo'']">Remove your shoulder tattoo</a>'
	if tatside = 0:pl'You do not have a tattoo on your side</a>'
	if tatside >= 1:pl'<a href="exec:tatside = 0 & dynamic $cheatmenu[''tatoo'']">Remove your the tattoo on your side</a>'
	if tatupb = 0:pl'You do not have a tramp stamp</a>'
	if tatupb >= 1:pl'<a href="exec:tatupb = 0 & dynamic $cheatmenu[''tatoo'']">Remove your tramp stamp</a>'
	if tatunder = 0:pl'You do not have an under breast tattoo</a>'
	if tatunder >= 1:pl'<a href="exec:tatunder = 0 & dynamic $cheatmenu[''tatoo'']">Remove your under breast tattoo</a>'
	if tatwrist = 0:pl'You do not have a tattoo on your wrist</a>'
	if tatwrist >= 1:pl'<a href="exec:tatwrist = 0 & dynamic $cheatmenu[''tatoo'']">Remove your wrist tattoo</a>'
}

$cheatmenu['stats'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	pl'Power (<<pcs_stren>>): <a href="exec:pcs_stren += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:pcs_stren += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:pcs_stren += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:pcs_stren += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:pcs_stren -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:pcs_stren -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:pcs_stren -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:pcs_stren -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl'Speed (<<speed>>): <a href="exec:speed += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:speed += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:speed += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:speed += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:speed -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:speed -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:speed -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:speed -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl'Agility (<<pcs_agil>>): <a href="exec:pcs_agil += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:pcs_agil += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:pcs_agil += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:pcs_agil += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:pcs_agil -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:pcs_agil -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:pcs_agil -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:pcs_agil -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl'Reaction (<<react>>): <a href="exec:react += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:react += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:react += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:react += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:react -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:react -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:react -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:react -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl'Physique (<<pcs_vital>>): <a href="exec:pcs_vital += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:pcs_vital += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:pcs_vital += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:pcs_vital += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:pcs_vital -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:pcs_vital -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:pcs_vital -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:pcs_vital -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl'Will (<<will>>): <a href="exec:will += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:will += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:will += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:will += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:will -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:will -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:will -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:will -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl'Intelligence (<<pcs_intel>>): <a href="exec:pcs_intel += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:pcs_intel += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:pcs_intel += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:pcs_intel += 25 & dynamic $cheatmenu[''stats'']">+25</a> <a href="exec:pcs_intel -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:pcs_intel -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:pcs_intel -= 10 & dynamic $cheatmenu[''stats'']">-10</a> <a href="exec:pcs_intel -= 25 & dynamic $cheatmenu[''stats'']">-25</a>'
	pl''
	pl'Dominance (<<pcs_dom>>): <a href="exec:pcs_dom += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:pcs_dom += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:pcs_dom += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:pcs_dom -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:pcs_dom -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:pcs_dom -= 10 & dynamic $cheatmenu[''stats'']">-10</a>'
	pl'Submissiveness (<<sub>>): <a href="exec:sub += 1 & dynamic $cheatmenu[''stats'']">+1</a> <a href="exec:sub += 5 & dynamic $cheatmenu[''stats'']">+5</a> <a href="exec:sub += 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:sub -= 1 & dynamic $cheatmenu[''stats'']">-1</a> <a href="exec:sub -= 5 & dynamic $cheatmenu[''stats'']">-5</a> <a href="exec:sub -= 10 & dynamic $cheatmenu[''stats'']">-10</a>'
	pl''
	if beg >= 0:pl'<a href="exec:beg += 25 & dynamic $cheatmenu[''stats'']">Running+25: <<beg>></a>'
	if beg > 0:pl'<a href="exec:beg -= 25 & dynamic $cheatmenu[''stats'']">Running-25: <<beg>></a>'
	if pcs_vball >= 0:pl'<a href="exec:pcs_vball += 25 & dynamic $cheatmenu[''stats'']">Volleyball+25: <<pcs_vball>></a>'
	if pcs_vball >= 25:pl'<a href="exec:pcs_vball -= 25 & dynamic $cheatmenu[''stats'']">Volleyball-25: <<pcs_vball>></a>'
	pl''
	if shoot >= 0:pl' <a href="exec:shoot += 25 & dynamic $cheatmenu[''stats'']">Shoot+25: <<shoot>></a>'
	if shoot > 0:pl' <a href="exec:shoot -= 25 & dynamic $cheatmenu[''stats'']">Shoot-25: <<shoot>></a>'
	if poSkill >= 0:pl' <a href="exec:poSkill += 25 & dynamic $cheatmenu[''stats'']">sewing+25: <<poSkill>></a>'
	if poSkill > 0:pl' <a href="exec:poSkill -= 25 & dynamic $cheatmenu[''stats'']">sewing-25: <<poSkill>></a>'
	if chess >= 0:pl' <a href="exec:chess += 25 & dynamic $cheatmenu[''stats'']">Chess+25: <<chess>></a>'
	if chess > 0:pl' <a href="exec:chess -= 25 & dynamic $cheatmenu[''stats'']">Chess-25: <<chess>></a>'
	if oficiant >= 0:pl' <a href="exec:oficiant += 25 & dynamic $cheatmenu[''stats'']">Waitress+25: <<oficiant>></a>'
	if oficiant > 0:pl' <a href="exec:oficiant -= 25 & dynamic $cheatmenu[''stats'']">Waitress-25: <<oficiant>></a>'
	pl''
	if dance >= 0:pl'<a href="exec:dance += 25 &dynamic $cheatmenu[''stats'']">Dancing+25: <<dance>></a>'
	if dance > 0:pl'<a href="exec:dance -= 25 &dynamic $cheatmenu[''stats'']">Dancing-25: <<dance>></a>'
	if dancePRO >= 0:pl'<a href="exec:dancePRO += 25 & dynamic $cheatmenu[''stats'']">Prof.. Dancing+25: <<dancePRO>></a>'
	if dancePRO > 0:pl'<a href="exec:dancePRO -= 25 & dynamic $cheatmenu[''stats'']">Prof.. Dancing-25: <<dancePRO>></a>'
	if stripdance >= 0:pl'<a href="exec:stripdance += 25 &dynamic $cheatmenu[''stats'']">Striptease+25: <<stripdance>></a>'
	if stripdance > 0:pl'<a href="exec:stripdance -= 25 &dynamic $cheatmenu[''stats'']">Striptease-25: <<stripdance>></a>'
	if poledance >= 0:pl'<a href="exec:poledance += 25 & dynamic $cheatmenu[''stats'']">Dancing on the sixth+25: <<poledance>></a>'
	if poledance > 0:pl'<a href="exec:poledance -= 25 & dynamic $cheatmenu[''stats'']">Dancing on the sixth-25: <<poledance>></a>'
	pl''
	if vokal >= 0:pl'<a href="exec:vokal += 25 & dynamic $cheatmenu[''stats'']">Vocal skills+25: <<vokal>></a>'
	if vokal > 0:pl'<a href="exec:vokal -= 25 & dynamic $cheatmenu[''stats'']">Vocal skills-25: <<vokal>></a>'
	pl''
	if workPTU > 1:pl'<a href="exec:teachlevel += 10 & dynamic $cheatmenu[''stats'']">Reputation teacher+10: <<teachlevel>></a>'
	if workPTU > 1:pl'<a href="exec:teachlevel -= 10 & dynamic $cheatmenu[''stats'']">Reputation teacher-10: <<teachlevel>></a>'
	if pcs_grades >= 0:pl'<a href="exec:pcs_grades += 10 & dynamic $cheatmenu[''stats'']">Improve their academic performance: <<pcs_grades>></a>'
	if schoolprogul >= 0:pl'<a href="exec:schoolprogul = 0 & dynamic $cheatmenu[''stats'']">Zero Absenteeism: <<schoolprogul>></a>'
	pl''
	pl'<b>Kickboxing:</b>'
	if Jab >= 0:pl'<a href="exec:jab += 25 & dynamic $cheatmenu[''stats'']">Jab+25: <<jab>></a>'
	if Jab > 0:pl'<a href="exec:jab -= 25 & dynamic $cheatmenu[''stats'']">Jab-25: <<jab>></a>'
	if Punch >= 0:pl'<a href="exec:punch += 25 & dynamic $cheatmenu[''stats'']">Power strike+25: <<punch>></a>'
	if Punch > 0:pl'<a href="exec:punch -= 25 & dynamic $cheatmenu[''stats'']">Power strike-25: <<punch>></a>'
	if Kik >= 0:pl'<a href="exec:kik += 25 & dynamic $cheatmenu[''stats'']">Kicks+25: <<kik>></a>'
	if Kik > 0:pl'<a href="exec:kik -= 25 & dynamic $cheatmenu[''stats'']">Kicks-25: <<kik>></a>'
	if KikDef >= 0:pl'<a href="exec:kikdef += 25 & dynamic $cheatmenu[''stats'']">Defense+25: <<kikdef>></a>'
	if KikDef > 0:pl'<a href="exec:kikdef -= 25 & dynamic $cheatmenu[''stats'']">Defense-25: <<kikdef>></a>'
	pl''
	pl'<b>Test options</b> present in the mechanism of the game, but not involved in the game quests:'
	if mutagenP = 0:pl'Mutagen strength <a href="exec:mutagenP = 1 & pcs_stren = 150 & dynamic $cheatmenu[''stats'']">1Level</a>'
	if mutagenP = 1:pl'Mutagen strength <a href="exec:mutagenP = 2 & pcs_stren = 200 & dynamic $cheatmenu[''stats'']">2Level</a>'
	if mutagenP = 2:pl'Mutagen strength <a href="exec:mutagenP = 3 & pcs_stren = 250 & dynamic $cheatmenu[''stats'']">3Level</a>'
	if mutagenP > 0:pl'Mutagen strength <a href="exec:mutagenP = 0 & pcs_stren = 100 & dynamic $cheatmenu[''stats'']">Set to zero</a>'
	if mutagenV = 0:pl'Mutagen endurance <a href="exec:mutagenV = 1 & pcs_vital = 150 & dynamic $cheatmenu[''stats'']">1Level</a>'
	if mutagenV = 1:pl'Mutagen endurance <a href="exec:mutagenV = 2 & pcs_vital = 200 & dynamic $cheatmenu[''stats'']">2Level</a>'
	if mutagenV = 2:pl'Mutagen endurance <a href="exec:mutagenV = 3 & pcs_vital = 250 & dynamic $cheatmenu[''stats'']">3Level</a>'
	if mutagenV > 0:pl'Mutagen endurance <a href="exec:mutagenV = 0 & pcs_vital = 100 & dynamic $cheatmenu[''stats'']">Set to zero</a>'
	if mutagenA = 0:pl'Mutagen Agility <a href="exec:mutagenA = 1 & pcs_agil = 150 & dynamic $cheatmenu[''stats'']">1Level</a>'
	if mutagenA = 1:pl'Mutagen Agility <a href="exec:mutagenA = 2 & pcs_agil = 200 & dynamic $cheatmenu[''stats'']">2Level</a>'
	if mutagenA = 2:pl'Mutagen Agility <a href="exec:mutagenA = 3 & pcs_agil = 250 & dynamic $cheatmenu[''stats'']">3Level</a>'
	if mutagenA > 0:pl'Mutagen Agility <a href="exec:mutagenA = 0 & pcs_agil = 100 & dynamic $cheatmenu[''stats'']">Set to zero</a>'
}

$cheatmenu['reputation'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	if storyline = 1:
		pl '<font color="blue"><b>Family</b></font>'
		pl 'Stepfather: <<Astat_rel[28]>>  <a href="exec:Astat_rel[28] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Astat_rel[28] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl 'mother: <<Astat_rel[29]>>  <a href="exec:Astat_rel[29] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Astat_rel[29] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl 'Sister: <<Astat_rel[33]>>  <a href="exec:Astat_rel[33] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Astat_rel[33] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl 'Brother: <<Astat_rel[34]>>  <a href="exec:Astat_rel[34] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Astat_rel[34] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl ''
		pl ''
		pl '<font color="blue"><b>School</b></font>'
		pl '<i>Popular Kids</i>'
		pl '<<$npcName[1]>> <<$npcSurName[1]>>: <<grupNPC[1]>>  <a href="exec:grupNPC[1] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[1] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[4]>> <<$npcSurName[4]>>: <<grupNPC[4]>>  <a href="exec:grupNPC[4] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[4] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[14]>> <<$npcSurName[14]>>: <<grupNPC[14]>>  <a href="exec:grupNPC[14] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[14] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[15]>> <<$npcSurName[15]>>: <<grupNPC[15]>>  <a href="exec:grupNPC[15] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[15] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[17]>> <<$npcSurName[17]>>: <<grupNPC[17]>>  <a href="exec:grupNPC[17] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[17] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[23]>> <<$npcSurName[23]>>: <<grupNPC[23]>>  <a href="exec:grupNPC[23] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[23] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl ''
		pl '<i>Athletes</i>'
		pl '<<$npcName[3]>> <<$npcSurName[3]>>: <<grupNPC[3]>>  <a href="exec:grupNPC[3] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[3] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[5]>> <<$npcSurName[5]>>: <<grupNPC[5]>>  <a href="exec:grupNPC[5] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[5] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[8]>> <<$npcSurName[8]>>: <<grupNPC[8]>>  <a href="exec:grupNPC[8] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[8] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[13]>> <<$npcSurName[13]>>: <<grupNPC[13]>>  <a href="exec:grupNPC[13] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[13] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		if zverRageQW = 0 or zverRageQW = 10:
			pl '<<$npcName[18]>> <<$npcSurName[18]>>: <<grupNPC[18]>>  <a href="exec:grupNPC[18] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[18] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		end
		pl '<<$npcName[19]>> <<$npcSurName[19]>>: <<grupNPC[19]>>  <a href="exec:grupNPC[19] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[19] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[22]>> <<$npcSurName[22]>>: <<grupNPC[22]>>  <a href="exec:grupNPC[22] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[22] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl ''
		pl '<i>Nerds</i>'
		pl '<<$npcName[2]>> <<$npcSurName[2]>>: <<grupNPC[2]>>  <a href="exec:grupNPC[2] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[2] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[6]>> <<$npcSurName[6]>>: <<grupNPC[6]>>  <a href="exec:grupNPC[6] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[6] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[12]>> <<$npcSurName[12]>>: <<grupNPC[12]>>  <a href="exec:grupNPC[12] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[12] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[16]>> <<$npcSurName[16]>>: <<grupNPC[16]>>  <a href="exec:grupNPC[16] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[16] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl ''
		pl '<i>Gopniks</i>'
		pl '<<$npcName[9]>> <<$npcSurName[9]>>: <<grupNPC[9]>>  <a href="exec:grupNPC[9] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[9] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[10]>> <<$npcSurName[10]>>: <<grupNPC[10]>>  <a href="exec:grupNPC[10] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[10] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[11]>> <<$npcSurName[11]>>: <<grupNPC[11]>>  <a href="exec:grupNPC[11] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[11] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[20]>> <<$npcSurName[20]>>: <<grupNPC[20]>>  <a href="exec:grupNPC[20] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[20] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[21]>> <<$npcSurName[21]>>: <<grupNPC[21]>>  <a href="exec:grupNPC[21] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[21] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[24]>> <<$npcSurName[24]>>: <<grupNPC[24]>>  <a href="exec:grupNPC[24] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[24] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl ''
		pl '<i>Outcasts/Loners</i>'
		pl '<<$npcName[7]>> <<$npcSurName[7]>>: <<grupNPC[7]>>  <a href="exec:grupNPC[7] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[7] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl '<<$npcName[25]>> <<$npcSurName[25]>>: <<grupNPC[25]>>  <a href="exec:grupNPC[25] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[25] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		if zverRageQW > 1 and zverRageQW < 10:
			pl '<<$npcName[18]>> <<$npcSurName[18]>>: <<grupNPC[18]>>  <a href="exec:grupNPC[18] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[18] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		end
		pl ''
		pl '<i>Teachers/Coaches</i>'
		pl '<<$npcName[26]>> <<$npcSurName[26]>>: <<grupNPC[26]>>  <a href="exec:grupNPC[26] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:grupNPC[26] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl 'Mikhail Nikolayevich: <<trenerepa>>  <a href="exec:trenerepa += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:trenerepa -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl ''
		pl ''
		pl '<font color="blue"><b>Other</b></font>'
	end
	pl''
	if nastjaQW >= 0:
		pl 'Nastya: <<nastjaQW>>  <a href="exec:nastjaQW += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:nastjaQW -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if kat >= 0:
		pl 'Kat: <<kat>>  <a href="exec:kat += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:kat -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if vika >= 0:
		pl 'Vika: <<vika>>  <a href="exec:vika += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:vika -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if Irina >= 0:
		pl 'Irina: <<Irina>>  <a href="exec:Irina += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Irina -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if Tamara >= 0:
		pl 'Tamara: <<Tamara>>  <a href="exec:Tamara += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Tamara -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if alla >= 0:
		pl 'Alla: <<alla>>  <a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if masha >= 0:
		pl 'Masha: <<masha>>  <a href="exec:masha += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:masha -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if Givi >= 0:
		pl 'Givi: <<Givi>>  <a href="exec:Givi += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Givi -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if Ashot >= 0:
		pl 'Ashot: <<Ashot>>  <a href="exec:Ashot += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Ashot -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if Dmitry >= 0:
		pl 'Dima: <<Dmitry>>  <a href="exec:Dmitry += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:Dmitry -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if afra >= 0:
		pl 'Black Guys: <<afra>>  <a href="exec:afra += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:afra -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if JenyaLC >= 0:
		pl 'Eugene: <<JenyaLC>>  <a href="exec:JenyaLC += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:JenyaLC -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if serge_shulgin >= 0:
		pl 'Sergei Shulgin: <<serge_shulgin>>  <a href="exec:serge_shulgin += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:serge_shulgin -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if vasya_shulgin >= 0:
		pl 'Vasya Shulgin: <<vasya_shulgin>>  <a href="exec:vasya_shulgin += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:vasya_shulgin -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if hantersAndreiQw >= 0:
		pl 'Hunter Andrew: <<hantersAndreiQw>>  <a href="exec:hantersAndreiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:hantersAndreiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if hantersSergeiQw >= 0:
		pl 'Hunter Sergei: <<hantersSergeiQw>>  <a href="exec:hantersSergeiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:hantersSergeiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if hantersIgorQw >= 0:
		pl 'Hunter Igor: <<hantersIgorQw>>  <a href="exec:hantersIgorQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:hantersIgorQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
	end
	if bfA > 0:
		pl''
		pl'You are dating <<$boydescA>>.'
		if bfA < 0: bfA = 0
		if daya < 0: daya = 0
		if harakBoyA > 2: harakBoyA = 0
		if izvratA > 1: izvratA = 0
		pl'Change boyfriend''s personality: <a href="exec:harakBoyA += 1 & dynamic $cheatmenu[''reputation'']"><<harakBoyA>></a>'
		pl'Change boyfriend''s perversion: <a href="exec:izvratA += 1 & dynamic $cheatmenu[''reputation'']"><<izvratA>></a>'
		pl'Relationship: <<bfA>> <a href="exec:bfA += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:bfA -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
		pl'You''ve been dating for <<daya>> days. <a href="exec:daya += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:daya -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
	end
	pl''
	if GorSlut > 0:pl'In Pavlovo you are known as a <<$gnikname>> (<<GorSlut>>)'
	if GorSlut = 0:pl'You have a good reputation in Pavlovsk (0)'
	if GorSlut ! 1:pl'<a href="exec:GorSlut = 1 & dynamic $cheatmenu[''reputation'']">Change reputation to "Flirt" (1)</a>'
	if GorSlut ! 2:pl'<a href="exec:GorSlut = 2 & dynamic $cheatmenu[''reputation'']">Change reputation to "Cocksucker" (2)</a>'
	if GorSlut ! 3:pl'<a href="exec:GorSlut = 3 & dynamic $cheatmenu[''reputation'']">Change reputation to "Easy Lay" (3)</a>'
	if GorSlut ! 4:pl'<a href="exec:GorSlut = 4 & dynamic $cheatmenu[''reputation'']">Change reputation to "Sex Addict" (4)</a>'
	if GorSlut ! 5:pl'<a href="exec:GorSlut = 5 & dynamic $cheatmenu[''reputation'']">Change reputation to "Total Slut" (5)</a>'
	if GorSlut ! 6:pl'<a href="exec:GorSlut = 6 & dynamic $cheatmenu[''reputation'']">Change reputation to "Whore" (6)</a>'
	if GorSlut > 0:pl'<a href="exec:GorSlut = 0 & dynamic $cheatmenu[''reputation'']">Clear reputation in Pavlovsk (0)</a>'
	if opusk > 0 or gnewQW < 4 or sipovka > 0:pl'<a href="exec:opusk = 0 & sipovka = 0 & gnewQW = 0 & dynamic $cheatmenu[''reputation'']">Clear reputation with Gopniks</a>'
	if StoryLine = 1:
		if motherKnowWhore > 0 or motherKnowSpravka > 0 or brotherSex >= 1 or evgenQW >= 3 or brotherknowslut > 0 or sisterknowslut > 0:
			pl''
			pl'<font color="red"><B>WARNING</B></font> Clearing reputation flags with your family MAY CAUSE BUGS!!'
			if motherKnowWhore > 0:pl'Your mother thinks you are a whore. <a href="exec:motherKnowWhore = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			if motherKnowSpravka > 0:pl'Your mother thinks that you are a virgin. <a href="exec:motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			pl''
			if brotherSex >= 1:	  pl'Your brother thinks you are a slut. <a href="exec:brotherSex = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			if evgenQW >= 3:		 pl'Your brother thinks you are a slut. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			if brotherknowslut = 1:		 pl'Your brother saw semen on your body and thinks you fuck around. <a href="exec:brotherknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			if brotherknowslut >= 2:		 pl'Your brother saw you in the park fucking the Gopniks. <a href="exec:brotherknowslut = 1 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			pl''
			if sisterknowslut > 1 and sisboypartyQW > 1:	  pl'Your sister says you are a slut <a href="exec:sisboypartyQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
			if sisterknowslut > 0:		 pl'Your sister knows that you sleep around. <a href="exec:sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
		end
	end
}

$cheatmenu['documents'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
	if SchoolAtestat = 0:pl'<a href="exec:SchoolAtestat = 1 & dynamic $cheatmenu[''documents'']">Get School Certificate</a>'
	if SchoolAtestat = 1:pl'Already have a School Certificate'
	if diplom = 0:pl'<a href="exec:diplom = 1 & dynamic $cheatmenu[''documents'']">Get Diploma</a>'
	if diplom = 1:pl'You already have a Diploma'
	if secrdiplom = 0:pl'<a href="exec:secrdiplom = 1 & dynamic $cheatmenu[''documents'']">Get Secretarial Diploma</a>'
	if secrdiplom = 1:pl'You already have a Secretarial Diploma'
	if masash < 10:pl'<a href="exec:masash = 10 & dynamic $cheatmenu[''documents'']">Get Masseuse Certificate</a>'
	if masash >= 10:pl'You already have a Masseuse Certificate'
	if prava = 0:pl'<a href="exec:prava = 1 & dynamic $cheatmenu[''documents'']">Get Driving Licence</a>'
	if prava = 1:pl'You already have Driving Licence'
}

$cheatmenu['input_time'] = {
	inputtmp = input("Enter time with 4-digit (input 0102 for 1:02)")
	if inputtmp/100 >= 0 and inputtmp/100 <= 23:hour = inputtmp/100
	inputtmp = inputtmp mod 100
	if inputtmp >= 0 and inputtmp <= 59:minut = inputtmp
	killvar 'inputtmp'
	dynamic $cheatmenu['time']
}

$cheatmenu['time'] = {
	gs 'daystart'
	gs 'stat'

	temp_daystart = (year - 2015) * 365
	temp_daystart += ((year - 2015) + 3) / 4
	i=1
	:temp_daystart
	if temp_month > i:
		temp_daystart += monthsend[i]
		i += 1
		jump 'temp_daystart'
	end
	temp_daystart += temp_day
	temp_daystart -= daystart_start
	temp_daystart += 1

	if currtimecheck = 1:
		killvar 'currtimecheck'
		if currday ! daystart:
			if currday < daystart: 
				week = (week + daystart - currday) mod 7
			else
				temp = week - ((currday - daystart) mod 7)
				if temp <= 0: week = 7 - temp else week = temp
			end
			currday = daystart
		end
		if currhour < (daystart-1) * 24 + hour:femcycloop = (daystart-1) * 24 + hour - currhour
		:femcycloop
		if femcycloop > 0:gs 'femcyc' & femcycloop -= 1 & jump 'femcycloop'
	end
	clr
	gs 'outdoors', 'weather'
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl''
    if temp_minut > 9:
		if temp_hour > 9: $temptime = '<b><<temp_hour>>:<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:<<temp_minut>></b>'
	else
		if temp_hour > 9: $temptime = '<b><<temp_hour>>:0<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:0<<temp_minut>></b>'
	end
    if minut > 9:
		if hour > 9: $tempcurtime = '<b><<hour>>:<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:<<minut>></b>'
	else
		if hour > 9: $tempcurtime = '<b><<hour>>:0<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:0<<minut>></b>'
	end
	
	if temp_daystart > daystart:
		temp = (temp_daystart - daystart) mod 7
		if (temp + week) mod 7 = 0:temp_week = 7 else temp_week = (temp + week) mod 7
	elseif temp_daystart < daystart:
		temp = (daystart - temp_daystart) mod 7
		if (week - temp) mod 7 = 0:
			temp_week = 7
		elseif (week - temp) mod 7 < 0:
			temp_week = ((week - temp) mod 7) + 7
		else
			temp_week = week - temp
		end
	else
		temp_week = week
	end
	killvar 'temp'
	
	pl'Current time: <b><<$week[week]>></b>, <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
	pl'Target time: <b><<$week[temp_week]>></b>, <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
	pl'Daychange: <<temp_daystart - daystart>>'
	pl''
	pl'Year:  <a href="exec:temp_year += 1 & dynamic $cheatmenu[''time'']">+1 Year</a>  <a href="exec:temp_year -= 1 & dynamic $cheatmenu[''time'']">-1 Year</a>'
	pl'Select <a href="exec:dynamic $cheatmenu[''month'']">Month</a>'
	$daychange = '  <a href="exec:temp_day += 7 & dynamic $cheatmenu[''time'']">+7 Day</a>'
	$daychange += '  <a href="exec:temp_day += 1 & dynamic $cheatmenu[''time'']">+1 Day</a>'
	$daychange += '  <a href="exec:temp_day -= 1 & dynamic $cheatmenu[''time'']">-1 Day</a>'
	$daychange += '  <a href="exec:temp_day -= 7 & dynamic $cheatmenu[''time'']">-7 Day</a>'
	pl 'Day:' +$daychange
	killvar 'daychange'
	$SS = 'Hour: '
	if temp_hour > 0:$SS += '<a href="exec:temp_hour -= 1 & dynamic $cheatmenu[''time'']">-1</a>  ' else $SS += '    '
	if temp_hour ! 0:$SS += '<a href="exec:temp_hour = 0 & dynamic $cheatmenu[''time'']">0</a>  ' else $SS += '    '
	if temp_hour < 23:$SS += '<a href="exec:temp_hour += 1 & dynamic $cheatmenu[''time'']">+1</a>'
	pl $SS
	$SS = 'Minute: '
	if temp_minut > 14:$SS += '<a href="exec:temp_minut -= 15 & dynamic $cheatmenu[''time'']">-15</a> ' else $SS += '    '
	if temp_minut > 0:$SS += '<a href="exec:temp_minut -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += '    '
	if temp_minut ! 0:$SS += '<a href="exec:temp_minut = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += '   '
	if temp_minut < 59:$SS += '<a href="exec:temp_minut += 1 & dynamic $cheatmenu[''time'']">+1</a> '
	if temp_minut < 46:$SS += '<a href="exec:temp_minut += 15 & dynamic $cheatmenu[''time'']">+15</a>'
	pl $SS
	killvar 'SS'
	pl''
	pl' <a href="exec:dynamic $cheatmenu[''input_time'']">Direct input time</a>'	
	pl''
	pl 'Weather: <a href="exec:sunWeather=iif(sunWeather=0,1,0) & $pogoda=iif(sunWeather=0,''Rain...'',''Clear...'') & dynamic $cheatmenu[''time'']">'+iif(sunWeather=0,'Rain','Sunny')+'</a>'
	pl''
	pl'<a href="exec:day = temp_day & $month = $temp_month & month = temp_month & year = temp_year & hour = temp_hour & minut = temp_minut & currtimecheck = 1 & dynamic $cheatmenu[''time'']">Accept target date & time</a>'
	pl'<a href="exec:temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut & dynamic $cheatmenu[''time'']">Reset target date & time</a>'
}

$cheatmenu['week'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
	pl''
	pl'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
	pl'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
	pl''
	pl'<a href="exec:week = 1 & dynamic $cheatmenu[''time'']">Monday</a>'
	pl'<a href="exec:week = 2 & dynamic $cheatmenu[''time'']">Tuesday</a>'
	pl'<a href="exec:week = 3 & dynamic $cheatmenu[''time'']">Wednesday</a>'
	pl'<a href="exec:week = 4 & dynamic $cheatmenu[''time'']">Thursday</a>'
	pl'<a href="exec:week = 5 & dynamic $cheatmenu[''time'']">Friday</a>'
	pl'<a href="exec:week = 6 & dynamic $cheatmenu[''time'']">Saturday</a>'
	pl'<a href="exec:week = 7 & dynamic $cheatmenu[''time'']">Sunday</a>'
}

$cheatmenu['month'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
	pl''
	pl'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
	pl'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
	pl''
	pl'<a href="exec:temp_month = 1 & $temp_month = ''January'' & dynamic $cheatmenu[''time'']">January</a>'
	pl'<a href="exec:temp_month = 2 & $temp_month = ''February'' & dynamic $cheatmenu[''time'']">February</a>'
	pl'<a href="exec:temp_month = 3 & $temp_month = ''March'' & dynamic $cheatmenu[''time'']">March</a>'
	pl'<a href="exec:temp_month = 4 & $temp_month = ''April'' & dynamic $cheatmenu[''time'']">April</a>'
	pl'<a href="exec:temp_month = 5 & $temp_month = ''May'' & dynamic $cheatmenu[''time'']">May</a>'
	pl'<a href="exec:temp_month = 6 & $temp_month = ''June'' & dynamic $cheatmenu[''time'']">June</a>'
	pl'<a href="exec:temp_month = 7 & $temp_month = ''July'' & dynamic $cheatmenu[''time'']">July</a>'
	pl'<a href="exec:temp_month = 8 & $temp_month = ''August'' & dynamic $cheatmenu[''time'']">August</a>'
	pl'<a href="exec:temp_month = 9 & $temp_month = ''September'' & dynamic $cheatmenu[''time'']">September</a>'
	pl'<a href="exec:temp_month = 10 & $temp_month = ''October'' & dynamic $cheatmenu[''time'']">October</a>'
	pl'<a href="exec:temp_month = 11 & $temp_month = ''November'' & dynamic $cheatmenu[''time'']">November</a>'
	pl'<a href="exec:temp_month = 12 & $temp_month = ''December'' & dynamic $cheatmenu[''time'']">December</a>'
}

$cheatmenu['magic'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	nl
	if succubusflag = 1:
		pl '<a href="exec:dynamic $cheatmenu[''succubreset'']"><b>Remove & Reset Succubus status</b></a>'
		nl
	end
	pl'<a href="exec:magik += 1 & dynamic $cheatmenu[''magic'']">Is magical: <<magik>></a>'
	pl''
	if spelltuman = 0:pl'<a href="exec:spelltuman = 1 & dynamic $cheatmenu[''magic'']">Cover the area fog</a>'
	if spellklon = 0:pl'<a href="exec:spellklon = 1 & dynamic $cheatmenu[''magic'']">Override clone of yourself</a>'
	if spellstun = 0:pl'<a href="exec:spellstun = 1 & dynamic $cheatmenu[''magic'']">Checkmate</a>'
	if spellweap = 0:pl'<a href="exec:spellweap = 1 & dynamic $cheatmenu[''magic'']">Invest energy into a weapon (It requires weapons)</a>'
	if spellwind = 0:pl'<a href="exec:spellwind = 1 & dynamic $cheatmenu[''magic'']">Blow away the fog</a>'
	if spellklon2 = 0:pl'<a href="exec:spellklon2 = 1 & dynamic $cheatmenu[''magic'']">Substitute itself clones (3 pieces)</a>'
	if spellenergo = 0:pl'<a href="exec:spellenergo = 1 & dynamic $cheatmenu[''magic'']">Create a weak energy shield</a>'
	if spellinit = 0:pl'<a href="exec:spellinit = 1 & dynamic $cheatmenu[''magic'']">Create a slight delay of time</a>'
	if spellhel = 0:pl'<a href="exec:spellhel = 1 & dynamic $cheatmenu[''magic'']">Battle Heal</a>'
	if spellfire0 = 0 or spellfire2 = 0 or spellfire3 = 0 or spellfire4 = 0 or spellfire5 = 0:
		pl''
		pl'<b>Elemental Spells Fire:</b></a>'
	end
	if spellfire0 = 0:pl'<a href="exec:spellfire0 = 1 & dynamic $cheatmenu[''magic'']">Flame</a>'
	if spellfire2 = 0:pl'<a href="exec:spellfire2 = 1 & dynamic $cheatmenu[''magic'']">The release of fire</a>'
	if spellfire3 = 0:pl'<a href="exec:spellfire3 = 1 & dynamic $cheatmenu[''magic'']">Fire Barrier</a>'
	if spellfire4 = 0:pl'<a href="exec:spellfire4 = 1 & dynamic $cheatmenu[''magic'']">Firestorm</a>'
	if spellfire5 = 0:pl'<a href="exec:spellfire5 = 1 & dynamic $cheatmenu[''magic'']">Flame Shield</a>'

	if spellele0 = 0 or spellele2 = 0 or spellele3 = 0 or spellele4 = 0 or spellele5 = 0:
		pl''
		pl'<b>Elements Lightning Spells:</b></a>'
	end
	if spellele0 = 0:pl'<a href="exec:spellele0 = 1 & dynamic $cheatmenu[''magic'']">Category</a>'
	if spellele2 = 0:pl'<a href="exec:spellele2 = 1 & dynamic $cheatmenu[''magic'']">Lightning</a>'
	if spellele3 = 0:pl'<a href="exec:spellele3 = 1 & dynamic $cheatmenu[''magic'']">Electric barrier</a>'
	if spellele4 = 0:pl'<a href="exec:spellele4 = 1 & dynamic $cheatmenu[''magic'']">Dance of thousands of birds</a>'
	if spellele5 = 0:pl'<a href="exec:spellele5 = 1 & dynamic $cheatmenu[''magic'']">Dancing Sphere</a>'

	if spellert0 = 0 or spellert2 = 0 or spellert3 = 0 or spellert4 = 0 or spellert5 = 0:
		pl''
		pl'<b>Spells Earth Elements:</b></a>'
	end
	if spellert0 = 0:pl'<a href="exec:spellert0 = 1 & dynamic $cheatmenu[''magic'']">Quicksand</a>'
	if spellert2 = 0:pl'<a href="exec:spellert2 = 1 & dynamic $cheatmenu[''magic'']">Active protection</a>'
	if spellert3 = 0:pl'<a href="exec:spellert3 = 1 & dynamic $cheatmenu[''magic'']">Abyss</a>'
	if spellert4 = 0:pl'<a href="exec:spellert4 = 1 & dynamic $cheatmenu[''magic'']">Absolute protection</a>'
	if spellert5 = 0:pl'<a href="exec:spellert5 = 1 & dynamic $cheatmenu[''magic'']">Sando</a>'

	if spellwind0 = 0 or spellwind2 = 0 or spellwind3 = 0 or spellwind4 = 0 or spellwind5 = 0:
		pl''
		pl'<b>Wind Elemental Spells:</b></a>'
	end
	if spellwind0 = 0:pl'<a href="exec:spellwind0 = 1 & dynamic $cheatmenu[''magic'']">Wind gust</a>'
	if spellwind2 = 0:pl'<a href="exec:spellwind2 = 1 & dynamic $cheatmenu[''magic'']">The horrific pressure</a>'
	if spellwind3 = 0:pl'<a href="exec:spellwind3 = 1 & dynamic $cheatmenu[''magic'']">Vacuum Sphere</a>'
	if spellwind4 = 0:pl'<a href="exec:spellwind4 = 1 & dynamic $cheatmenu[''magic'']">Vacuum shells</a>'
	if spellwind5 = 0:pl'<a href="exec:spellwind5 = 1 & dynamic $cheatmenu[''magic'']">Devouring vacuum</a>'

	if spellwater0 = 0 or spellwater2 = 0 or spellwater3 = 0 or spellwater4 = 0 or spellwater5 = 0:
		pl''
		pl'<b>Water Elemental Spell:</b></a>'
	end
	if spellwater0 = 0:pl'<a href="exec:spellwater0 = 1 & dynamic $cheatmenu[''magic'']">Creek manna</a>'
	if spellwater2 = 0:pl'<a href="exec:spellwater2 = 1 & dynamic $cheatmenu[''magic'']">Flooding</a>'
	if spellwater3 = 0:pl'<a href="exec:spellwater3 = 1 & dynamic $cheatmenu[''magic'']">Blister</a>'
	if spellwater4 = 0:pl'<a href="exec:spellwater4 = 1 & dynamic $cheatmenu[''magic'']">Water shark rocket</a>'
	if spellwater5 = 0:pl'<a href="exec:spellwater5 = 1 & dynamic $cheatmenu[''magic'']">The Great Flood</a>'
}

$cheatmenu['dynamic'] = {
   $dynamicCommand = input("Enter command to execute.")
   if $dynamicCommand = '':exit
   dynamic $dynamicCommand
}

$cheatmenu['std_cure'] = {
	venera = 0
	GerpesOnce = 0
	Gerpes = 0
	SifacOnce = 0
	Sifilis = 0
	TriperOnce = 0
	Triper = 0
	KandidozOnce = 0
	Kandidoz = 0
}

$cheatmenu['auto_period'] = {
	if cyccustom = 0:
		cyccustom = 1
	else
		cyccustom = 0
	end
	dynamic $cheatmenu
}

$cheatmenu['force_preg'] = {
	if mesec ! 0: mesec = 0
	if FocH ! 0: FocH = 0
	if EggRH ! 0: EggRH = 0
	if Ovulate ! 0: Ovulate = 0
	if UnfertEgg ! 0: UnfertEgg = 0
	if LutH ! 0: LutH = 0
	if RecovH ! 0: RecovH = 0
	preg = 1
	cycle = 5
	PregChem = 150
	$wombthfath = 'A sperm donor'
	babyembryo += 1
	if fertegg = 0:
		Nextbaby = arrsize('$ChildFath')
		Temppolkid = rand(0,1)
		polkid[nextbaby] = Temppolkid
		$kidname[nextbaby] = 'unborn'
		kidage[nextbaby] = 0
		daykid[nextbaby] = 0
		monthkid[nextbaby] = 0
		yearkid[nextbaby] = 0
		Babyptype[nextbaby] = 0
		$ChildFath[nextbaby] = 'A sperm donor'
		$ChildThFath[nextbaby] = 'A sperm donor'
		hairkid[nextbaby] = rand(0, 3)
		eyeskid[nextbaby] = rand(0, 3)
		ChildConType[nextbaby] = 0
		Babyptype[nextbaby] = 1
	else
		fertegg -= 1
	end
}

$cheatmenu['remove_preg'] = {
	FertEgg = 0
	killvar 'polkid'
	killvar '$kidname'
	killvar 'kidage'
	killvar 'daykid'
	killvar 'monthkid'
	killvar 'yearkid'
	killvar 'Babyptype'
	killvar '$ChildFath'
	killvar '$ChildThFath'
	killvar 'hairkid'
	killvar 'eyeskid'
	killvar 'ChildConType'
	killvar 'Babyptype'
	killvar '$WombpotFath'
	babyembryo = 0
	if preg > 0 or cycle = 5:
		mesec = 48
		FocH = 0
		EggRH = 0
		Ovulate = 0
		UnfertEgg = 0
		PregChem = 0
		preg = 0
		LutH = 0
		RecovH = 0
		cycle = 0
	end
}

$cheatmenu['cycle'] = {
	if cycle ! 5:
		EggRH = 0
		LutH = 0
		Ovulate = 0
		UnfertEgg = 0
		FertEgg = 0
		RecovH = 0
		mesec = 0
		'<a href="exec:daylastperiod = daystart & Cycle = 0 & mesec = 96">Menstration</a>'
		'<a href="exec:Cycle = 1">Follicular</a>'
		'<a href="exec:Cycle = 2 & Ovulate = 24+rand(0,20) & EggRH = 160 + 160+rand(0, 5)">Ovulation</a>'
		'<a href="exec:Cycle = 3">Luteal</a>'
	end
}
$cheatmenu['display'] = {
	gs'stat'
	clr
	pl'<center> <a href="exec:dynamic $cheatmenu"><b>Cheat Menu</b></a></center>'
	nl
	if Enable_faceturn = 1:
		pl' <a href="exec:Enable_faceturn = 0 & dynamic $cheatmenu[''display'']">Always show face: ON</a>'
	else
		pl' <a href="exec:Enable_faceturn = 1 & dynamic $cheatmenu[''display'']">Always show face: OFF</a>'
	end
	nl
	if ETOmenu = 1:
		pl' <a href="exec:ETOmenu = 0 & dynamic $cheatmenu[''display'']">Display: Text</a>'
	else
		pl' <a href="exec:ETOmenu = 1 & dynamic $cheatmenu[''display'']">Display: Bar</a>'
	end
	if Enable_showattr = 1:
		pl' <a href="exec:Enable_showattr = 0 & dynamic $cheatmenu[''display'']">More attribute: ON</a>'
	else
		pl' <a href="exec:Enable_showattr = 1 & dynamic $cheatmenu[''display'']">More attribute: OFF</a>'
	end
	if Enable_showskill = 1:
		pl' <a href="exec:Enable_showskill = 0 & dynamic $cheatmenu[''display'']">Show skill: ON</a>'
	else
		pl' <a href="exec:Enable_showskill = 1 & dynamic $cheatmenu[''display'']">Show skill: OFF</a>'
	end
	if Enable_showrelation = 1:
		pl' <a href="exec:Enable_showrelation = 0 & dynamic $cheatmenu[''display'']">Show relations: ON</a>'
	else
		pl' <a href="exec:Enable_showrelation = 1 & dynamic $cheatmenu[''display'']">Show relations: OFF</a>'
	end
	nl
	if Enable_clothwidth<0:Enable_clothwidth=0
	if Enable_clothwidth > 0:
		pl'Set Wardrobe cloth image width: <a href="exec:Enable_clothwidth=input(''Input wardrobe cloth image width'') & dynamic $cheatmenu[''display'']"><<Enable_clothwidth>></a>, <a href="exec:Enable_clothwidth=0 & dynamic $cheatmenu[''display'']">ON</a>'
	else
		pl'Set Wardrobe cloth image width: <a href="exec:Enable_clothwidth=input(''Input wardrobe cloth image width'') & dynamic $cheatmenu[''display'']">OFF</a>'
	end
	if Enable_tablemap = 1:
		pl' <a href="exec:Enable_tablemap = 0 & dynamic $cheatmenu[''display'']">List friends in table: ON</a>'
	else
		pl' <a href="exec:Enable_tablemap = 1 & dynamic $cheatmenu[''display'']">List friends in table: OFF</a>'
	end
	if Enable_towntable = 1:
		pl' <a href="exec:Enable_towntable = 0 & dynamic $cheatmenu[''display'']">Display Pavlovsk description in table: ON</a>'
	else
		pl' <a href="exec:Enable_towntable = 1 & dynamic $cheatmenu[''display'']">Display Pavlovsk description in table: OFF</a>'
	end	
	nl
	if Enable_statfsize<0:Enable_statfsize=0
	if Enable_Android = 1:
		pl 'Set Fontsize for Status: Unsupported'
		pl '<a href="exec:Enable_Android = 0 & dynamic $cheatmenu[''display'']">Android Mode :ON</a>'
		pl 'Quest player for Android by Nex does not support autosave, remember to <B>save</B> from player setting!'
		pl 'click <a href="exec:clr & pl $stat_android">refresh</a> on menu to refresh status.'
	else
		if Enable_statfsize > 0:
			pl 'Set Fontsize for Status: <a href="exec:Enable_statfsize=input(''Enter Fontsize'') & dynamic $cheatmenu[''display'']"><<Enable_statfsize>></a>, <a href="exec:Enable_statfsize=0 & dynamic $cheatmenu[''display'']">ON</a>'
		else
			pl 'Set Fontsize for Status: <a href="exec:Enable_statfsize=input(''Enter fontsize'') & dynamic $cheatmenu[''display'']">OFF</a>'
		end
		pl '<a href="exec:Enable_Android = 1 & dynamic $cheatmenu[''display'']">Android Mode :OFF</a>'
	end
	nl
	if Enable_scalepic = 1:
		pl 'Scalebar as  <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''display'']">Image</a>'
		if Enable_scalewidth > 0:
			pl'Scalebar Width: <a href="exec:input(''Input Scalebar Width (default to 120)'') & dynamic $cheatmenu[''display'']"><<Enable_scalewidth-1>></a>, Set is currently <a href="exec:Enable_scalewidth = 0 & dynamic $cheatmenu[''display'']">ON</a>'
		else
			pl'Scalebar Width: Lock is currently <a href="exec:Enable_scalewidth=1+input(''InputS calebar Width (default to 120)'') & dynamic $cheatmenu[''display'']">OFF</a>'
		end
		if Enable_scaleheight > 0:
			pl'Scalebar Height: <a href="exec:input(''Input Scalebar Height (default to 15)'') & dynamic $cheatmenu[''display'']"><<Enable_scaleheight-1>></a>, Set is currently <a href="exec:Enable_scaleheight = 0 & dynamic $cheatmenu[''display'']">ON</a>'
		else
			pl'Scalebar Height: Lock is currently <a href="exec:Enable_scaleheight=1+input(''InputS calebar Height (default to 15)'') & dynamic $cheatmenu[''display'']">OFF</a>'
		end
	else
		pl 'Scalebar as <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''display'']">Character</a>'
		if cheatStatusBars = 1:
			pl ' <a href="exec:cheatStatusBars = 0 & dynamic $cheatmenu[''display'']">Switch to larger status bars</a>'
		else
			pl ' <a href="exec:cheatStatusBars = 1 & dynamic $cheatmenu[''display'']">Switch to smaller status bars</a>'
		end		
	end	

}

$cheatmenu['pain_killer'] = {
	pain['head'] = 0
	pain['hair'] = 0
	pain['ears'] = 0
	pain['eyebrows'] = 0
	pain['eyes'] = 0
	pain['cheeks'] = 0
	pain['nose'] = 0
	pain['mouth'] = 0
	pain['lips'] = 0
	pain['tongue'] = 0
	pain['throat'] = 0
	pain['neck'] = 0
	pain['back'] = 0
	pain['asscheeks'] = 0
	pain['asshole'] = 0
	pain['hips'] = 0
	pain['thighs'] = 0
	pain['legL'] = 0
	pain['legR'] = 0
	pain['feet'] = 0
	pain['toes'] = 0
	pain['shoulders'] = 0
	pain['armL'] = 0
	pain['armR'] = 0
	pain['hands'] = 0
	pain['fingers'] = 0
	pain['chest'] = 0
	pain['breasts'] = 0
	pain['nipples'] = 0
	pain['ribs'] = 0
	pain['tummy'] = 0
	pain['pubic'] = 0
	pain['vaginal'] = 0
	pain['labia'] = 0
	pain['clitoris'] = 0
	pain['urethra'] = 0
	pain['cervix'] = 0
}

$cheatmenu['quicktime'] = {
	minut += ARGS[0]
	*clr
	gs 'daystart'
	gs 'outdoors', 'weather'
	gs 'stat'
	gs 'cum_arrcheat'
}

$cheatmenu = {
	gs'stat'
	currhour = (daystart-1) * 24 + hour
	currday = daystart
	temp_week = week & temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut
	clr
	pl'<center><a href="exec:gs''stat''"><b>Exit cheat menu</b></a></center>'
	nl
	pl'<a href="exec:dynamic $cheatmenu[''permanent'']"><b>Recurrent</b></a>'
	pl'<a href="exec:dynamic $cheatmenu[''looks'']"><b>Appearance</b></a>'
	pl'<a href="exec:dynamic $cheatmenu[''stats'']"><b>Attributes and skills</b></a>'
	pl'<a href="exec:dynamic $cheatmenu[''reputation'']"><b>Relationships and Reputation</b></a>'
	pl'<a href="exec:dynamic $cheatmenu[''documents'']"><b>Documents</b></a>'
	pl'<a href="exec:dynamic $cheatmenu[''time'']"><b>Manipulating time</b></a>'
	pl'<a href="exec:dynamic $cheatmenu[''display'']"><b>Status Display</b></a>'
	if MagikDostup = 0: pl'<a href="exec:dynamic $cheatmenu[''magic'']"><b>Magic</b></a>'
	nl
	pl '<a href="exec:dynamic $cheatmenu[''bdimmain'']"><b>Body Image Controls</b></a>'
	nl
	pl'<a href="exec:health = pcs_vital*10 + pcs_stren*5+1000 & willpower = pcs_intel*5 + will*5+1000 & manna = (pcs_intel*magik) + magik*100 + pcs_vital*10 + rikudo & vgape = 0 & agape = 0 & nippain = 0 & dynamic $cheatmenu">Full restoration of health, manna, Reason.</a>'
	pl'<a href="exec:dynamic $cheatmenu[''money'']">Change money</a>'
	pl'<a href="exec:money = 0 & dynamic $cheatmenu">Zero money</a>'
	pl'<a href="exec:dynamic $cheatmenu[''std_cure'']">Cure all stds</a>'
	pl'<a href="exec:vgape = 0 & agape = 0 & nippain = 0 & painpub = 0 & pirs_pain_ton = 0 & mesec = 0 & spanked = 0 & SLomka = 0 & Narkoman = 0 & strongnark = 0 & SNarkTimes = 0 & nark = 0 & fingal = 0 & mosol = 0 & frost = 0 & sick = 0 & dynamic $cheatmenu[''std_cure''] & dynamic $cheatmenu[''pain_killer'']">Cure all ailments.</a>'
	nl
	if cyccustom = 0:pl'Automatic period tracking - <a href="exec:dynamic $cheatmenu[''auto_period'']">OFF</a>'
	if cyccustom = 1:pl'Automatic period tracking - <a href="exec:dynamic $cheatmenu[''auto_period'']">ON</a>'
	pl'<a href="exec:dynamic $cheatmenu[''force_preg'']">Force random pregnancy</a>'
	pl'<a href="exec:dynamic $cheatmenu[''remove_preg'']">Remove pregnancy</a>'
	pl'<a href="exec:dynamic $cheatmenu[''cycle'']"><b>Set stage of menstrual cycle</b></a>'
	if Enable_nogameover = 1:
		pl' <a href="exec:Enable_nogameover = 0 & dynamic $cheatmenu">Prevent Non-Drama GAMEOVER: ON</a>'
	else
		pl' <a href="exec:Enable_nogameover = 1 & dynamic $cheatmenu">Prevent Non-Drama GAMEOVER: OFF</a>'
	end
	nl
	if sound = 1:
		pl' <a href="exec:sound = 0 & dynamic $cheatmenu">Music: OFF</a>'
	else
		pl' <a href="exec:sound = 1 & dynamic $cheatmenu">Music: ON</a>'
	end
	pl' <a href="exec:music_on = 0 & music_off = 1">Stop current Music</a>'
	nl
	pl '<a href="exec:dynamic $cheatmenu[''dynamic'']">Dynamic Input Command</a>'
	pl'<a href="exec:gs ''cum_arrcheat''">OOX Debug</a>'
	pl'Right now <<$week[week]>> <<$month>> <<day>> <<year>> <<hour>>:<<minut>>'
	pl '<a href="exec:dynamic $cheatmenu[''quicktime''], 15 & dynamic $cheatmenu">+15</a>'
	pl '<a href="exec:gs''cum_cleanup'',''reset''">Remove all cum</a>'
	nl
	nl
   	pl'<a href="exec:gt''pavResidential''">Teleport to Pavlovsky</a>'
   	pl'<a href="exec:gt''street''">Teleport to City</a>'
   	pl'<a href="exec:gt''gadukino''">Teleport to Gadyukino</a>'
   	pl'<a href="exec:gt''dachi''">Teleport to Suburban Cooperative</a>'
	pl'<b>Warning!</b> Teleporting while in event is likely to break your game!'
    pl''
	pl'Pregnancy speed multiplier: <a href="exec:if pregspeedcheat < 3:pregspeedcheat += 1 & dynamic $cheatmenu else pregspeedcheat = 0 & dynamic $cheatmenu"><b><<pregspeedcheat+1>></b></a>'
	pl''
	pl'<a href="exec:dynamic $cheatmenu[''vartracker'']"><b>Variable tracker</b></a>'
}

$cheatmenu['vartracker'] = {
	gs'stat'
	clr
	pl'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	pl'<center>For testing purposes.<br>If reporting a bug only the lines in red are neccessary.</center>'
	pl''
	pl'$loc: <<$loc>>'
	pl'$locM: <<$locM>>'
	pl'<font color = red>$CURLOC: <<$CURLOC>></font>'
	pl'$location_type: <<$location_type>>'
	pl'daystart: <<daystart>>'
	pl'daystart_start: <<daystart_start>>'
	pl'month: <<month>>'
	pl'week: <<week>>'
	pl'$temperature: <<$temperature>>'
	pl'pffilmday: <<pffilmday>>'
	pl'$pfname: <<$pfname>>'
	pl'modelmon: <<modelmon>>'
	pl'min_arousal: <<min_arousal>>'
	pl'nipple_size: <<nipple_size>>'
	pl'clit_size: <<clit_size>>'
	pl'steroid_have: <<steroid_have>>'
	pl'steroid_counter: <<steroid_counter>>'
	pl'steroid_dose: <<steroid_dose>>'
	pl'aphrodisiac_have: <<aphrodisiac_have>>'
	pl'aphrodisiac_counter: <<aphrodisiac_counter>>'
	pl'aphrodisiac_timer: <<aphrodisiac_timer>>'
	pl'aphrodisiac_addiction: <<aphrodisiac_addiction>>'
	pl'bcream_have: <<bcream_have>>'
	pl'motherQW: <<Astat_Qstlvl[29]>>'
	pl'nastjaqw: <<nastjaqw>>'
	pl'sex: <<stat[''vaginal'']>>'
	pl'$clothingworntype: <<$clothingworntype>>'
	pl'PCloQuality: <<PCloQuality>>'
	pl'MiraFatherQW: <<MiraFatherQW>>'
	pl'miraperversion: <<miraperversion>>'
	pl'mirasextimes: <<mirasextimes>>'
	pl'piratsuka: <<piratsuka>>'
	pl'miraQW: <<miraQW>>'
	pl'mitkasextimes: <<mitkasextimes>>'
	pl'mirabrosextime: <<mirabrosextime>>'
	pl'momslut: <<momslut>>'
	pl'children: <<kid>>'
	pl'fetus number: <<BabyEmbryo>>'
	pl'pregnancy state: <<preg>>'
	pl'thinkpreg: <<thinkpreg>>'
	pl'knowpreg: <<knowpreg>>'
	pl'knowpregrecover: <<knowpregrecover>>'
	pl'cycle: <<cycle>>'
	pl'menoage: <<menoage>>'
	pl'age: <<age>>'
	pl'mesec: <<mesec>>'
	pl'FocH: <<FocH>>'
	pl'EggRH: <<EggRH>>'
	pl'Ovulate: <<Ovulate>>'
	pl'EggRH: <<UnfertEgg>>'
	pl'EggRH: <<FertEgg>>'
	if FertEgg > 0:
		i = arrpos('$kidname','unborn')
		imax = arrsize('$kidname')-1
		:chlp
			pl'    <<i+1>>. baby''s pregnancy type: <<babyptype[i]>>'	
		if i < imax: i += 1 & jump 'chlp'
		killvar 'i'
		killvar 'imax'
	end
	pl'Implanted Embryos: <<BabyEmbryo>>'
	pl'ferteggage: <<ferteggage>>'
	pl'PregChem: <<PregChem>>'
	pl'pillcon: <<pillcon>>'
	pl'RecovH: <<RecovH>>'
	pl'daylastperiod: <<daylastperiod>> (daystart difference: <<daystart-daylastperiod>>)'
	pl'hypnoTime: <<hypnoTime>>'
	pl'hypnoStrength: <<hypnoStrength>>'
	pl'hypnoDay: <<hypnoDay>>'
	pl'hypnoAddict: <<hypnoAddict>>'
	pl'missCum: <<missCum>>'
	pl'condoms/bad condoms: <<prezik>>/<<badprezik>>'
}

$cheatmenu['bdimmain'] = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	nl
	pl '<center><b>Body Image Controls</b></center>'
	nl
	pl 'You are currently using set: <<$bodimgsets[((bodset * 10) + 9)]>>'
	if bdsetlock = 1:
		pl 'The set used is locked to current.'
	else
		pl 'The set used is unlocked.'
	end
	nl
	pl 'This is the current default and custom (if any) body image sets:'
	nl
	pl '<a href="exec:chmbodset = 0 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[9]>></b></a>'
	nl
	pl '<a href="exec:chmbodset = 1 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[19]>></b></a>'
	nl
	pl '<a href="exec:chmbodset = 2 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[29]>></b></a>'
	nl
	if bodsetcnt >= 3:
		pl 'You may edit aspects of a custom image set by clicking on their folder names below.'
		nl
		pl '<a href="exec:chmbodset = 3 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[39]>></b></a>'
		nl
	elseif bodsetcnt = 2:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end
	if bodsetcnt >= 4:
		pl '<a href="exec:chmbodset = 4 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[49]>></b></a>'
		nl
	elseif bodsetcnt = 3:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end
	if bodsetcnt >= 5:
		pl '<a href="exec:chmbodset = 5 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[59]>></b></a>'
		nl
	elseif bodsetcnt = 4:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end
	if bodsetcnt >= 6:
		pl '<a href="exec:chmbodset = 6 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[69]>></b></a>'
		nl
	elseif bodsetcnt = 5:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end
	if bodsetcnt >= 7:
		pl '<a href="exec:chmbodset = 7 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[79]>></b></a>'
		nl
	elseif bodsetcnt = 6:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end
	if bodsetcnt >= 8:
		pl '<a href="exec:chmbodset = 8 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[89]>></b></a>'
		nl
	elseif bodsetcnt = 7:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end
	if bodsetcnt >= 9:
		pl '<a href="exec:chmbodset = 9 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[99]>></b></a>'
		nl
	elseif bodsetcnt = 8:
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
		nl
	end

}

$cheatmenu['bdimdisplay'] = {
	gs 'stat'
	clr
	pl '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
	nl
	pl '<center><b>Body Image Set Display</b></center>'
	pl '<a href="exec:killvar ''chmbodset'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
	nl
	if bdsetlock = 1 and chmbodset = fixbodset:
		pl 'This is the currently locked set.'
		pl '<a href="exec:bdsetlock = 0 & bodset = 1 & killvar ''fixbodset'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Clear the lock.</b></a>'
	else
		pl '<a href="exec:bdsetlock = 1 & bodset = chmbodset & fixbodset = chmbodset & dynamic $cheatmenu[''bdimdisplay'']"><b>Use this set only.</b></a>'
	end
	nl
	if chmbodset <= 2:
		pl 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
		pl 'Descriptors:'
		pl '<a href="exec:view ''images/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
		nl
	else
		pl 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
		pl 'Descriptors: (Displayed as "You are:")'
		pl '<a href="exec:view ''images/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a> -- <a href="exec:chmbddes = 1 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a> -- <a href="exec:chmbddes = 2 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a> -- <a href="exec:chmbddes = 3 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a> -- <a href="exec:chmbddes = 4 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
		nl
		pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a> -- <a href="exec:chmbddes = 5 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
		nl
		if imgset6ovr[chmbodset] = 1:
			pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a> -- <a href="exec:chmbddes = 6 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
			nl
			pl 'You are using a <a href="exec:imgset6ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 6</a> for this set.'
			nl
		else
			pl '<a href="exec:view ''images/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
			nl
			pl 'You are using the <a href="exec:imgset6ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 6</a> for this set.'
			nl
		end
		if imgset7ovr[chmbodset] = 1:
			pl '<a href="exec:view ''images/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a> -- <a href="exec:chmbddes = 7 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
			nl
			pl 'You are using a <a href="exec:imgset7ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 7</a> for this set.'
			nl
		else
			pl '<a href="exec:view ''images/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
			nl
			pl 'You are using the <a href="exec:imgset7ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 7</a> for this set.'
			nl
		end
		pl '<a href="exec:dynamic $cheatmenu[''bdimcstdel'']">Delete this set.</a>'
	end
}

$cheatmenu['bdimcstdel'] = {
	clr
	pl '<center><b>Body Image Set Removal</b></center>'
	pl '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
	nl
	pl 'This is where you remove a body image set from use, please note it does not delete anything, it just clears the custom set from this game instance/save.'
	if klsetask = 1:
		pl '<a href="exec:klsetask = 2 & dynamic $cheatmenu[''bdimcstdel'']"><b>Are you sure you want to remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</b></a>'
	elseif klsetask = 2:
		if chmbodset <= 2:
			pl 'You have encoutered error 1'
			pl '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
			exit
		end
		if bdsetlock = 1 and fixbodset >= chmbodset: bdsetlock = 0 & killvar 'fixbodset'
		if bodsetcnt > chmbodset:
			cyci1 = 0
			cyci2 = chmbodset

			:overwriter1

			$bodimgsets[((cyci2 * 10) + cyci1)] = $bodimgsets[(((cyci2 + 1) * 10) + cyci1)]
			cyci1 += 1
			if cyci1 < 10: jump 'overwriter1'
			imgset6ovr[cyci2] = imgset6ovr[(cyci2 + 1)]
			imgset7ovr[cyci2] = imgset7ovr[(cyci2 + 1)]
			cyci1 = 0
			cyci2 += 1
			if cyci2 < bodsetcnt: jump 'overwriter1'
			killvar 'cyci1' & killvar 'cyci2'
		elseif bodsetcnt < chmbodset:
			pl 'You have encoutered error 2'
			pl '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
			exit
		end
		cyci1 = 9
		
		:poofer1
		
		killvar 'bodimgsets', ((bodsetcnt * 10) + cyci1)
		cyci1 -= 1
		if cyci1 >= 0: jump 'poofer1'
		killvar 'cyci1'
		killvar 'imgset6ovr', bodsetcnt
		killvar 'imgset7ovr', bodsetcnt
		bodsetcnt -= 1
		killvar 'klsetask'
		dynamic $cheatmenu['bdimmain']
	else
		pl '<a href="exec:klsetask = 1 & dynamic $cheatmenu[''bdimcstdel'']">Remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</a>'
	end
}

$cheatmenu['bdimcstadd'] = {
	clr
	pl '<center><b>Body Image Set Addition</b></center>'
	pl '<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
	nl
	pl 'This is where you can add a new image set to a game.'
	pl 'To add an image set, create a folder in \images\body\shape\ and name it anything you want (shorter will be easier to remember). Then put in it any images you want named 1.jpg, 2.jpg, etc. up 5, 6, or 7. Just make sure it contains images 1 to 5. Once you have done that, click the link below and put in your folder name to add that set.'
	pl 'Note: This will only be for this instance/save of the game and you will have to redo the click the link step if you want to add the same folder to a different instance/save.'
	nl
	pl '<a href="exec:dynamic $cheatmenu[''bdimcstaddpro'']">Add Image Set</a>'
}

$cheatmenu['bdimcstaddpro'] = {
	$tmpstrg = input("Enter folder name, do not include ''\''")
	if $tmpstrg = '':
		killvar '$tmpstrg'
		dynamic $cheatmenu['bdimcstadd']
	else
		bodsetcnt += 1
		cyci1 = 0
		:addcyc
		$bodimgsets[((bodsetcnt * 10) + cyci1)] = $bodimgsets[(10 + cyci1)]
		cyci1 += 1
		if cyci1 < 9: jump 'addcyc'
		$bodimgsets[((bodsetcnt * 10) + 9)] = $tmpstrg
		imgset6ovr[bodsetcnt] = 0
		imgset7ovr[bodsetcnt] = 0
		killvar '$tmpstrg'
		killvar 'cyci1'
		dynamic $cheatmenu['bdimmain']
	end
}

$cheatmenu['bdimcstdesed'] = {
	$tmpstrg = input("Enter a new descriptor")
	if $tmpstrg = '':
		killvar 'chmbddes'
		killvar '$tmpstrg'
	else
		$bodimgsets[((chmbodset * 10) + chmbddes)] = $tmpstrg
		killvar 'chmbddes'
		killvar '$tmpstrg'
		dynamic $cheatmenu['bdimdisplay']
	end
}

$cheatmenu['succubreset'] = {
	clr
	pl 'Are you sure you want to reset your Succubus status? You will lose all levels, saved power, and succubus skill levels.'
	nl
	pl '<a href="exec:dynamic $cheatmenu[''magic'']"><b>No, nevermind.</b></a>'
	nl
	pl '<a href="exec:dynamic $cheatmenu[''sucresetdo'']"><b>Yes, remove & reset Succubus status</b></a>'
}

$cheatmenu['sucresetdo'] = {
!!	Probably do not need to kill all of these, but better to unload them.
	killvar 'scfwon'
	killvar 'scpopt'
	killvar '$sclocrt'
	killvar '$scargrt'
	killvar '$scsubloc'
	killvar 'suceatinit'
	killvar 'succubusflag'
	killvar 'succubusQW'
	killvar '$sucself1'
	killvar 'succublvl'
	killvar 'succubxp'
	killvar 'sucxpsnapshot'
	killvar 'succhungry'
	killvar 'sucexcess'
	killvar 'sexnutrition'
	killvar 'suclezsex'
	killvar 'sucabslez'
	killvar 'sucabscum'
	killvar '$sucabs1'
	killvar '$sucabs2'
	killvar '$sucabs3'
	killvar 'succonfail'
	killvar 'sucpowzeroed'
	killvar 'suchuntday'
	killvar 'sucpcinfo'
	killvar 'karinsucsex'
	killvar 'karinsucsexday'
	killvar 'karinsucsexask'
	killvar 'sucwalkday'
	killvar '$sucgoloc'
	killvar '$sucgometka'
	killvar 'sucskill'
	killvar 'sucstorecap'
	killvar 'sucinfoday'
	killvar 'sctrainprep'
!!	This list will be updated as new variables are added
	dynamic $cheatmenu['magic']
}

--- Cheatmenu_din ---------------------------------