0
0

451_dom_gor 5.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202
  1. # dom_gor
  2. ACT 'On the street':
  3. cls
  4. if sick <= 72 and nude = 0:
  5. xgt 'gorodok'
  6. elseif nude = 0:
  7. '<B><font color=red>You are too ill to take to the streets.</font></B>'
  8. xgt $curloc
  9. else
  10. '<B><font color=red>YOU HAVE TO GET DRESSED.</font></B>'
  11. xgt $curloc
  12. end
  13. END
  14. $metkaM = $ARGS[0]
  15. $locM = $CURLOC
  16. '<center><B><font color = maroon>Your room</font></B></center>'
  17. '<center><img src="images\etogame\kom_gor.jpg"></center>'
  18. 'Your room in a hostel. The room is small, there is only the minimum necessary. 2 sleepers, <a href="exec:GT ''gor_mirror'',''start''">mirror</a>, <a href="exec:GT ''gor_exh'',''pos1''">hanger</a>, <a href="exec:GT ''loker'',''start''">cupboard</a> for things and a small TV.'
  19. clr
  20. gs 'stat'
  21. gs 'time'
  22. fcolor = rgb(0,0,0)
  23. bcolor = rgb(255,255,255)
  24. LCOLOR = rgb(106,90,205)
  25. if cloth_vid = 2 and teachlevel > 20 and parkrunday ! day and hour < 21 and hour > 6:
  26. act 'Jogging on the Square (1:00)':
  27. cla
  28. *clr
  29. set parkrunday = day
  30. set minut = minut + 30
  31. set manna = manna + 10
  32. set willpower = willpower - 10
  33. set beg = beg + 1
  34. set fat = fat - 8
  35. set speed = speed + 1
  36. set sweat = sweat + 3
  37. '<center><img src="images\pic\parkbeg.jpg" ></center>'
  38. 'You did a few laps around the park. Out of breath, sweaty and tired.'
  39. parkrand = RAND (0,10)
  40. if parkrand >4 and beguch<3:
  41. 'In the park you met a disciple of the school and asked to go for a run with you.'
  42. act 'run together':
  43. cla
  44. *clr
  45. beguch+=1
  46. '<center><img src="images\etogame\stop.jpg" ></center>'
  47. 'You run with the pupil sometimes stopping and chatting with ease.'
  48. 'Disciple: - Svetlana, you are so beautiful, you are all so fond of! You: - Hmm, thank you!'
  49. act 'complete a run':gt'gskver'
  50. end
  51. end
  52. if parkrand >4 and beguch>=3 and beguch<6:
  53. 'In the park you met a disciple of the school and asked to go for a run with you.'
  54. act 'run together':
  55. cla
  56. *clr
  57. beguch+=1
  58. '<center><img src="images\etogame\stop2.jpg" ></center>'
  59. 'Have you stopped to do stretching exercises muscles.'
  60. 'Disciple: - Ahh if our girls would be at least a little like you! You: - You just got used to them, get to know them!'
  61. act 'complete a run':gt'gskver'
  62. end
  63. end
  64. if parkrand >4 and beguch>=6 and beguch<9:
  65. 'In the park you met a disciple of the school and asked to go for a run with you.'
  66. act 'run together':
  67. cla
  68. *clr
  69. beguch+=1
  70. horny+=3
  71. '<center><img src="images\etogame\stop3.jpg" ></center>'
  72. 'You run with the pupil sometimes stopping and chatting with ease.'
  73. *nl
  74. 'Disciple: - Svetlana, can I take a picture of you! You are: - What are you going to do then with my photo, and the wretch!'
  75. 'Disciple: - No, no, I will not forgive her masturbate! You: - Aha! I did not say that!'
  76. 'Student: - Im sorry, was a bad idea. You: - Yes, Im kidding! Fotkay, just me then do not forget to copy.'
  77. *nl
  78. 'You picked up a background, stood in a pose and you photographed.'
  79. act 'complete a run':gt'gskver'
  80. end
  81. end
  82. act 'complete a run':gt'gskver'
  83. end
  84. end
  85. if hour < 23:
  86. act 'Lie on the couch (1:00)':
  87. cla
  88. minut += 60
  89. if son < 30:
  90. son += 5
  91. else
  92. son = 29
  93. end
  94. 'I relax lying on the couch.'
  95. act 'stretch':gt'dom_gor'
  96. end
  97. end
  98. if hour >= 23:
  99. act 'Sleep in a bed':
  100. cla
  101. *clr
  102. '<center><img src="images\pics\son.jpg"></center>'
  103. cloth_vid=0
  104. if analplugIN = 1: set analplugIN = 0 & 'Before going to bed you remove the butt plug.'
  105. if vibratorIN = 1: set vibratorIN = 0 & 'Before going to bed you remove the vibrator.'
  106. if mop > 1: set mop = 0 & set vidageday -= 1 & 'Cosmetics smeared face, you think that looks bad for sleeping with makeup, skin ages faster from it.'
  107. set tanga = 1
  108. set health += 5
  109. set hapri = 0
  110. InSleep = 1
  111. gs 'stat'
  112. 'you slept'
  113. act 'Get Up':
  114. cla
  115. InSleep = 0
  116. minut += 480
  117. son = 30
  118. gt 'dom_gor'
  119. end
  120. end
  121. end
  122. if eda > 0:
  123. 'In the refrigerator stored food that´s good for <B><<eda>></B> servings.'
  124. end
  125. if edaD = 0 and eda = 0:
  126. '<B><font color = red>The fridge is almost empty, nothing to eat at all.</font></B>'
  127. end
  128. if edaD > 0:
  129. 'The refrigerator is kept healthy meal that´s good for <B><<edaD>></B> servings.'
  130. end
  131. if eda >= 1:
  132. act 'Have meal (1:00)':
  133. cla
  134. *clr
  135. eda -= 1
  136. minut += 60
  137. gs 'stat'
  138. frost = 0
  139. !set edahot = 0
  140. set health += 10
  141. set manna += 20
  142. if water < 20:
  143. 'You gladly drank a cup of tea.'
  144. set water += 20
  145. end
  146. if water >= 20:
  147. 'Tea in you no longer climbs.'
  148. end
  149. if energy >= 30:
  150. set fat += 2
  151. 'You no longer want to eat and drink.'
  152. end
  153. if energy < 30:
  154. energy += 25
  155. fat += 1
  156. 'You gladly ate.'
  157. end
  158. act 'Get up from the table': gt 'dom_gor'
  159. end
  160. end
  161. if edaD > 0:
  162. act 'Eat diet food (0:30)':
  163. cla
  164. *clr
  165. frost = 0
  166. '<center><img src="images\pics\food.jpg"></center>'
  167. set minut += 30
  168. set health += 10
  169. set manna += 20
  170. set edaD -= 1
  171. if energy >= 30:
  172. 'You can no longer have.'
  173. end
  174. if energy >= 20 and energy < 30:
  175. set energy += 10
  176. 'You pushed through the power of a meal.'
  177. end
  178. if energy < 20:
  179. set energy += 20
  180. 'You gladly ate.'
  181. end
  182. if water >= 20:
  183. 'Tea in you no longer climbs.'
  184. end
  185. if water < 20:
  186. 'You gladly drank a cup of tea.'
  187. set water += 20
  188. end
  189. act 'Get up from the table': gt 'dom_gor'
  190. end
  191. end
  192. if gor_dorm > 0: act 'In a shared bathroom': gt 'etoexhib','pos41'
  193. --- dom_gor ---------------------------------