start 3.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157
  1. # start
  2. killall
  3. close all
  4. !addqst 'car.qsp'
  5. usehtml = 1
  6. debug = 1
  7. showstat 0
  8. showobjs 0
  9. showinput 0
  10. disablescroll = 1
  11. !nosave 0
  12. $ongload = 'loadg'
  13. $ongsave = 'saveg'
  14. $onnewloc = 'LOCA'
  15. $onobjsel = 'onobjsel'
  16. $counter = 'counter'
  17. $usercom = 'inputProcessing'
  18. fcolor = rgb(0, 0, 0)
  19. bcolor = rgb(255, 255, 255)
  20. lcolor = rgb(106, 90, 205)
  21. $fname = 'Tahoma'
  22. fsize = 12
  23. $version = '0.5.2 Succu-porn version.'
  24. *nl
  25. *nl
  26. '<hr align="left" color="red" size="3" width="1200">'
  27. '<center><h2>Girl Life [English Community Version]</h2></center>'
  28. *nl
  29. '<center>This is game is based on the russian game ЭТО by DeGross.</center>'
  30. *nl
  31. '<hr align="left" color="red" size="3" width="1200">'
  32. *nl
  33. '<center>Version <b><<$version>></b></center>'
  34. *nl
  35. *nl
  36. '<center><font color="red"><b>Children under 18 years are strictly forbidden to play</b></font>'
  37. *nl
  38. *nl
  39. 'This game is about the simulated life of a woman containing elements of RPG, strategy, porn and magical combat.'
  40. 'You may choose what kind of life the character will live according to your play style, conscience or even personal beliefs.'
  41. 'There are many choices to make in this game, will you be a saint or a sinner?'
  42. *nl
  43. 'All characters in this game are fictional and any similarities to any persons living or dead are purely coincidental.'
  44. 'The images used for sexual elements of this game are performed by 18yo and over consenting adults and used for illustrative purposes only.'
  45. *nl
  46. '<b>* Change log and wiki now available <a href="http://git.tfgamessite.com/KevinSmarts/girllife-ecv/wikis/home">here</a> (External link). *</b>'
  47. *nl
  48. 'Recent Version Tracking: <a href="exec:gt ''version''">Here</a></center>'
  49. *nl
  50. StoryLine = 0
  51. MagikDostup = 0
  52. $name = 'Michael'
  53. $surname = 'Kuznetsov'
  54. age = 35
  55. vidage = 35
  56. year = 2015
  57. year_start = 2015
  58. month = 5
  59. week = 1
  60. hour = 7
  61. day = 25
  62. daystart_start = 145
  63. gs 'daystart'
  64. gs 'outdoors', 'weather'
  65. !!body
  66. rost = 186
  67. fat = 130
  68. dick = 0
  69. energy = 60
  70. water = 60
  71. son = 70
  72. !!stats
  73. stren = 160
  74. speed = 50
  75. agil = 50
  76. vital = 160
  77. intel = 50
  78. will = 100
  79. react = 50
  80. health = vital * 10
  81. willpower = intel * 5 + will * 5
  82. manna = (intel * magik) + vital * 5
  83. BDSMfilm = 0
  84. pornstudio = 0
  85. pfilmSTOP = 0
  86. money = 1500
  87. opPRE = 1
  88. tanga = 1
  89. clrbelo = 1
  90. birthday = 5
  91. birthmonth = 3
  92. !initializing elasticity
  93. vshrink = 1
  94. vshrinkdays = 6
  95. ashrink = 1
  96. ashrinkdays = 3
  97. oldsavehcol = 1
  98. !MJ: The day the month ends. Including possible rollover months 0 and 13.
  99. monthsend[1] = 31
  100. if ((year mod 4 = 0) and (year mod 100 ! 0)) or (year mod 400 = 0):
  101. Leapyear = 1 & monthsend[2] = 29
  102. else
  103. Leapyear = 0 & monthsend[2] = 28
  104. end
  105. monthsend[3] = 31
  106. monthsend[4] = 30
  107. monthsend[5] = 31
  108. monthsend[6] = 30
  109. monthsend[7] = 31
  110. monthsend[8] = 31
  111. monthsend[9] = 30
  112. monthsend[10] = 31
  113. monthsend[11] = 30
  114. monthsend[12] = 31
  115. $monthName[1] = 'January'
  116. $monthName[2] = 'February'
  117. $monthName[3] = 'March'
  118. $monthName[4] = 'April'
  119. $monthName[5] = 'May'
  120. $monthName[6] = 'June'
  121. $monthName[7] = 'July'
  122. $monthName[8] = 'August'
  123. $monthName[9] = 'September'
  124. $monthName[10] = 'October'
  125. $monthName[11] = 'November'
  126. $monthName[12] = 'December'
  127. $month = $monthName[month]
  128. act '<center><b>Start</b></center>':
  129. cla
  130. gt 'begin','real_character'
  131. end
  132. act '<center><b>LOAD</b></center>':OPENGAME
  133. act '<center>Load Autosave for <b>original</b> start game</center>':OPENGAME 'autosave.sav'
  134. act '<center>Load Autosave for <b>schoolgirl</b> start game</center>':OPENGAME 'autosave_alt.sav'
  135. if music_on = 0:
  136. inited = 1
  137. music_on = 1
  138. volume = 100
  139. $music_theme = 'sukizaebali'
  140. gs 'init_music'
  141. end
  142. ! WD: Set variable to store Image needed HTML code
  143. set $ImageNeededPlacholder = '<center><img src="images/community/image_needed.png"></center>'
  144. --- start ---------------------------------