Text edit from krh

locations/kafeM

@@ -32,7 +32,7 @@ end
 if $ARGS[0] = 'a':
 	minut += 30
 	fat += 1
-	'Finally your brought the food. <<$loverdesc[lover_number]>> pours you wine and proposes a toast to you.'
+	'Finally the food is served. <<$loverdesc[lover_number]>> pours you wine and proposes a toast to you.'
 
 	act 'Eat':
 		cla
@@ -43,7 +43,7 @@ end
 if $ARGS[0] = 'b':
 	gs 'food', 'm_meal'
 	gs 'stat'
-	'The cafe music starts and <<$loverdesc[lover_number]>> asks to dance.'
+	'Music begins to play in the cafe and <<$loverdesc[lover_number]>> asks if you would like to dance.'
 
 	act 'Dance':
 		cla
@@ -61,10 +61,10 @@ end
 if $ARGS[0] = 'dance':
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/pc/activities/dance.jpg"></center>'
-	'You go out with <<$loverdesc[lover_number]>> to the dance floor. he gives you a hug and you start to dance.'
+	'You go with <<$loverdesc[lover_number]>> to the dance floor. He puts his arms around you and you start to dance.'
 
 	if haraklover[lover_number] = 0:
-		'<<$loverdesc[lover_number]>> is very formal in his dance, he hugs you and apologises.'
+		'<<$loverdesc[lover_number]>> is very reserved in his dance. He holds you a bit awkwardly and apologises.'
 
 		act 'Finish the dance':
 			cla
@@ -72,7 +72,7 @@ if $ARGS[0] = 'dance':
 			xgt 'kafeM', 'end'
 		end
 	elseif haraklover[lover_number] = 1:
-		'<<$loverdesc[lover_number]>> very confidently leads you in the dance.'
+		'<<$loverdesc[lover_number]>> leads you confidently in the dance.'
 
 		act 'Finish the dance':
 			cla
@@ -80,7 +80,7 @@ if $ARGS[0] = 'dance':
 			xgt 'kafeM', 'end'
 		end
 	elseif haraklover[lover_number] = 2:
-		'<<$loverdesc[lover_number]>> grabs your ass while dancing and presses up against you, through the fabric you can feel his hard cock against your stomach.'
+		'<<$loverdesc[lover_number]>> grabs your ass while dancing and presses against you. You can feel his hard cock against your stomach through the clothes.'
 		'He whispers to you, Let''s go to the toilet.'
 
 		act 'Finish the dance':
@@ -94,9 +94,9 @@ if $ARGS[0] = 'dance':
 end
 
 if $ARGS[0] = 'tualet':
-	minut += 30
-	pcs_horny += 10
-	'<<$loverdesc[lover_number]>> pulls you into the toilet and began to knead your chest and you climb between his legs.'
+	'<<$loverdesc[lover_number]>> pulls you inside the toilet and begins to knead your chest as you get ready for the act.'
+	gs 'arousal', 'foreplay', 5
+	gs 'stat'
 
 	act 'Give blowjob':gt 'kafeM', 'bj'
 	act 'Bend over the toilet':gt 'kafeM', 'sex'
@@ -104,49 +104,41 @@ end
 
 if $ARGS[0] = 'sex':
 	*clr
-	stat['vaginal'] += 1
 	sexa += 1
-	pcs_vag += 1
-	pcs_horny += SUB
 	loverrelation[lover_number] += 2
 	gs 'brosok'
 	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cafe/kafe.jpg"></center>'
-	'You pull his dick out of his pants and start masturbating him, <<$loverdesc[lover_number]>> pulls out a condom and put on the penis, then he made you stand over the toilet and stabs his <<dick>> centimeter member into your quivering pussy.'
-
-	if pcs_horny >= 90:
-		pcs_horny = 0
-		pcs_mood += 15
-		pcs_willpwr += 15
-		orgasm += 1
-		'You feel a warming sensation growing in your loins which quickly grows as his member pounds into you.  You bite your lip and hastily clamp your hand over your mouth to keep from screaming in ecstasy.'
-	end
+	'You pull his dick out of his pants and start masturbating him. <<$loverdesc[lover_number]>> puts on a condom, then makes you stand over the toilet and pushes his <<dick>> centimeter member in your quivering pussy.'
+	gs 'arousal', 'vaginal', 15, 'sub'
+	gs 'arousal', 'end'
+	gs 'stat'
 
-	'Soon <<$loverdesc[lover_number]>> could not resist and finished in a condom.'
+	'Soon <<$loverdesc[lover_number]>> can no longer hold back and finishes in a condom.'
 
 	act 'Next':gt 'kafeM', 'end'
 end
 
 if $ARGS[0] = 'bj':
 	*clr
-	stat['bj'] += 1
 	bja += 1
 	swallow += 1
 	spafinloc = 12
 	gs 'cum_manage'
-	pcs_horny += SUB
 	loverrelation[lover_number] += 2
 	gs 'brosok'
 	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cafe/kafe1.jpg"></center>'
-	'You pull his dick out of his pants and start masturbating him, then squat in front of him and take him in your mouth slowly sucking his <<dick>> centimeter member.'
-	'Soon <<$loverdesc[lover_number]>> can not resist and finishs in your mouth, filling it with his tart semen.  You attempt to swallow it all, but cum still pours out of your mouth and ran down your lips and chin.'
-	'You faithfully look into <<$loverdesc[lover_number]>>''s eyes with your semen smeared face.'
+	'You pull his dick out of his pants and start masturbating him, then squat in front of him and take him in your mouth, slowly sucking his <<dick>> centimeter member.'
+	'Soon <<$loverdesc[lover_number]>> can not resist any longer and finishes in your mouth, filling it with his tart semen. You try to swallow it all, but cum still pours out of your mouth, running down your lips and chin.'
+	'You faithfully look <<$loverdesc[lover_number]>> in the eyes with your semen smeared face.'
+	gs 'arousal', 'bj', 15, 'sub'
+	gs 'arousal', 'end'
+	gs 'stat'
 
 	act 'Next':gt 'kafeM', 'end'
 end
 
 if $ARGS[0] = 'end':
-	minut += 30
-	'<<$loverdesc[lover_number]>> offered to hold you.'
+	'<<$loverdesc[lover_number]>> offers to hold you.'
 
 	act 'Home':gt 'sexm', 'start'
 end