123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278 |
- # IrinaRoom
- if $ARGS[0] = 'start':
- cla
- *clr
- minut += 5
- clr
- gs 'stat'
- if night_mode = 1:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(0, 0, 0)
- lcolor = rgb(106, 90, 205)
- elseif night_mode = 2:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(20, 20, 20)
- lcolor = rgb(106, 90, 205)
- else
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- end
- '<center><b><font color="maroon">Entrance where your girlfriend Ira lives</font></b></center>'
- '<center><img <<$set_imgh>> src="images/locations/shared/apartment/podezdhr.jpg"></center>'
- act 'Leave':
- cla
- minut += 5
- gt 'street'
- end
- act 'Ring Iras doorbell':
- cla
- if hour >= 16 and hour <= 21 and week >= 6 and IrinaQW ! 2:
- 'You ring the bell and Ira opens the door, she smiles and invites you in.'
- act 'Enter apartment':gt 'IrinaRoom', 'first'
- else
- 'You rang the doorbell but no one answers.'
- act 'Leave':
- cla
- minut += 5
- gt 'street'
- end
- end
- end
- end
- if $ARGS[0] = 'first':
- cla
- clr
- *clr
- minut += 5
- gs 'stat'
- '<center><b><font color="maroon">Apartment Ira</font></b></center>'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaroom.jpg"></center>'
- 'A small studio apartment, Ira keeps it neat and tidy'
- act 'Drink in the kitchen':gt 'IrinaRoom', 'first1'
- end
- if $ARGS[0] = 'first1':
- cla
- clr
- *clr
- minut += 60
- pcs_mood += 50
- if pcs_hydra >= 100:
- pcs_hydra -= 5
- else
- pcs_hydra -= 10
- end
- $locclass = 'kitr'
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw.jpg"></center>'
- 'You and Ira settle in the kitchen with a bottle of wine and some fruits, you talk and chat merrily.'
- 'You''re both a bit tipsy and the conversation becomes more candid.'
- act 'Leave':gt 'street'
- if IrinaQW = 1:
- act 'Suggest drinking to sisterhood':gt 'IrinaRoom', 'first2'
- end
- if IrinaQW >= 10:
- act 'Kiss':gt 'IrinaRoom', 'kiss'
- end
- end
- if $ARGS[0] = 'kiss':
- cla
- *clr
- pcs_mood += 50
- clr
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/irinakiss.jpg"></center>'
- 'You passionately kiss Ira, and caress her firm breasts with your hands.'
- gs 'arousal', 'kiss', 10, 'lesbian'
- gs 'stat'
-
- act 'Sex':gt 'IrinaRoom', 'sex'
- end
- if $ARGS[0] = 'sex':
- cla
- clr
- *clr
- pcs_mood += 50
- pcs_mood = 100
- pcs_willpwr += 100
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinasex.jpg"></center>'
- if pcs_horny < 50:
- '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.'
-
- $orgasm_or = 'no'
- gs 'arousal', 'cuni', 60, 'lesbian'
- gs 'arousal', 'cuni_give', 60, 'lesbian'
- minut -= 60
- gs 'stat'
-
- end
- if pcs_horny >= 50:
- 'Once in bed you caress each other with passion and lick each others wet pussies. Finally you are both satisfied.'
-
- $orgasm_or = 'yes'
- gs 'arousal', 'cuni', 60, 'lesbian'
- gs 'arousal', 'cuni_give', 60, 'lesbian'
- minut -= 60
- gs 'stat'
-
- end
- act 'Leave':
- cla
- minut += 5
- gs 'arousal', 'end'
- gt 'street'
- end
- end
- if $ARGS[0] = 'first2':
- cla
- clr
- *clr
- minut += 60
- pcs_mood += 50
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw1.jpg"></center>'
- 'You suggest drinking to sister to Ira. Although slightly odd, this simple ritual removes tensions and brings you closer.'
- act 'Kiss':gt 'IrinaRoom', 'first3'
- end
- if $ARGS[0] = 'first3':
- cla
- clr
- *clr
- pcs_mood += 50
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw2.jpg"></center>'
- 'You kiss Ira on her warm, soft, wine smelling lips. Irina flushes after the kiss and looks at you a little embarrassed and frightened.'
- gs 'arousal', 'kiss', 5, 'lesbian'
- gs 'stat'
-
- act 'Ira undress':gt 'IrinaRoom', 'first4'
- act 'Ira drink more':gt 'IrinaRoom', 'first5'
- end
- if $ARGS[0] = 'first4':
- cla
- clr
- *clr
- IrinaQW = 2
- gs 'stat'
- 'You started unbuttoning Iras blouse, she jumps up and leaps from her chair screaming, "What are you doing? I''m not a lesbian!"'
- 'She seems very afraid of your forwardness and points you to the door.'
- act 'Leave':
- cla
- minut += 5
- gt 'street'
- end
- end
- if $ARGS[0] = 'first5':
- cla
- clr
- *clr
- IrinaQW = 10
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw3.jpg"></center>'
- '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.'
- '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.'
- gs 'arousal', 'foreplay', 10, 'lesbian'
- gs 'stat'
-
- act 'Kiss':gt 'IrinaRoom', 'first6'
- end
- if $ARGS[0] = 'first6':
- cla
- clr
- *clr
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw4.jpg"></center>'
- 'You passionately hold your lips to Iras luscious lips, she suddenly says, "You kiss very passionately."'
- gs 'arousal', 'kiss', 5, 'lesbian'
- gs 'stat'
-
- act 'Fondle breasts':gt 'IrinaRoom', 'first7'
- end
- if $ARGS[0] = 'first7':
- cla
- clr
- *clr
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw5.jpg"></center>'
- 'You lower your head to her chest and began to suck and lick her hard nipples as Ira moans in pleasure.'
- gs 'arousal', 'breasts', 5, 'lesbian'
- gs 'stat'
-
- act 'Lick pussy':gt 'IrinaRoom', 'first8'
- end
- if $ARGS[0] = 'first8':
- cla
- clr
- *clr
- pcs_horny += 20
- girl += 1
- lesbian += 1
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw6.jpg"></center>'
- '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.'
- '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.'
- gs 'arousal', 'cuni', 10, 'lesbian'
- gs 'arousal', 'cuni_give', 10, 'lesbian'
- minut -= 10
- gs 'stat'
-
- act 'Enjoy':gt 'IrinaRoom', 'first9'
- end
- if $ARGS[0] = 'first9':
- cla
- clr
- *clr
- pcs_mood = 100
- pcs_willpwr += 100
- gs 'stat'
- '<center><img <<$set_imgh>> src="images/characters/city/ira/sex/irinaqw7.jpg"></center>'
- 'Iras lips and tongue quickly have an effect and you finish with passionate moans.'
- $orgasm_or = 'yes'
- gs 'arousal', 'cuni', 10, 'lesbian'
- gs 'stat'
-
- act 'Leave':
- cla
- minut += 5
- gs 'arousal', 'end'
- gt 'street'
- end
- end
- --- IrinaRoom ---------------------------------
|