IrinaRoom.qsrc 6.3 KB

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