glife/sugarcube/src/locations/gadukino/gadprostitutes.tw

:: gadprostitutes[mod mod_gad]
<<set $here = 'gadprostitutes'>>
<<set $ARGS = $location_var[$here]>>
<!-- !2021/05/05-->
<<if $location_var[$here][0] == 'start'>>
	<<set $loc = 'gadprostitutes'>>
	<<set $loc_arg = 'start'>>
	<<set $location_type = 'public_outdoors'>>
	<<set $menu_loc = 'gadprostitutes'>>
	<<set $menu_arg = 'start'>>
	<<set $menu_off = 0>>
	<<gs 'gadukino_event' 'sound'>>
	<center><h4>Main Road near Gadukino</h4></center>
	<<if $time.isWinter>>
		<<image "locations/highway/roadwinter.jpg">>
	<<else>>
		<<image "locations/highway/road.jpg">>
	<</if>>
	<<if getvar("$MiraLoc") != 8 and $npc('A60').QW > 15 and $time.hour >= 16 and $time.hour <= 19>>
		<<set $MiraLoc = 8>>

	<</if>>
	<<if getvar("$MiraLoc") != 8 and $npc('A60').QW > 15>>
		You look around for Mira but don't see her here. So she must be doing something else right now.

	<</if>>
	<!-- !if gadriver_gang = 2 and (mirapimp = 0 or mirapimp = 2):-->
	<!-- !	if PCloStyle <> 4:-->
	<!-- !		'You are not wearing the right clothes to prostitute yourself.'-->
	<!-- !	elseif pcs_sleep <= 0:-->
	<!-- !		'You are too tired to prostitute yourself.'-->
	<!-- !	end-->
	<!-- !end-->
	<<if $time.hour >= 16 and $time.hour <= 23>>
		<!-- ! event to remove Sveta from being miras pimp if she becomes the boys slut, the village whore-->
		<<if getvar("$MiraLoc") == 8 and getvar("$mirapimp") == 1 and ($npc('A63').QW >= 11 or getvar("$gadriver_gang") == 2)>>
			<<gs 'gadprostitutes' 'mira_rebels'>>
		<<else>>
			<<actCLA 'Walk back to the highway'>>
				<<gt 'road' 10>>
			<</actCLA>>
			<<if getvar("$MiraLoc") == 8>>
				You see Mira standing below a streetlight a little way down the road.
				<!-- ! event to become miras pimp if not the boys slut, not the village whore-->
				<<if getvar("$mirapimp") == 0 and $npc('A63').QW < 11 and getvar("$gadriver_gang") == 0>>
					<<gt 'gadprostitutes' 'pimp_mira'>>

				<</if>>
				<!-- ! events to prostitute just Mira-->
				<<act 'Watch Mira prostitute herself'>>
					<<gt 'gadprostitutes' 'just_mira'>>
				<</act>>
				<!-- ! can do prostitution with Mira if Sveta is the village whore - this can be achieved by doing Mitka''s questline-->
				<!-- !if gadriver_gang = 2 and (mirapimp = 0 or mirapimp = 2) and PCloStyle = 4 and pcs_sleep > 0:-->
				<!-- ! act 'Prostitute yourself with Mira':gt 'gadprostitutes', 'with_mira'-->
				<!-- !end-->
			<</if>>
			<<if getvar("$prostitute['gadukino']") == 1 and $wardrobe.PCloStyle == 4>>
				<!-- FAILED TO CONVERT
					if prostitute['earnings_day'] > 0: '<br>You have earned <<prostitute[''earnings_day'']>> <b>₽</b> today.'+iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute[''earnings_day''] * prostitute[''share_player''] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute[''earnings_day''] * prostitute[''debt_payment_percent''] / 100>> <b>₽</b> to pay down your debt.', '.'), '')
				-----
					<<if getvar("$prostitute['earnings_day']") > 0>>
					<!-- FAILED TO CONVERT
	'<br>You have earned <<prostitute[''earnings_day'']>> <b>₽</b> today.'+iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute[''earnings_day''] * prostitute[''share_player''] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute[''earnings_day''] * prostitute[''debt_payment_percent''] / 100>> <b>₽</b> to pay down your debt.', '.'), '')
-----
	<<set ERROR: FAILED TO CONVERT LITERAL: """'<br>You have earned <<prostitute['earnings_day']>> <b>₽<""" / ERROR: FAILED TO CONVERT LITERAL: """b> today.'""" + iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute['earnings_day'] * prostitute['share_player'] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute['earnings_day'] * prostitute['debt_payment_percent'] / 100>> <b>₽</b> to pay down your debt.', '.'), '')>>

-->
<<warn "CONVERSION ERROR 76b60efd204f031c8e0dd7e6b1f7a253">>

				<</if>>

				-->
				<<warn "CONVERSION ERROR 4f80450f0d7458278b88afe1164a32a1">>
				<<act 'Look for clients'>>
					<<gt 'gadprostitutes' 'work_alone'>>
				<</act>>
			<</if>>
		<</if>>
	<<else>>
		It is not a good time of day for prostitution. Try coming back later in the evening.
		<<actCLA 'Walk back to the highway'>>
			<<gt 'road' 10>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'pimp_mira'>>
	<<actCLA 'Make Mira your prostitute' undefined `{willpower:['misc','force','hard']}`>>
			<<set $mirapimp = 1>>
			<<set $time.minutes += 5>>


			<<gs 'miroslava' 'miraclothes'>>
			<p>You call her over to you. Mira hurries over and looks at you with downcast eyes. "Hi, Sveta. Are you having a good night?"</p>
			<p>You look at her angrily. "A better question, my lovely whore, is 'Are you having a good night'? I want <b>₽</b>200 per customer you have each night." You tell her earnestly.</p>
			<p>Mira looks up in shock and with a hurt look on her face. "What are you talking about? Do you think I am a hooker?"</p>
			<p>You step up to her and place your hand on her face. Mira closes her eyes and leans into your hand. You look into her eyes once she opens them, then slap her hard across the face. Mira falls to the ground and starts to cry. "You're my property, whore. You will do whatever I tell you. You will never lie to me again, or I swear I will make you pay. Understand me?!"</p>
			Mira nods, and she wipes away tears.
			You reach down and help her back to her feet.  You brush her off and help her fix her makeup.  "Good, now get that cute ass back out on that road and earn us some money."
			You give Mira a little slap on the ass and smile as you watch Mira start a new chapter of her life as your prostitute.
			<<act 'Finish'>>
				<<gt 'gadprostitutes' 'start'>>
			<</act>>
		<</actCLA>>

<</if>>
<<if $location_var[$here][0] == 'mira_rebels'>>
	<<set $mirapimp = 2>>
	<<gs 'prostitution_functions' 'set_gadukion_prostitute'>>
	<<set $time.minutes += 5>>
	<<gs 'miroslava' 'miraclothes'>>
	Mira spots you and confidently walks up to you. You're not sure what has gotten into her, but from the look on her face, you probably won''t like it.
	<p>As soon as you are face-to-face with Mira, she winds up and smacks you across the face as hard as she can. You are stunned a bit and stagger to the ground. You feel warm tears begin to run down your face.</p>
	<p>Mira commands you, "Stand up bitch!"</p>
	You rise and meet her gaze. She looks very pleased with herself. "Remember that. Now you know exactly how that feels," she says.
	<<if $npc('A63').QW >= 11>>
		<p>Mira continues, "Look at you, just another slut. Mitka, Kolyamba, and Vasyan told me how much they all love fucking and sharing you now. You thought you were so much better than me, well no more! I'm not working for you anymore. You have proven yourself perfectly capable of enjoying getting shared by a group of friends."</p>
	<<elseif getvar("$gadriver_gang") == 2>>
		<p>Mira continues, "Look at you, just another whore. All the village men can talk about is how much you moaned for each and every one of them. You thought you were so much better than me, well no more! I'm not working for you anymore. You have proven yourself perfectly capable of enjoying getting gangbanged by multiple groups of strangers."</p>
	<</if>>
	After Mira is done with her preaching, you try to think of something witty to say or raise your hand to slap her back, but you just can't bring yourself to do it.
	<p>Mira sees the defeated look in your eyes and knows that she has won. She pulls you into an embrace and whispers, "It's alright, $pc.name_nick. We can just be friends again. And if you want to, maybe you can come work with me instead?"</p>
	<<act 'Continue'>>
		<<gt 'gadprostitutes' 'start'>>
	<</act>>
<</if>>
<!-- ! Prostitution events for just Mira - SM-->
<<if $location_var[$here][0] == 'just_mira'>>
	<<gs 'miroslava' 'miraclothes'>>
	<<if $time.hour >= 16 and $time.hour <= 23>>
		<<act 'Leave Mira to her work'>>
			<<gt 'gadprostitutes' 'start'>>
		<</act>>
		<<actCLA 'Wait for Mira to attract a customer'>>
			<<set $time.minutes += 30>>
			<<set $temp_gadpro = rand(1,10)>>
			<<if getvar("$temp_gadpro") > 5>>
				<<set $miraprost += 1>>
				<<if $npc('A60').QW < 20>>
					<<set $npc('A60').QW += 1>>

				<</if>>
				<<image "characters/gadukino/mira/miraprost.jpg">>
				It isn''t long before a customer pulls up in a flashy car. Mira approaches the vehicle and starts talking to the driver.
				You can't hear what she is saying, but after only a few minutes, the door opens, and Mira steps into the vehicle. It pulls away but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods, trying to head off the vehicle.
				<<actCLA 'Watch Mira and the customer'>>
					<<gs 'gadprostitutes' 'watch_mira'>>
				<</actCLA>>
			<<else>>
				<<image "characters/gadukino/mira/mirawish2_1.jpg">>
				Mira walks along the road showing off her body to passing cars and trucks, but no one stops to pick her up.
				<<act 'Continue'>>
					<<gt 'gadprostitutes' 'just_mira'>>
				<</act>>
			<</if>>
		<</actCLA>>
	<<else>>
		It is too late for Mira to work as a prostitute now.
		<<actCLA 'Walk back to Gadukino together'>>
			<<set $MiraLoc = 0>> <<gt 'gadukino' ''>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'watch_mira'>>
	<<set $temp_gadpro = rand(0,1)>>
	<<if getvar("$temp_gadpro") == 0>>
		<<arouse 'voyeur_sex' 10 >>
		<<video "characters/gadukino/mira/sex/miraprost1.mp4">>
		You walk up and look into the car. You see Mira giving one hell of a blowjob to her customer. Her head is bobbing up and down on his cock.
		<<actCLA 'Hide'>>
			<<gs 'gadprostitutes' 'watch_from_hiding'>>
		<</actCLA>>
	<<elseif getvar("$temp_gadpro") == 1>>
		<<arouse 'voyeur_sex' 10 >>
		<<video "characters/gadukino/mira/miraprost2.mp4">>
		You walk up and look into the van. You see Mira showing her customer her tits and rubbing her pussy, and you see a hungry gleam in the guy''s eyes, which Mira returns.
		<<actCLA 'Keep watching'>>
			<<gs 'gadprostitutes' 'watch_close'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'watch_from_hiding'>>
	<<arouse 'voyeur_sex' 10 >>
	<<video "characters/gadukino/mira/sex/miraprost1_1.mp4">>
	You duck for cover as the guy suddenly gets out of the car, opens the passenger door, grabs Mira''s head, and starts forcing his cock deep into her throat.
	<<actCLA 'Keep watching'>>
		<<arouse 'voyeur_sex' 10 >>
		<<video "characters/gadukino/mira/sex/miraprost1_2.mp4">>
		Eventually, the guy grunts and cums all over Mira''s face and into her mouth. Finally, the sharply dressed man pulls Mira out of the car, hands her a few bills and then drives off.
		Mira walks back towards the road, counting the money he gave her as she absentmindedly licks the cum as it drips down her face. Finally, she smiles and shows you the money as you join her.
		<<actCLA 'Finish'>>
			<<if getvar("$mirapimp") == 1>>
				<<setn $finances.cash += 200>>

			<</if>>
			
			<<gt 'gadprostitutes' 'just_mira'>>
		<</actCLA>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'watch_close'>>
	<<arouse 'voyeur_sex' 10 >>
	<<video "characters/gadukino/mira/sex/miraprost2_1.mp4">>
	Mira and the guy jump into the back of the van, and you watch as he starts fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial joy and partial pain, you know the guy is hitting or entering her cervix.
	<<actCLA 'Hide'>>
		<<arouse 'voyeur_sex' 10 >>
		<<video "characters/gadukino/mira/sex/miraprost2_2.mp4">>
		You have to duck behind some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums... and cums... and cums.
		After the wild sex, Mira and the guy sit in the van and talk. He gives her a nice wad of cash, and she starts walking back towards the road. She smiles at you and shows you the money as you join her.
		<<actCLA 'Finish'>>
			<<if getvar("$mirapimp") == 1>>
				<<setn $finances.cash += 200>>

			<</if>>
			
			<<gt 'gadprostitutes' 'just_mira'>>
		<</actCLA>>
	<</actCLA>>
<</if>>
<!-- ! Prostitution events for Sveta and Mira together - SM-->
<!-- !if $larg(0) = 'with_mira'-->
<!-- !	if pcs_sleep <= 0: 'You are too tired to prostitute yourself.'-->
<!-- !	if pcs_sleep > 0:-->
<!-- !		act 'Try to attract a customer with Mira':-->
<!-- !-->
<!-- !		end-->
<!-- !	end-->
<!-- !	act 'Stop looking for customers with Mira': gt 'gadprostitutes', 'start'-->
<!-- !end-->
<!-- ! Prostitution events for Sveta alone - SM-->
<!-- !if $larg(0) = 'without_mira'-->
<!-- !	if pcs_sleep <= 0: 'You are too tired to prostitute yourself.'-->
<!-- !	if pcs_sleep > 0:-->
<!-- !		act 'Try to attract a customer':-->
<!-- !-->
<!-- !		end-->
<!-- !	end-->
<!-- !-->
<!-- !	act 'Stop looking for customers': gt 'gadprostitutes', 'start'-->
<!-- !end-->
<!-- !! TODO: the above was never implemented, so just going with this.-->
<<if $location_var[$here][0] == 'work'>>
	<<gt 'gadprostitutes' 'work_alone'>>
<</if>>
<<if $location_var[$here][0] == 'work_alone'>>
	<<if getvar("$sound") == 0>>
	<</if>>
	<<set $loc_arg = 'work'>>
	<<set $used_name = 'gadukino'>>
	<<set $menu_arg = 'work'>>
	<<set $menu_off = 0>>
	<<gs 'prostitution_functions' 'parameters'>>
	<<if $prostitute_names['gadukino'] == ''>>
		If you want, you can tell your clients a different name.
		<<setinit $prostitute_names['gadukino'] = input("What name do you want to tell your clients? (Leave blank for <<$pc.name_nick>>)")>>
		<<if $prostitute_names['gadukino'] == ''>>
			<<setinit $prostitute_names['gadukino'] = $pc.name_nick>>

		<</if>>
	<</if>>
	<!-- !! TODO: Should find some video that is more roadside - evening, morning, different weather, etc.-->
	<<video "shared/prostitution/car/normal/negotiation/search.mp4">>
	<!-- !! TODO: Need to rewrite this to reflect the Gadukino location-->
	<!-- !!'You are walking near the gas station waiting for a client. On a scale from 1 to 10 you look like a <<hotcat>>. A good looking girl will always earn more money.'+iif(pcs_makeup < 2, ' You should '+iif(pcs_makeup = 0, 'fix your make-up', 'wear make-up')+' to increase your earnings.', ' Wearing make-up is a good way to increase your earnings.')+iif(pirsA > 0 and pirsA < 10000, ' Your tongue piercing will make a blowjob more enjoyable for most men, that could bring in a small bonus.', '')+iif($wardrobe.pantyworntype = 'eroto' and CloSkirtShortness > 4, ' Wearing such a short skirt reveals your slutty panties to your potential customers.', '')+iif(pcs_apprnc = -10, ' You don't look healthy and should seek treatment for your STD. There is a high chance that a guy won''t touch you without a condom.', '')-->
	<!-- !! TODO: The enema thing should be aligned with the rest of the game.-->
	<!-- !! NOTE The enema is called klisma (?) that needs to be cleaned up too.-->
	<<if $klismaday != $time.daystart>>
		<br>Almost no men will like dirty anal sex, even with a condom, and it's probably a safe bet that they won''t pay a lot for it. So you should start giving yourself an enema before going to work.

	<</if>>
	<<if getvar("$mesec") > 0>>
		<p><br>You are having your period; most men will pay less for vaginal sex during that time of the month.</p>

	<</if>>
	<<if getvar("$prostitute['cum_dressed']") == 1>>
		<br>You have visible cum stains on you. Most clients won''t like that and will offer less money.

	<</if>>
	<!-- FAILED TO CONVERT
		if prostitute['earnings_day'] > 0: 'You have earned <<prostitute[''earnings_day'']>> <b>₽</b> today.'+iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute[''earnings_day''] * prostitute[''share_player''] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute[''earnings_day''] * prostitute[''debt_payment_percent''] / 100>> <b>₽</b> to pay down your debt.', '.'), '')
	-----
		<<if getvar("$prostitute['earnings_day']") > 0>>
		<!-- FAILED TO CONVERT
	'You have earned <<prostitute[''earnings_day'']>> <b>₽</b> today.'+iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute[''earnings_day''] * prostitute[''share_player''] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute[''earnings_day''] * prostitute[''debt_payment_percent''] / 100>> <b>₽</b> to pay down your debt.', '.'), '')
-----
	<<set ERROR: FAILED TO CONVERT LITERAL: """'You have earned <<prostitute['earnings_day']>> <b>₽<""" / ERROR: FAILED TO CONVERT LITERAL: """b> today.'""" + iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute['earnings_day'] * prostitute['share_player'] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute['earnings_day'] * prostitute['debt_payment_percent'] / 100>> <b>₽</b> to pay down your debt.', '.'), '')>>

-->
<<warn "CONVERSION ERROR 27f4cac3de71587afc23534de790bf54">>

	<</if>>

	-->
	<<warn "CONVERSION ERROR 0ed1e430a5890cd3404e8f4b1a34e0e4">>
	<<if getvar("$prostitute['payment_method']") == 0>>
		<<gs 'gadprostitutes' 'event_check'>>

	<</if>>
	<<act 'Stop working for now'>>
		<<gt 'gadprostitutes' 'start'>>
	<</act>>
	<<gs 'willpower' 'prostitution' 'self' 'medium'>>
	<<if $will_cost <= $pc.pcs_willpwr>>
		<<actCLA 'Look for a client (0:30 and will_cost Willpower)'>>
			<<gs 'willpower' 'pay' 'self'>>
			<<gt 'prostitution_car_negotiation' 'look_client'>>
		<</actCLA>>
	<<elseif $will_cost > $pc.pcs_willpwr>>
		<!-- FAILED TO CONVERT
			act 'Look for a client (0:30 and <font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		-----
			<<actCLA 'Look for a client (0:30 and <font color="red">will_cost Willpower</font>)'>>
			<<set ERROR: FAILED TO CONVERT LITERAL: """'<br><font color""" = ERROR: FAILED TO CONVERT LITERAL: """"red">You don't have enough willpower to use this action.<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>
		<</actCLA>>

		-->
		<<warn "CONVERSION ERROR 364c426409861045c1e894a2be85aa34">>
	<</if>>
	<<if $inventory.get("wipe") > 0 and (getvar("$prostitute['cum_dressed']") == 1 or getvar("$prostitute['cum_undressed']") == 1 or getvar("$prostitute['cum_vaginal_mod']") == 1 or getvar("$prostitute['cum_anal_mod']") == 1)>>
		<<actCLA 'Remove the cum from your body (0:02)'>>
			<<set $time.minutes += 2>>
			<<run $inventory.dec('wipe',1)>>
			<<set $cumspclnt = 20>>
			<<gs 'cum_cleanup'>>
			<<gt 'gadprostitutes' 'work'>>
		<</actCLA>>
	<<elseif $inventory.get("wipe") == 0>>
		<br>You don't have any tissues with you to remove cum from your body.
	<</if>>
	<!-- !! NOTE:  This is where the working/negotiationg part begins in the original file. Moved to a separate file.-->
	<!-- !! This call just displays the explanation and the "config" of the negotiations on the page.-->
	<<gs 'prostitution_car_negotiation' 'general_description'>>
<</if>>
<!-- !!------ Random events and scenes, from police raids to robbery, etc. ------------------------------------------------------>
<!-- !!-- TODO: Any random event should go here.-->
<<if $location_var[$here][0] == 'event_check'>>
<</if>>