Sfoglia il codice sorgente

[fixes] Added a stop chunk so you couldn't keep prostituting all night and restructured the code to make it easier to follow and bug hunt

KevinSmarts 5 anni fa
parent
commit
4aee204437
1 ha cambiato i file con 200 aggiunte e 178 eliminazioni
  1. 200 178
      locations/street_walker.qsrc

+ 200 - 178
locations/street_walker.qsrc

@@ -97,211 +97,233 @@ end
 
 if $ARGS[0] = 'event1':
 	menu_off = 1
-	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):
-		*clr & cla
-		street_work = 1
-		streetworkevent = RAND(1,8)
-		if streetworkevent = 3:
-			if prst_loc ! 1: streetworkevent = 5
-			if ruslan_day = daystart: streetworkevent = 5
-		end
-		if streetworkevent <= 2:
+	if hour > 5 and hour < 20:
+		gs 'street_walker', 'start'
+		'It''s gone 05:00 and much too late to find any work now, maybe try again tonight there should be demand from 20:00.'
+		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):
 			*clr & cla
-			minut += 15
-			city_prostitute += 1
-			if month >= 11 or month <= 3:
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookersw1.jpg"></center>'
-			else
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookers' + rand(1,4) + '.jpg"></center>'
+			street_work = 1
+			streetworkevent = RAND(1,8)
+			if streetworkevent = 3:
+				if prst_loc ! 1: streetworkevent = 5
+				if ruslan_day = daystart: streetworkevent = 5
 			end
-			'As you walk along the street trying to entice one of the slower moving cars with no luck. You spot some other girls working the streets as well, it doesn''t look like they are having any better luck than you are.'
-			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':
-				!!ruslan_pimp sets to 1 if you trigger the second part and are not working for him. It will then always skip to that
-				if RAND(0,1) = 0 and ruslan_pimp = 0:
-					*clr & cla
-					minut += 15
-					if month >= 11 or month <= 3:
-						'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookersw1.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookers' + rand(1,4) + '.jpg"></center>'
-					end
-					'You walk over smiling to the other girls, but all you are meet with is dark and dangerous looks. Then one of them speaks up. "What the fuck do you want bitch?"'
-					'Taken a bit aback by the anger you say "I was just coming over to talk and see how the night is going for you guys, been kinda slow for me." Trying to be friendly.'
-					'One of them snarls as the others move to partial circle you. "Listen bitch, this is our street, so get the fuck off it before you get hurt!"'
-					act 'Leave and stop working for the night':
-						cla
-						*nl
-						'You turn and walk away, you can hear the other girls behind you, calling you all sorts of names'
-						act 'Continue': gt 'street_walker', 'end'
-					end
-					act 'Leave to work a new street':
-						cla
-						*nl
-						'You turn and walk away, you can hear the other girls behind you, calling you all sorts of names'
-						act 'Continue': gt 'street_walker', 'work'
-					end
-					!!act 'Tell her to fuck off':
-					!!i will expand this later when I have time. For now want to get this out for this release.
-				else
-					*clr & cla
-					minut += 15
-					if month >= 11 or month <= 3:
-						'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookersw1.jpg"></center>'
-					else
-						'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookers' + rand(1,4) + '.jpg"></center>'
-					end
-					if ruslan_pimp = 2:
-						'You walk over and introduce yourself to the other girls, one of them starts off kinda bitchy but the other one tells her you work for Ruslan too, which quickly calms her down. You make small talk with them for a bit, the more experienced girls share tips for the newer girls. Ways to help encourage guys stop and the type of guys to avoid. Occasionally a car stops and picks up one of the other girls, other times one stops and drops a girl off. After a bit you know you need to get back to work and earn money for Ruslan.'
-						act 'Keep working the street': gt 'street_walker', 'event1'
-					else
-						ruslan_pimp = 1
-						'You walk over and introduce yourself to the other girls, one of them asks "You one of Ruslan''s new girls?"'
-						'You shake your head no. "No I work only for myself"'
-						'The other girls exchange a unease look, then one of them tells you. "You should really change your mind, if you work for Ruslan most of the guys know to pay up and the gopniks know to leave you alone, otherwise you can find yourself in a bad spot."'
-						'You smile to her. "Thanks for the advice, I will think about it." With that they make a excuse that then need to get back to work, you can tell they really don''t want to be seen hanging out with you.'
-						act 'Stop working for the night': gt 'street_walker', 'end'
-						act 'Keep working the street': gt 'street_walker', 'event1'
-					end
-				end
+			if streetworkevent <= 2:
+				gt 'street_walker', 'event2'
+			elseif streetworkevent = 3:
+				gt 'street_walker', 'event3'
+			elseif streetworkevent = 4:
+				gt 'street_walker', 'event4'
+			else
+				gt 'street_walker', 'event5'
 			end
-		elseif streetworkevent = 3:
-			ruslan_day = daystart
-!!can only run into the pimp once a night, after that have it just go down to the else.
+		else
 			*clr & cla
 			minut += 15
 			city_prostitute += 1
-			'<center><img <<$set_imgh>> src="images/locations/shared/street/mugger.jpg"></center>'
-			if ruslan_meet = 0:
-				ruslan_meet = 1
-				'As you walk along the street trying to entice one of the slower moving cars with no luck. As the next car passes you turn and nearly run into a man who walked directly in front of you. You stop and give him your best smile. "You looking to party handsome?"'
-				'He looks you over like a side of beef, then finally looks into your eyes which most guys never do. "It''s dangerous for a young thing like you to be out walking the streets this time of night. I can protect you and make sure no one bothers you, just ask any of my other girls, how good Ruslan protects them."'
+			gs 'stat'
+			if month >= 11 or month <= 3:
+				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/workingw1.jpg"></center>'
 			else
-				'As you walk along the street trying to entice one of the slower moving cars with no luck. As the next car passes you turn and see Ruslan your wouldbe pimp blocking your path.'
-				'You stop as he looks you over. "You come to your sense yet?"'
+				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/working' + rand(1,4) + '.jpg"></center>'
 			end
-			act 'Accept his deal':
-				*clr & cla
-				minut += 5
-				ruslan_pimp = 2
-				'You nod your head in agreement. "Yeah you''re right, having some protection would be a good thing."'
-				'When you say that he is all smiles suddenly and pulls you up beside him as he wraps his arm around you."Good good, I knew you was a smart girl. Now every Friday I will come by and collect my half of what you make. You better not hold out on me, the other girls will tell me if you do. Now here is my number, if anyone refuses to pay or you have problems you call." Once you add his number to your contact list, he slaps you on the ass. "Now get to work!" With that he turns and walks off leaving you to wonder if this was a good idea.'
-				act 'Stop working for the night': gt 'street_walker', 'end'
-				act 'Keep working the street': gt 'street_walker', 'event1'
-			end
-			act 'Refuse his deal':
-				*clr & cla
-				minut += 5
-				'You shake your head no. "Thank you but I am doing ok."'
-				'He frowns and his eyes take on a hard glint, for a moment you think he might do something, but finally he just nods. "Very well have it your way, but don''t say I didn''t warn you. I will check back on you some other time and see if you came to your senses yet."'
-				act 'Stop working for the night': gt 'street_walker', 'end'
-				act 'Keep working the street': gt 'street_walker', 'event1'
-			end
-			!!act 'Be a smart ass':
-			!!for now commenting this out until I can finish it.
-			!!	*clr & cla
-			!!	minut += 5
-			!!	gs 'pain', 3, 'cheeks', 'slap'
-			!!	'You laugh at him trying to act all big and bad. "Like someone as scrawny as you could protect me, what you mean is you want to live off my pussy while you are to pathetic earn your own money."'
-			!!	'The words barely leave your mouth before you feel the stinging of the slap across your face. Blinking to clear you vision as you rub your cheek, you notice he has pulled up his shirt to reveal the butt of a pistol. Which quickly makes you change your mind about fighting back. "You''re new here so I will let that slide, but you best learn your place and fast bitch, before you end up dead!" With that he turns and walks off but you doubt you have seen the last of him.'
-			!!	act 'Stop working for the night': gt 'street_walker', 'event1'
-			!!	act 'Keep working the street': gt 'street_walker', 'event1'
-		elseif streetworkevent = 4:
-		!!Prostitute event
+			'You walk along the street trying to entice drivers of cars that drive by slowly, but you are unable to get anyone to stop.'
+			act 'Keep working the street': gt 'street_walker', 'event1'
+			act 'Stop working for the night': gt 'street_walker', 'end'
+		end
+	end
+end
+
+if $ARGS[0] = 'event2':
+	*clr & cla
+	minut += 15
+	city_prostitute += 1
+	if month >= 11 or month <= 3:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookersw1.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookers' + rand(1,4) + '.jpg"></center>'
+	end
+	'As you walk along the street trying to entice one of the slower moving cars with no luck. You spot some other girls working the streets as well, it doesn''t look like they are having any better luck than you are.'
+	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':
+		!!ruslan_pimp sets to 1 if you trigger the second part and are not working for him. It will then always skip to that
+		if RAND(0,1) = 0 and ruslan_pimp = 0:
 			*clr & cla
 			minut += 15
-			if prst_loc = 0:
-				gs 'fame', 'city', 'prostitute', 5
-			elseif prst_loc = 1:
-				gs 'fame', 'city', 'prostitute', 5
+			if month >= 11 or month <= 3:
+				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookersw1.jpg"></center>'
 			else
-				gs 'fame', 'city', 'prostitute', 5
+				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookers' + rand(1,4) + '.jpg"></center>'
 			end
-			city_prostitute += 1
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/police.jpg"></center>'
-			if prst_caught = 0:
-				prst_caught = 1
-				'"What''s your price?" a man asks from behind you.'
-				'"The price is-" you stop in your tracks as you turn to notice a man dressed in all black. You stare for a moment, he''s giving you a weird vibe, looking at you with a cold and calculating gaze. Something tells you to play it cool so you change your answer. "Uh, I''m sorry, sir, can you repeat that? I don''t think I heard you clearly..." You try to lie.'
-				'The man''s eyes narrow dangerously, and as he moves you catch a glimpse of a police badge clipped to his hip. He''s a cop! "Don''t play dumb, girl. Go on, finish what you were going to say before!"'
-
-				act 'Keep on lying': gt 'street_walker', 'policelie'
-				act 'Offer him a bribe': gt 'street_walker', 'policebribe'
-				act 'Offer him a blowjob': gt 'street_walker', 'policeblowjob'
-			else
-				'"Didn''t I tell you to stay away from here?" you hear a familiar voice.'
-				'You turn turn around and find that it''s the cop from before. "Y-Yes sir, you did..." You stare down at the ground.'
-				'"So what are you doing here then, whoring again?" he brashly asks.'
-
-				act 'Try to explain': gt 'street_walker', 'policeexp'
-				act 'Offer him a bribe': gt 'street_walker', 'policebribe'
-				act 'Offer him a blowjob': gt 'street_walker', 'policeblowjob'
+			'You walk over smiling to the other girls, but all you are meet with is dark and dangerous looks. Then one of them speaks up. "What the fuck do you want bitch?"'
+			'Taken a bit aback by the anger you say "I was just coming over to talk and see how the night is going for you guys, been kinda slow for me." Trying to be friendly.'
+			'One of them snarls as the others move to partial circle you. "Listen bitch, this is our street, so get the fuck off it before you get hurt!"'
+			act 'Leave and stop working for the night':
+				cla
+				*nl
+				'You turn and walk away, you can hear the other girls behind you, calling you all sorts of names'
+				act 'Continue': gt 'street_walker', 'end'
+			end
+			act 'Leave to work a new street':
+				cla
+				*nl
+				'You turn and walk away, you can hear the other girls behind you, calling you all sorts of names'
+				act 'Continue': gt 'street_walker', 'work'
 			end
+			!!act 'Tell her to fuck off':
+			!!i will expand this later when I have time. For now want to get this out for this release.
 		else
 			*clr & cla
 			minut += 15
-			city_prostitute += 1
-			if prst_loc = 0:
-				gs 'fame', 'city', 'prostitute', 10
-			elseif prst_loc = 1:
-				gs 'fame', 'city', 'prostitute', 10
-			else
-				gs 'fame', 'city', 'prostitute', 10
-			end
 			if month >= 11 or month <= 3:
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/barginw1.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookersw1.jpg"></center>'
 			else
-				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/bargin' + rand(1,3) + '.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/hookers' + rand(1,4) + '.jpg"></center>'
 			end
-			'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.'
-			!!it should be 50/50 is the first one, than 50/50 the second or last
-			if RAND(0,1) = 0:
-				'He decides he wants a blowjob.'
-				act 'Accept':
-					cla
-					*nl
-					'With that and the price decided you get into the car.'
-					act 'Continue': gt 'street_walker', 'blowjob'
-				end
-				act 'Decline': gt 'street_walker', 'work'
-			elseif RAND(0,1) = 0:
-				'He decides he wants a fuck.'
-				act 'Accept':
-					cla
-					*nl
-					'With that and the price decided you get into the car.'
-					act 'Continue': gt 'street_walker', 'vaginal'
-				end
-				act 'Decline': gt 'street_walker', 'work'
+			if ruslan_pimp = 2:
+				'You walk over and introduce yourself to the other girls, one of them starts off kinda bitchy but the other one tells her you work for Ruslan too, which quickly calms her down. You make small talk with them for a bit, the more experienced girls share tips for the newer girls. Ways to help encourage guys stop and the type of guys to avoid. Occasionally a car stops and picks up one of the other girls, other times one stops and drops a girl off. After a bit you know you need to get back to work and earn money for Ruslan.'
+				act 'Keep working the street': gt 'street_walker', 'event1'
 			else
-				'He decides he wants a anal.'
-				act 'Accept':
-					cla
-					*nl
-					'With that and the price decided you get into the car.'
-					act 'Continue': gt 'street_walker', 'anal'
-				end
-				act 'Decline': gt 'street_walker', 'work'
+				ruslan_pimp = 1
+				'You walk over and introduce yourself to the other girls, one of them asks "You one of Ruslan''s new girls?"'
+				'You shake your head no. "No I work only for myself"'
+				'The other girls exchange a unease look, then one of them tells you. "You should really change your mind, if you work for Ruslan most of the guys know to pay up and the gopniks know to leave you alone, otherwise you can find yourself in a bad spot."'
+				'You smile to her. "Thanks for the advice, I will think about it." With that they make a excuse that then need to get back to work, you can tell they really don''t want to be seen hanging out with you.'
+				act 'Stop working for the night': gt 'street_walker', 'end'
+				act 'Keep working the street': gt 'street_walker', 'event1'
 			end
 		end
+	end
+end
+
+if $ARGS[0] = 'event3':
+	ruslan_day = daystart
+!!can only run into the pimp once a night, after that have it just go down to the else.
+	*clr & cla
+	minut += 15
+	city_prostitute += 1
+	'<center><img <<$set_imgh>> src="images/locations/shared/street/mugger.jpg"></center>'
+	if ruslan_meet = 0:
+		ruslan_meet = 1
+		'As you walk along the street trying to entice one of the slower moving cars with no luck. As the next car passes you turn and nearly run into a man who walked directly in front of you. You stop and give him your best smile. "You looking to party handsome?"'
+		'He looks you over like a side of beef, then finally looks into your eyes which most guys never do. "It''s dangerous for a young thing like you to be out walking the streets this time of night. I can protect you and make sure no one bothers you, just ask any of my other girls, how good Ruslan protects them."'
 	else
+		'As you walk along the street trying to entice one of the slower moving cars with no luck. As the next car passes you turn and see Ruslan your wouldbe pimp blocking your path.'
+		'You stop as he looks you over. "You come to your sense yet?"'
+	end
+	act 'Accept his deal':
 		*clr & cla
-		minut += 15
-		city_prostitute += 1
-		gs 'stat'
-		if month >= 11 or month <= 3:
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/workingw1.jpg"></center>'
-		else
-			'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/working' + rand(1,4) + '.jpg"></center>'
-		end
-		'You walk along the street trying to entice drivers of cars that drive by slowly, but you are unable to get anyone to stop.'
+		minut += 5
+		ruslan_pimp = 2
+		'You nod your head in agreement. "Yeah you''re right, having some protection would be a good thing."'
+		'When you say that he is all smiles suddenly and pulls you up beside him as he wraps his arm around you."Good good, I knew you was a smart girl. Now every Friday I will come by and collect my half of what you make. You better not hold out on me, the other girls will tell me if you do. Now here is my number, if anyone refuses to pay or you have problems you call." Once you add his number to your contact list, he slaps you on the ass. "Now get to work!" With that he turns and walks off leaving you to wonder if this was a good idea.'
 		act 'Stop working for the night': gt 'street_walker', 'end'
 		act 'Keep working the street': gt 'street_walker', 'event1'
 	end
+	act 'Refuse his deal':
+		*clr & cla
+		minut += 5
+		'You shake your head no. "Thank you but I am doing ok."'
+		'He frowns and his eyes take on a hard glint, for a moment you think he might do something, but finally he just nods. "Very well have it your way, but don''t say I didn''t warn you. I will check back on you some other time and see if you came to your senses yet."'
+		act 'Stop working for the night': gt 'street_walker', 'end'
+		act 'Keep working the street': gt 'street_walker', 'event1'
+	end
+	!!act 'Be a smart ass':
+	!!for now commenting this out until I can finish it.
+	!!	*clr & cla
+	!!	minut += 5
+	!!	gs 'pain', 3, 'cheeks', 'slap'
+	!!	'You laugh at him trying to act all big and bad. "Like someone as scrawny as you could protect me, what you mean is you want to live off my pussy while you are to pathetic earn your own money."'
+	!!	'The words barely leave your mouth before you feel the stinging of the slap across your face. Blinking to clear you vision as you rub your cheek, you notice he has pulled up his shirt to reveal the butt of a pistol. Which quickly makes you change your mind about fighting back. "You''re new here so I will let that slide, but you best learn your place and fast bitch, before you end up dead!" With that he turns and walks off but you doubt you have seen the last of him.'
+	!!	act 'Stop working for the night': gt 'street_walker', 'event1'
+	!!	act 'Keep working the street': gt 'street_walker', 'event1'
+end
+
+if $ARGS[0] = 'event4':
+!!Prostitute event
+	*clr & cla
+	minut += 15
+	if prst_loc = 0:
+		gs 'fame', 'city', 'prostitute', 5
+	elseif prst_loc = 1:
+		gs 'fame', 'city', 'prostitute', 5
+	else
+		gs 'fame', 'city', 'prostitute', 5
+	end
+	city_prostitute += 1
+	'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/police.jpg"></center>'
+	if prst_caught = 0:
+		prst_caught = 1
+		'"What''s your price?" a man asks from behind you.'
+		'"The price is-" you stop in your tracks as you turn to notice a man dressed in all black. You stare for a moment, he''s giving you a weird vibe, looking at you with a cold and calculating gaze. Something tells you to play it cool so you change your answer. "Uh, I''m sorry, sir, can you repeat that? I don''t think I heard you clearly..." You try to lie.'
+		'The man''s eyes narrow dangerously, and as he moves you catch a glimpse of a police badge clipped to his hip. He''s a cop! "Don''t play dumb, girl. Go on, finish what you were going to say before!"'
+
+		act 'Keep on lying': gt 'street_walker', 'policelie'
+		act 'Offer him a bribe': gt 'street_walker', 'policebribe'
+		act 'Offer him a blowjob': gt 'street_walker', 'policeblowjob'
+	else
+		'"Didn''t I tell you to stay away from here?" you hear a familiar voice.'
+		'You turn turn around and find that it''s the cop from before. "Y-Yes sir, you did..." You stare down at the ground.'
+		'"So what are you doing here then, whoring again?" he brashly asks.'
+
+		act 'Try to explain': gt 'street_walker', 'policeexp'
+		act 'Offer him a bribe': gt 'street_walker', 'policebribe'
+		act 'Offer him a blowjob': gt 'street_walker', 'policeblowjob'
+	end
+end
+
+if $ARGS[0] = 'event5':
+	*clr & cla
+	minut += 15
+	city_prostitute += 1
+	if prst_loc = 0:
+		gs 'fame', 'city', 'prostitute', 10
+	elseif prst_loc = 1:
+		gs 'fame', 'city', 'prostitute', 10
+	else
+		gs 'fame', 'city', 'prostitute', 10
+	end
+	if month >= 11 or month <= 3:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/barginw1.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/streetwalker/bargin' + rand(1,3) + '.jpg"></center>'
+	end
+	'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.'
+	!!it should be 50/50 is the first one, than 50/50 the second or last
+	if RAND(0,1) = 0:
+		'He decides he wants a blowjob.'
+		act 'Accept':
+			cla
+			*nl
+			'With that and the price decided you get into the car.'
+			act 'Continue': gt 'street_walker', 'blowjob'
+		end
+		act 'Decline': gt 'street_walker', 'work'
+	elseif RAND(0,1) = 0:
+		'He decides he wants a fuck.'
+		act 'Accept':
+			cla
+			*nl
+			'With that and the price decided you get into the car.'
+			act 'Continue': gt 'street_walker', 'vaginal'
+		end
+		act 'Decline': gt 'street_walker', 'work'
+	else
+		'He decides he wants a anal.'
+		act 'Accept':
+			cla
+			*nl
+			'With that and the price decided you get into the car.'
+			act 'Continue': gt 'street_walker', 'anal'
+		end
+		act 'Decline': gt 'street_walker', 'work'
+	end
 end
 
 if $ARGS[0] = 'blowjob':