123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279 |
- # begin
- if $ARGS[0] = 'start':
- gs 'din_pav'
- gs 'dinSex2'
- gs 'dina'
- gs 'din_van'
- gs 'din_bad'
- gs 'dinSex'
- gs 'dinBoroda'
- gs 'BanSexType'
- !{cycle start}
- '<center><b><font color="maroon">CHOOSE GAME START</font></b></center>'
- *nl
- '<b>Original Start:</b>'
- 'You are Michael Kuznetsov, a fairly average, 35 year old businessman whose life is about to be turned inside out. Features magic and an (incomplete) over-arching plot. Beware of unintelligible translations.'
- *nl
- '<b>Alternate Start:</b>'
- 'You are a 15 or 16 year old small-town girl with another year of school remaining. Name and starting stats are customizable, no magic and no major ''plot'' other than <i>life</i>. Not to say that your classmates and family don''t have their own stories, though!'
- *nl
- '<b>Cursed schoolgirl Start:</b>'
- 'You are a 15 or 16 year old small-town girl with another year of school remaining. Name and starting stats are customizable. Includes magic and the (incomplete) plot from original start, plus all the family and classmate events from the alternate start.'
-
- act '<center><b>Original start</b></center>':
- cla
- pc = 100
- VersionCheck = 5030
- act '<center>Show intro (recommended)</center>':
- gt 'altPRE', 'Original start'
- end
- act '<center>Skip intro (seen it before)</center>':
- gt 'altPRE', 'Original start, Skip intro'
- end
- end
- act '<center><b>Alternate Start</b></center>':
- cla
- pc = 0
- VersionCheck = 5030
- MagikDostup = 1
- gt 'alterStart'
-
- end
- act '<center><b>Cursed Schoolgirl Start</b></center>':
- cla
- pc = 0
- VersionCheck = 5030
- altQS = 1
- gt 'alterStart'
- end
- end
- if $ARGS[0] = 'real_character':
- cls
- '<center><b><font color = maroon>CHARACTER SELECTION</font></b></center>'
- '<center><img src="images/pic/character_creation.jpeg"></center>'
- *nl
- 'This game offers you the ability to create your own character.'
- 'To do this, replace the image "<a href="exec:view''avatar.jpg''">avatar</a>" in the root 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 '<a href="exec:Enable_Android = 0 & gt ''begin'',''real_character''">Here</a> (Current: <B>Yes</B>)'
- else
- *P '<a href="exec:Enable_Android = 1 & gt ''begin'',''real_character''">Here</a> (Current: <B>No</B>)'
- end
- act'<center><b>Start a standard character</b></center>':
- cls
- gt'begin', 'start'
- end
- act'<center><b>Use the avatar system</b></center>':
- cls
- player_avatar = 1
- glacol = 1
- glaraz = 2
- pcs_haircol = 1
- lip = 2
- gt'begin','description_real_character'
- end
- end
- if $ARGS[0] = 'description_real_character':
- gs 'begin', 'hair'
- gs 'begin', 'lip'
- gs 'begin', 'glaza'
- cls
- '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
- '<center><img src="images/pic/character_creation_pic1.jpg"></center>'
- *nl
- '<center>On this screen, you may adjust your character''s description to match your <a href="exec:view''avatar.jpg''">avatar</a>. Please note, at present, hair color and glasses choice may be overridden by the personality choice you make during the game intro.</center>'
- *nl
- '<center>Customize your:</center>'
- !'<center>Your name is <B><i><<$pcs_nickname>> <<$pcs_lastname>></B></i>. (You may change this during the intro, and also at the passport office in-game.)'
- '<center><a href="exec:gs ''begin'', ''birthday''">Birthday</a></center>'
- '<center><a href="exec:gs ''begin'', ''hair''">Hair</a></center>'
- '<center><a href="exec:gs ''begin'', ''lip''">Lips</a></center>'
- '<center><a href="exec:gs ''begin'', ''glaza''">Eyes</a></center>'
- if opPRE = 2:
- act'<center><b>Done</b></center>': gt 'alterStart', 'custom'
- else
- act'<center><b>Done</b></center>':gt'begin', 'start'
- end
- end
- if $ARGS[0] = 'hair':
- cls
- '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
- '<center><img src="images/pic/character_creation_pic1.jpg"></center>'
- *nl
- if pcs_haircol = 0 and curly <= 0:$hair = 'You have <a href="exec:curly = 1 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'black hair' & $hair3 = 'black hair'
- if pcs_haircol = 1 and curly <= 0:$hair = 'You have <a href="exec:curly = 1 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'brown hair' & $hair3 = 'brown hair'
- if pcs_haircol = 2 and curly <= 0:$hair = 'You have <a href="exec:curly = 1 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'Red hair' & $hair3 = 'red hair'
- if pcs_haircol = 3 and curly <= 0:$hair = 'You have <a href="exec:curly = 1 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.'& $hair2 = 'blond hair' & $hair3 = 'blond hair'
- if pcs_haircol = 0 and curly > 0:$hair = 'You have <a href="exec:curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'curls' & $hair3 = 'black curls'
- if pcs_haircol = 1 and curly > 0:$hair = 'You have <a href="exec:curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'curls' & $hair3 = 'blond curls'
- if pcs_haircol = 2 and curly > 0:$hair = 'You have <a href="exec:curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'curls' & $hair3 = 'red hair'
- if pcs_haircol = 3 and curly > 0:$hair = 'You have <a href="exec:curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.' &$hair2 = 'curls' & $hair3 = 'blond curls'
- '<center>Adjust your hair to match your <a href="exec:view''avatar.jpg''">avatar</a>. Please note that, at present, hair choices are overridden by your starting personality choice (e.g. volleyball players will always have straight blond hair).</center>'
- *nl
- if avatar_hair = 1:
- '<center>Please note that this choice is given only once and you will not be able to change it without starting a new game!</center>'
- '<center>You have <i><<$av_hair>>.</i> <a href="exec:avatar_hair = 0 & gs ''begin'', ''hair''">Revert to default</a>.</center>'
- else
- '<center><i><<$hair>></i> You may also <a href="exec:gs ''begin'', ''hair_input'' & gs ''begin'', ''hair''">manually enter a description</a></center>.'
- end
- act'<center><b>Done</b></center>':gt'begin','description_real_character'
- 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
- '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
- '<center><img src="images/pic/character_creation_pic1.jpg"></center>'
- *nl
- if lip = 0:$lip = 'you have thin <<$lipbalmstat>> lips.' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips'
- if lip = 1:$lip = 'You have normal <<$lipbalmstat>> lips.' & $liptalk = 'soft lips' & $liptalk2 = 'delicate lips' & $liptalk3 = 'tender lips'
- if lip = 2:$lip = 'You have plump <<$lipbalmstat>> lips.' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips'
- if lip = 3:$lip = 'You have large, <<$lipbalmstat>> full lips.' & $liptalk = 'full lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'full lips'
- if lip = 4:$lip = 'You have huge, thick <<$lipbalmstat>> lips.' & $liptalk = 'thick lips' & $liptalk2 = 'thick lips' & $liptalk3 = 'thick lips'
- '<center>Adjust the size of your lips to match your <a href="exec:view''avatar.jpg''">image</a>:</center>'
- *nl
- '<center><i><<$lip>></i></center>'
- *nl
- if lip < 4:'<center><a href="exec:lip += 1 & gs ''begin'', ''lip''">Bigger lips</a></center>'
- if lip > 0:'<center><a href="exec:lip -= 1 & gs ''begin'', ''lip''">Smaller lips</a></center>'
- act'<center><b>Done</b></center>':gt'begin','description_real_character'
- end
- if $ARGS[0] = 'glaza':
- cls
- '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
- if player_avatar = 1:
- '<center><img src="images/pic/character_creation_pic1.jpg"></center>'
- else
- '<center><img src="<<FUNC(''$face_image'')>>"></center>'
- end
- *nl
- if glacol = 0:$glacol = 'brown' & $glacol2 = 'brown'
- if glacol = 1:$glacol = 'gray' & $glacol2 = 'gray'
- if glacol = 2:$glacol = 'green' & $glacol2 = 'green'
- if glacol = 3:$glacol = 'blue' & $glacol2 = 'blue'
- if glass <= 0:$glass = '' & glassvnesh = 0
- if glass = 1:$glass = ' You wear glasses.' & glassvnesh = 10
- if glass = 2:$glass = ' You wear glasses.' & glassvnesh = 5
- if resnic > 2:resnic = 2
- if resnic = 0:$resnic = 'with short eyelashes'
- if resnic = 1:$resnic = 'normal eyelashes'
- if resnic = 2:$resnic = 'with long eyelashes'
- if glaraz > 3:glaraz = 3
- if glaraz = 0:$glaza = 'You have little <a href="exec:gs ''begin'', ''glacol'' & gs ''begin'', ''glaza''"><<$glacol>></a> eyes, <<$resnic>>.<<$glass>>' & $glaza2 = '<<$glacol>> eyes' & $glaza3 = '<<$glacol2>> eyes'
- if glaraz = 1:$glaza = 'You have expressive <a href="exec:gs ''begin'', ''glacol'' & gs ''begin'', ''glaza''"><<$glacol>></a> eyes, <<$resnic>>.<<$glass>>' & $glaza2 = 'expressive <<$glacol>> eyes' & $glaza3 = 'expressive <<$glacol2>> eyes'
- if glaraz = 2:$glaza = 'You have large <a href="exec:gs ''begin'', ''glacol'' & gs ''begin'', ''glaza''"><<$glacol>></a> eyes, <<$resnic>>.<<$glass>>' & $glaza2 = 'big <<$glacol>> eyes' & $glaza3 = 'high <<$glacol2>> eyes'
- if glaraz = 3:$glaza = 'You have huge <a href="exec:gs ''begin'', ''glacol'' & gs ''begin'', ''glaza''"><<$glacol>></a> eyes, <<$resnic>>.<<$glass>>' & $glaza2 = 'great <<$glacol>> eyes' & $glaza3 = 'great <<$glacol2>> eyes'
- '<center>Adjust your eyes and eyelashes to match your <a href="exec:view''avatar.jpg''">avatar</a>. Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).</center>'
- *nl
- '<center><i><<$glaza>></i></center>'
- *nl
- if resnic < 2:'<center><a href="exec:resnic += 1 & gs ''begin'', ''glaza''">Lengthen lashes</a></center>'
- if resnic > 0:'<center><a href="exec:resnic -= 1 & gs ''begin'', ''glaza''">Shorten lashes</a></center>'
- if glaraz < 3:'<center><a href="exec:glaraz += 1 & gs ''begin'', ''glaza''">Larger eyes</a></center>'
- if glaraz > 0:'<center><a href="exec:glaraz -= 1 & gs ''begin'', ''glaza''">Smaller eyes</a></center>'
- if glass = 0 and glass < 2:'<center><a href="exec:glass = 2 & gs ''begin'', ''glaza''">Wear glasses</a></center>'
- if glass > 0 and glass <= 2:'<center><a href="exec:glass = 0 & gs ''begin'', ''glaza''">Remove glasses</a></center>'
- if player_avatar = 1:
- act'<center><b>Done</b></center>':gt'begin','description_real_character'
- else
- act'<center><b>Done</b></center>':gt 'alterStart', 'custom'
- end
- end
- if $ARGS[0] = 'glacol':
- glacol += 1
- if glacol > 3: glacol = 0
- end
- if $ARGS[0] = 'birthday':
- cls
- '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
- if player_avatar = 1:
- '<center><img src="images/pic/character_creation_pic1.jpg"></center>'
- else
- '<center><img src="<<FUNC(''$face_image'')>>"></center>'
- end
- '<center>Choose your date of birth:</center>'
- *nl
- if birthyear = 0: birthyear = 2000 and pcs_dob = birthyear * 10000
- 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:
- '<center>Your birthday: <B>0<<birthmonth>>/0<<birthday>></B> (MM/DD)</center>'
- elseif birthday < 10 and birthmonth >= 10:
- '<center>Your birthday: <B><<birthmonth>>/0<<birthday>></B> (MM/DD)</center>'
- elseif birthday >= 10 and birthmonth < 10:
- '<center>Your birthday: <B>0<<birthmonth>>/<<birthday>></B> (MM/DD)</center>'
- elseif birthday >= 10 and birthmonth >= 10:
- '<center>Your birthday: <B><<birthmonth>>/<<birthday>></B> (MM/DD)</center>'
- end
- pcs_dob += birthmonth * 100 & pcs_dob += birthday
- *nl
- '<center><a href="exec:birthday += 5 & gs ''begin'', ''birthday''">+5 Days</a></center>'
- '<center><a href="exec:birthday += 1 & gs ''begin'', ''birthday''">+1 Day</a></center>'
- '<center><a href="exec:birthday -= 1 & gs ''begin'', ''birthday''">-1 Day</a></center>'
- '<center><a href="exec:birthday -= 5 & gs ''begin'', ''birthday''">-5 Days</a></center>'
- '<center><a href="exec:birthmonth = 1 & gs ''begin'', ''birthday''">January</a></center>'
- '<center><a href="exec:birthmonth = 2 & gs ''begin'', ''birthday''">February</a></center>'
- '<center><a href="exec:birthmonth = 3 & gs ''begin'', ''birthday''">March</a></center>'
- '<center><a href="exec:birthmonth = 4 & gs ''begin'', ''birthday''">April</a></center>'
- '<center><a href="exec:birthmonth = 5 & gs ''begin'', ''birthday''">May</a></center>'
- '<center><a href="exec:birthmonth = 6 & gs ''begin'', ''birthday''">June</a></center>'
- '<center><a href="exec:birthmonth = 7 & gs ''begin'', ''birthday''">July</a></center>'
- '<center><a href="exec:birthmonth = 8 & gs ''begin'', ''birthday''">August</a></center>'
- '<center><a href="exec:birthmonth = 9 & gs ''begin'', ''birthday''">September</a></center>'
- '<center><a href="exec:birthmonth = 10 & gs ''begin'', ''birthday''">October</a></center>'
- '<center><a href="exec:birthmonth = 11 & gs ''begin'', ''birthday''">November</a></center>'
- '<center><a href="exec:birthmonth = 12 & gs ''begin'', ''birthday''">December</a></center>'
- if player_avatar = 1:
- act'<center><b>Done</b></center>':gt'begin','description_real_character'
- else
- act'<center><b>Done</b></center>':gt 'alterStart', 'custom'
- end
- end
- --- begin ---------------------------------
|