Forráskód Böngészése

Merge branch 'master' of http://git.tfgamessite.com/zaboron/girllife-ecv

KevinSmarts 6 éve
szülő
commit
e802542524
3 módosított fájl, 165 hozzáadás és 409 törlés
  1. 31 407
      locations/dateF
  2. 4 0
      locations/lezbsex
  3. 130 2
      locations/telefon

+ 31 - 407
locations/dateF

@@ -296,12 +296,8 @@ if $args[0] = 'date_choice':
 		!!if good weather, day/night, go to park is a option
 		act '"Let''s go to the park."':gt 'dateF', 'datepark'
 	end
-	if $loc = 'pavResidential' or $loc = 'pavCommercial' or $loc = 'down':
-		!!if in pav or city center this is a option
-		act '"Let''s go to the movie theater."':gt 'dateF', 'datecinema'
-	end
-	!!is also a option, I am sure there is a cafe in every location.
-	act '"Let''s go to a cafe"':gt 'dateF', 'datecafe'
+	!!not implemented yet
+	!!act '"Let''s go to a cafe"':gt 'dateF', 'datecafe'
 	!!once we add a bar to every town/city location this will always be a option.
 	act '"Let''s go to a bar."':gt 'dateF', 'datebar'
 end
@@ -314,7 +310,7 @@ if $ARGS[0] = 'datepark':
 	cla
 	minut += 30
 	gs 'stat'
-	'<center><img src="images\locations\shared\park\walk_'+ rand(1,2) +'.jpg"></center>'
+	'<center><img src="images\locations\shared\dateF\park1.jpg"></center>'
 	'"Since it''s such a beautiful day today, let''s go for a walk in the park." you suggest.'
 	'"Sounds great. Lets go." <<$boydesc>> walks with you towards the park.'
 	'The two of you walk in the park for a while causally talking, getting knowing each other. After a while she suggests sitting down.'
@@ -324,7 +320,7 @@ if $ARGS[0] = 'datepark':
 		cla
 		minut += 45
 		gs 'stat'
-		'<center><img src="images\locations\shared\date\parkwatch.jpeg"></center>'
+		'<center><img src="images\locations\shared\dateF\park2.jpg"></center>'
 		'The two of you sit down and begin commenting on the people walking by. You laugh while <<$boydesc>> makes up stories about their backgrounds and quirks.'
 		'There are a few times you almost get caught as you point and laugh. As you''re sitting down an ice cream pushcart appears, generating quite a buzz around it. <<$boydesc>> asks you, "I sure could go for some ice cream. Would you also like some ice cream?"'
 		act 'Yeah':
@@ -332,7 +328,7 @@ if $ARGS[0] = 'datepark':
 			cla
 			minut += 15
 			gs 'stat'
-			'<center><img src="images\locations\shared\date\parkice.jpg"></center>'
+			'<center><img src="images\locations\shared\dateF\park3.jpg"></center>'
 			'<<$boydesc>> runs away to the pushcart and comes back with two ice creams. "Here you go, <<$pcs_nickname>> I hope you''ll enjoy it."'
 			'You nod and thank her. The two of you continue talking while eating the ice cream. As you finish <<$boydesc>> asks, "Shall we move on?"'
 			act 'Nod':
@@ -340,94 +336,44 @@ if $ARGS[0] = 'datepark':
 				cla
 				minut += 15
 				gs 'stat'
-				'<center><img src="images\locations\shared\date\parkholding.jpg"></center>'
+				'<center><img src="images\locations\shared\dateF\park4.jpg"></center>'
 				'As you continue walking the two of you begin holding hands. You''re really enjoying yourself by now everything is going really well.'
 				'You don''t even notice that the two of you strayed off the beaten path, all of a sudden <<$boydesc>> stops and whispers in your ear, "Now that we''re at a secluded spot, you know what would make this date even better?"'
 				act 'What?':
 					*clr
 					cla
-					'<center><img src="images\locations\shared\date\parklean.jpg"></center>'
+					'<center><img src="images\locations\shared\dateF\park5.jpg"></center>'
 					'Before you''re even able to respond <<$boydesc>> leans in and kisses you on the lips.'
 					act 'Make out':
 						*clr
 						cla
-						'<center><img src="images\locations\shared\date\parkmake.jpg"></center>'
+						'<center><img src="images\locations\shared\dateF\park6.jpg"></center>'
 						'Feeling frisky you kiss <<$boydesc>> back. Not before long the two of you are having a make out session, french kissing each other.'
 						'You feel yourself getting more and more aroused, maybe you should stop before the situation escalates too much...'
 						gs 'arousal', 'kiss', 3, 'exhibitionism'
 						gs 'stat'
+						act 'Go along with her':
+							gfsex = 1
+							dateFType = 'walk_back'
+							gt 'lezbsex','start'
+						end
 						act 'Stop her':
 							*clr
 							cla
 							minut += 5
 							gs 'stat'
-							'<center><img src="images\locations\shared\date\parkback.jpg"></center>'
+							'<center><img src="images\locations\shared\dateF\parkback.jpg"></center>'
 							'You put your hand on her chest and push her away from you. "No, we need to stop." At first she keeps trying to kiss you but you push on her a bit harder and pull back as you do. "I said no!"'
 							'She stops at once. "Sorry, got a little carried away."'
 							act 'Walk back':gt 'dateF', 'walk_back'
 						end
-						act 'Who cares':
-							*clr
-							cla
-							'<center><img src="images\locations\shared\date\parkkiss.jpg"></center>'
-							'You decide to ignore the little voice in your back head and continue on the make out session.'
-							'<<$boydesc>> pulls you in closer and slowly begins rubbing your wet slit through your clothes. You let out a soft wherper as she''s touching you.'
-							gs 'arousal', 'kiss', 4, 'exhibitionism'
-							gs 'stat'
-							'As you''re pressed against <<$boydesc>> you feel her bulge through her pants. The two of you quickly remove your clothes, playing with each other''s sensitive parts.'
-							act 'On your knees':
-								*clr
-								cla
-								'<center><img src="images\locations\shared\date\parkhj.jpg"></center>'
-								'You give her a lustful smirk and get down on your knees. You quickly unbutton her pants and let her semi-grown cock hang loose.'
-								'Looking at it you say, "Let me help you get ready for what''s to come." as you grab it with your hand and start jerking her off.'
-								'<<$boydesc>> lets out a groan and you feel her cock growing bigger and bigger. After a minute or so her cock is pulsating and you''re ready to move on.'
-								'You keep teasing her on as you lick her penis head and penis shaft. <<$boydesc>>''s cock twitches as you keep licking her.'
-								gs 'arousal', 'hj', 4, 'exhibitionism'
-								gs 'arousal', 'bj', 4, 'exhibitionism'
-								gs 'stat'
-								act 'Give blowjob':
-									*clr
-									cla
-									'<center><img src="images\locations\shared\date\parkbj.jpg"></center>'
-									'"Enough teasing, I want you to blow me <<$pcs_nickname>>, I don''t want to cum before you''ve had a taste of my cock."'
-									'You comply and start sucking on the head, smacking loudly. You are working calmly and methodically for some minutes and in the end you''re able to fit her into your mouth entirely.'
-									gs 'arousal', 'bj', 6, 'exhibitionism'
-									gs 'stat'
-									'"Damn, <<$pcs_nickname>>, you''re really a good little cocksucker. How about you get on all fours so I can enjoy that little pussy of yours?"'
-									act 'Doggy':
-										*clr
-										cla
-										'<center><img src="images\locations\shared\date\parkdoggy.jpg"></center>'
-										'You''re already wet and ready for her as you spread your legs as she bends down. <<$boydesc>> slowly runs her shaft along your wet pussy teasing you right back as a payback for before.'
-										'You let out a sigh as she slowly enters you. Holding your waist, <<$boydesc>> slowly increases her pace. It doesn''t take long for her to be at full pace. You feel great as her strong member alternately fills and pleasantly stretches your pussy.'
-										$orgasm_or = 'custom'
-										$orgasm_txt = 'Suddenly, <<$boydesc>> pounds you at just the right pace and your whole body starts to shiver in orgasm. The intensity of the orgasm nearly makes you scream, but you bite down on your lip and do your best to stifle down the moans so no one hears you.'
-										gs 'arousal', 'vaginal', 6, 'exhibitionism'
-										gs 'stat'
-										'Even <<$boydesc>> is groaning and grimacing badly by now ready to cum.'
-										act 'Finish':
-											*clr
-											cla
-											minut += 10
-											gs 'stat'
-											'<center><img src="images\locations\shared\date\parkfinish.jpg"></center>'
-											'<<$boydesc>> can''t contain herself anymore, she''s loudly groaning and as soon she pulls out of you she cums coating your pussy lips.'
-											'Both of you fall down to the ground, breathing heavily, trying to come to your senses. After a while you look into her eyes and start laughing.'
-											'"That was great <<$pcs_nickname>>. We''ll have to do this again." You get up and clean yourself, straightening out your clothes the best you can. "Shall we head back?" you ask.'
-											act 'Walk back':gt 'dateF', 'walk_back'
-										end	
-									end		
-								end
-							end
-						end
 					end
 					act 'Back up':
 						*clr
 						cla
 						minut += 5
 						gs 'stat'
-						'<center><img src="images\locations\shared\date\parkback.jpg"></center>'
+						'<center><img src="images\locations\shared\dateF\parkback.jpg"></center>'
 						'At first you are surprised by the kiss and return it but quickly you pull back as you push her away. "Stop, I''m enjoying the date but I''m not that kind of girl if you thought otherwise."'
 						'She shakes her head. "No, not at all. I''m not going to make you do something you don''t want." <<$boydesc>> answers.'
 						act 'Walk back':gt 'dateF', 'walk_back'
@@ -443,7 +389,7 @@ if $ARGS[0] = 'walk_back':
 	cla
 	minut += 10
 	gs 'stat'
-	'<center><img src="images\locations\shared\date\parkholding.jpg"></center>'
+	'<center><img src="images\locations\shared\dateF\parkback.jpg"></center>'
 	'As you finish up the two still holding hands walk all the way back to the park entrance. You stand there for a while feeling that awkward silence creeping up as neither of you know how to end the date.'
 	'"I''ve had a great time." you say smiling. "Yeah, me too..." <<$boydesc>> says quietly. "Could I get your number so I can call you?"'
 	act 'Sure':
@@ -470,300 +416,6 @@ end
 !Go to movie theater pav/city, time 3-4 hours
 !Nothing special, there is a sex act but the player has the option to stop before it gets way out of control.
 
-if $ARGS[0] = 'datecinema':
-	*clr
-	cla
-	minut += 15
-	gs 'stat'
-	'<center><img src="images\locations\pavlovsk\park\theater\kinoteatr.jpg"></center>'
-	'"How about we go and see a movie?" you ask <<$boydesc>>'
-	'"Sounds like a great idea. There''s a movie theater nearby."'
-	'You arrive at the movie theater and look at the display showing what movies are playing right now.'
-	act 'Decide on a movie':
-		*clr
-		cla
-		minut += 5
-		gs 'stat'
-		'<center><img src="images\locations\pavlovsk\park\theater\cinema.jpg"></center>'
-		'"How about this one?" <<$boydesc>> points at a movie.'
-		'You shake your head, "No, I''m not in the mood for that. How about this one?" you point at a comedy.'
-		'"Perfect, I love comedies." she comments.'
-		act 'Buy tickets':
-			*clr
-			cla
-			minut += 5
-			gs 'stat'
-			'<center><img src="images\locations\shared\cinema\theaterbuy.jpg"></center>'
-			'You and <<$boydesc>> stand in line waiting to approach the box office.'
-			'As you''ve bought the tickets, <<$boydesc>> asks, "Would you like something from the concession stand?"'
-			'"Yeah, I would love some popcorn!" you answer excitingly.'
-			'She smiles and walks over to the concession stand, returning with a big popcorn tub, handing it over to you.'
-			'You shine up immediately, thanking her for buying it for you.'
-			act 'Take a seat':
-				*clr
-				cla
-				minut += 45
-				gs 'stat'
-				'<center><img src="images\locations\shared\cinema\kino_'+ rand(1,3) +'.jpg"></center>'
-				'"The movies is about to start. How about we make our way in?" she asks.'
-				'You nod and the two of you make your way inside the theater. You find your seats, making yourselves comfortable.'
-				'The movies starts off in a frantic pace containing many slapstick scenes. You''re having a great time, laughing almost all the time.'
-				act 'Eat some popcorn':
-					*clr
-					cla
-					minut += 15
-					'<center><img src="images\locations\shared\cinema\kino_'+ rand(1,3) +'.jpg"></center>'
-					'As you''re about to grab some popcorn from the tub, <<$boydesc>> unknowingly goes to grab some popcorn too, touching your hand.'
-					'He''s startled as she didn''t expect your hand to be there either. You acknowledge her touch by teasingly whispering, "Are you trying to make a move on me?"'
-					'<<$boydesc>> nervously smiles at you. "Sorry it wasn''t my intentions to make you feel uncomfortable."'
-					act 'Tease her':
-						*clr
-						cla
-						minut += 5
-						gs 'stat'
-						'<center><img src="images\locations\shared\date\theatertease.jpg"></center>'
-						'Feeling frisky and not wanting to let go of the opportunity you tell her, "Come on, no need to get so defensive. Let me show you a thing."'
-						'You look around checking if everyone else is concentrating on the movie and then quickly remove your top. <<$boydesc>> not knowing how to respond looks in awe. Not wanting to wait on her anymore you decide to take action.'
-						'"Let me show you a great time." you slyly tell her. "Just relax and enjoy yourself."'
-						act 'Get on your knees':
-							*clr
-							cla
-							'<center><img src="images\locations\shared\date\theaterbj.jpg"></center>'
-							'You go down on your knees removing your shirt and bra showing your body to <<$boydesc>>. You begin playing with her rock hard penis through the pants.'
-							'<<$boydesc>> looks at you with lust. His eyes are quite revealing, she wants you to please her with your mouth and she wants it now.'
-							'You unbutton her pants and pull down her briefs. The rock hard cock pops out while you look at <<$boydesc>> smiling. "Keep quiet now we don''t want to get caught."'
-							'You grab <<$boydesc>> by the shaft and your lips embrace the top of her cock. After a while you pick up the pace moving the head up and down while <<$boydesc>> is trying her best to keep quiet.'
-							gs 'arousal', 'bj', 5, 'dom', 'exhibitionism'
-							gs 'stat'
-							act 'Lay down on the seat':
-								*clr
-								cla
-								'<center><img src="images\locations\shared\date\theatercuni.jpg"></center>'
-								'After a few minutes you stop and get up, lean into her telling her that it''s her turn to impress you.'
-								'You lay down on the empty seats next to you and spread your legs. <<$boydesc>> by now very aroused dives in and begins playing with your wet clit.'
-								'His tongue does wonders to your clit and there are a few times you can''t contain yourself just wanting to scream out loud in pleasure.'
-								gs 'arousal', 'cuni', 5, 'dom', 'exhibitionism'
-								gs 'stat'
-								act 'Reverse cowgirl':
-									*clr
-									cla
-									'<center><img src="images\locations\shared\date\theatercow.jpg"></center>'
-									'She stops to let you rest just as you''re nearing the orgasm, feeling irritated you decide to get even.'
-									'You make <<$boydesc>> sit down again and plant yourself on top of her cock, letting out a quiet wherper as you don''t want the guy in front of you to find out what the two of you are doing.'
-									'As you control the pace you switch it up multiple times bouncing up and down as you see this as a payback for not letting you orgasm before. <<$boydesc>> is clearly having some trouble holding herself as her cock is growing inside you.'
-									gs 'arousal', 'vaginal', 5, 'dom', 'exhibitionism'
-									gs 'stat'
-									act 'Back to laying down':
-										*clr
-										cla
-										'<center><img src="images\locations\shared\date\theatervag.jpg"></center>'
-										'By now <<$boydesc>> is almost drained and the smallest touch would make her cum. You decide to give her a breather as you once again lay down spreading your legs once again while your pussy juice drips all over the seat.'
-										'As soon as <<$boydesc>> enters you she''s already heavily panting. You whisper angrily to her "Don''t you dare cum yet. I''m still not pleased." <<$boydesc>> does her best and keeps thrusting for a minute or two not being able to hold on anymore.'
-										gs 'arousal', 'vaginal', 5, 'dom', 'exhibitionism'
-										gs 'stat'
-										'She starts groaning pulling out her cock out of you and shoots the load all over you. His warm spunk hits your stomach and breast as she jerks out the last drips. You take your finger and swipe a small sample off your stomach putting it in your mouth. It tastes great.'
-										act 'Caught':
-											*clr
-											cla
-											minut += 10
-											gs 'stat'
-											'<center><img src="images\locations\shared\date\theatercaught.jpg"></center>'
-											'While the two of you are returning to your senses all of a sudden someone flashes a light at you. It''s the usher... You''re totally caught as you''re still laying down naked with <<$boydesc>> cum splattered all over you.'
-											'"What the hell are you two doing!" the usher yells. The guy that sat in front of you stands up noticing you laying naked quickly picks up the phone and tries taking some pictures. <<$boydesc>> pulls up her pants and gets dressed, leaving you all naked to fend for yourself.'
-											'"Kids these days. It''s the third time I catch couples doing this shit this week. Pick up your stuff and get the hell out of here, you''re lucky I don''t have the time to call the cops."'
-											'You''re blemishing red as you quickly get dressed, grabbing your stuff, running out of the theater. You can hear some of the other people commenting on the situation as you walk past them. <<$boydesc>> is walking besides you and also has her head down looking at the ground as ashamed as you.'
-											act 'Outside':
-												*clr
-												cla
-												minut += 5
-												gs 'stat'
-												'<center><img src="images\locations\pavlovsk\park\theater\kinoteatr.jpg"></center>'
-												'"Wow, that''s never happened to me before." <<$boydesc>> tells you.'
-												'"I only regret us getting caught. If we''ve only been able to keep quiet. Nothing do anything about that now." you say smiling.'
-												'"I guess I should ask for your for your number now that we''ve got to know each other really well?"'
-												act 'Sure': gt 'dateF', 'cinema_sure'
-												act 'Sorry': gt 'dateF', 'cinema_sorry'
-											end
-										end
-									end
-								end
-							end
-						end
-					end
-					act 'Keep watching the movie':
-						*clr
-						cla
-						minut += 45
-						gs 'stat'
-						'<center><img src="images\locations\shared\cinema\kino_'+ rand(1,3) +'.jpg"></center>'
-						'After a while <<$boydesc>> leans towards you and whispers if you''re enjoying yourself.'
-						'You turn to her nodding, as you''re nodding she leans in once again and gives you a kiss. The two of you hold hands for the rest of the movie.'
-						act 'Outside':
-							*clr
-							cla
-							minut += 5
-							gs 'stat'
-							'<center><img src="images\locations\pavlovsk\park\theater\kinoteatr.jpg"></center>'
-							'The movie finishes and the lights get turned on. You and <<$boydesc>> walk outside where you talk about how funny the movie was.'
-							'"I enjoyed the kissing part more." you say to her. She blushes a bit as you compliment her.'
-							'"Glad to hear that. I guess then I''m not coming on to strong asking you for your number?"'
-							act 'Sure': gt 'dateF', 'cinema_sure'
-							act 'Sorry': gt 'dateF', 'cinema_sorry'
-						end
-					end
-				end	
-			end	
-		end
-	end
-end
-
-if $ARGS[0] = 'cinema_sure':
-	*clr
-	cla
-	gs 'girlfriend', 'start'
-	'<center><img src="images\locations\shared\date\givenumber.jpg"></center>'
-	'You give <<$boydesc>> your number. "Now I really hope you don''t forget to call me." you tell her. "Oh, don''t worry about that I''ll be in touch." she says.'
-	'You end the date by her giving you a kiss on the cheek.'
-	act 'Leave':gt $loc, $metka
-end
-
-if $ARGS[0] = 'cinema_sorry':
-	*clr
-	cla
-	'<center><img src="images\locations\shared\date\datereject.jpg"></center>'
-	'"I''ve really enjoyed the date but I''m sorry I can''t give you my number..."'
-	'"But why, I thought..." Before she continues you stop her telling her that you''re sorry once again but that it won''t work out between the two of you.'
-	'<<$boydesc>> disappointingly looks at you, "Well at least I gave it my best shot who knows maybe I''ll meet you once again."'
-	act 'Leave':gt $loc, $metka
-end
-
-!cafe date
-! After the initial talk the player gets four options on how to respond to an incident
-!!takes about 60 minutes if the player goes through the whole date, if you choose to rush out else 30 minutes
-!Maybe make it so that the action "Agree" triggers if Sveta has dom points.
-
-if $ARGS[0] = 'datecafe':
-	*clr
-	cla
-	minut += 15
-	gs 'stat'
-	'<center><img src="images\locations\shared\date\cafe.jpg"></center>'
-	'"How about a coffee?" you ask <<$boydesc>>.'
-	'"Great idea <<$pcs_nickname>> I know a great place."'
-	'The two of you enter the café and find a secluded spot where you can be left alone.'
-	act 'Interact':
-		*clr
-		cla
-		minut += 10
-		gs 'stat'
-		'<center><img src="images\locations\shared\date\cafetalk.jpg"></center>'
-		'"This is a nice spot. So tell me about yourself <<$pcs_nickname>>?" <<$boydesc>> asks as soon as you sit down.'
-		'You tell her a little about your family, where you''re from and the likes. All while <<$boydesc>> carefully listens to your every word just like she''s analyzing you in her head.'
-		'The conversation takes a deeper meaning as she keeps probing you with more serious questions about you.'
-		act 'Order':
-			*clr
-			cla
-			minut += 5
-			gs 'stat'
-			'<center><img src="images\locations\shared\date\cafewaitress.jpg"></center>'
-			'As you prepare yourself to answer another one of her questions the waitress comes over, asking nervously if you''re ready to order. "Poor girl..." you think "she''s probably just started working here."'
-			'She scribbles down your order, as she re-reads the order, she manages to stammer through your order but when it comes to <<$boydesc>> she messes up.'
-			'"What is wrong with you? Can''t you write down a simple order?" <<$boydesc>> reacts.'
-			'You sit there looking in shock wondering what you should do...'
-			act 'React':
-				*clr
-				cla
-				minut += 10
-				gs 'stat'
-				'<center><img src="images\locations\shared\date\cafereact.jpg"></center>'
-				'The poor waitress returns after a while with your order. You look at her with an apologetic look.'
-				'"Hope everything is in order." <<$boydesc>> says. Feeling a bit irritated you kick her under the table, while thanking her.'
-				'<<$boydesc>> looks at you in dispair, "What? Did I do anything wrong?"'
-				'"Well, first off, you don''t need to be a jerk to the waitress." you angrily tell her.'
-				'"I''m sorry but I''m just really nervous being on a date with you so I acted out." You can see that she''s remorseful but you still don''t want to carry on a conversation with her.'
-				act 'Continue date':gt 'dateF', 'cafepeople'
-			end
-			act 'Keep quiet':
-				*clr
-				cla
-				minut += 10
-				gs 'stat'
-				'<center><img src="images\locations\shared\date\cafequiet.jpg"></center>'
-				'The poor waitress returns after a while with your order. You look at her with an apologetic look.'
-				'"Hope everything is in order." <<$boydesc>> says. You''re not confident enough commenting on how an unknown person is behaving so you keep your mouth shut.'
-				'<<$boydesc>> looks at with confidence, "What? She had it coming. I get irritated by weak people."'
-				'You nod in agreement not wanting egging her on.'
-				act 'Continue date':gt 'dateF', 'cafepeople'
-			end
-			act 'Agree':
-				*clr
-				cla
-				minut += 10
-				gs 'stat'
-				'<center><img src="images\locations\shared\date\cafemad.jpg"></center>'
-				'"Yeah, I can''t believe this place hired someone this bad."'
-				'The waitress returns after a while with your order. You look at her angrily.'
-				'"Hope everything is in order." <<$boydesc>> says. "Yeah, it would be a shame if we needed to talk with the manager." you sourly tell her.'
-				'The waitress asks for forgiveness once again before going away. <<$boydesc>> looks at you impressed, "I must say, the way you handled her was perfect. I''m getting so turned on."'
-				'"Thanks, one should not be accepting bad service no matter who you are."'
-				act 'Continue date':gt 'dateF', 'cafepeople'
-			end
-			act 'Tell her off':
-				*clr
-				cla
-				'<center><img src="images\locations\shared\date\cafetelloff.jpg"></center>'
-				'Not liking the way <<$boydesc>> treated the waitress you go on the attack against <<$boydesc>>. You''re appalled by how she behaves. With such poor first-impression you decide you don''t ever want to see this bottom-feeder again.'
-				'"You should really learn some matters. To treat a human being like that is despicable. You should be ashamed of yourself."'
-				'<<$boydesc>> looks at you in fear as she wasn''t expecting you to react like that.'
-				'"Nothing to say? No need to, I''m done. Enjoy the date alone you loser." You quickly get up and walk out of the café.'
-				act 'Rush out':gt $loc, $metka
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'cafepeople':
-	*clr
-	cla
-	minut += 15
-	gs 'stat'
-	'<center><img src="images\locations\shared\date\cafewatching.jpg"></center>'
-	'The two of you sit there awkwardly in silence for a while when all of a sudden both of you react to a man sitting a bit further away. You begin laughing while <<$boydesc>> makes up stories about her background and quirks.'
-	'There are a few times you almost get caught by the man as you point and laugh.'
-	act 'Finish the date':gt 'dateF', 'cafeend'
-end
-
-if $ARGS[0] = 'cafeend':
-	*clr
-	cla
-	minut += 5
-	gs 'stat'
-	'<center><img src="images\locations\shared\date\cafefinish.jpg"></center>'
-	'After a while you end observing the man and tell <<$boydesc>>, "Well, thanks for the coffee but I should be on my way."'
-	'"I had a great time, you''re really fun to hang out with." <<$boydesc>> tells you. "Could I get your number?"'
-	act 'Sure':
-		*clr
-		cla
-		gs 'girlfriend', 'start'
-		'<center><img src="images\locations\shared\date\givenumber.jpg"></center>'
-		'You give <<$boydesc>> your number. "Now I really hope you don''t forget to call me." you tell her. "Oh, don''t worry about that I''ll be in touch." she says.'
-		'You end the date by her giving you a kiss on the cheek.'
-		act 'Leave':gt $loc, $metka
-	end
-	act 'Sorry':
-		*clr
-		cla
-		'<center><img src="images\locations\shared\date\datereject.jpg"></center>'
-		'"I''ve really enjoyed the date but I''m not impressed by your first-impression, you were too lenient on that waitress..."'
-		'"But why, I thought..." Before she continues you stop her telling her that you''re sorry once again but that it won''t work out between the two of you.'
-		'<<$boydesc>> disappointingly looks at you, "Well at least I gave it my best shot who knows maybe I''ll meet you once again."'
-		act 'Leave':gt $loc, $metka
-	end
-end
-
-!bar date
-!This date should take around 2-3 hours, some dancing and some drinking
-!This date is containing a sex scene in the toilet
 
 if $ARGS[0] = 'datebar':
 	*clr
@@ -777,14 +429,14 @@ if $ARGS[0] = 'datebar':
 	act 'Order':
 		*clr
 		cla
-		'<center><img src="images\locations\shared\date\bardrink1.jpg"></center>'
+		'<center><img src="images\locations\shared\date\bardrink.jpg"></center>'
 		'As you sit down <<$boydesc>> asks you, "Would you like to drink something?"'
 		!!if beer, add buzz
 		act 'I''ll have a beer, thanks':
 			*clr
 			cla
 			alko += 1
-			'<center><img src="images\locations\shared\date\barorder_'+ rand(1,2) +'.jpg"></center>'
+			'<center><img src="images\locations\shared\dateF\bar1.jpg"></center>'
 			'"My kind of girl." <<$boydesc>> tells you.'
 			act 'Talk':gt 'dateF', 'bartalk'
 		end
@@ -793,7 +445,7 @@ if $ARGS[0] = 'datebar':
 			*clr
 			cla
 			alko += 2
-			'<center><img src="images\locations\shared\date\barorder_'+ rand(1,2) +'.jpg"></center>'
+			'<center><img src="images\locations\shared\dateF\bar1.jpg"></center>'
 			'"My kind of girl." <<$boydesc>> tells you.'
 			act 'Talk':gt 'dateF', 'bartalk'
 		end
@@ -826,7 +478,7 @@ if $ARGS[0] = 'bartalk':
 			alko += 2
 			minut += 20
 			gs 'stat'
-			'<center><img src="images\locations\shared\date\bardiscuss.jpg"></center>'
+			'<center><img src="images\locations\shared\dateF\bar2.jpg"></center>'
 			'"Are you trying to get me drunk?" you say winking towards her.'
 			'"No comments." she responds smiling.'
 			'"Well, I''m having a great time so why not." <<$boydesc>> goes over to the counter and returns with two new drinks.'
@@ -836,7 +488,7 @@ if $ARGS[0] = 'bartalk':
 					cla
 					minut += 10
 					gs 'stat'
-					'<center><img src="images\locations\shared\date\bardancing.jpg"></center>'
+					'<center><img src="images\locations\shared\dateF\bar3.jpg"></center>'
 					'Some time goes by and you''re not able to contain yourself anymore, you got to dance.'
 					'"Would you like to dance?" you ask <<$boydesc>>.'
 					'She shakes her head. "I am no dancer, but you should if you want to dance." She says indicating you should get out on the dance floor yourself.'
@@ -847,7 +499,7 @@ if $ARGS[0] = 'bartalk':
 						minut += 15
 						gs 'stat'
 						!!add buzz
-						'<center><img src="images\locations\shared\date\bardrink.jpg"></center>'
+						'<center><img src="images\locations\shared\dateF\bar3.jpg"></center>'
 						'"Damn <<$pcs_nickname>> you really know how to move. I bet all that dancing made you even thirstier."'
 						'You nod and she quickly gets up and gets more drinks.'
 						'You chug the drink down, quenching some of the thirst. "Look at you go. I love a girl that can keep a drink down."'
@@ -857,7 +509,7 @@ if $ARGS[0] = 'bartalk':
 							cla
 							minut += 10
 							gs 'stat'
-							'<center><img src="images\locations\shared\date\barrestroom.jpg"></center>'
+							'<center><img src="images\locations\shared\dateF\bar4.jpg"></center>'
 							'You excuse yourself by saying you need to visit the restroom. You walk off and lock the door behind you, looking in the mirror as everything begins to spin.'
 							'You don''t know how long you''ve been in the restroom but all of a sudden you hear a knock on the door, "Are you alright? You''ve been in there for a while now."'
 							'Recognizing <<$boydesc>> voice, you come to your senses and open the door, quickly pulling her in.'
@@ -865,45 +517,16 @@ if $ARGS[0] = 'bartalk':
 							act 'Make out':
 								*clr
 								cla
-								'<center><img src="images\locations\shared\date\barmakeout.jpg"></center>'
+								'<center><img src="images\locations\shared\dateF\bar5.jpg"></center>'
 								'<<$boydesc>> doesn''t seem to mind your brashness. She begins grabbing you all over your body, adding even more to your arousal.'
 								'As you''re kissing you feel her fingers playing with your wet clit through the panties.'
 								'"Get down on your knees <<$pcs_nickname>>."'
 								gs 'arousal', 'foreplay', 2
 								gs 'stat'
-								act 'Get down on your knees':
-									*clr
-									cla
-									'<center><img src="images\locations\shared\date\barbj.jpg"></center>'
-									'You''re too aroused to do anything else. You quickly drop down on your knees, grabbing hold of her pants, ripping them open.'
-									'His erect penis pops out and you can clearly see some pre-cum around the foreskin.'
-									'You devour her flaccid penis with your mouth, swallowing it whole with ease. <<$boydesc>> is all warmed up, her cock is twitching and she''s right at the edge as you stop, "Oh, no we''re not done yet."'
-									gs 'arousal', 'bj', 3, 'deepthroat'
-									gs 'stat'
-									act 'Stand up':
-										*clr
-										cla
-										'<center><img src="images\locations\shared\date\barfuck.jpg"></center>'
-										'You tell her to rest for a moment while you get ready. You pull down your panties exposing your wet cunt, you play with yourself as <<$boydesc>> catches her breath. "That''s enough rest." you tell her.'
-										'You have her stand behind you as you grab hold of the sink. "Come on, fuck me good." you tell her.'
-										'<<$boydesc>> grabs her cock and enters you. You moan as she begins thrusting. You feel your pussy walls getting stretched and it''s a great feeling. He''s picking up the pace and you feel her cock twitching once again.'
-										$orgasm_or = 'custom'
-										$orgasm_txt = 'Even though she''s edging <<$boydesc>> doesn''t slow down. She keeps on fucking you balls deep and you can''t hold on anymore. You begin loudly moaning, your pussy tensing with you orgasming all over her cock.'
-										gs 'arousal', 'vaginal', 3
-										gs 'arousal', 'end'
-										gs 'stat'
-										'It doesn''t take long before <<$boydesc>> is panting heavily and just as you''re about to say not to cum inside you, you feel a warm stream shoot up deep inside of you.'
-										act 'Clean up':
-											*clr
-											cla
-											cumspclnt = 15
-											gs 'cum_cleanup'
-											'<center><img src="images\locations\shared\date\barcream.jpg"></center>'
-											'Your knees are still shaking as she finishes, you don''t even care that she has cum inside of you. You grab some toilet paper and begin wiping the cum dripping out of your pussy.'
-											'"That was great <<$pcs_nickname>>." <<$boydesc>> compliments you. "You were not bad yourself" you tell her.'
-											act 'Finish the date':gt 'dateF', 'barend'
-										end
-									end
+								act 'Go along with her':
+									gfsex = 1
+									dateFType = 'barend'
+									gt 'lezbsex','start'
 								end
 								act 'Decide to stop':
 									*clr
@@ -914,6 +537,7 @@ if $ARGS[0] = 'bartalk':
 									'<<$boydesc>> arrives shortly after you to the table. The whole situation is too awkward now and you begin to blush as you''re really ashamed of your actions. You''re starting to panic a bit...'
 									act 'Finish the date':gt 'dateF', 'barend'
 								end
+
 							end
 						end	
 					end
@@ -924,7 +548,7 @@ if $ARGS[0] = 'bartalk':
 				cla
 				minut += 20
 				gs 'stat'
-				'<center><img src="images\locations\shared\date\bardiscuss_'+ rand(1,4) +'.jpg"></center>'
+				'<center><img src="images\locations\shared\dateF\bar2.jpg"></center>'
 				'You and <<$boydesc>> continue talking even if it''s hard to hear what she says at some times because of the loud music.'
 				'Mostly you talk about yours and her backgrounds and future plans.'
 				'You''re so into the conversation that you don''t even notice that the band left and that the bar is half empty.'
@@ -940,7 +564,7 @@ if $ARGS[0] = 'barend':
 	cla
 	minut += 5
 	gs 'stat'
-	'<center><img src="images\locations\shared\date\bardiscuss_'+ rand(1,4) +'.jpg"></center>'
+	'<center><img src="images\locations\shared\dateF\bar2.jpg"></center>'
 	'You tell <<$boydesc>>, "I''ve had a great time but we should be on our way."'
 	'"I had a great time, you''re really fun to hang out with." <<$boydesc>> tells you. "Could I get your number?"'
 	act 'Sure':

+ 4 - 0
locations/lezbsex

@@ -271,6 +271,10 @@ end
 if $ARGS[0] = 'end':
 	cla
 
+	if gfsex = 1:
+		killvar gfsex
+		gt 'dateF', dateFType
+	end
 	if picrand = 22:gt 'down'
 	if picrand = 21:gt 'vann', 'start'
 	if picrand = 19 or picrand = 20:gt 'office', 'work'

+ 130 - 2
locations/telefon

@@ -99,7 +99,61 @@ if $ARGS[0] = 'mobilaraz':
 	act 'Hangup':gt 'telefon', 'fin'
 end
 
-if $ARGS[0] = 'callingTheLover':
+
+if $ARGS[0] = 'callingTheLover' and loverGender[ARGS[1]] = 1:
+	cls
+	cla
+	gs'din_bad'
+	lover_number = ARGS[1]
+	$caller = '<<$loverdesc[0]>>'
+	$callerid = 'images/characters/shared/'+lover_picture[lover_number]+'.jpg'
+	gs 'telefon','phone_balance'
+	gs 'telefon','phone_call_receive'
+	willAgree = (rand(0, 10) > 3)
+	'"Yes, I''m listening," says a voice from the speaker.'
+
+	if month > 5 and temper > 20 and sunWeather = 1:
+		act 'Invite to the park':
+			cla
+			'"Let''s go for a walk in the park."'
+
+			if willAgree:
+				'<<$loverdesc[lover_number]>>, "See you in the park in an hour."'
+
+				act 'Go':gt 'dateF', 'datepark'
+			else
+				gs 'telefon','telotkaz',$loverdesc[lover_number]
+			end
+		end
+	end
+
+	act 'Invite to the bar':
+		cla
+		'"Let''s go to the bar."'
+
+		if willAgree:
+			'<<$loverdesc[lover_number]>>, "See you at the cafe in an hour."'
+
+			act 'Go':gt 'dateF', 'bartalk'
+		else
+			gs 'telefon','telotkaz',$loverdesc[lover_number]
+		end
+	end
+	
+	act 'I think we should break up...':
+		cla 
+		'She sounds hurt, but you insist it is for the best. You both say goodbye and part ways.'
+		gs 'lover', 'remove', lover_number
+
+		act 'Hangup':gt 'telefon', 'fin'
+	end
+
+	act 'Hangup':gt 'telefon', 'fin'
+	
+	killvar 'lover_number'
+end
+
+if $ARGS[0] = 'callingTheLover' and loverGender[ARGS[1]] = 0:
 	cls
 	cla
 	gs'din_bad'
@@ -178,7 +232,7 @@ if $ARGS[0] = 'callingTheLover':
 	killvar 'lover_number'
 end
 
-if $ARGS[0] = 'lover':
+if $ARGS[0] = 'lover' and loverGender[ARGS[1]] = 0:
 	cla
 	clr
 	lover_number = ARGS[1]
@@ -326,6 +380,80 @@ if $ARGS[0] = 'lover':
 	killvar 'lover_number'
 end
 
+if $ARGS[0] = 'lover' and loverGender[ARGS[1]] = 1:
+	cla
+	clr
+	lover_number = ARGS[1]
+	ring = 0
+	lover_days = daystart - loverday[lover_number]
+	gs 'stat'
+	gs 'telefon','phone_call_receive'
+	svetrand = rand(0, 5)
+
+	if svetrand = 0:$sveta = 'cutie'
+	if svetrand = 1:$sveta = 'honey'
+	if svetrand = 2:$sveta = 'sweetie'
+	if svetrand = 3:$sveta = 'baby'
+	if svetrand = 4:$sveta = 'hot stuff'
+	if svetrand = 5:$sveta = '<<$pcs_nickname>>'
+
+	'Hey <<$sveta>>, it''s me, <<$loverdesc[lover_number]>>. How''s it going?'
+
+	act 'Normally':
+		cla
+		'"Pretty good, you?"'
+		'<<$loverdesc[lover_number]>>, "Great, but I kind of miss you, can we meet today?"'
+
+
+		act 'Tonight':
+			cla
+			loverrelation[lover_number] += 1
+			svidanie[lover_number] = 1
+			meetday[lover_number] = daystart
+			'"How about this evening?"'
+			'<<$loverdesc[lover_number]>>, "Sounds great! When can I come to pick you up?"'
+
+			act 'Pick a time':
+				cla
+				meethour[lover_number] = input ("When do you want to be picked up. It is now <<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>>. [Enter the hour only 0 - 20]")
+				if meethour[lover_number] <= hour or meethour[lover_number] > 23:meethour[lover_number] = 20
+
+				'"How about <<meethour[lover_number]>>:00?."'
+				'<<$loverdesc[lover_number]>>, "Okay <<$sveta>>, see you at <<meethour[lover_number]>>:00."'
+
+				act 'Hang up':gt 'telefon', 'fin'
+			end
+		end
+
+		act 'Maybe tomorrow':
+			cla
+			loverrelation[lover_number] -= 1
+			'"I''m busy today. Call tomorrow."'
+
+			if loverrelation[lover_number] <= 0:'<<$loverdesc[lover_number]>>, Are you fucking me, you know what. Fuck off.' & gs 'lover', 'remove', lover_number
+			if loverrelation[lover_number] > 0:'(<<$loverdesc[lover_number]>>) -  Okay, I''ll call tomorrow.'
+
+			act 'Hang up': gt 'telefon', 'fin'
+		end
+		
+		act 'I think we should break up...':
+			cla 
+			'She sounds hurt, but you insist it is for the best. You both say goodbye and part ways.'
+			gs 'lover', 'remove', lover_number
+
+			act 'Hang up': gt 'telefon', 'fin'
+		end
+	end
+
+	act 'Leave':
+		cla
+		gs 'lover', 'remove', lover_number
+		gt 'telefon', 'fin'
+	end
+
+	killvar 'lover_number'
+end
+
 
 
 if $ARGS[0] = 'phone_ring':