IrinaRoom.qsrc 6.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275
  1. # IrinaRoom
  2. if $ARGS[0] = 'start':
  3. cla
  4. *clr
  5. $menu_loc = 'IrinaRoom'
  6. $menu_arg = 'start'
  7. menu_off = 0
  8. minut += 5
  9. gs 'stat'
  10. gs 'themes', 'indoors'
  11. '<center><b><font color="maroon">Entrance where your girlfriend Ira lives</font></b></center>'
  12. '<center><img <<$set_imgh>> src="images/locations/shared/apartment/podezdhr.jpg"></center>'
  13. act 'Leave':
  14. cla
  15. minut += 5
  16. gt 'street'
  17. end
  18. act 'Ring Iras doorbell':
  19. cla
  20. if hour >= 16 and hour <= 21 and week >= 6 and IrinaQW ! 2:
  21. 'You ring the bell and Ira opens the door, she smiles and invites you in.'
  22. act 'Enter apartment':gt 'IrinaRoom', 'first'
  23. else
  24. 'You rang the doorbell but no one answers.'
  25. act 'Leave':
  26. cla
  27. minut += 5
  28. gt 'street'
  29. end
  30. end
  31. end
  32. end
  33. if $ARGS[0] = 'first':
  34. cla
  35. clr
  36. *clr
  37. $menu_loc = 'IrinaRoom'
  38. $menu_arg = 'first'
  39. menu_off = 0
  40. gs 'stat'
  41. '<center><b><font color="maroon">Apartment Ira</font></b></center>'
  42. '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaroom.jpg"></center>'
  43. 'A small studio apartment, Ira keeps it neat and tidy'
  44. act 'Drink in the kitchen':gt 'IrinaRoom', 'first1'
  45. end
  46. if $ARGS[0] = 'first1':
  47. cla
  48. clr
  49. *clr
  50. minut += 60
  51. pcs_mood += 50
  52. if pcs_hydra >= 100:
  53. pcs_hydra -= 5
  54. else
  55. pcs_hydra -= 10
  56. end
  57. $locclass = 'kitr'
  58. menu_off = 1
  59. gs 'stat'
  60. '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw.jpg"></center>'
  61. 'You and Ira settle in the kitchen with a bottle of wine and some fruits, you talk and chat merrily.'
  62. 'You''re both a bit tipsy and the conversation becomes more candid.'
  63. act 'Leave':gt 'street'
  64. if IrinaQW = 1:
  65. act 'Suggest drinking to sisterhood':gt 'IrinaRoom', 'first2'
  66. end
  67. if IrinaQW >= 10:
  68. act 'Kiss':gt 'IrinaRoom', 'kiss'
  69. end
  70. end
  71. if $ARGS[0] = 'kiss':
  72. cla
  73. *clr
  74. pcs_mood += 50
  75. clr
  76. gs 'stat'
  77. '<center><img <<$set_imgh>> src="images/characters/city/ira/irinakiss.jpg"></center>'
  78. 'You passionately kiss Ira, and caress her firm breasts with your hands.'
  79. gs 'arousal', 'kiss', 10, 'lesbian'
  80. gs 'stat'
  81. act 'Sex':gt 'IrinaRoom', 'sex'
  82. end
  83. if $ARGS[0] = 'sex':
  84. cla
  85. clr
  86. *clr
  87. pcs_mood += 50
  88. pcs_mood = 100
  89. pcs_willpwr += 100
  90. gs 'stat'
  91. '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinasex.jpg"></center>'
  92. if pcs_horny < 50:
  93. 'Once in bed you caress each other with passion and lick each others wet pussies. But the excitement gradually disappears and you feel that you won''t orgasm this time.'
  94. $orgasm_or = 'no'
  95. gs 'arousal', 'cuni', 60, 'lesbian'
  96. gs 'arousal', 'cuni_give', 60, 'lesbian'
  97. minut -= 60
  98. gs 'stat'
  99. end
  100. if pcs_horny >= 50:
  101. 'Once in bed you caress each other with passion and lick each others wet pussies. Finally you are both satisfied.'
  102. $orgasm_or = 'yes'
  103. gs 'arousal', 'cuni', 60, 'lesbian'
  104. gs 'arousal', 'cuni_give', 60, 'lesbian'
  105. minut -= 60
  106. gs 'stat'
  107. end
  108. act 'Leave':
  109. cla
  110. minut += 5
  111. gs 'arousal', 'end'
  112. gt 'street'
  113. end
  114. end
  115. if $ARGS[0] = 'first2':
  116. cla
  117. clr
  118. *clr
  119. minut += 60
  120. pcs_mood += 50
  121. gs 'stat'
  122. '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw1.jpg"></center>'
  123. 'You suggest drinking to sister to Ira. Although slightly odd, this simple ritual removes tensions and brings you closer.'
  124. act 'Kiss':gt 'IrinaRoom', 'first3'
  125. end
  126. if $ARGS[0] = 'first3':
  127. cla
  128. clr
  129. *clr
  130. pcs_mood += 50
  131. gs 'stat'
  132. '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw2.jpg"></center>'
  133. 'You kiss Ira on her warm, soft, wine smelling lips. Irina flushes after the kiss and looks at you a little embarrassed and frightened.'
  134. gs 'arousal', 'kiss', 5, 'lesbian'
  135. gs 'stat'
  136. act 'Ira undress':gt 'IrinaRoom', 'first4'
  137. act 'Ira drink more':gt 'IrinaRoom', 'first5'
  138. end
  139. if $ARGS[0] = 'first4':
  140. cla
  141. clr
  142. *clr
  143. IrinaQW = 2
  144. gs 'stat'
  145. 'You started unbuttoning Iras blouse, she jumps up and leaps from her chair screaming, "What are you doing? I''m not a lesbian!"'
  146. 'She seems very afraid of your forwardness and points you to the door.'
  147. act 'Leave':
  148. cla
  149. minut += 5
  150. gt 'street'
  151. end
  152. end
  153. if $ARGS[0] = 'first5':
  154. cla
  155. clr
  156. *clr
  157. IrinaQW = 10
  158. gs 'stat'
  159. '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw3.jpg"></center>'
  160. 'You pumped Ira with wine, she is highly intoxicated and spilled wine on myself. She went into the bathroom to change. You, too, went in and offered to help her.'
  161. 'She undresses and you have decided to follow suit and after undressing climb into the shower. You start lathering her body and see that she is flushed and her nipples erect.'
  162. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
  163. dynamic $showerdin
  164. if frost > 0:frost = 0
  165. gs 'arousal', 'foreplay', 10, 'lesbian'
  166. gs 'stat'
  167. act 'Kiss':gt 'IrinaRoom', 'first6'
  168. end
  169. if $ARGS[0] = 'first6':
  170. cla
  171. clr
  172. *clr
  173. gs 'stat'
  174. '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw4.jpg"></center>'
  175. 'You passionately hold your lips to Iras luscious lips, she suddenly says, "You kiss very passionately."'
  176. gs 'arousal', 'kiss', 5, 'lesbian'
  177. gs 'stat'
  178. act 'Fondle breasts':gt 'IrinaRoom', 'first7'
  179. end
  180. if $ARGS[0] = 'first7':
  181. cla
  182. clr
  183. *clr
  184. gs 'stat'
  185. '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw5.jpg"></center>'
  186. 'You lower your head to her chest and began to suck and lick her hard nipples as Ira moans in pleasure.'
  187. gs 'arousal', 'breasts', 5, 'lesbian'
  188. gs 'stat'
  189. act 'Lick pussy':gt 'IrinaRoom', 'first8'
  190. end
  191. if $ARGS[0] = 'first8':
  192. cla
  193. clr
  194. *clr
  195. pcs_horny += 20
  196. girl += 1
  197. lesbian += 1
  198. gs 'stat'
  199. '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw6.jpg"></center>'
  200. 'You mouth begins to wander lower and lower until you come to Iras pussy. Moisture is already seeping from it and your tongue begins to caress her clit. Soon she shudders and moans in orgasm.'
  201. 'Ira decides to pay you back in the same coin and not speaking a word puts you on the edge of the tub and her lips sink into your pussy.'
  202. gs 'arousal', 'cuni', 10, 'lesbian'
  203. gs 'arousal', 'cuni_give', 10, 'lesbian'
  204. minut -= 10
  205. gs 'stat'
  206. act 'Enjoy':gt 'IrinaRoom', 'first9'
  207. end
  208. if $ARGS[0] = 'first9':
  209. cla
  210. clr
  211. *clr
  212. pcs_mood = 100
  213. pcs_willpwr += 100
  214. gs 'stat'
  215. '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw7.jpg"></center>'
  216. 'Iras lips and tongue quickly have an effect and you finish with passionate moans.'
  217. $orgasm_or = 'yes'
  218. gs 'arousal', 'cuni', 10, 'lesbian'
  219. gs 'stat'
  220. act 'Leave':
  221. cla
  222. minut += 5
  223. gs 'arousal', 'end'
  224. gt 'street'
  225. end
  226. end
  227. --- IrinaRoom ---------------------------------