# 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['noDrink'] = { if cheatNoDrink = 0: cheatNoDrink = 1 dynamic $cheatmenu['permanent'] exit elseif cheatNoDrink = 1: cheatNoDrink = 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['noFat'] = { if cheatNoFat = 0: cheatNoFat = 1 dynamic $cheatmenu['permanent'] exit elseif cheatNoFat = 1: cheatNoFat = 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['Bandit'] = { if cheatBandit = 0: cheatBandit = 1 dynamic $cheatmenu['permanent'] exit elseif cheatBandit = 1: cheatBandit = 0 dynamic $cheatmenu['permanent'] end } $cheatmenu['age'] = { :tooyoung age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000) if ((month * 100) + day) <= pcs_dob mod 10000: age -= 1 if age < 15: pcs_dob -= 10000 & jump 'tooyoung' 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['status'] } $cheatmenu['bodyMod'] = { clr pl '
Cheat menu
' pl '' pl '
Return to last menu
' pl '' pl '
WARNING!
' pl '' pl 'Using this function to change body shape does not resize clothes and may cause other adverse interactions.' pl 'Use at your own risk!' pl '' pl 'You are currently <<$body>>.' pl '' pl 'You may select from the following sizes:' pl '' pl 'starving (No, you may not select ''starving'', it''s here to show where the scale starts)' pl '' if salocatnow ! 1: pl '<<$bodimgsets[((bodset * 10) + 1)]>>' pl '' end if salocatnow ! 2: pl '<<$bodimgsets[((bodset * 10) + 2)]>>' pl '' end if salocatnow ! 3: pl '<<$bodimgsets[((bodset * 10) + 3)]>>' pl '' end if salocatnow ! 4: pl '<<$bodimgsets[((bodset * 10) + 4)]>>' pl '' end if salocatnow ! 5: pl '<<$bodimgsets[((bodset * 10) + 5)]>>' pl '' end if salocatnow ! 6: pl '<<$bodimgsets[((bodset * 10) + 6)]>>' pl '' end if salocatnow ! 7: pl '<<$bodimgsets[((bodset * 10) + 7)]>>' pl '' end } $cheatmenu['addict'] = { if NarkImmune = 0: NarkImmune = 1 dynamic $cheatmenu['permanent'] exit elseif NarkImmune = 1: NarkImmune = 0 dynamic $cheatmenu['permanent'] end } $cheatmenu['cheatHorny'] = { if cheatHorny = 0: cheatHorny = 1 dynamic $cheatmenu['permanent'] exit elseif cheatHorny = 1: cheatHorny = 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['cheat_NoPregnancy'] = { if cheat_NoPregnancy = 1: killvar 'cheat_NoPregnancy' $cheat_NoPregnancy = 'YES' dynamic $cheatmenu['permanent'] else cheat_NoPregnancy = 1 $cheat_NoPregnancy = 'NO' dynamic $cheatmenu['permanent'] end } $cheatmenu['Vibrator'] = { if cheatVib = 0: cheatVib = 1 bedvibrator = 1 dynamic $cheatmenu['permanent'] elseif cheatVib = 1: cheatVib = 0 bedvibrator = 0 dynamic $cheatmenu['permanent'] end } $cheatmenu['BimboCloth'] = { if $cheatBimbo = 'ON': $cheatBimbo = 'OFF' elseif $cheatBimbo = 'OFF': $cheatBimbo = 'ON' end } $cheatmenu['permanent'] = { gs'stat' clr if cheatWork = 0:$cheatWork = 'OFF' if cheatWork = 1:$cheatWork = 'ON' if cheatHapri = 0:$cheatHapri = 'OFF' if cheatHapri = 1:$cheatHapri = 'ON' if cheatKlisma = 0:$cheatKlisma = 'OFF' if cheatKlisma = 1:$cheatKlisma = 'ON' if cheatNomakeup = 0:$cheatNomakeup = 'OFF' if cheatNomakeup = 1:$cheatNomakeup = 'ON' if cheatNoSweat = 0:$cheatNoSweat = 'OFF' if cheatNoSweat = 1:$cheatNoSweat = 'ON' if cheatNoEat = 0:$cheatNoEat = 'OFF' if cheatNoEat = 1:$cheatNoEat = 'ON' if cheatNoDrink = 0:$cheatNoDrink = 'OFF' if cheatNoDrink = 1:$cheatNoDrink = 'ON' if cheatNoSleep = 0:$cheatNoSleep = 'OFF' if cheatNoSleep = 1:$cheatNoSleep = 'ON' if cheatNoFat = 0:$cheatNoFat = 'OFF' if cheatNoFat = 1:$cheatNoFat = 'ON' if cheatHealth = 0:$cheatHealth = 'OFF' if cheatHealth = 1:$cheatHealth = 'ON' if NarkImmune = 0:$NarkImmune = 'OFF' if NarkImmune = 1:$NarkImmune = 'ON' if cheatSlut = 0:$cheatSlut = 'NO' if cheatSlut = 1:$cheatSlut = 'YES' if cheatHorny = 0:$cheatHorny = 'NO' if cheatHorny = 1:$cheatHorny = 'YES' if bedvibrator = 0:$cheatVib = 'NO' if bedvibrator = 1:$cheatVib = 'YES' if cheatBandit = 0:$cheatBandit = 'NO' if cheatBandit = 1:$cheatBandit = 'YES' if cheat_NoPregnancy = 0:$cheat_NoPregnancy = 'NO' if cheat_NoPregnancy = 1:$cheat_NoPregnancy = 'YES' if $cheatBimbo = '':$cheatBimbo = 'OFF' pl'
Cheat menu
' nl pl'More than one job is possible: <<$cheatWork>>' pl'Always combed: <<$cheatHapri>>' pl'Always do an enema: <<$cheatKlisma>>' pl'Cosmetics never smeared: <<$cheatNomakeup>>' pl'Never sweat: <<$cheatNoSweat>>' pl'Never eat: <<$cheatNoEat>>' pl'Never drink: <<$cheatNoDrink>>' pl'Never sleep: <<$cheatNoSleep>>' pl'Never lose or gain weight: <<$cheatNoFat>>' pl'Disable STDs: <<$cheatHealth>>' pl'Never get addicted: <<$NarkImmune>>' if Enable_sforma = 1: pl'Allow any clothing for school: ON' else pl'Allow any clothing for school: OFF' end nl pl'Enable sleeping with vibrator inserted: <<$cheatVib>>' pl'Bandit always horny: <<$cheatBandit>>' pl'Bimbo clothing without becoming bimbo: <<$cheatBimbo>>' nl pl'Set arousal to always be at 50 or more: <<$cheatHorny>>' pl'Turn off periods (and pregnancies): <<$cheatSlut>>' pl'Impregnation is no longer in the game: <<$cheat_nopregnancy>>' nl if cyccustom = 0:pl'Automatic period tracking: OFF' if cyccustom = 1:pl'Automatic period tracking: ON' nl if Enable_autotampon = 1: pl'Automatic cheat on Tampon: ON' else pl'Automatic cheat on Tampon: OFF' end nl if Enable_nodream > 0: pl'No dream chance: <>%, ON' else pl'No dream chance: OFF' end & !1.2.3 new function if Enable_skipnoevclass > 0: pl'Only allow Class event with (Anatoly E.), with chance : <>%, ON' else pl'Only allow Class event with (Anatoly E.): OFF' end nl pl'WARNING:some events need cum/sweat/non-Virgin to trigger. These cheat may cause bug' !{ if Enable_clearcum = 1: pl' Clean cum Instantly: ON' else pl' Clean cum Instantly: OFF' end } } $cheatmenu['status'] = { gs'stat' clr pl'
Cheat menu
' nl pl'Set alcohol levels:' pl'Sober Tipsy Drunk Wasted Barely coherent' nl pl'Max arousal' pl'Min arousal' pl'Body Modification' nl pl'Full restoration of Health, Manna, Reason.' pl'Full restoration of Sleep, Stamina, Mood.' pl'Full restoration of Hunger and Water.' pl'Change money' pl'Zero money' pl'Cure all stds' pl'Cure all ailments.' nl pl'Force random pregnancy' pl'Remove pregnancy' pl'Set stage of menstrual cycle' pl 'Remove all cum' } $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'
Cheat menu
' nl pl'<<$pcs_firstname>> <<$pcs_lastname>> (<<$pcs_nickname>>). Rename' if player_avatar = 1: pl' Custom Avatar: ON' else pl' Custom Avatar: OFF' end if avatar_hair = 1: pl'Custom Hair: ON' pl'<<$av_hair>>' else pl'Custom Hair: OFF' end nl pl'Show design parameters of body' pl'Show beauty parameters' nl pl'You are (-1) <> (+1) years old' nl pl'You look <> years old' pl'Change apparent age' nl pl 'You have <<$titsize>> breasts' if tits => 0 and tits < 11:pl'Enlarge breasts(silicone)' if silicone => 1:pl'Shrink breasts(silicone)' if tits => 0 and tits < 11:pl'Enlarge breasts(natural)' if nbsize => 1:pl'Shrink breasts(natural)' nl pl'<<$lip>>' if pcs_lip < 4:pl'Enlarge lips' if pcs_lip > 0:pl'Shrink lips' nl pl'<<$skin>>' if pcs_skin < 100: pl'Improve skin' if pcs_skin > 0: pl'Worsen skin' if pcs_tan >= 0:pl'Become sunburnt' if pcs_tan > 0:pl'Remove pcs_tan' nl pl'<<$pcs_throat>>' if pcs_throat <= 31:pl'Increase throat capacity' if pcs_throat >= 5:pl'Decrease throat capacity' if dounspell = 1: nl pl'Hard Reset body shape' end nl pl'Go to page 2 Go to page 3' } $cheatmenu['looks2'] = { gs'stat' clr pl'
Cheat menu
' nl pl'<<$pcs_vag>>' if pcs_vag > 0:pl'Reinstate virginity' if pcs_vag <= 31:pl'Enlarge the vagina' if pcs_vag >= 5:pl'Reduce the vagina' pl 'Your vagina will shrink by <> every <> days.' if vshrink < 10:pl'Increase the amount to shrink' if vshrink > 0:pl'Reduce the amount to shrink' if vshrinkdays < 10:pl'Increase the number of days it takes' if vshrinkdays > 1:pl'Reduce the number of days it takes' nl pl'<<$pcs_ass>>' if pcs_ass <= 31:pl'Enlarge anus' if pcs_ass >= 5:pl'Reduce the anus' pl 'Your anus will shrink by <> every <> days.' if ashrink < 10:pl'Increase the amount to shrink' if ashrink > 0:pl'Reduce the amount to shrink' if ashrinkdays < 10:pl'Increase the number of days it takes' if ashrinkdays > 1:pl'Reduce the number of days it takes' nl if dounspell = 0: if fat ! 0: pl'Zero fat' pl'Body Fat = (<>): -10 -5 -1 +1 +5 +10' pl'Note: You need some Body Fat to survive, any value under 11 is clasified as "starving" and a value of 0 can lead to a Game Over.' end nl pl'Tattoo removal' nl pl'Go to page 1 Go to page 3' } $cheatmenu['looks3'] = { gs'stat' clr pl'
Cheat menu
' nl pl'<<$hair>>' if pcs_haircol =< 0: pl'Your hair is now (prev) <<$pcs_haircol>> (next)' elseif pcs_haircol > 0 and pcs_haircol < 3: pl'Your hair is now (prev) <<$pcs_haircol>> (next)' elseif pcs_haircol => 3: pl'Your hair is now (prev) <<$pcs_haircol>> (next)' end if pcs_hairlng > 975: pl'Hair length (<>) -100 -25 -5 +5' elseif pcs_hairlng > 900: pl'Hair length (<>) -100 -25 -5 +5 +25' elseif pcs_hairlng >= 100: pl'Hair length (<>) -100 -25 -5 +5 +25 +100' elseif pcs_hairlng >= 25: pl'Hair length (<>) -25 -5 +5 +25 +100' elseif pcs_hairlng >= 5: pl'Hair length (<>) -5 +5 +25 +100' else pl'Hair length (<>) +5 +25 +100' end if hairgrowcht = 0:pl'Stop hair growth' if hairgrowcht = 1:pl'Allow hair growth' nl pl'<<$glaza>>' if pcs_lashes < 2:pl'Enlarge lashes' if pcs_lashes > 0:pl'Shrink lashes' if pcs_eyesize < 3:pl'Increase the size of the eye' if pcs_eyesize > 0:pl'Reduce the size of the eye' if pcs_eyecol <= 0: pl'Your eyes are now (prev) <<$pcs_eyecol>> (next)' elseif pcs_eyecol > 0 and pcs_eyecol < 3: pl'Your eyes are now (prev) <<$pcs_eyecol>> (next)' elseif pcs_eyecol >= 3: pl'Your eyes are now (prev) <<$pcs_eyecol>> (next)' end nl pl'Go to page 1 Go to page 2' } $cheatmenu['parameters'] = { clr pl'
Cheat menu - Outward Appearance
' nl pl'Body Shape Parameters' pl'<> - <> - <>, <<$titsize>> breasts, the difference between the hips and waist <> cm' pl'Muscularity: musle = <>, salo = <>, fat = <>' pl'Variable List:' pl'agilbuf = <>' pl'strenbuf = <>' pl'vitalbuf = <>' pl'weight (pcs_weight) = <>' pl'bust (pcs_bust) = <>' pl'band (pcs_band) = <>' pl'waist (pcs_waist) = <>' pl'hips (pcs_hips) = <>' pl'bust - band (pcs_cupsize) = <>' pl'silicone = <>' pl'nbsize = <>' pl'magicf2b = <>' pl'genbsize = <>' pl'vhips = <>' pl'vhtmp = <>' pl'wratio = <>' pl'bratio = <>' pl'hratio = <>' pl'vofat = <>' pl'salocatnow = <>' pl'salocatlast = <>' pl'magf2bdo = <>' pl'mgf2bnocnt = <>' pl'magtarcup = <>' pl'normbuffpick = <>' pl'nrmbfpckct = <>' pl'btwarn = <>' pl'salolast = <>' } $cheatmenu['vneshpara'] = { clr pl'
Cheat menu - Outward Appearance
' nl pl 'Appearance Parameters' pl 'vidage = <>' pl 'pcs_lashes = <>' pl 'pcs_eyesize = <>' pl 'pcs_lip = <>' pl 'pcs_apprncbase = <>' pl 'PXCloThinness = <>' pl 'PXCloTopCut = <>' pl 'PXCloSkirtShortness = <>' pl 'PXCloPantsShortness = <>' pl 'CloAdjustedBeauty = <>' pl 'mopkoef = <>' pl 'pcs_hairbsh = <>' pl 'lipbalmKoef = <>' pl 'pcs_breath = <>' pl 'sweatKoef = <>' pl 'glassvnesh = <>' pl 'dyevmod = <>' pl 'hairkoef = <>' pl 'legkoef = <>' } $cheatmenu['tatoo'] = { gs'stat' clr pl'
Cheat menu - Outward Appearance
' nl if tatarm = 0:pl'You do not have a tattoo on your arm' if tatarm >= 1:pl'Remove your arm tattoo' if tatass = 0:pl'You do not have a tattoo on your ass' if tatass >= 1:pl'Remove your ass tattoo' if tatback = 0:pl'You do not have a tattoo on your back' if tatback >= 1:pl'Remove your back tattoo' if tatblly = 0:pl'You do not have a tattoo on your belly' if tatblly >= 1:pl'Remove your belly tattoo' if tatbrst = 0:pl'You do not have a tattoo on your breast' if tatbrst >= 1:pl'Remove your breast tattoo' if tatchst = 0:pl'You do not have a tattoo on your chest' if tatchst >= 1:pl'Remove your chest tattoo' if tatfce = 0:pl'You do not have a tattoo on your face' if tatfce >= 1:pl'Remove your face tattoo' if tatankle = 0:pl'You do not have a tattoo on your ankle' if tatankle >= 1:pl'Remove your ankle tattoo' if tatleg = 0:pl'You do not have a tattoo on your leg' if tatleg >= 1:pl'Remove your leg tattoo' if tatlip = 0:pl'You do not have a tattoo on your lip' if tatlip >= 1:pl'Remove your lip tattoo' if tatneck = 0:pl'You do not have a tattoo on your neck' if tatneck >= 1:pl'Remove your neck tattoo' if tatvag = 0:pl'You do not have a public tattoo' if tatvag >= 1:pl'Remove your pubic tattoo' if tatlech = 0:pl'You do not have a tattoo on your shoulder' if tatlech >= 1:pl'Remove your shoulder tattoo' if tatside = 0:pl'You do not have a tattoo on your side' if tatside >= 1:pl'Remove your the tattoo on your side' if tatupb = 0:pl'You do not have a tramp stamp' if tatupb >= 1:pl'Remove your tramp stamp' if tatunder = 0:pl'You do not have an under breast tattoo' if tatunder >= 1:pl'Remove your under breast tattoo' if tatwrist = 0:pl'You do not have a tattoo on your wrist' if tatwrist >= 1:pl'Remove your wrist tattoo' if tathand = 0:pl'You do not have a tattoo on your hand' if tathand >= 1:pl'Remove your hand tattoo' } $cheatmenu['stats'] = { gs'stat' clr pl'
Cheat menu
' nl pl 'Strength (<>): +1 +5 +10 -1 -5 -10' pl 'Agility (<>): +1 +5 +10 -1 -5 -10' pl 'Endurance (<>): +1 +5 +10 -1 -5 -10' pl 'Intelligence (<>): +1 +5 +10 -1 -5 -10' pl 'Mental Agility (<>): +1 +5 +10 -1 -5 -10' pl 'Sprit (<>): +1 +5 +10 -1 -5 -10' pl 'Charisma (<>): +1 +5 +10 -1 -5 -10' pl 'Perception (<>): +1 +5 +10 -1 -5 -10' if MagikDostup = 0: pl 'Magic (<>): +1 +5 +10 -1 -5 -10' nl pl'Sexual:' pl 'Inhibition level (<<100 - pcs_inhib>>): +1 +5 +10 -1 -5 -10' if pcs_dom < 0 or sub < 0: pcs_dom = 0 & sub = 0 if pcs_dom > 100: pcs_dom = 100 if sub > 100: sub = 100 if pcs_dom >= 0 and sub = 0: pl 'Dominance (<>): +1 +5 +10 -1 -5 -10' else pl 'Submissiveness (<>): +1 +5 +10 -1 -5 -10' end nl pl'Combat:' pl 'Jabs - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Power - Strikes Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Kicks - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Defence - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Marksmanship - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' nl pl'Craft:' pl 'Singing - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Tailoring - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Instrumental - Music Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Photography - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Artistic - Skills Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' nl pl'Dance:' pl 'Modern Dancing - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Erotic Dancing - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Pole Dancing - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' nl pl'Sport:' pl 'Running - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Volleyball - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Ice Skating - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Wrestling - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Football - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' nl pl'Work:' pl 'Serving - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Modeling - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Medicine - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' nl pl'Others:' pl 'Chess - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Gaming - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'People - skills Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Persuasion - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Observation - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Makeup - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Computer - Skill Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Hacking - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' pl 'Handy-work - Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' if MagikDostup = 0: pl 'Spell - Casting Adjusted total (<>) - Skill level (<>): +1 +5 +10 -1 -5 -10' nl if workPTU > 1:pl'Reputation teacher+10: <>' if workPTU > 1:pl'Reputation teacher-10: <>' if pcs_grades >= 0:pl'Improve their academic performance: <>' if schoolprogul >= 0:pl'Zero Absenteeism: <>' } $cheatmenu['reputation'] = { gs'stat' clr pl'
Cheat menu
' pl 'Relationship values are from 0 - 100. If they exceed this limit they will be reset overnight.' if storyline = 1: nl pl'Relationships in Pavlovsk' nl pl 'Family' if Enable_reputation_family = 0: pl 'Show details' end if Enable_reputation_family = 1: pl 'Hide details' pl 'Stepfather: <> +10 -10' pl 'Mother: <> +10 -10' pl 'Sister: <> +10 -10' pl 'Brother: <> +10 -10' end nl nl pl 'School' pl 'Popular Kids' if Enable_reputation_popular = 0: pl 'Show details' end if Enable_reputation_popular = 1: pl 'Hide details' pl '<<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>>: <> +10 -10' pl '<<$npc_firstname[''A4'']>> <<$npc_lastname[''A4'']>>: <> +10 -10' pl '<<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>>: <> +10 -10' pl '<<$npc_firstname[''A15'']>> <<$npc_lastname[''A15'']>>: <> +10 -10' pl '<<$npc_firstname[''A17'']>> <<$npc_lastname[''A17'']>>: <> +10 -10' pl '<<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>>: <> +10 -10' pl '<<$npc_firstname[''A146'']>> <<$npc_lastname[''A146'']>>: <> +10 -10' pl '<<$npc_firstname[''A147'']>> <<$npc_lastname[''A147'']>>: <> +10 -10' pl '<<$npc_firstname[''A148'']>> <<$npc_lastname[''A148'']>>: <> +10 -10' if soniaPS = 0: pl '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <> +10 -10' pl '<<$npc_firstname[''A139'']>> <<$npc_lastname[''A139'']>>: <> +10 -10' pl '<<$npc_firstname[''A140'']>> <<$npc_lastname[''A140'']>>: <> +10 -10' end nl pl 'Athletes' if Enable_reputation_athletes = 0: pl 'Show details' end if Enable_reputation_athletes = 1: pl 'Hide details' pl '<<$npc_firstname[''A3'']>> <<$npc_lastname[''A3'']>>: <> +10 -10' if fedormasha = 0: pl '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <> +10 -10' pl '<<$npc_firstname[''A8'']>> <<$npc_lastname[''A8'']>>: <> +10 -10' pl '<<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>>: <> +10 -10' if zverRageQW = 0 or zverRageQW = 10: pl '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <> +10 -10' pl '<<$npc_firstname[''A19'']>> <<$npc_lastname[''A19'']>>: <> +10 -10' pl '<<$npc_firstname[''A22'']>> <<$npc_lastname[''A22'']>>: <> +10 -10' pl '<<$npc_firstname[''A149'']>> <<$npc_lastname[''A149'']>>: <> +10 -10' pl '<<$npc_firstname[''A150'']>> <<$npc_lastname[''A150'']>>: <> +10 -10' pl '<<$npc_firstname[''A141'']>> <<$npc_lastname[''A141'']>>: <> +10 -10' end nl pl 'Nerds' if Enable_reputation_nerds = 0: pl 'Show details' end if Enable_reputation_nerds = 1: pl 'Hide details' pl '<<$npc_firstname[''A2'']>> <<$npc_lastname[''A2'']>>: <> +10 -10' pl '<<$npc_firstname[''A6'']>> <<$npc_lastname[''A6'']>>: <> +10 -10' pl '<<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>>: <> +10 -10' pl '<<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>>: <> +10 -10' pl '<<$npc_firstname[''A151'']>> <<$npc_lastname[''A151'']>>: <> +10 -10' pl '<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <> +10 -10' pl '<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <> +10 -10' pl '<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <> +10 -10' end nl pl 'Gopniks' if Enable_reputation_gopniks = 0: pl 'Show details' end if Enable_reputation_gopniks = 1: pl 'Hide details' pl '<<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>>: <> +10 -10' pl '<<$npc_firstname[''A10'']>> <<$npc_lastname[''A10'']>>: <> +10 -10' pl '<<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>: <> +10 -10' pl '<<$npc_firstname[''A20'']>> <<$npc_lastname[''A20'']>>: <> +10 -10' pl '<<$npc_firstname[''A21'']>> <<$npc_lastname[''A21'']>>: <> +10 -10' pl '<<$npc_firstname[''A24'']>> <<$npc_lastname[''A24'']>>: <> +10 -10' pl '<<$npc_firstname[''A154'']>> <<$npc_lastname[''A154'']>>: <> +10 -10' pl '<<$npc_firstname[''A155'']>> <<$npc_lastname[''A155'']>>: <> +10 -10' pl '<<$npc_firstname[''A156'']>> <<$npc_lastname[''A156'']>>: <> +10 -10' pl '<<$npc_firstname[''A157'']>> <<$npc_lastname[''A157'']>>: <> +10 -10' pl '<<$npc_firstname[''A158'']>> <<$npc_lastname[''A158'']>>: <> +10 -10' pl '<<$npc_firstname[''A143'']>> <<$npc_lastname[''A143'']>>: <> +10 -10' pl '<<$npc_firstname[''A144'']>> <<$npc_lastname[''A144'']>>: <> +10 -10' pl '<<$npc_firstname[''A145'']>> <<$npc_lastname[''A145'']>>: <> +10 -10' end nl pl 'Outcasts/Loners' if Enable_reputation_outcasts = 0: pl 'Show details' end if Enable_reputation_outcasts = 1: pl 'Hide details' pl '<<$npc_firstname[''A7'']>> <<$npc_lastname[''A7'']>>: <> +10 -10' if soniaPS > 0: pl '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <> +10 -10' if zverRageQW > 1 and zverRageQW < 10: pl '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <> +10 -10' if fedormasha = 1: pl '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <> +10 -10' pl '<<$npc_firstname[''A159'']>> <<$npc_lastname[''A159'']>>: <> +10 -10' end nl pl 'Teachers/Coaches' if Enable_reputation_teachers = 0: pl 'Show details' end if Enable_reputation_teachers = 1: pl 'Hide details' pl '<<$npc_firstname[''A26'']>> <<$npc_lastname[''A26'']>>: <> +10 -10' pl 'Mikhail Nikolayevich: <> +10 -10' pl '<<$npc_firstname[''A128'']>> <<$npc_lastname[''A128'']>>: <> +10 -10' pl '<<$npc_firstname[''A129'']>> <<$npc_lastname[''A129'']>>: <> +10 -10' pl '<<$npc_firstname[''A130'']>> <<$npc_lastname[''A130'']>>: <> +10 -10' pl '<<$npc_firstname[''A131'']>> <<$npc_lastname[''A131'']>>: <> +10 -10' pl '<<$npc_firstname[''A132'']>> <<$npc_lastname[''A132'']>>: <> +10 -10' pl '<<$npc_firstname[''A133'']>> <<$npc_lastname[''A133'']>>: <> +10 -10' pl '<<$npc_firstname[''A134'']>> <<$npc_lastname[''A134'']>>: <> +10 -10' pl '<<$npc_firstname[''A135'']>> <<$npc_lastname[''A135'']>>: <> +10 -10' pl '<<$npc_firstname[''A136'']>> <<$npc_lastname[''A136'']>>: <> +10 -10' pl '<<$npc_firstname[''A137'']>> <<$npc_lastname[''A137'']>>: <> +10 -10' pl '<<$npc_firstname[''A138'']>> <<$npc_lastname[''A138'']>>: <> +10 -10' end nl nl pl 'Others' nl if npc_rel['A112'] >= 0: pl 'Sergei Shulgin: <> +10 -10' end end nl if npc_rel['A219'] >= 0: pl 'Kat: <> +10 -10' end if npc_rel['A218'] >= 0: pl 'Tanya: <> +10 -10' end if npc_rel['A220'] >= 0: pl 'Vika: <> +10 -10' end if npc_rel['A93'] >= 0: pl 'Irina: <> +10 -10' end if npc_rel['A43'] >= 0: pl 'Tamara: <> +10 -10' end if alla >= 0: pl 'Alla: <> +10 -10' end if masha >= 0: pl 'Masha: <> +10 -10' end if npc_rel['A41'] >= 0: pl 'Givi: <> +10 -10' end if npc_rel['A42'] >= 0: pl 'Ashot: <> +10 -10' end if afra >= 0: pl 'Black Guys: <> +10 -10' end if npc_rel['A89'] >= 0: pl 'Eugene: <> +10 -10' end if npc_rel['A217'] >= 0: pl 'Pavlin: <> +10 -10' end if hantersAndreiQw >= 0: pl 'Hunter Andrew: <> +10 -10' end if hantersSergeiQw >= 0: pl 'Hunter Sergei: <> +10 -10' end if hantersIgorQw >= 0: pl 'Hunter Igor: <> +10 -10' end if npc_rel['A217'] >= 0: pl 'Martin: <> +10 -10' end if pcs_lovers[0] = 1: nl pl'You are dating <<$loverdesc[0]>>.' if loverrelation[0] < 0: loverrelation[0] = 0 if loverdays[0] < 0: loverdays[0] = 0 if haraklover[0] > 2: haraklover[0] = 0 if loverizvrat[0] > 1: loverizvrat[0] = 0 pl'Change lover''s personality: <>' pl'Change lover''s perversion: <>' pl'Relationship: <> +10 -10' pl'You''ve been dating for <> days. +5 -5' end if pcs_lovers[1] = 1: nl pl'You are dating <<$loverdesc[1]>>.' if loverrelation[1] < 0: loverrelation[1] = 0 if loverdays[1] < 0: loverdays[1] = 0 if haraklover[1] > 2: haraklover[1] = 0 if loverizvrat[1] > 1: loverizvrat[1] = 0 pl'Change lover''s personality: <>' pl'Change lover''s perversion: <>' pl'Relationship: <> +10 -10' pl'You''ve been dating for <> days. +5 -5' end if pcs_lovers[2] = 1: nl pl'You are dating <<$loverdesc[2]>>.' if loverrelation[2] < 0: loverrelation[2] = 0 if loverdays[2] < 0: loverdays[2] = 0 if haraklover[2] > 2: haraklover[2] = 0 if loverizvrat[2] > 1: loverizvrat[2] = 0 pl'Change lover''s personality: <>' pl'Change lover''s perversion: <>' pl'Relationship: <> +10 -10' pl'You''ve been dating for <> days. +5 -5' end nl if pav_slut >= 25:pl'In Pavlovsk you are known as a <<$gnikname>>' if opusk > 0 or gnewQW < 4 or sipovka > 0:pl'Clear reputation with Gopniks' if StoryLine = 1: if motherKnowWhore > 0 or motherKnowSpravka > 0 or brotherSex >= 1 or evgenQW >= 3 or brotherknowslut > 0 or sisterknowslut > 0: nl pl'WARNING Clearing reputation flags with your family MAY CAUSE BUGS!!' if motherKnowWhore > 0: pl'Your mother thinks you are a whore. Clear' elseif motherKnowSpravka > 0: pl'Your mother thinks that you are a virgin. Clear' end nl if evgenQW >= 3: pl'Your brother thinks you are a slut. Clear' end if brotherknowslut = 1: pl'Your brother saw semen on your body and thinks you fuck around. Clear' if brotherknowslut >= 2: pl'Your brother saw you in the park fucking the Gopniks. Clear' nl if sisterknowslut > 1 and sisboypartyQW > 1: pl'Your sister says you are a slut Clear' elseif sisterknowslut > 0: pl'Your sister knows that you sleep around. Clear' end end end } $cheatmenu['documents'] = { gs'stat' clr pl'
Cheat menu
' nl if SchoolAtestat = 0:pl'Get School Certificate' if SchoolAtestat = 1:pl'Already have a School Certificate' if diplom = 0:pl'Get Diploma' if diplom = 1:pl'You already have a Diploma' if secrdiplom = 0:pl'Get Secretarial Diploma' if secrdiplom = 1:pl'You already have a Secretarial Diploma' if masash < 10:pl'Get Masseuse Certificate' if masash >= 10:pl'You already have a Masseuse Certificate' if prava = 0:pl'Get Driving Licence' 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 'outdoors', 'temp_set' gs 'stat' temp_daystart = (year - 2016) * 365 !!2016 is a leapyear so no adjustment before division temp_daystart += (year - 2016) / 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 pl'
Cheat menu
' nl if temp_minut > 9: if temp_hour > 9: $temptime = '<>:<>' else $temptime = '0<>:<>' else if temp_hour > 9: $temptime = '<>:0<>' else $temptime = '0<>:0<>' end if minut > 9: if hour > 9: $tempcurtime = '<>:<>' else $tempcurtime = '0<>:<>' else if hour > 9: $tempcurtime = '<>:0<>' else $tempcurtime = '0<>:0<>' 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: <<$week[week]>>, <>. day of <<$month>>, <>, <<$tempcurtime>>' pl'Target time: <<$week[temp_week]>>, <>. day of <<$temp_month>>, <>, <<$temptime>>' pl'Daychange: <>' nl pl'Year: +1 Year -1 Year' pl'Select Month' $daychange = ' +7 Day' $daychange += ' +1 Day' $daychange += ' -1 Day' $daychange += ' -7 Day' pl 'Day:' +$daychange killvar 'daychange' $SS = 'Hour: ' if temp_hour > 0:$SS += '-1 ' else $SS += ' ' if temp_hour > 3:$SS += '-4 ' else $SS += ' ' if temp_hour ! 0:$SS += '0 ' else $SS += ' ' if temp_hour < 23:$SS += '+1 ' else $SS += ' ' if temp_hour < 20:$SS += '+4' pl $SS $SS = 'Minute: ' if temp_minut > 14:$SS += '-15 ' else $SS += ' ' if temp_minut > 0:$SS += '-1 ' else $SS += ' ' if temp_minut ! 0:$SS += '0 ' else $SS += ' ' if temp_minut < 59:$SS += '+1 ' if temp_minut < 46:$SS += '+15' pl $SS killvar 'SS' pl pl' Direct input time' pl pl'Weather: '+iif(sunWeather=0,'Rain','Sunny')+'' pl pl'Accept target date & time' pl'Reset target date & time' pl pl'Temperature = <<$temperature>> - +1 degree - +5 degrees - -1 degree - -5 degrees' pl if TempUnit = 0: pl'Use Fahrenheit scale' else pl'Use Celsius scale' } $cheatmenu['week'] = { gs'stat' clr pl'
Cheat menu - Time
' nl pl'Current time: <>. day of <<$month>>, <>, <<$tempcurtime>>' pl'Target time: <>. day of <<$temp_month>>, <>, <<$temptime>>' nl pl'Monday' pl'Tuesday' pl'Wednesday' pl'Thursday' pl'Friday' pl'Saturday' pl'Sunday' } $cheatmenu['month'] = { gs'stat' clr pl'
Cheat menu - Time
' nl pl'Current time: <>. day of <<$month>>, <>, <<$tempcurtime>>' pl'Target time: <>. day of <<$temp_month>>, <>, <<$temptime>>' nl pl'January' pl'February' pl'March' pl'April' pl'May' pl'June' pl'July' pl'August' pl'September' pl'October' pl'November' pl'December' } $cheatmenu['magic'] = { gs'stat' clr pl'
Cheat menu
' nl if succubusflag = 1: pl 'Remove & Reset Succubus status' nl end pl'Is magical: <>' nl if spelltuman = 0:pl'Cover the area fog' if spellklon = 0:pl'Override clone of yourself' if spellstun = 0:pl'Checkmate' if spellweap = 0:pl'Invest energy into a weapon (It requires weapons)' if spellwind = 0:pl'Blow away the fog' if spellklon2 = 0:pl'Substitute itself clones (3 pieces)' if spellenergo = 0:pl'Create a weak energy shield' if spellinit = 0:pl'Create a slight delay of time' if spellhel = 0:pl'Battle Heal' if spellfire0 = 0 or spellfire2 = 0 or spellfire3 = 0 or spellfire4 = 0 or spellfire5 = 0: nl pl'Elemental Spells Fire:' end if spellfire0 = 0:pl'Flame' if spellfire2 = 0:pl'The release of fire' if spellfire3 = 0:pl'Fire Barrier' if spellfire4 = 0:pl'Firestorm' if spellfire5 = 0:pl'Flame Shield' if spellele0 = 0 or spellele2 = 0 or spellele3 = 0 or spellele4 = 0 or spellele5 = 0: nl pl'Elements Lightning Spells:' end if spellele0 = 0:pl'Category' if spellele2 = 0:pl'Lightning' if spellele3 = 0:pl'Electric barrier' if spellele4 = 0:pl'Dance of thousands of birds' if spellele5 = 0:pl'Dancing Sphere' if spellert0 = 0 or spellert2 = 0 or spellert3 = 0 or spellert4 = 0 or spellert5 = 0: nl pl'Spells Earth Elements:' end if spellert0 = 0:pl'Quicksand' if spellert2 = 0:pl'Active protection' if spellert3 = 0:pl'Abyss' if spellert4 = 0:pl'Absolute protection' if spellert5 = 0:pl'Sando' if spellwind0 = 0 or spellwind2 = 0 or spellwind3 = 0 or spellwind4 = 0 or spellwind5 = 0: nl pl'Wind Elemental Spells:' end if spellwind0 = 0:pl'Wind gust' if spellwind2 = 0:pl'The horrific pressure' if spellwind3 = 0:pl'Vacuum Sphere' if spellwind4 = 0:pl'Vacuum shells' if spellwind5 = 0:pl'Devouring vacuum' if spellwater0 = 0 or spellwater2 = 0 or spellwater3 = 0 or spellwater4 = 0 or spellwater5 = 0: nl pl'Water Elemental Spell:' end if spellwater0 = 0:pl'Creek manna' if spellwater2 = 0:pl'Flooding' if spellwater3 = 0:pl'Blister' if spellwater4 = 0:pl'Water shark rocket' if spellwater5 = 0:pl'The Great Flood' } $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 TriperOral = 0 KandidozOnce = 0 Kandidoz = 0 } $cheatmenu['auto_period'] = { if cyccustom = 0: cyccustom = 1 else cyccustom = 0 end dynamic $cheatmenu['permanent'] } $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'] = { pregtime = 0 pregtalk = 0 preg = 0 thinkpreg = 0 knowpreg = 0 cycle = 4 RecovH = rand(7,70) RecovH += pregchem knowpregloss = 2 !! I am not sure, why is it here this cycle, but I leave it so (rachels) nextbaby = arrsize('yearkid') :poliabortloop !!Changed to check if baby has a birth year instead, if it doesn''t, do abortion if yearkid[nextbaby-1] = 0: KILLVAR 'polkid',nextbaby-1 KILLVAR '$kidname',nextbaby-1 KILLVAR 'kidage',nextbaby-1 KILLVAR 'daykid',nextbaby-1 KILLVAR 'monthkid',nextbaby-1 KILLVAR 'yearkid',nextbaby-1 KILLVAR 'Babyptype',nextbaby-1 KILLVAR '$ChildFath',nextbaby-1 KILLVAR '$ChildThFath',nextbaby-1 KILLVAR 'hairkid',nextbaby-1 KILLVAR 'eyeskid',nextbaby-1 KILLVAR 'cumarrcon',nextbaby-1 KILLVAR '$wombpotfath' BabyEmbryo -= 1 end nextbaby -= 1 if nextbaby > 0: jump 'poliabortloop' end } $cheatmenu['cycle'] = { if cycle ! 5: EggRH = 0 LutH = 0 Ovulate = 0 UnfertEgg = 0 FertEgg = 0 RecovH = 0 mesec = 0 'Menstration' 'Follicular' 'Ovulation' 'Luteal' end } $cheatmenu['display'] = { !call this for pre-game setting clr if Enable_settingmode = 1: !call from Menu - Game settings pl '
Settings
' nl pl'
Cheat Menu
' nl pl '
Exit Menu
' pl '
Game Play Setting
' else !value= 2, call from Character creation pl '
Game Play Setting
' end pl 'Mod management page: Here' if Enable_nogameover = 1: pl'Prevent Non-Drama GAMEOVER: Currently ON - Turn OFF' else pl'Prevent Non-Drama GAMEOVER: Currently OFF - Turn ON' end if music_on = 0: pl'Music: Currently OFF - Turn ON' else pl'Music: Currently ON - Turn OFF' end nl if oldobjmenu = 1: pl'Current Menu Style: Old Style Menu' else pl'Current Menu Style: New Style Menu' end if disable_autosave = 1: pl'AutoSave: Currently OFF - Turn ON' else pl'AutoSave: Currently ON - Turn OFF' end if autohairbrush = 1: pl'Auto brush hair on mirror visit: Currently ON - Turn OFF' else pl'Auto brush hair on mirror visit: Currently OFF - Turn ON' end if enfullmorrout = 1: pl'Full morning routine enabled: Currently ON - Turn OFF' else pl'Full morning routine enabled: Currently OFF - Turn ON' end if editpornname = 1: pl'Editing of the names of the porn movies you stared enabled: Currently ON - Turn OFF' else pl'Editing of the names of the porn movies you stared disabled: Currently OFF - Turn ON' end nl pl '
Difficulty Setting
' pl 'Difficulty: Currenty at <>' pl '' nl pl '
Display Setting
' if set_imgh > 0: set_imgw = 0 if set_imgw > 0: set_imgh = 0 if set_imgh <= 0 and set_imgw <= 0: $set_imgh = '' if set_imgh > 0: pl'Force Image Height: <>, ON' $set_imgh = 'Height = <>' else pl'Force Image height: OFF' end if set_imgw > 0: pl'Force Image Width: <>, ON' $set_imgh = 'width = <>' else pl'Force Image Width: OFF' end if night_mode = 1: pl 'Night Mode: ON' else pl 'Night Mode: OFF' end if Enable_faceturn = 1: pl'Always show face: ON' else pl'Always show face: OFF' end nl if disable_LoadSave = 0: pl'Save/Load Buttons: Currently Image' elseif disable_LoadSave = 2: pl'Save/Load Buttons: Currently Text' elseif disable_LoadSave = 1: pl'Save/Load Buttons: Currently Off' end nl if Enable_tablemap = 1: pl'List friends in table: ON' else pl'List friends in table: OFF' end if Enable_towntable = 1: pl'Display Pavlovsk description in table: ON' else pl'Display Pavlovsk description in table: OFF' end nl if Enable_clothwidth<0:Enable_clothwidth=0 if Enable_clothwidth > 0: pl'Set Wardrobe cloth image width: <>, ON' else pl'Set Wardrobe cloth image width: OFF' end nl if Enable_Android = 1: pl 'Set Fontsize for Status: Unsupported' pl 'Android Mode :ON' !pl 'click refresh to refresh status window.' pl 'click refresh on top of status window to renew.' else pl 'Android Mode :OFF' end nl pl '
Status Window Display
' if Enable_statfsize<0:Enable_statfsize=0 if Enable_statfsize > 0: pl 'Set Fontsize for Status: <>, ON' else pl 'Set Fontsize for Status: OFF' end if ETOmenu = 1: pl'Status Display mode: Text' else pl'Status Display mode: Scale Bar' end if Enable_scalepic = 1: pl 'Scalebar is now as Image, you can switch to Character or Table' if Enable_scalewidth > 0: pl'Scalebar Width: <>, Set is currently ON' else pl'Scalebar Width: Lock is currently OFF' end if Enable_scaleheight > 0: pl'Scalebar Height: <>, Set is currently ON' else pl'Scalebar Height: Lock is currently OFF' end elseif Enable_scalepic = 0: pl 'Scalebar is now as Character, you can switch to Image or Table' if cheatStatusBars = 1: pl ' Switch to larger status bars' else pl ' Switch to smaller status bars' end elseif Enable_scalepic = 2: pl 'Scalebar is now as Table, you can switch to Image or Character' end if Enable_statfsize > 0: pl 'Set Fontsize for Status: <>, ON' else pl 'Set Fontsize for Status: OFF' end nl pl '
Status Window toolbar
' if Enable_showattr = 1: pl'Show More attribute: ON' else pl'Show More attribute: OFF' end if Enable_showskill = 1: pl'Show skill: ON' else pl'Show skill: OFF' end if Enable_showrelation = 1: pl'Show relations: ON' else pl'Show relations: OFF' end if Enable_showstatimg = 1: pl'Show image toolbar: ON' else pl'Show image toolbar: OFF' end nl pl '
Image Toolbar Settings
' !control image toolbar position $stat_temp_text = '
Image toolbar position: ' if Enable_statimg_loc = 0: $stat_temp_text += 'Middle' elseif Enable_statimg_loc = 1: $stat_temp_text += 'Top' elseif Enable_statimg_loc = 2: $stat_temp_text += 'Bottom' else $stat_temp_text += 'ERROR! please reset it' end $stat_temp_text += '. You can move it to ' if Enable_statimg_loc ! 0:$stat_temp_text += ' Middle' if Enable_statimg_loc ! 1:$stat_temp_text += ' Top' if Enable_statimg_loc ! 2:$stat_temp_text += ' Bottom' pl $stat_temp_text killvar 'stat_temp_text' !End control image toolbar position if set_statimgh > 0: set_statimgw = 0 if set_statimgw > 0: set_statimgh = 0 if set_statimgh <= 0 and set_statimgw <= 0: $set_statimgh = '' if set_statimgh > 0: pl'Force Image toobar height: <>, ON' $set_statimgh = 'height = <>' else pl'Force Image toobar height: OFF' end if set_statimgw > 0: pl'Force Image toobar width: <>, ON' $set_statimgh = 'width = <>' else pl'Force Image toobar width: OFF' end nl pl '
Font Settings
' pl pl'
Set the style for Inner Thoughts
' pl pl $OpenInnerThought+'Oh my god, what will the neighbours think of us?'+$CloseInnerThought nl pl'
Phone Theme Menu
' ! } $cheatmenu['theme'] = { clr pl '
Phone Theme Menu
' nl pl '
Settings Menu
' nl pl 'Current theme: <<$phonetheme_name[pcs_phonetheme]>>' nl pl 'Choose from the available themes' nl i = 0 :phonethemeloop if phonetheme[i] = 1:pl'' i += 1 if i <= ARRSIZE('phonetheme'):jump 'phonethemeloop' } $cheatmenu['pain'] = { if pain['head'] < 0:pain['head'] = 0 if pain['hair'] < 0:pain['hair'] = 0 if pain['ears'] < 0:pain['ears'] = 0 if pain['eyebrows'] < 0:pain['eyebrows'] = 0 if pain['eyes'] < 0:pain['eyes'] = 0 if pain['cheeks'] < 0:pain['cheeks'] = 0 if pain['nose'] < 0:pain['nose'] = 0 if pain['mouth'] < 0:pain['mouth'] = 0 if pain['lips'] < 0:pain['lips'] = 0 if pain['tongue'] < 0:pain['tongue'] = 0 if pain['throat'] < 0:pain['throat'] = 0 if pain['neck'] < 0:pain['neck'] = 0 if pain['back'] < 0:pain['back'] = 0 if pain['asscheeks'] < 0:pain['asscheeks'] = 0 if pain['asshole'] < 0:pain['asshole'] = 0 if pain['hips'] < 0:pain['hips'] = 0 if pain['thighs'] < 0:pain['thighs'] = 0 if pain['legL'] < 0:pain['legL'] = 0 if pain['legR'] < 0:pain['legR'] = 0 if pain['feet'] < 0:pain['feet'] = 0 if pain['toes'] < 0:pain['toes'] = 0 if pain['shoulders'] < 0:pain['shoulders'] = 0 if pain['armL'] < 0:pain['armL'] = 0 if pain['armR'] < 0:pain['armR'] = 0 if pain['hands'] < 0:pain['hands'] = 0 if pain['fingers'] < 0:pain['fingers'] = 0 if pain['chest'] < 0:pain['chest'] = 0 if pain['breasts'] < 0:pain['breasts'] = 0 if pain['nipples'] < 0:pain['nipples'] = 0 if pain['ribs'] < 0:pain['ribs'] = 0 if pain['tummy'] < 0:pain['tummy'] = 0 if pain['pubic'] < 0:pain['pubic'] = 0 if pain['vaginal'] < 0:pain['vaginal'] = 0 if pain['clitoris'] < 0:pain['clitoris'] = 0 if pain['urethra'] < 0:pain['urethra'] = 0 if pain['cervix'] < 0:pain['cervix'] = 0 clr pl '
Cheat menu
' nl pl 'No pain' pl 'pain[head] = <> -10 +10' pl 'pain[hair] = <> -10 +10' pl 'pain[ears] = <> -10 +10' pl 'pain[eyebrows] = <> -10 +10' pl 'pain[eyes] = <> -10 +10' pl 'pain[cheeks] = <> -10 +10' pl 'pain[nose] = <> -10 +10' pl 'pain[mouth] = <> -10 +10' pl 'pain[lips] = <> -10 +10' pl 'pain[tongue] = <> -10 +10' pl 'pain[throat] = <> -10 +10' pl 'pain[neck] = <> -10 +10' pl 'pain[back] = <> -10 +10' pl 'pain[asscheeks] = <> -10 +10' pl 'pain[asshole] = <> -10 +10' pl 'pain[hips] = <> -10 +10' pl 'pain[thighs] = <> -10 +10' pl 'pain[left leg] = <> -10 +10' pl 'pain[right leg] = <> -10 +10' pl 'pain[feet] = <> -10 +10' pl 'pain[toes] = <> -10 +10' pl 'pain[shoulders] = <> -10 +10' pl 'pain[left arm] = <> -10 +10' pl 'pain[right arm] = <> -10 +10' pl 'pain[hands] = <> -10 +10' pl 'pain[fingers] = <> -10 +10' pl 'pain[chest] = <> -10 +10' pl 'pain[breasts] = <> -10 +10' pl 'pain[nipples] = <> -10 +10' pl 'pain[ribs] = <> -10 +10' pl 'pain[tummy] = <> -10 +10' pl 'pain[pubic] = <> -10 +10' pl 'pain[vaginal] = <> -10 +10' pl 'pain[labia] = <> -10 +10' pl 'pain[clitoris] = <> -10 +10' pl 'pain[urethra] = <> -10 +10' pl 'pain[cervix] = <> -10 +10' } $cheatmenu['DNA'] = { clr pl '
Cheat menu
DNA string generation
If parents are not in game, leave the respective IDs empty
' nl if $cheatDNAC ! '': pl 'Child: <<$npc_firstname[''<<$cheatDNAC>>'']>> <<$npc_lastname[''<<$cheatDNAC>>'']>> (<<$cheatDNAC>>)
<<$npc_dna[$cheatDNAC]>>
Remove' npctemp = 0 killvar 'cheatDNAM' killvar 'cheatDNAF' :npcparentfind if $npc_dna['A<>'] ! '': if mid($npc_dna['A<>'],1,10) = mid($npc_dna[$cheatDNAC],12,10): $cheatDNAM = 'A<>' elseif mid($npc_dna['A<>'],1,10) = mid($npc_dna[$cheatDNAC],23,10): $cheatDNAF = 'A<>' end end if $npc_dna['B<>'] ! '': if mid($npc_dna['B<>'],1,10) = mid($npc_dna[$cheatDNAC],12,10): $cheatDNAM = 'B<>' elseif mid($npc_dna['B<>'],1,10) = mid($npc_dna[$cheatDNAC],23,10): $cheatDNAF = 'B<>' end end if $npc_dna['C<>'] ! '': if mid($npc_dna['C<>'],1,10) = mid($npc_dna[$cheatDNAC],12,10): $cheatDNAM = 'C<>' elseif mid($npc_dna['C<>'],1,10) = mid($npc_dna[$cheatDNAC],23,10): $cheatDNAF = 'C<>' end end if ($npc_dna['A<>'] ! '' or $npc_dna['B<>'] ! '' or $npc_dna['C<>'] ! '') and ($cheatDNAM = '' or $cheatDNAF = ''):npctemp += 1 & jump 'npcparentfind' killvar 'npctemp' else pl 'ID of child (if it is known)' end if $cheatDNAM ! '': pl '
Mother: <<$npc_firstname[''<<$cheatDNAM>>'']>> <<$npc_lastname[''<<$cheatDNAM>>'']>> (<<$cheatDNAM>>)
<<$npc_dna[$cheatDNAM]>>
Remove' else pl '
ID of mother (if it is known)' end if $cheatDNAF ! '': pl '
Father: <<$npc_firstname[''<<$cheatDNAF>>'']>> <<$npc_lastname[''<<$cheatDNAF>>'']>> (<<$cheatDNAF>>)
<<$npc_dna[$cheatDNAF]>>
Remove' else pl '
ID of father (if it is known)' end nl if $cheatDNAM ! '' and $cheatDNAF ! '': $cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$npc_dna[$cheatDNAF]) elseif $cheatDNAM ! '': if $cheatDNAC ! '': $tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC]) else $tempDNAF = func('DNA','create') $cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$tempDNAF) end elseif $cheatDNAF ! '': if $cheatDNAC ! '': $tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC]) else $tempDNAM = func('DNA','create') $cheatDNAgenerated = func('DNA','generate',$tempDNAM,$npc_dna[$cheatDNAF]) end else if $cheatDNAC = '': $tempDNAM = func('DNA','create') $tempDNAF = func('DNA','create') $cheatDNAgenerated = func('DNA','generate',$tempDNAM,$tempDNAF) else $tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC]) $tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC]) end end if $cheatDNAM = '':pl '
Random mother DNA: <<$tempDNAM>>' if $cheatDNAF = '':pl '
Random father DNA: <<$tempDNAF>>' if $cheatDNAC = '':pl '
Random child DNA: <<$cheatDNAgenerated>>' pl '
Generate again' if $cheatDNAC ! '': npctemp = 0 :npcgparfind if $npc_dna['A<>'] ! '': if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['A<>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['A<>'],1,10): pl '
Grandmother: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<>'],1,10): pl '
Grandfather: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' end end if $npc_dna['B<>'] ! '': if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['B<>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['B<>'],1,10): pl '
Grandmother: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['B<>'],1,10): pl '
Grandfather: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' end end if $npc_dna['C<>'] ! '': if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['C<>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['C<>'],1,10): pl '
Grandmother: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['C<>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<>'],1,10): pl '
Grandfather: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' end end if $npc_dna['A<>'] ! '' or $npc_dna['B<>'] ! '' or $npc_dna['C<>'] ! '':npctemp += 1 & jump 'npcgparfind' end if $cheatDNAM ! '' or $cheatDNAF ! '': npctemp = 0 :npcchildfind if $npc_dna['A<>'] ! '': if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['A<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10): pl '
Existing child: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['A<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10): pl '
Existing child: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' elseif mid($npc_dna['A<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['A<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10): pl '
Existing child: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' end end if $npc_dna['B<>'] ! '': if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['B<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10): pl '
Existing child: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['B<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10): pl '
Existing child: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' elseif mid($npc_dna['B<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['B<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10): pl '
Existing child: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' end end if $npc_dna['C<>'] ! '': if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['C<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10): pl '
Existing child: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['C<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10): pl '
Existing child: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' elseif mid($npc_dna['C<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['C<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10): pl '
Existing child: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' end end if $npc_dna['A<>'] ! '' or $npc_dna['B<>'] ! '' or $npc_dna['C<>'] ! '':npctemp += 1 & jump 'npcchildfind' npctemp = 0 :npcgchildfind if $npc_dna['A<>'] ! '': if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['A<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)): pl '
Existing grandchild: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['A<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)): pl '
Existing grandchild: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' elseif ((mid($npc_dna['A<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['A<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['A<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['A<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['A<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['A<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)): pl '
Existing grandchild: <<$npc_firstname[''A<>'']>> <<$npc_lastname[''A<>'']>> (A<>)
<<$npc_dna[''A<>'']>>' end end if $npc_dna['B<>'] ! '': if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['B<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)): pl '
Existing grandchild: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['B<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)): pl '
Existing grandchild: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' elseif ((mid($npc_dna['B<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['B<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['B<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['B<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['B<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['B<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)): pl '
Existing grandchild: <<$npc_firstname[''B<>'']>> <<$npc_lastname[''B<>'']>> (B<>)
<<$npc_dna[''B<>'']>>' end end if $npc_dna['C<>'] ! '': if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['C<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)): pl '
Existing grandchild: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['C<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)): pl '
Existing grandchild: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' elseif ((mid($npc_dna['C<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['C<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['C<>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['C<>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['C<>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['C<>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)): pl '
Existing grandchild: <<$npc_firstname[''C<>'']>> <<$npc_lastname[''C<>'']>> (C<>)
<<$npc_dna[''C<>'']>>' end end if $npc_dna['A<>'] ! '' or $npc_dna['B<>'] ! '' or $npc_dna['C<>'] ! '':npctemp += 1 & jump 'npcgchildfind' killvar 'npctemp' end killvar '$tempDNAF' killvar '$tempDNAM' killvar '$tempDNAC' killvar 'cheatDNAgenerated' } $cheatmenu['DNAM'] = { $cheatDNAM = input("Enter genetic mother ID (like A33, without apostrophe)") if $cheatDNAM = '':exit dynamic $cheatDNAM dynamic $cheatmenu['DNA'] } $cheatmenu['DNAF'] = { $cheatDNAF = input("Enter genetic father ID (like A34, without apostrophe)") if $cheatDNAF = '':exit dynamic $cheatDNAF dynamic $cheatmenu['DNA'] } $cheatmenu['DNAC'] = { $cheatDNAC = input("Enter genetic Child ID (like A34, without apostrophe)") if $cheatDNAC = '':exit dynamic $cheatDNAC dynamic $cheatmenu['DNA'] } $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'
Exit Menu Settings Menu
' nl pl'Recurrent cheats' pl'Status changes' pl'Change appearance' pl'Set attributes and skills' pl'Set relationships and reputation' pl'Add diplomas, licenses and certificates' pl'Manipulate time and temperature' if MagikDostup = 0: pl'Magic' pl'NPC Editor' pl'Pain management panel' pl'Generating DNA string' pl 'Change image sets for body view' nl nl pl 'Dynamic Input Command' pl'OOX Debug' pl'Right now <<$week[week]>> <<$month>> <> <> <>:<>' pl '+15' nl nl pl'Teleport to Pavlovsk' pl'Teleport to City' pl'Teleport to Gadyukino' pl'Teleport to Suburban Cooperative' pl'Warning! Teleporting while in event is likely to break your game!' nl pl'Pregnancy speed multiplier: <>' nl pl'Variable tracker' nl nl pl'Set color fonts' pl'Set black fonts' nl pl'Ibiza start' nl pl'Saturday - go to Ibiza' nl pl'Sunday' nl pl'Monday' nl pl'Tuesday' nl pl'Wednesday' nl pl'Thursday' nl pl'Friday' nl } $cheatmenu['vartracker'] = { gs'stat' clr pl'
Cheat menu
' pl'
For testing purposes.
If reporting a bug only the lines in red are neccessary.
' nl pl'$loc: <<$loc>>' pl'$locM: <<$locM>>' pl'$CURLOC: <<$CURLOC>>' pl'$location_type: <<$location_type>>' pl'home_cur: <>' pl'$home_town: <<$home_town>>' pl'$home_name: <<$home_name>>' pl'daystart: <>' pl'daystart_start: <>' pl'month: <>' pl'week: <>' pl'$temperature: <<$temperature>>' pl'pffilmday: <>' pl'$pfname: <<$pfname>>' pl'modelmon: <>' pl'min_arousal: <>' pl'pcs_nips: <>' pl'clit_size: <>' pl'steroid_have: <>' pl'steroid_counter: <>' pl'steroid_dose: <>' pl'aphrodisiac_have: <>' pl'aphrodisiac_counter: <>' pl'aphrodisiac_timer: <>' pl'aphrodisiac_addiction: <>' pl'bcream_have: <>' pl'motherQW: <>' pl'Anastasia quest level: <>' pl'sex: <>' pl'$clothingworntype: <<$clothingworntype>>' pl'PCloQuality: <>' pl'Mira''s Father Quest (npc_QW[''A64'']): <>' pl'Mira''s Quest (npc_QW[''A60'']): <>' pl'mirasextimes: <>' pl'Bandit Quest Level (npc_QW[''A66'']): <>' pl'Mira''s Relationship (npc_rel[''A60'']): <>' pl'Mitka''s Quest (npc_QW[''A63'']): <>' pl'mirabrosextime: <>' pl'momslut: <>' pl'children: <>' pl'fetus number: <>' pl'pregnancy state: <>' pl'thinkpreg: <>' pl'knowpreg: <>' pl'knowpregrecover: <>' pl'cycle: <>' pl'menoage: <>' pl'age: <>' pl'mesec: <>' pl'FocH: <>' pl'EggRH: <>' pl'Ovulate: <>' pl'UnfertEgg: <>' pl'FertEgg: <>' if FertEgg > 0: i = arrpos('$kidname','unborn') imax = arrsize('$kidname')-1 :chlp pl' <>. baby''s pregnancy type: <>' if i < imax: i += 1 & jump 'chlp' killvar 'i' killvar 'imax' end pl'Implanted Embryos: <>' pl'ferteggage: <>' pl'PregChem: <>' pl'pillcon: <>' pl'Believed pillcon: <>' pl'RecovH: <>' pl'daylastperiod: <> (daystart difference: <>)' pl'lastmens: <>' pl'hypnoTime: <>' pl'hypnoStrength: <>' pl'hypnoDay: <>' pl'hypnoAddict: <>' pl'missCum: <>' pl'condoms/bad condoms: <>/<>' if tabletki > 0: pl'pack(s) of birth control pills: <>' if tabletkiold > 0: pl' <> expired pack' if tabletkifake > 0: pl' <> counterfeit pack' if tabletkirej > 0: pl' <> factory rejected pack' if tabletkifert > 0: pl' <> fertility hormones pack' if tabletkisug > 0: pl' <> sugar pills pack' end if pillsleft[ptype] > 0: if ptype = 0: $pilltype = 'normal ' if ptype = 1: $pilltype = 'expired ' if ptype = 2: $pilltype = 'counterfeit ' if ptype = 3: $pilltype = 'factory rejected ' if ptype = 4: $pilltype = 'sugar ' if ptype = 5: $pilltype = 'fertility hormone ' pl'<> <<$pilltype>>pills left of your currently used pack' killvar '$pilltype' end } $cheatmenu['bdimmain'] = { gs 'stat' clr pl '
Cheat menu
' nl pl '
Body Image Controls
' 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 '<<$bodimgsets[9]>>' nl pl '<<$bodimgsets[19]>>' nl pl '<<$bodimgsets[29]>>' nl if bodsetcnt >= 3: pl 'You may edit aspects of a custom image set by clicking on their folder names below.' nl pl '<<$bodimgsets[39]>>' nl elseif bodsetcnt = 2: pl 'Add new set' nl end if bodsetcnt >= 4: pl '<<$bodimgsets[49]>>' nl elseif bodsetcnt = 3: pl 'Add new set' nl end if bodsetcnt >= 5: pl '<<$bodimgsets[59]>>' nl elseif bodsetcnt = 4: pl 'Add new set' nl end if bodsetcnt >= 6: pl '<<$bodimgsets[69]>>' nl elseif bodsetcnt = 5: pl 'Add new set' nl end if bodsetcnt >= 7: pl '<<$bodimgsets[79]>>' nl elseif bodsetcnt = 6: pl 'Add new set' nl end if bodsetcnt >= 8: pl '<<$bodimgsets[89]>>' nl elseif bodsetcnt = 7: pl 'Add new set' nl end if bodsetcnt >= 9: pl '<<$bodimgsets[99]>>' nl elseif bodsetcnt = 8: pl 'Add new set' nl end } $cheatmenu['bdimdisplay'] = { gs 'stat' clr pl '
Cheat menu
' nl pl '
Body Image Set Display
' pl 'Go Back' nl if bdsetlock = 1 and chmbodset = fixbodset: pl 'This is the currently locked set.' pl 'Clear the lock.' else pl 'Use this set only.' end nl if chmbodset <= 2: pl 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>' pl 'Descriptors:' pl '<<$bodimgsets[((chmbodset * 10) + 0)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 1)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 2)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 3)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 4)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 5)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 6)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 7)]>>' nl else pl 'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>' pl 'Descriptors: (Displayed as "You are:")' pl '<<$bodimgsets[((chmbodset * 10) + 0)]>>' nl pl '<<$bodimgsets[((chmbodset * 10) + 1)]>> -- Edit this' nl pl '<<$bodimgsets[((chmbodset * 10) + 2)]>> -- Edit this' nl pl '<<$bodimgsets[((chmbodset * 10) + 3)]>> -- Edit this' nl pl '<<$bodimgsets[((chmbodset * 10) + 4)]>> -- Edit this' nl pl '<<$bodimgsets[((chmbodset * 10) + 5)]>> -- Edit this' nl if imgset6ovr[chmbodset] = 1: pl '<<$bodimgsets[((chmbodset * 10) + 6)]>> -- Edit this' nl pl 'You are using a custom image 6 for this set.' nl else pl '<<$bodimgsets[((chmbodset * 10) + 6)]>>' nl pl 'You are using the default image 6 for this set.' nl end if imgset7ovr[chmbodset] = 1: pl '<<$bodimgsets[((chmbodset * 10) + 7)]>> -- Edit this' nl pl 'You are using a custom image 7 for this set.' nl else pl '<<$bodimgsets[((chmbodset * 10) + 7)]>>' nl pl 'You are using the default image 7 for this set.' nl end pl 'Delete this set.' end } $cheatmenu['bdimcstdel'] = { clr pl '
Body Image Set Removal
' pl 'Go Back' 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 'Are you sure you want to remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?' elseif klsetask = 2: if chmbodset <= 2: pl 'You have encoutered error 1' pl 'Go Back' 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 'Go Back' 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 'Remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?' end } $cheatmenu['bdimcstadd'] = { clr pl '
Body Image Set Addition
' pl 'Go Back' 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/pc/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 'Add Image Set' } $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 'No, nevermind.' nl pl 'Yes, remove & reset Succubus status' } $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 'tatianasucsex' killvar 'tatianasucsexday' killvar 'tatianasucsexask' 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 ---------------------------------