Browse Source

[fixed] street prostitution soft-block for virgins & more accurate description for the anal scene also involving vaginal sex

Sicaa 4 years ago
parent
commit
c490e721dc
3 changed files with 29 additions and 29 deletions
  1. 2 2
      locations/down.qsrc
  2. 2 2
      locations/street.qsrc
  3. 25 25
      locations/street_walker.qsrc

+ 2 - 2
locations/down.qsrc

@@ -241,9 +241,9 @@ end
 if hour >= 20 or hour <= 4:
 	*nl
 	'There are prostitutes working in places near here.'
-	if pcs_makeup > 2 and PCloStyle = 4 and pcs_inhib >= 40:
+	if pcs_makeup > 2 and PCloStyle = 4 and pcs_inhib >= 40 and (stat['vaginal'] >  0 or pav_slut >= 50):
 		act 'Prostitute yourself': gt 'street_walker', 'work'
-	elseif pcs_inhib >= 40:  
+	elseif pcs_inhib >= 40 and (stat['vaginal'] >  0 or pav_slut >= 50):  
 		*nl
 		'You could work as a prostitute, but you need to wear appropriate clothes and more than a little bit of makeup.'
 	else

+ 2 - 2
locations/street.qsrc

@@ -152,9 +152,9 @@ if hour >= 8 and hour <= 23 or saunaWorkWhore > 0 or workDisk = 2:'<a href="exec
 if hour >= 20 or hour <= 4:
 	*nl
 	'There are prostitutes working in places near here.'
-	if pcs_makeup > 2 and PCloStyle = 4 and pcs_inhib >= 40:
+	if pcs_makeup > 2 and PCloStyle = 4 and pcs_inhib >= 40 and (stat['vaginal'] >  0 or pav_slut >= 50):
 		act 'Prostitute yourself': gt 'street_walker', 'work'
-	elseif pcs_inhib >= 40:  
+	elseif pcs_inhib >= 40 and (stat['vaginal'] >  0 or pav_slut >= 50):  
 		*nl
 		'You could work as a prostitute, but you need to wear appropriate clothes and more than a little bit of makeup.'
 	else

+ 25 - 25
locations/street_walker.qsrc

@@ -103,10 +103,10 @@ if $ARGS[0] = 'event1':
 		act 'Leave': gt 'street_walker', 'end'
 	else
 		inhib_exp += rand(3,6)
-		if (prst_loc = 0 and RAND(1,3) > 1) or (prst_loc = 1 and RAND(1,5) > 1) or (prst_loc = 2 and RAND(1,8) > 1):
+		if (prst_loc = 0 and rand(1,3) > 1) or (prst_loc = 1 and rand(1,5) > 1) or (prst_loc = 2 and rand(1,8) > 1):
 			*clr & cla
 			street_work = 1
-			streetworkevent = RAND(1,8)
+			streetworkevent = rand(1,8)
 			if streetworkevent = 3:
 				if prst_loc ! 1: streetworkevent = 5
 				if ruslan_day = daystart: streetworkevent = 5
@@ -150,7 +150,7 @@ if $ARGS[0] = 'event2':
 	act 'Stop working for the night': gt 'street_walker', 'end'
 	act 'Keep working the street': gt 'street_walker', 'event1'
 	act 'Walk over and talk to them':
-		if RAND(0,1) = 0 and ruslan_pimp = 0:
+		if rand(0,1) = 0 and ruslan_pimp = 0:
 			*clr & cla
 			minut += 15
 			if month >= 11 or month <= 3:
@@ -299,7 +299,7 @@ if $ARGS[0] = 'event5':
 	'A car slows down and pulls up the curb where you are walking, he is obviously look at you. So you walk over to him, as you do he rolls down his window. You bend over and practically lean into his window. "You looking to party handsome?"'
 	'He looks you over as best he can and licks his lips. "How much?"'
 	'You smile to him. "That depends on what you want to do." You take a little time listening to his wants and telling him the price before he decides.'
-	if RAND(0,1) = 0:
+	if rand(0,1) = 0:
 		'He decides he wants a blowjob.'
 		act 'Accept':
 			cla
@@ -308,7 +308,7 @@ if $ARGS[0] = 'event5':
 			act 'Continue': gt 'street_walker', 'blowjob'
 		end
 		act 'Decline': gt 'street_walker', 'work'
-	elseif RAND(0,1) = 0:
+	elseif rand(0,1) = 0:
 		'He decides he wants a fuck.'
 		act 'Accept':
 			cla
@@ -318,7 +318,7 @@ if $ARGS[0] = 'event5':
 		end
 		act 'Decline': gt 'street_walker', 'work'
 	else
-		'He decides he wants an anal.'
+		'He decides he wants to fuck you first and finish with anal.'
 		act 'Accept':
 			cla
 			*nl
@@ -357,11 +357,11 @@ if $ARGS[0] = 'blowjob':
 				act 'Finish him':
 					*clr & cla
 					money += 500
-					gs 'cum_call', 'mouth', 'prostitute customer'
+					gs 'cum_call', 'mouth', 'a prostitution client', 1
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/bj4.jpg"></center>'
 					'As you suck him, you feel the hot splash of cum hit your tongue, as spurt after spurt of it fills your mouth. He moans loudly as he sperm fills your mouth, you keep sucking until there is no more hot spurts. You raise up showing him his own cum and then swallow it. He gives you a brief smile, then quickly slips his dick away and rebuttons his pants. Sliding the seat back forward he pulls out a wad of cash and hands it to you.'
 					'You spend a few moments straighten up your clothes and checking your makeup as he drives you back to the street corner he picked you up on, he pulled up to the curb and stops. Now he seems impatient for you to get out, as he looks around to see if anyone is watching. You sigh and get out of the car, closing the door. With that he quickly pulls away.'
-					gs 'arousal', 'cummoisseur', 5, 'prostitution'
+					gs 'arousal', 'bj', 5, 'prostitution'
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Get dropped off': gt 'street_walker', 'work'
@@ -397,11 +397,11 @@ if $ARGS[0] = 'vaginal':
 				act 'Finish him':
 					*clr & cla
 					money += 1200
-					gs 'cum_call', 'breasts', 'prostitute customer'
+					gs 'cum_call', 'breasts', 'a prostitution client', 1
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/fuck4.jpg"></center>'
 					'He suddenly pulls out of you and tears the condom off. Followed him by him climbing further on you, as he starts jerking off. With in seconds his hot cum starts flying landing all over your breasts, as he moans loudly. Once finally finished he climbs off you and starts to get dressed, stopping briefly to hand you a wad of cash.'
 					'You spend a few moments getting cleaned up and dressed, as you do he gets out and gets back into the drivers seat and drives you back to the street corner he picked you up on, he pulled up to the curb and stops. Now he seems impatient for you to get out, as he looks around to see if anyone is watching. You sigh and get out of the car, closing the door. With that he quickly pulls away.'
-					gs 'arousal', 'cummoisseur', 5, 'prostitution'
+					gs 'arousal', 'foreplay', 5, 'prostitution'
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Get dropped off': gt 'street_walker', 'work'
@@ -413,7 +413,7 @@ end
 
 if $ARGS[0] = 'anal':
 	*clr & cla
-	streetworkanal = RAND(1,2)
+	streetworkanal = rand(1,2)
 	if streetworkanal = 1:
 		*clr & cla
 		minut += 1
@@ -429,7 +429,7 @@ if $ARGS[0] = 'anal':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/analo2.jpg"></center>'
 				'He looks you over a moment. "Can you undress" When you start to he quickly adds. "Slowly" You smile to him and make a show of slowly getting naked for him, you can see him already licking his lips. Once you are fully naked you slowly unbutton his pants, pulling them and his underwear down.'
-				gs 'arousal', 'flash', 2, 'prostitution', 'exhibitionism'
+				gs 'arousal', 'flash', 2, 'prostitution'
 				gs 'stat'
 				act 'Suck his dick':
 					*clr & cla
@@ -453,11 +453,11 @@ if $ARGS[0] = 'anal':
 							act 'Finish him':
 								*clr & cla
 								money += 1500
-								gs 'cum_call','face', 'prostitute customer'
+								gs 'cum_call','face', 'a prostitution client', 1
 								'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/analo6.jpg"></center>'
 								'He grunts out, "I''m about to cum" As he pulls out of your ass, you turn around and start jerking him off with your hand, aiming his cock right at your face. Within moment hot sprays of cum start splattering against your face, you keep jerking him until you have milked him of every last drop.'
 								'You spend a few moments getting cleaned up and dressed, as you do he gets out of the back and gets back into the drivers seat. He waits for you to finish getting dressed, cleaned up and put your seat belt back on before he drives you back to the street corner he picked you up on, he pulled up to the curb and stops. Once stopped he passes you back a wad of cash, as you get out of the car he opens his window and says. "I had a great time, maybe I will see you again." With that he rolls up his window and drives off.'
-								gs 'arousal', 'cummoisseur', 5, 'prostitution'
+								gs 'arousal', 'hj', 5, 'prostitution'
 								gs 'arousal', 'end'
 								gs 'stat'
 								act 'Get dropped off': gt 'street_walker', 'work'
@@ -484,7 +484,7 @@ if $ARGS[0] = 'anal':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/analy2.jpg"></center>'
 				'He looks you over a moment. "Get undressed I want to see what I am paying for." You smile to him and make a show of slowly getting naked for him, you can see him already licking his lips. Once you are fully naked you slowly unbutton his pants, pulling them and his underwear down.'
-				gs 'arousal', 'flash', 2, 'prostitution', 'exhibitionism'
+				gs 'arousal', 'flash', 2, 'prostitution'
 				gs 'stat'
 				act 'Suck his dick':
 					*clr & cla
@@ -508,11 +508,11 @@ if $ARGS[0] = 'anal':
 							act 'Finish him':
 								*clr & cla
 								money += 1500
-								gs 'cum_call','breasts', 'prostitute customer'
+								gs 'cum_call','breasts', 'a prostitution client', 1
 								'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/analy6.jpg"></center>'
 								'He grunts out, "I''m about to cum" As he pulls out of your ass, he roughly flips you over and straddles you, as he starts jerking off. Soon his cum is flying landing all over you breasts.'
 								'You spend a few moments getting cleaned up and dressed, as you do he gets out of the back and gets back into the drivers seat. He doesn''t even wait for you to finish getting cleaned up and dressed. During the drive back he tosses a wad of cash back, most of it ending up on the floor. You quickly gather it all up as he stops at the same curb he picked you up from. You barely even close the door after you get out before he pulls away.'
-								gs 'arousal', 'cummoisseur', 5, 'prostitution'
+								gs 'arousal', 'foreplay', 5, 'prostitution'
 								gs 'arousal', 'end'
 								gs 'stat'
 								act 'Get dropped off': gt 'street_walker', 'work'
@@ -557,19 +557,19 @@ if $ARGS[0] = 'policeblowjob':
 					if rand(1,10) > 2:
 						act 'Finish him':
 							*clr & cla
-							gs 'cum_call', 'mouth', 'police officer'
+							gs 'cum_call', 'mouth', 'a police officer', 1
 							'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/bj4.jpg"></center>'
 							'As you suck him, you feel the hot splash of cum hit your tongue, as spurt after spurt of it fills your mouth. He moans loudly as he sperm fills your mouth, you keep sucking until there is no more hot spurts. You raise up showing him his own cum and then swallow it. He gives you a brief smile, then quickly slips his dick away and rebuttons his pants.'
 							'You spend a few moments straighten up your clothes and checking your makeup as he drives you back to the street corner he picked you up on, he pulled up to the curb and stops. Now he seems impatient for you to get out, as he looks around to see if anyone is watching. You sigh and get out of the car, closing the door. With that he quickly pulls away.'
 							gs 'arousal', 'end'
 							gs 'stat'
-							act 'Get dropped off':gt 'street_walker', 'work'
+							act 'Get dropped off': gt 'street_walker', 'work'
 						end
 					else
 						act 'Finish him':
 							*clr & cla
 							prst_bribe = 2
-							gs 'cum_call', 'mouth', 'police officer'
+							gs 'cum_call', 'mouth', 'a police officer', 1
 							'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/sex/bj4.jpg"></center>'
 							'As you suck him, you feel the hot splash of cum hit your tongue, as spurt after spurt of it fills your mouth. He moans loudly as he sperm fills your mouth, you keep sucking until there is no more hot spurts. You raise up showing him his own cum and then swallow it. He gives you a brief smile, then quickly slips his dick away and rebuttons his pants.'
 							'You spend a few moments straighten up your clothes and checking your makeup as he continues driving on, "Where are you taking me?" you ask.'
@@ -616,7 +616,7 @@ if $ARGS[0] = 'policelie':
 			'You keep your gaze glued to the ground until you hear him sigh heavily. "Get out of here. If I see you again, I''m taking you in, understand?"'
 			'You look up in disbelief, unable to figure out what to say for a moment. "O-oh, of course! You won''t see me again, I promise!" Not wanting to miss your chance, you get the hell out of there.'
 
-			act 'Walk away':gt 'street_walker', 'work'
+			act 'Walk away': gt 'street_walker', 'work'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/shared/police/arrested.jpg"></center>'
 			*nl
@@ -649,7 +649,7 @@ if $ARGS[0] = 'policeexp':
 			'He clears his throat awkwardly. "Yeah, I am...but you better head straight home. I don''t want to see you out here again, understand?"'
 			'You quickly nod, wiping away the tears as you compose yourself. "Thank you!" You say, but he just responds with a grunt before waving you away.'
 
-			act 'Walk away':gt 'street_walker', 'work'
+			act 'Walk away': gt 'street_walker', 'work'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/shared/police/arrested.jpg"></center>'
 			*nl
@@ -686,7 +686,7 @@ if $ARGS[0] = 'briberyreaction':
 		*nl
 		'You swallow hard, his words sending a shiver down your spine. "Now get out of here before I change my mind," he orders roughly. You don''t even bother responding as you quickly shuffle down the street until the cop is out of sight.'
 
-		act 'Walk away':gt 'street_walker', 'work'
+		act 'Walk away': gt 'street_walker', 'work'
 	elseif temp_rand <= 7:
 		prst_bribe = 1
 		gs 'pain', 6, 'armL', 'break'
@@ -768,7 +768,7 @@ if $ARGS[0] = 'policesub1':
 		gs 'arousal', 'end'
 		gs 'stat'
 
-		act 'Run away':gt 'street_walker', 'work'
+		act 'Run away': gt 'street_walker', 'work'
 	end
 end
 
@@ -790,7 +790,7 @@ if $ARGS[0] = 'policesub2':
 	gs 'arousal', 'end'
 	gs 'stat'
 
-	act 'Walk away':gt 'street_walker', 'work'
+	act 'Walk away': gt 'street_walker', 'work'
 end
 
 if $ARGS[0] = 'end':