1
0

begin.qsrc 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376
  1. # begin
  2. if $ARGS[0] = 'start':
  3. $metka = 'start'
  4. $loc = 'begin'
  5. gs 'Cheatmenu_din'
  6. showstat 1
  7. '<center><b><font color="maroon">CHOOSE GAME START</font></b></center>'
  8. *nl
  9. '<b>Transformation Start:</b>'
  10. '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.'
  11. *nl
  12. '<b>Schoolgirl Start:</b>'
  13. 'You are a schoolgirl 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.'
  14. *nl
  15. '<b>Cursed Schoolgirl Start:</b>'
  16. 'Marvel as we recklessly squish both of the above into one start. You are a schoolgirl who finds the amulet and not much changes, except the magic, actually that''s quite a big change.'
  17. *nl
  18. '<b>Cursed Schoolboy Start:</b>'
  19. 'You are Peter Ivanov, a fairly average teenage boy who, while trying to escape a bad situation, ends up in the body of a schoolgirl. Now you have to deal with a new body, new desires, and your new life in the most lustful town in Russia. Features magic.'
  20. *nl
  21. '<b>New in Town Start:</b>'
  22. '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.'
  23. act '<center><b>Transformation Start</b></center>':
  24. settingmode = 0
  25. showstat 0
  26. cla
  27. act '<center>Show intro (recommended)</center>':
  28. gt 'preSYS', 'TGStart'
  29. end
  30. act '<center>Skip intro (seen it before)</center>':
  31. tgs_skipinto = 1
  32. gt 'preSYS', 'TGStart'
  33. end
  34. end
  35. act '<center><b>Schoolgirl Start</b></center>':
  36. cla
  37. settingmode = 0
  38. showstat 0
  39. MagikDostup = 1
  40. gt 'preSYS', 'SGStart'
  41. end
  42. act '<center><b>Cursed Schoolgirl Start</b></center>':
  43. cla
  44. settingmode = 0
  45. showstat 0
  46. altQS = 1
  47. gt 'preSYS', 'SGStart'
  48. end
  49. act '<center><b>Cursed Schoolboy Start</b></center>':
  50. cla
  51. settingmode = 0
  52. showstat 0
  53. altQS = 1
  54. csb_start = 1
  55. gt 'preSYS', 'CSBStart'
  56. end
  57. act '<center><b>New in Town Start</b></center>':
  58. cla
  59. settingmode = 0
  60. showstat 0
  61. MagikDostup = 1
  62. gt 'preSYS', 'TGStart'
  63. end
  64. act '<center><b>Change game settings</b></center>': settingmode = 1 & gs '$menu_setting'
  65. end
  66. if $ARGS[0] = 'warning':
  67. '<center><b><font color = maroon>WARNING</font></b></center>'
  68. '<center><img <<$set_imgh>> src="images/system/gl3.jpg" ></center>'
  69. *nl
  70. 'This game contains, but is not limited to the following:'
  71. 'Pornographic images;'
  72. 'Desriptions of sexual acts;'
  73. 'Rape;'
  74. 'Incest;'
  75. 'Violent assaults;'
  76. 'Blackmail for sex;'
  77. 'Drug use;'
  78. 'Extreme character weight (both very skinny and massively obese);'
  79. 'Urination as sexual fetish;'
  80. 'Underage sex 15 - 17 years old (in the text, sexual images used only contain performers 18+ years old);'
  81. 'Theft;'
  82. 'Drug use;'
  83. 'Prostitution;'
  84. 'BDSM;'
  85. 'Kidnap;'
  86. 'Death;'
  87. 'Alcohol abuse.'
  88. *nl
  89. 'If any of these things upset you or you are under the age of 18 you must not continue.'
  90. *nl
  91. 'Although many of these things are illegal in various places around the world this is a work of fiction and there are no people actually harmed in the making of this game.'
  92. 'Exhausted and frustrated by the code for sure but no bruises above the neck or below the elbow.'
  93. 'This means that with the exception of rather vague laws in Russia playing this game is not breaking any laws relating to the acts depicted.'
  94. 'Your local laws might be different to those we have checked and if you are worried you should not continue without checking your legal position.'
  95. act 'Continue': gt 'begin','real_character'
  96. end
  97. if $ARGS[0] = 'real_character':
  98. cls
  99. '<center><b><font color = maroon>CHARACTER SELECTION</font></b></center>'
  100. '<center><img <<$set_imgh>> src="images/pre/shared/character_creation.jpeg"></center>'
  101. *nl
  102. 'This game offers you the ability to create your own character.'
  103. '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!'
  104. '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.'
  105. '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.'
  106. '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.'
  107. *NL 'If you are playing with Quest player for Android, click '
  108. if Enable_Android = 1:
  109. *P '<a href="exec:Enable_Android = 0 & gt ''begin'',''real_character''">Here</a> (Current: <B>Yes</B>)'
  110. else
  111. *P '<a href="exec:Enable_Android = 1 & gt ''begin'',''real_character''">Here</a> (Current: <B>No</B>)'
  112. end
  113. act'<center><b>Start a standard character</b></center>':
  114. cls
  115. gt 'begin', 'start'
  116. end
  117. act'<center><b>Use the avatar system</b></center>':
  118. cls
  119. player_avatar = 1
  120. pcs_eyecol = 1
  121. pcs_eyesize = 2
  122. pcs_lashes = 1
  123. pcs_haircol = 1
  124. pcs_hairlng = 81
  125. pcs_lip = 2
  126. if birthyear = 0: birthyear = 1998
  127. if birthmonth = 0: birthmonth = 4
  128. if birthday = 0: birthday = 1
  129. gt 'begin', 'description_real_character'
  130. end
  131. end
  132. if $ARGS[0] = 'description_real_character':
  133. gs 'begin', 'hair'
  134. gs 'begin', 'lip'
  135. gs 'begin', 'eyes'
  136. if birthyear = 0: birthyear = 1998
  137. if birthmonth = 0: birthmonth = 4
  138. if birthday = 0: birthday = 1
  139. cls
  140. '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
  141. '<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
  142. *nl
  143. '<center>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.</center>'
  144. *nl
  145. '<center>Customize your:</center>'
  146. !'<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.)'
  147. '<center><a href="exec:gs ''begin'', ''hair''"><img src="images/pre/shared/hair icon.png"></a> <a href="exec:gs ''begin'', ''eyes''"><img src="images/pre/shared/eye icon.png"></a> <a href="exec:gs ''begin'', ''lip''"><img src="images/pre/shared/lip icon.png"></a> <a href="exec:gs ''begin'', ''birthday''"><img src="images/pre/shared/birthday icon.png"></a></center>'
  148. act'<center><b>Done</b></center>': gt 'begin', 'start'
  149. end
  150. if $ARGS[0] = 'hair':
  151. cls
  152. '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
  153. '<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
  154. *nl
  155. if pcs_hairlng <= 1:
  156. $hair = 'You have <a href="exec:pcs_hairlng = 31 & gs ''begin'', ''hair''">very short</a>,'
  157. elseif pcs_hairlng <= 31:
  158. $hair = 'You have <a href="exec:pcs_hairlng = 81 & gs ''begin'', ''hair''">short</a>,'
  159. elseif pcs_hairlng <= 81:
  160. $hair = 'You have <a href="exec:pcs_hairlng = 161 & gs ''begin'', ''hair''">chin length</a>,'
  161. elseif pcs_hairlng <= 161:
  162. $hair = 'You have <a href="exec:pcs_hairlng = 261 & gs ''begin'', ''hair''">shoulder length</a>,'
  163. elseif pcs_hairlng <= 261:
  164. $hair = 'You have <a href="exec:pcs_hairlng = 401 & gs ''begin'', ''hair''">breast length</a>,'
  165. elseif pcs_hairlng <= 401:
  166. $hair = 'You have <a href="exec:pcs_hairlng = 601 & gs ''begin'', ''hair''">back length</a>,'
  167. elseif pcs_hairlng <= 601:
  168. $hair = 'You have <a href="exec:pcs_hairlng = 801 & gs ''begin'', ''hair''">hip length</a>,'
  169. elseif pcs_hairlng <= 801:
  170. $hair = 'You have <a href="exec:pcs_hairlng = 1001 & gs ''begin'', ''hair''">ass length</a>,'
  171. else
  172. $hair = 'You have <a href="exec:pcs_hairlng = 1 & gs ''begin'', ''hair''">extremely long</a>,'
  173. end
  174. if pcs_haircol = 0 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'black hair' & $hair3 = 'black hair'
  175. if pcs_haircol = 1 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'brown hair' & $hair3 = 'brown hair'
  176. if pcs_haircol = 2 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'Red hair' & $hair3 = 'red hair'
  177. if pcs_haircol = 3 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.'& $hair2 = 'blond hair' & $hair3 = 'blond hair'
  178. if pcs_haircol = 0 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & 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'
  179. if pcs_haircol = 1 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'curls' & $hair3 = 'brown curls'
  180. if pcs_haircol = 2 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & 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'
  181. if pcs_haircol = 3 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & 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'
  182. '<center>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).</center>'
  183. *nl
  184. nathcol = pcs_haircol
  185. if player_avatar = 1:
  186. if avatar_hair = 1:
  187. '<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>'
  188. '<center>You have <i><<$av_hair>>.</i> <a href="exec:avatar_hair = 0 & gs ''begin'', ''hair''">Revert to default</a>.</center>'
  189. else
  190. '<center><i><<$hair>></i> You may also <a href="exec:gs ''begin'', ''hair_input'' & gs ''begin'', ''hair''">manually enter a description</a></center>.'
  191. end
  192. end
  193. if $start_type = 'sgs':
  194. act'<center><b>Done</b></center>': gt 'preCUST', 'SGStart'
  195. else
  196. act'<center><b>Done</b></center>': gt 'begin', 'description_real_character'
  197. end
  198. end
  199. if $ARGS[0] = 'pcs_haircol':
  200. pcs_haircol += 1
  201. if pcs_haircol > 3: pcs_haircol = 0
  202. end
  203. if $ARGS[0] = 'hair_input':
  204. avatar_hair = 1
  205. $av_hair = input("Enter a description of your hair:")
  206. end
  207. if $ARGS[0] = 'lip':
  208. cls
  209. '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
  210. '<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
  211. *nl
  212. if pcs_lip = 0:$pcs_lip = 'you have thin<<$pcs_lipbalm>> lips.' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips'
  213. if pcs_lip = 1:$pcs_lip = 'You have normal<<$pcs_lipbalm>> lips.' & $liptalk = 'soft lips' & $liptalk2 = 'delicate lips' & $liptalk3 = 'tender lips'
  214. if pcs_lip = 2:$pcs_lip = 'You have plump<<$pcs_lipbalm>> lips.' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips'
  215. if pcs_lip = 3:$pcs_lip = 'You have large,<<$pcs_lipbalm>> full lips.' & $liptalk = 'full lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'full lips'
  216. if pcs_lip = 4:$pcs_lip = 'You have huge, thick<<$pcs_lipbalm>> lips.' & $liptalk = 'thick lips' & $liptalk2 = 'thick lips' & $liptalk3 = 'thick lips'
  217. '<center>Adjust the size of your lips to match your <a href="exec:view''images/avatar.jpg''">image</a>:</center>'
  218. *nl
  219. '<center><i><<$pcs_lip>></i></center>'
  220. *nl
  221. if pcs_lip < 4:'<center><a href="exec:pcs_lip += 1 & gs ''begin'', ''lip''">Bigger lips</a></center>'
  222. if pcs_lip > 0:'<center><a href="exec:pcs_lip -= 1 & gs ''begin'', ''lip''">Smaller lips</a></center>'
  223. act'<center><b>Done</b></center>': gt'begin','description_real_character'
  224. end
  225. if $ARGS[0] = 'eyes':
  226. cls
  227. '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
  228. if player_avatar = 1:
  229. '<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
  230. else
  231. '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
  232. end
  233. *nl
  234. if pcs_eyecol = 0:$pcs_eyecol = 'brown' & $glacol2 = 'brown'
  235. if pcs_eyecol = 1:$pcs_eyecol = 'gray' & $glacol2 = 'gray'
  236. if pcs_eyecol = 2:$pcs_eyecol = 'green' & $glacol2 = 'green'
  237. if pcs_eyecol = 3:$pcs_eyecol = 'blue' & $glacol2 = 'blue'
  238. if glass <= 0:$glass = '' & glassvnesh = 0
  239. if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh = 10
  240. if pcs_lashes > 2:pcs_lashes = 2
  241. if pcs_lashes = 0:$pcs_lashes = 'with short eyelashes'
  242. if pcs_lashes = 1:$pcs_lashes = 'with normal eyelashes'
  243. if pcs_lashes = 2:$pcs_lashes = 'with long eyelashes'
  244. if pcs_eyesize > 3:pcs_eyesize = 3
  245. if pcs_eyesize = 0:$glaza = 'You have small <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = '<<$pcs_eyecol>> eyes' & $glaza3 = '<<$glacol2>> eyes'
  246. if pcs_eyesize = 1:$glaza = 'You have expressive <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'expressive <<$pcs_eyecol>> eyes' & $glaza3 = 'expressive <<$glacol2>> eyes'
  247. if pcs_eyesize = 2:$glaza = 'You have large <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'big <<$pcs_eyecol>> eyes' & $glaza3 = 'high <<$glacol2>> eyes'
  248. if pcs_eyesize = 3:$glaza = 'You have huge <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'great <<$pcs_eyecol>> eyes' & $glaza3 = 'great <<$glacol2>> eyes'
  249. if player_avatar = 1:
  250. '<center>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).</center>'
  251. else
  252. '<center>Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).</center>'
  253. end
  254. *nl
  255. '<center><i><<$glaza>></i></center>'
  256. *nl
  257. if pcs_lashes < 2:'<center><a href="exec:pcs_lashes += 1 & gs ''begin'', ''eyes''">Lengthen lashes</a></center>'
  258. if pcs_lashes > 0:'<center><a href="exec:pcs_lashes -= 1 & gs ''begin'', ''eyes''">Shorten lashes</a></center>'
  259. if pcs_eyesize < 3:'<center><a href="exec:pcs_eyesize += 1 & gs ''begin'', ''eyes''">Larger eyes</a></center>'
  260. if pcs_eyesize > 0:'<center><a href="exec:pcs_eyesize -= 1 & gs ''begin'', ''eyes''">Smaller eyes</a></center>'
  261. if glass = 0:'<center><a href="exec:glass = 1 & gs ''begin'', ''eyes''">Wear glasses</a></center>'
  262. if glass = 1:'<center><a href="exec:glass = 0 & gs ''begin'', ''eyes''">Remove glasses</a></center>'
  263. if player_avatar = 1:
  264. act'<center><b>Done</b></center>': gt'begin','description_real_character'
  265. elseif $start_type = 'nt':
  266. act'<center><b>Done</b></center>': gt 'preCUST', 'NTStart2'
  267. elseif $start_type = 'sgs':
  268. act'<center><b>Done</b></center>': gt 'preCUST', 'SGStart'
  269. else
  270. act'<center><b>Done</b></center>': gt 'preCUST', 'TGStart'
  271. end
  272. end
  273. if $ARGS[0] = 'eye color':
  274. pcs_eyecol += 1
  275. if pcs_eyecol > 3: pcs_eyecol = 0
  276. end
  277. if $ARGS[0] = 'birthday':
  278. cls
  279. '<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
  280. if csb_start ! 1:
  281. if player_avatar = 1:
  282. '<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
  283. else
  284. '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
  285. end
  286. else
  287. '<center><img <<$set_imgh>> src="images/pre/csb/petercsb.jpg"></center>'
  288. end
  289. '<center>Choose your date of birth:</center>'
  290. *nl
  291. if birthyear = 0: birthyear = 1998
  292. if birthmonth = 0: birthmonth = 4
  293. if birthday = 0: birthday = 1
  294. if birthmonth = 2:
  295. if ((birthyear mod 4 = 0) and (birthyear mod 100 ! 0)) or (birthyear mod 400 = 0):
  296. monthdays = 29
  297. else
  298. monthdays = 28
  299. end
  300. elseif birthmonth = 4 or birthmonth = 6 or birthmonth = 9 or birthmonth = 11:
  301. monthdays = 30
  302. else
  303. monthdays = 31
  304. end
  305. if birthmonth > 12: birthmonth = 12
  306. if birthmonth < 1: birthmonth = 1
  307. if birthday < 1: birthday = 1
  308. if birthday > monthdays: birthday = monthdays
  309. if birthday < 10 and birthmonth < 10:
  310. '<center>Your birthday: <B>0<<birthmonth>>/0<<birthday>></B> (MM/DD)</center>'
  311. elseif birthday < 10 and birthmonth >= 10:
  312. '<center>Your birthday: <B><<birthmonth>>/0<<birthday>></B> (MM/DD)</center>'
  313. elseif birthday >= 10 and birthmonth < 10:
  314. '<center>Your birthday: <B>0<<birthmonth>>/<<birthday>></B> (MM/DD)</center>'
  315. elseif birthday >= 10 and birthmonth >= 10:
  316. '<center>Your birthday: <B><<birthmonth>>/<<birthday>></B> (MM/DD)</center>'
  317. end
  318. *nl
  319. '<center><a href="exec:birthday += 5 & gs ''begin'', ''birthday''">+5 Days</a></center>'
  320. '<center><a href="exec:birthday += 1 & gs ''begin'', ''birthday''">+1 Day</a></center>'
  321. '<center><a href="exec:birthday -= 1 & gs ''begin'', ''birthday''">-1 Day</a></center>'
  322. '<center><a href="exec:birthday -= 5 & gs ''begin'', ''birthday''">-5 Days</a></center>'
  323. '<center><a href="exec:birthmonth = 1 & gs ''begin'', ''birthday''">January</a></center>'
  324. '<center><a href="exec:birthmonth = 2 & gs ''begin'', ''birthday''">February</a></center>'
  325. '<center><a href="exec:birthmonth = 3 & gs ''begin'', ''birthday''">March</a></center>'
  326. '<center><a href="exec:birthmonth = 4 & gs ''begin'', ''birthday''">April</a></center>'
  327. '<center><a href="exec:birthmonth = 5 & gs ''begin'', ''birthday''">May</a></center>'
  328. '<center><a href="exec:birthmonth = 6 & gs ''begin'', ''birthday''">June</a></center>'
  329. '<center><a href="exec:birthmonth = 7 & gs ''begin'', ''birthday''">July</a></center>'
  330. '<center><a href="exec:birthmonth = 8 & gs ''begin'', ''birthday''">August</a></center>'
  331. '<center><a href="exec:birthmonth = 9 & gs ''begin'', ''birthday''">September</a></center>'
  332. '<center><a href="exec:birthmonth = 10 & gs ''begin'', ''birthday''">October</a></center>'
  333. '<center><a href="exec:birthmonth = 11 & gs ''begin'', ''birthday''">November</a></center>'
  334. '<center><a href="exec:birthmonth = 12 & gs ''begin'', ''birthday''">December</a></center>'
  335. if csb_start ! 1:
  336. if player_avatar = 1:
  337. act'<center><b>Done</b></center>': gt 'begin', 'description_real_character'
  338. else
  339. act'<center><b>Done</b></center>': gt 'preSYS', 'SGStart2'
  340. end
  341. else
  342. act'<center><b>Done</b></center>': gt 'preSys', 'CSBStart'
  343. end
  344. end
  345. --- begin ---------------------------------