# begin if $ARGS[0] = 'start': $metka = 'start' $loc = 'begin' gs 'Cheatmenu_din' showstat 1 '
CHOOSE GAME START
' *nl 'Transformation Start:' 'You are Mikhail Kuznetsov, a fairly average, 35 year old businessman who finds an artefact that changes everything about him and his life. Features magic.' *nl 'School Girl Start:' 'You are a school girl in the most lustful town in Russia. Will you study hard and keep your purity for that special someone or become a sex addicted whore? Or anything in between, the possibilities are endless. No magic.' *nl 'Cursed Schoolgirl Start:' 'Marvel as we recklessly squish both of the above into one start. You are a school girl who finds the amulet and not much changes, except the magic, actually that''s quite a big change.' *nl 'Cursed Schoolboy Start:' 'You are Peter Ivanov, a fairly average teenage boy who, while trying to escape a bad situation, ends up in the body of a school girl. Now you have to deal with a new body, new desires, and your new life in the most lustful town in Russia. Features magic.' *nl 'New in Town Start:' 'You''re controlled by your overbearing mother and can''t take it any more. It is time to find a new life in the city away from her influence. For the first time you can make your own decisions and mistakes. No magic.' act '
Transformation Start
': settingmode = 0 showstat 0 cla act '
Show intro (recommended)
': gt 'preSYS', 'TGStart' end act '
Skip intro (seen it before)
': tgs_skipinto = 1 gt 'preSYS', 'TGStart' end end act '
School Girl Start
': cla settingmode = 0 showstat 0 MagikDostup = 1 gt 'preSYS', 'SGStart' end act '
Cursed Schoolgirl Start
': cla settingmode = 0 showstat 0 altQS = 1 gt 'preSYS', 'SGStart' end act '
Cursed Schoolboy Start
': cla settingmode = 0 showstat 0 altQS = 1 csb_start = 1 gt 'preSYS', 'CSBStart' end act '
New in Town Start
': cla settingmode = 0 showstat 0 MagikDostup = 1 gt 'preSYS', 'TGStart' end act '
Change game settings
': settingmode = 1 & gs '$menu_setting' end if $ARGS[0] = 'real_character': cls '
CHARACTER SELECTION
' '
> src="images/pre/shared/character_creation.jpeg">
' *nl 'This game offers you the ability to create your own character.' 'To do this, replace the image "avatar" in the "images" folder of the game with a file of the same name and format JPEG (.jpg). That''s it!' 'Please note, this choice can only be changed in the cheat menu and in-game changes to hair color, length etc. will not affect the displayed image if you are using a custom one.' 'This function is made solely to simplify things for those that want to use a custom image without having to sort through hundreds of pictures.' 'Your selected image is your own personal choice, and is based on your personal preferences. By default, the game uses an avatar image from the site wikimedia.org.' *NL 'If you are playing with Quest player for Android, click ' if Enable_Android = 1: *P 'Here (Current: Yes)' else *P 'Here (Current: No)' end act'
Start a standard character
': cls gt 'begin', 'start' end act'
Use the avatar system
': cls player_avatar = 1 pcs_eyecol = 1 pcs_eyesize = 2 pcs_lashes = 1 pcs_haircol = 1 pcs_hairlng = 81 pcs_lip = 2 if birthyear = 0: birthyear = 1998 if birthmonth = 0: birthmonth = 4 if birthday = 0: birthday = 1 gt 'begin', 'description_real_character' end end if $ARGS[0] = 'description_real_character': gs 'begin', 'hair' gs 'begin', 'lip' gs 'begin', 'eyes' if birthyear = 0: birthyear = 1998 if birthmonth = 0: birthmonth = 4 if birthday = 0: birthday = 1 cls '
CHARACTER CUSTOMIZATION
' '
' *nl '
On this screen, you may adjust your character''s description to match your avatar. Please note, at present, hair color and glasses choice may be overridden by the personality choice you make during the game intro.
' *nl '
Customize your:
' !'
Your name is <<$pcs_nickname>> <<$pcs_lastname>>. (You may change this during the intro, and also at the passport office in-game.)' '
' act'
Done
': gt 'begin', 'start' end if $ARGS[0] = 'hair': cls '
CHARACTER CUSTOMIZATION
' '
' *nl if pcs_hairlng <= 1: $hair = 'You have very short,' elseif pcs_hairlng <= 31: $hair = 'You have short,' elseif pcs_hairlng <= 81: $hair = 'You have chin length,' elseif pcs_hairlng <= 161: $hair = 'You have shoulder length,' elseif pcs_hairlng <= 261: $hair = 'You have breast length,' elseif pcs_hairlng <= 401: $hair = 'You have back length,' elseif pcs_hairlng <= 601: $hair = 'You have hip length,' elseif pcs_hairlng <= 801: $hair = 'You have ass length,' else $hair = 'You have extremely long,' end if pcs_haircol = 0 and curly <= 0:$hair += ' straight, black hair.'& $hair2 = 'black hair' & $hair3 = 'black hair' if pcs_haircol = 1 and curly <= 0:$hair += ' straight, brown hair.'& $hair2 = 'brown hair' & $hair3 = 'brown hair' if pcs_haircol = 2 and curly <= 0:$hair += ' straight, red hair.'& $hair2 = 'Red hair' & $hair3 = 'red hair' if pcs_haircol = 3 and curly <= 0:$hair += ' straight, blonde hair.'& $hair2 = 'blond hair' & $hair3 = 'blond hair' if pcs_haircol = 0 and curly > 0:$hair += ' curly, black hair.'& $hair2 = 'curls' & $hair3 = 'black curls' if pcs_haircol = 1 and curly > 0:$hair += ' curly, brown hair.'& $hair2 = 'curls' & $hair3 = 'brown curls' if pcs_haircol = 2 and curly > 0:$hair += ' curly, red hair.'& $hair2 = 'curls' & $hair3 = 'red hair' if pcs_haircol = 3 and curly > 0:$hair += ' curly, blonde hair.' &$hair2 = 'curls' & $hair3 = 'blond curls' '
Adjust your hair to match your avatar. Please note that, at present, hair choices are overridden by your starting personality choice (e.g. volleyball players will always have straight blond hair).
' *nl nathcol = pcs_haircol if player_avatar = 1: if avatar_hair = 1: '
Please note that this choice is given only once and you will not be able to change it without starting a new game!
' '
You have <<$av_hair>>. Revert to default.
' else '
<<$hair>> You may also manually enter a description
.' end end if $start_type = 'sgs': act'
Done
': gt 'preCUST', 'SGStart' else act'
Done
': gt 'begin', 'description_real_character' end end if $ARGS[0] = 'pcs_haircol': pcs_haircol += 1 if pcs_haircol > 3: pcs_haircol = 0 end if $ARGS[0] = 'hair_input': avatar_hair = 1 $av_hair = input("Enter a description of your hair:") end if $ARGS[0] = 'lip': cls '
CHARACTER CUSTOMIZATION
' '
' *nl if pcs_lip = 0:$pcs_lip = 'you have thin<<$pcs_lipbalm>> lips.' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips' if pcs_lip = 1:$pcs_lip = 'You have normal<<$pcs_lipbalm>> lips.' & $liptalk = 'soft lips' & $liptalk2 = 'delicate lips' & $liptalk3 = 'tender lips' if pcs_lip = 2:$pcs_lip = 'You have plump<<$pcs_lipbalm>> lips.' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips' if pcs_lip = 3:$pcs_lip = 'You have large,<<$pcs_lipbalm>> full lips.' & $liptalk = 'full lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'full lips' if pcs_lip = 4:$pcs_lip = 'You have huge, thick<<$pcs_lipbalm>> lips.' & $liptalk = 'thick lips' & $liptalk2 = 'thick lips' & $liptalk3 = 'thick lips' '
Adjust the size of your lips to match your image:
' *nl '
<<$pcs_lip>>
' *nl if pcs_lip < 4:'
Bigger lips
' if pcs_lip > 0:'
Smaller lips
' act'
Done
': gt'begin','description_real_character' end if $ARGS[0] = 'eyes': cls '
CHARACTER CUSTOMIZATION
' if player_avatar = 1: '
' else '
> src="<>">
' end *nl if pcs_eyecol = 0:$pcs_eyecol = 'brown' & $glacol2 = 'brown' if pcs_eyecol = 1:$pcs_eyecol = 'gray' & $glacol2 = 'gray' if pcs_eyecol = 2:$pcs_eyecol = 'green' & $glacol2 = 'green' if pcs_eyecol = 3:$pcs_eyecol = 'blue' & $glacol2 = 'blue' if glass <= 0:$glass = '' & glassvnesh = 0 if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh = 10 if pcs_lashes > 2:pcs_lashes = 2 if pcs_lashes = 0:$pcs_lashes = 'with short eyelashes' if pcs_lashes = 1:$pcs_lashes = 'with normal eyelashes' if pcs_lashes = 2:$pcs_lashes = 'with long eyelashes' if pcs_eyesize > 3:pcs_eyesize = 3 if pcs_eyesize = 0:$glaza = 'You have small <<$pcs_eyecol>> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = '<<$pcs_eyecol>> eyes' & $glaza3 = '<<$glacol2>> eyes' if pcs_eyesize = 1:$glaza = 'You have expressive <<$pcs_eyecol>> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'expressive <<$pcs_eyecol>> eyes' & $glaza3 = 'expressive <<$glacol2>> eyes' if pcs_eyesize = 2:$glaza = 'You have large <<$pcs_eyecol>> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'big <<$pcs_eyecol>> eyes' & $glaza3 = 'high <<$glacol2>> eyes' if pcs_eyesize = 3:$glaza = 'You have huge <<$pcs_eyecol>> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'great <<$pcs_eyecol>> eyes' & $glaza3 = 'great <<$glacol2>> eyes' if player_avatar = 1: '
Adjust your eyes and eyelashes to match your avatar. Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).
' else '
Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).
' end *nl '
<<$glaza>>
' *nl if pcs_lashes < 2:'
Lengthen lashes
' if pcs_lashes > 0:'
Shorten lashes
' if pcs_eyesize < 3:'
Larger eyes
' if pcs_eyesize > 0:'
Smaller eyes
' if glass = 0:'
Wear glasses
' if glass = 1:'
Remove glasses
' if player_avatar = 1: act'
Done
': gt'begin','description_real_character' elseif $start_type = 'nt': act'
Done
': gt 'preCUST', 'NTStart2' elseif $start_type = 'sgs': act'
Done
': gt 'preCUST', 'SGStart' else act'
Done
': gt 'preCUST', 'TGStart' end end if $ARGS[0] = 'eye color': pcs_eyecol += 1 if pcs_eyecol > 3: pcs_eyecol = 0 end if $ARGS[0] = 'birthday': cls '
CHARACTER CUSTOMIZATION
' if csb_start ! 1: if player_avatar = 1: '
' else '
> src="<>">
' end else '
> src="images/pre/csb/petercsb.jpg">
' end '
Choose your date of birth:
' *nl if birthyear = 0: birthyear = 1998 if birthmonth = 0: birthmonth = 4 if birthday = 0: birthday = 1 if birthmonth = 2: if ((birthyear mod 4 = 0) and (birthyear mod 100 ! 0)) or (birthyear mod 400 = 0): monthdays = 29 else monthdays = 28 end elseif birthmonth = 4 or birthmonth = 6 or birthmonth = 9 or birthmonth = 11: monthdays = 30 else monthdays = 31 end if birthmonth > 12: birthmonth = 12 if birthmonth < 1: birthmonth = 1 if birthday < 1: birthday = 1 if birthday > monthdays: birthday = monthdays if birthday < 10 and birthmonth < 10: '
Your birthday: 0<>/0<> (MM/DD)
' elseif birthday < 10 and birthmonth >= 10: '
Your birthday: <>/0<> (MM/DD)
' elseif birthday >= 10 and birthmonth < 10: '
Your birthday: 0<>/<> (MM/DD)
' elseif birthday >= 10 and birthmonth >= 10: '
Your birthday: <>/<> (MM/DD)
' end *nl '
+5 Days
' '
+1 Day
' '
-1 Day
' '
-5 Days
' '
January
' '
February
' '
March
' '
April
' '
May
' '
June
' '
July
' '
August
' '
September
' '
October
' '
November
' '
December
' if csb_start ! 1: if player_avatar = 1: act'
Done
': gt 'begin', 'description_real_character' else act'
Done
': gt 'preSYS', 'SGStart2' end else act'
Done
': gt 'preSys', 'CSBStart' end end --- begin ---------------------------------