:: road[outdoors public]

<!-- !! TODO:  Scene: As Sveta is walking along she stops for a moment to catch her breath. Depending on her outfit, a driver may stop and ask for her tariff.-->
<!-- !!        Playing along, i.e. accepting the offer, she unlocks the road as a place to work.-->
	<<set $roadPosition = $location_var[$here][0] ?? $roadPosition>>
	<h2>Main road between St. Petersburg and Pavlovsk</h2>
	<<if $time.isWinter>>
		<<image "locations/highway/roadwinter.jpg">>
	<<else>>
		<<imageDayNight "locations/highway/road#.jpg" "" "Night">>
	<</if>>
	<<if $roadPosition == 0>>
		<center>20 km to Pavlovsk</center>
	<<elseif $roadPosition == 20>>
		<center>20 km to St. Petersburg</center>
	<<else>>
		<center><<=$roadPosition>> km to St. Petersburg, <<=(20-$roadPosition)>> km to Pavlovsk</center>
	<</if>>
	<<if $roadPosition != 0>>
		<<ConnectedLocation 'Torwards St. Petersburg' 'road' `($roadPosition-1)` 'locations/highway/road.jpg' 20>>
	<</if>>
	<<if $roadPosition != 20>>
		<<ConnectedLocation 'Torwards Pavlovsk' 'road' `($roadPosition+1)` 'locations/highway/road.jpg' 20>>
	<</if>>

	<p>
		Calling it a highway would be too much credit, but this road is the main way to get from St. Petersburg to the town of Pavlovsk, 20km away.
		Smaller villages named Gadukino and Pushkin can be found along the way. Cars are driving by you at a high speed.
	</p>
	<!-- FAILED TO CONVERT
		if car > 0 and cardrive = 22 and ncarroad = nroad and nroad ! 10:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a>'+iif(prostitute['road'] = 1, ' in a quieter spot.', ' next to the road.')

	-->
	<<switch $roadPosition>>
		<<case 0>>
			<<ConnectedLocation 'Industrial Region' 'city_industrial' '' 'locations/city/industrial/nord.jpg' 15>>
			You're on the outskirts of St. Petersburg.
			You see a number of crudely made huts near the trees. A bunch of homeless people must have sought shelter here.
		<<case 1>>
			<<todo>>
				Link to City Suburbs (15 min)
			<</todo>>
			You're not very far from St. Petersburg.
			You see a bunch of luxury houses not far from the road.
			That settlement looks like it's very expensive to live in.
			/*<<actCLA 'Walk to the City Suburbs (0:15)'>>
				<<set $time.minutes += 15>> <<gt 'city_suburbs' 'start'>>
			<</actCLA>>*/
		<<case 3>>
			<<ConnectedLocation 'Cemeterey' 'graveyard' '' 'locations/graveyard/graveyard.jpg' 15>>
			<p>
				You see a sign pointing towards a cemetery, hidden between lots of trees. You think it'd be a 15 minute walk from here.
			</p>
		<<case 10>>
			<<todo>>Gadukino<</todo>>
		<<case 12>>
			<<todo>>
				Link to motel (15 min)
			<</todo>>
			You see a trucker motel near the road. You have no business there. You're no trucker!
		<<case 16>>
			<<actCLA 'Check out the construction site (1:00)'>>
				<<setn $time.minutes += 60>> <<gt 'obekt'>>
			<</actCLA>>
			<p>All you see is an abandoned building, not too far from the road. From the look of it, the heavy fences around the building will make it difficult for you to get anywhere near it.</p>
		<<case 19>>
			<<ConnectedLocation 'Pushkin' 'liam' '' 'locations/pushkin/liam.jpg' 5>>
			<p>
				You are on the outskirts of the old town district of Pavlovsk.
				About five minutes down a cobblestone road is the old town center.
				It's a fairly popular place for tourists to explore with much of its old architecture still intact.
			</p>
		<<case 20>>
			<<ConnectedLocation 'Train Station' 'pav_train_hall' '' 'locations/pavlovsk/trainstation/pavtrainstation_day.jpg' 15>>
			<<ConnectedLocation 'Commercial Area' 'pav_commercial' '' 'locations/pavlovsk/gorodok.jpg' 15>>
			<<ConnectedLocation 'Industrial Area' 'pav_industrial' '' 'locations/pavlovsk/factory/pav_factory.jpg' 25>>
			<<ConnectedLocation 'Market' 'pav_market' '' 'locations/pavlovsk/pav_market_day.jpg' 15>>
			<p>
				The main road ends at the provincial town of Pavlovsk. You can see the castle in the distance.
			</p>
			<!--<p>
				A <<link 'lorry'>><<setn $time.minutes += 5>><<gt  'furi'>><</link>> is parked next to the road.
				The driver is currently taking a break and is having a cigarette.
				He could probably bring you to Gadukino or St. Petersburg, for a price...
			</p>-->
			<<ConnectedLocation 'Hotel' 'brothel' '' 'locations/shared/brothel/hotellobby.jpg' 5>>
			<p>
				A small road leads to an almost hidden old hotel.
				Usually tourists use it when passing by or when visiting the old town of Pavlovsk.
			</p>
			<!--
			<<if $time.hour >= 7 and $time.hour <= 17>>
				You can see a bunch of trucks around the <<link "Boris diner">><<gt 'NikoSlut' 'Diner Exterior'>><</link>>, which is a diner that is frequently visited by both truckers and bikers.
			<<else>>
				You can see a bunch of motorcycles around the <<link "Boris diner">><<gt 'NikoSlut' 'Diner Exterior'>><</link>>, which is a diner that is frequently visited by both truckers and bikers.
			<</if>>
			<<if $time.hour == 22 and getvar("$NikoEv") < 21>>
				'You can see <<link '' + iif(YurikEv['Name'] = 'Yurik', 'Yurik', 'a big burly man') + ''>><<gt  'NikoSlut'  'Yurik Out'>><</link>>, clearly drunk, stumbling along the highway with a beer bottle in his hand.'
			<</if>>
			 -->
	<</switch>>
	/*<<if getvar("$nroad") > 0 and getvar("$nroad") < 20>>
		<!-- !!  TODO: Adding a scene here of a driver mistaking Sveta for a whore and solicits her. If she accepts, that will unlock prostitution along the road.-->
		<<actCLA 'Try hitchhiking towards Pavlovsk'>>
			<<set $time.minutes += 15>>
			<<set $gorand = rand(1, 100)>>
			<<set $picrand = RAND(1, 3)>>
			<<if getvar("$gorand") <= 60>>
				<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
				<center><img <<$set_imgh>> src="images/locations/highway/autostop (<<picrand>>).jpg" ></center>
				You try to catch the attention of people driving towards Pavlovsk, but everyone just rushes by, ignoring you completely.
				<<actCLA 'Continue'>>
					<<gt $curloc>>
				<</actCLA>>
			<<elseif getvar("$gorand") > 60>>
				<<gs 'road' 'autostop_d'>>
				<<if getvar("$nroad") < 10>>
					<<actCLA 'Ask the driver to take you to Gadukino'>>
						<<set $road_textrand0 = 'Gadukino'>>
						<<gt 'road' 'autostpo_money'>>
					<</actCLA>>
				<</if>>
				<<actCLA 'Ask the driver to take you to Pavlovsk'>>
					<<set $road_textrand0 = 'Pavlovsk'>>
					<<gt 'road' 'autostpo_money'>>
				<</actCLA>>
			<</if>>
		<</actCLA>>
		<!-- !!  TODO: Adding a scene here of a driver mistaking Sveta for a whore and solicits her. If she accepts, that will unlock prostitution along the road.-->
		<<actCLA 'Try hitchhiking towards St. Petersburg'>>
			<<set $time.minutes += 15>>
			<<set $gorand = rand(1, 100)>>
			<<set $picrand = RAND(1, 3)>>
			<<if getvar("$gorand") <= 60>>
				<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
				<center><img <<$set_imgh>> src="images/locations/highway/autostop (<<picrand>>).jpg" ></center>
				You try to catch the attention of people driving towards St. Petersburg, but everyone just rushes by, ignoring you completely.
				<<actCLA 'Continue'>>
					<<gt $curloc>>
				<</actCLA>>
			<<elseif getvar("$gorand") > 60>>
				<<gs 'road' 'autostop_d'>>
				<<if getvar("$nroad") > 10>>
					<<actCLA 'Ask the driver to take you to Gadukino'>>
						<<set $road_textrand0 = 'Gadukino'>>
						<<gt 'road' 'autostpo_money'>>
					<</actCLA>>
				<</if>>
				<<actCLA 'Ask the driver to take you to St. Petersburg'>>
					<<set $road_textrand0 = 'St. Petersburg'>>
					<<gt 'road' 'autostpo_money'>>
				<</actCLA>>
			<</if>>
		<</actCLA>>
	<</if>>
	<<if getvar("$nroad") == 0>>

		'A <<link 'lorry'>><<setn $time.minutes += 5>><<gt  'furi'>><</link>> is parked next to the road. The driver is currently taking a break and is having a cigarette. He could probably bring you to Gadukino or Pavlovsk, for a price...'
	<<elseif getvar("$nroad") == 5>>
		'You see a <<link 'a bunch of cottages'>><<gt  'train'  'communal'">railway platform</a> not far from the road. A bit further away  someone built <a href="exec:minut += 15 & gt 'dachi'>><</link>>. Some of them are for sale. This must be a nice place to stay at in the summer!'
	<<elseif getvar("$nroad") == 10>>
		<<set $display_bb = 1>>
		<<actCLA 'Walk to Gadukino (0:15)'>>
			<<set $time.minutes += 15>> <<gt 'gadukino'>>
		<</actCLA>>
		<<actCLA 'Walk to the train platform (0:15)'>>
			<<set $time.minutes += 15>> <<gt 'train' 'village'>>
		<</actCLA>>
		'You see a <<link 'Gadukino'>><<gt  'train'  'village'">railway platform</a> not far from the road. In the same direction  a dirt road leads to the village of <a href="exec:minut += 15 & gt 'gadukino'>><</link>>.'
		'A <<link 'lorry'>><<setn $time.minutes += 5>><<gt  'furi'>><</link>> is parked next to the road. The driver is currently taking a break and is having a cigarette. He could probably bring you to Pavlovsk or St. Petersburg, for a price...'
		<<if $npc('A60').QW > 15>>
			Mira <<link "prostitutes">><<gt 'gadprostitutes' 'start'>><</link>> herself around here.

		<</if>>
		<<if $time.hour >= 16 and $time.hour <= 23 and getvar("$prostitute['gadukino']") == 1>>
			<!-- FAILED TO CONVERT
				if car > 0 and cardrive = 22 and ncarroad = nroad:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
			-----
				<<if getvar("$car") > 0 and getvar("$cardrive") == 22 and $ncarroad == $nroad>>
				<!-- FAILED TO CONVERT
	'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
-----
	<<set ERROR: FAILED TO CONVERT LITERAL: """'You parked <a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:gs ''carF''""" , ERROR: FAILED TO CONVERT LITERAL: """''start''">your $car<""" / ERROR: FAILED TO CONVERT LITERAL: """a> in a quieter spot on the side road to Gadukin.'""">>

-->
<<warn "CONVERSION ERROR a60f3b3838af06f8687a542b3a91e91c">>

			<</if>>

			-->
			<<warn "CONVERSION ERROR 8adcb598c81dfa4f718f7bccc7d1a76e">>
			<<if $wardrobe.PCloStyle == 4>>
				<<act 'You can work as a prostitute here'>>
					<<gt 'gadprostitutes' 'start'>>
				<</act>>
				<<if getvar("$car") > 0 and getvar("$cardrive") == 22 and $ncarroad == $nroad and $prostitute['changed_for_work']>>
					<<act 'You can change into your regular clothes in your car'>>
						<<gt 'prostitution_functions' 'change_back' 'car'>>
					<</act>>
				<</if>>
			<<elseif getvar("$car") > 0 and getvar("$cardrive") == 22 and $ncarroad == nroad AND prostitute['outfit_is_set']>>
				<<set $loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'>>
				<<gs 'prostitution_functions' 'change_to_work' 'car'>>
				<<set $loc_desc to null>>
			<</if>>
		<<elseif getvar("$prostitute['road']") == 1 and (getvar("$prostitute['blocked']") == 0 or (getvar("$prostitute['blocked']") == 1 and getvar("$prostitute['payment']") == 1))>>
			<!-- FAILED TO CONVERT
				if car > 0 and cardrive = 22 and ncarroad = nroad:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
			-----
				<<if getvar("$car") > 0 and getvar("$cardrive") == 22 and $ncarroad == $nroad>>
				<!-- FAILED TO CONVERT
	'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
-----
	<<set ERROR: FAILED TO CONVERT LITERAL: """'You parked <a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:gs ''carF''""" , ERROR: FAILED TO CONVERT LITERAL: """''start''">your $car<""" / ERROR: FAILED TO CONVERT LITERAL: """a> in a quieter spot on the side road to Gadukin.'""">>

-->
<<warn "CONVERSION ERROR a60f3b3838af06f8687a542b3a91e91c">>

			<</if>>

			-->
			<<warn "CONVERSION ERROR 8adcb598c81dfa4f718f7bccc7d1a76e">>
			<<gs 'prostitution_functions' 'work_clothes'>>
			<<if getvar("$prostitute['work_clothes']") == 0 and $prostitute['outfit_is_set']>>
				<<set $loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'>>
				<<gs 'prostitution_functions' 'change_to_work' 'car'>>
				<<set $loc_desc to null>>
			<<elseif $prostitute['work_clothes']>>
				<<act 'Start to work'>>
					<<gt 'road_prostitution' 'work'>>
				<</act>>
				<<if $prostitute['changed_for_work']>>
					<<act 'Change into your regular clothes'>>
	<<gt 'prostitution_functions' 'change_back' 'car'>>
<</act>>

				<</if>>
			<</if>>
		<<else>>
			<!-- FAILED TO CONVERT
				if car > 0 and cardrive = 22 and ncarroad = nroad and nroad ! 10:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> next to the road.'
			-----
				<<if getvar("$car") > 0 and getvar("$cardrive") == 22 and $ncarroad == $nroad and getvar("$nroad") != 10>>
				<!-- FAILED TO CONVERT
	'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> next to the road.'
-----
	<<set ERROR: FAILED TO CONVERT LITERAL: """'You parked <a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:gs ''carF''""" , ERROR: FAILED TO CONVERT LITERAL: """''start''">your $car<""" / ERROR: FAILED TO CONVERT LITERAL: """a> next to the road.'""">>

-->
<<warn "CONVERSION ERROR 3e6d18cba200b7477c6e5cf64db1caf2">>

			<</if>>

			-->
			<<warn "CONVERSION ERROR f8f3deea106ee7d9bc198c18e763cba1">>
		<</if>>
		<!-- !if npc_QW['A60'] > 15 and gadriver_gang = 2:-->
		<!-- !	'You and Mira can both <<link "prostitute">><<gt 'gadprostitutes' 'start'>><</link>> yourselves around here.'-->
		<!-- !elseif npc_QW['A60'] > 15:-->
		<!-- !	'Mira <<link "prostitutes">><<gt 'gadprostitutes' 'start'>><</link>> herself around here.'-->
		<!-- !elseif gadriver_gang = 2:-->
		<!-- !	'You can <<link "prostitute">><<gt 'gadprostitutes' 'start'>><</link>> yourself around here.'-->
		<!-- !end-->

	<<elseif getvar("$nroad") == 20>>
		
	<</if>>
	<<if getvar("$prostitute['road']") == 1 and getvar("$nroad") != 10 and getvar("$nroad") != 20 and (getvar("$prostitute['blocked']") == 0 or (getvar("$prostitute['blocked']") == 1 and getvar("$prostitute['payment']") == 1))>>
		<<gs 'prostitution_functions' 'work_clothes'>>
		<<if getvar("$prostitute['work_clothes']") == 0 and $prostitute['outfit_is_set']>>
			<<set $loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'>>
			<<gs 'prostitution_functions' 'change_into_prostitute_outfit' 'work'>>
			<<set $loc_desc to null>>
		<<elseif $prostitute['work_clothes']>>
			<<act 'Change into your regular clothes'>>
				<<gt 'road' 'change_back'>>
			<</act>>
			<<if $prostitute['changed_for_work']>>
				<<act 'Start to work'>>
	<<gt 'road_prostitution' 'work'>>
<</act>>

			<</if>>
		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'drive_sex1'>>
	<<set $location_type = 'event_outdoors'>>
	<<set $menu_off = 1>>
	<<gs 'npcgeneratec' 0 'truck driver' `rand(14,22)`>>

	<<set $autostop_price = 0>>
	<<cum 'mouth_swallow' $sex.npcId>>
	<<if $road_textrand0 == 'Gadukino'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 15>>
	<<elseif $road_textrand0 == 'Pavlovsk'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 20>>
	<<elseif $road_textrand0 == 'St. Petersburg'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 0>>
	<</if>>
	<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
	<<video "locations/highway/sex/bj (1).mp4" width="1000" height="562">>
	<p>When you get in the car, you immediately reach for his pants and take out his semi-erect cock. That's what you promised him after all. You feel it slowly hardening between your fingers as the man drives off.</p>
	<<if $pc.pcs_throat < $dick>>
		<<setn $pc.pcs_throat += 1>>

	<</if>>
	<<if getvar("$dick") >= 14 and getvar("$dick") < 16>>
		<<set $raod_text_sex = 'a normal size'>>

	<</if>>
	<<if getvar("$dick") >= 16 and getvar("$dick") < 18>>
		<<set $raod_text_sex = 'a bit larger than average'>>

	<</if>>
	<<if getvar("$dick") >= 18 and getvar("$dick") < 20>>
		<<set $raod_text_sex = 'quite large'>>

	<</if>>
	<<if getvar("$dick") >= 20>>
		<<set $raod_text_sex = 'huge'>>

	<</if>>
	<p>You gently massage his cock between your fingers while the man gets comfortable. It's $raod_text_sex, roughly dick centimeters long and quite girthy. You manage to massage him to a full erection in no time at all, and lower your head to take it between your lips.</p>
	<p>As you lick the tip of his cock with your tongue and begin to suck him off, you have to admit: this is kinda hot! The man is well groomed and has a pleasant masculine smell to him.</p>
	You eagerly bob your head up and down while he drives, totally forgetting about your earlier doubts, and do your best to get him off.
	With success: in no time at all, the man groans, and his cock erupts inside your mouth, shooting gobs of his hot sperm onto your tongue while you keep your lips closed to not make a mess.
	Realizing you can't spit it out anywhere, you have no option but to swallow his load while he keeps driving.
	<<arouse 'hj' 15 `['prostitution']`>>
	<<arouse 'bj' -15 `['prostitution']`>>
	
	<<act 'Continue'>>
		<<gt 'road' 'autospot_drive'>>
	<</act>>
<</if>>
<<if $location_var[$here][0] == 'drive_sex2'>>
	<<set $location_type = 'event_outdoors'>>
	<<set $menu_off = 1>>
	<<gs 'npcgeneratec' 0 'truck driver' `rand(14,22)`>>

	<<set $autostop_price = 0>>
	<<set $spafinloc = 7>>
	<<gs 'cum_manage'>>
	<<if $road_textrand0 == 'Gadukino'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 10>>
	<<elseif $road_textrand0 == 'Pavlovsk'>>
		<<set $nroad = 20>>
		<<set $time.minutes += 15>>
	<<elseif $road_textrand0 == 'St. Petersburg'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 0>>
	<</if>>
	<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
	<<video "locations/highway/sex/hj(1).mp4">>
	<p>When you get in the car, you immediately reach for his pants and take out his semi-erect cock. That's what you promised him after all. You feel it slowly hardening between your fingers as the man drives off.</p>
	<<if getvar("$dick") >= 14 and getvar("$dick") < 16>>
		<<set $raod_text_sex = 'a normal size'>>

	<</if>>
	<<if getvar("$dick") >= 16 and getvar("$dick") < 18>>
		<<set $raod_text_sex = 'a bit larger than average'>>

	<</if>>
	<<if getvar("$dick") >= 18 and getvar("$dick") < 20>>
		<<set $raod_text_sex = 'quite large'>>

	<</if>>
	<<if getvar("$dick") >= 20>>
		<<set $raod_text_sex = 'huge'>>

	<</if>>
	<p>You gently massage his cock between your fingers while the man gets comfortable. It's $raod_text_sex, roughly dick centimeters long and quite girthy. You manage to massage him to a full erection in no time at all, and begin to jerk him off while he drives, rubbing your fingertips over his glans.</p>
	Even though you feel a bit awkward for having to service this man to get where you need to be, you're serious about what you promised him and jerk him off diligently. In no time at all, your soft touch brings him to an orgasm. Unfortunately, his cock is pointing straight at you when it happens, and most of his sperm ends up on your clothes.
	<<arouse 'hj' 15 `['prostitution']`>>
	
	<<act 'Continue'>>
		<<gt 'road' 'autospot_drive'>>
	<</act>>
<</if>>
<<if $location_var[$here][0] == 'autospot_drive'>>
	<<set $location_type = 'event_outdoors'>>
	<<set $menu_off = 1>>
	<<set $finances.cash -= $autostop_price * 100>>
	<<if $road_textrand0 == 'Gadukino'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 10>>
	<<elseif $road_textrand0 == 'Pavlovsk'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 20>>
	<<elseif $road_textrand0 == 'St. Petersburg'>>
		<<set $time.minutes += 15>>
		<<set $nroad = 0>>
	<</if>>
	<<set $picrand = RAND(1, 2)>>
	<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
	<<if getvar("$truck_drive") == 1>>
		<center><img <<$set_imgh>> src="images/locations/highway/truck_drive (<<picrand>>).jpg" ></center>
	<<else>>
		<center><img <<$set_imgh>> src="images/locations/highway/drive (<<picrand>>).jpg" ></center>
	<</if>>
	You try to start a conversation once or twice, but the man doesn''t really seem to be interested in chatting while he drives. You give up and just look out the window, while he drives you to your destination.
	<p>Fifteen minutes later, you arrive, and the man pulls over. "Alright, we're here. Take care, girl!"</p>
	<<actCLA 'Get out of the car'>>
		<<gt $curloc>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'autostpo_money'>>
	<<set $location_type = 'event_outdoors'>>
	<<set $menu_off = 1>>
	<<set $autostop_price = RAND(3,6)>>
	<<set $textrand = RAND(1,3)>>
	<<if getvar("$textrand") == 1>>
		<<set $road_textrand4 = 'I'll take you there for autostop_price*100 <b>₽</b>.'>>

	<</if>>
	<<if getvar("$textrand") == 2>>
		<<set $road_textrand4 = 'autostop_price*100 <b>₽</b>. Take it or leave it.'>>

	<</if>>
	<<if getvar("$textrand") == 3>>
		<<set $road_textrand4 = 'autostop_price*100 <b>₽</b>.'>>

	<</if>>
	<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
	<<if getvar("$truck_drive") == 1>>
		<center><img <<$set_imgh>> src="images/locations/highway/truck_guy (<<picrand>>).jpg" ></center>
	<<elseif getvar("$bandit_drive") == 1>>
		<center><img <<$set_imgh>> src="images/locations/highway/guy (1).jpg" ></center>
	<<else>>
		<center><img <<$set_imgh>> src="images/locations/highway/guy (<<picrand>>).jpg" ></center>
	<</if>>
	<p>You approach the driver and say, "Hello, sir! I need a ride to $road_textrand0, can you help me?"</p>
	The driver gives you another appraising look.
	<<set $vnerand = RAND(0,1200)>>
	<<if $vnerand <= $pc.pcs_apprnc>>
		"I can take you there for free, but only if you do something for me in return," the guy smiles.
		<p>"Uhh... like what?" you ask him, even though you're pretty sure you know where this is going.</p>
		<p>The man laughs and shifts a bit in his seat. He says, "You're a grown-up girl with a nice body! Surely you can think of something?"</p>
		<<actCLA 'Offer a blowjob'>>
			<<setinit $drive_sex[1] = 1>>
			<p>You bite your lip for a second, quickly going through your options. Then you say, "I really do need this ride, sir! Would a blowjob be okay?"</p>
			<p>The guy grins greedily and says, "Excellent, I knew we would find a way to help each other out! Get in."</p>
			<<act 'Get in the car'>>
				<<gt 'road' 'drive_sex1'>>
			<</act>>
		<</actCLA>>
		<<actCLA 'Offer a handjob'>>
			<<setinit $drive_sex[2] = 1>>
			<p>You bite your lip for a second, quickly going through your options. Then you say, "I really do need this ride, sir! Would a handjob be okay?"</p>
			<p>The guy gives you a slightly disappointed look and frowns, "What? Only a handjob?"</p>
			<p>You really don't want to go further than that! Your cheeks turn a deep red and you begin to stumble, "I'm sorry. I don't normally do this..."</p>
			After some hesitation, he responds, "Oh, alright then. Getting a handjob from a cute girl such as yourself sounds like a fair deal. Get in."
			<<act 'Get in the car'>>
				<<gt 'road' 'drive_sex2'>>
			<</act>>
		<</actCLA>>
		$exit
	<<else>>
		<p>He ponders for a second and then says, "$road_textrand4"</p>
	<</if>>
	<<if $finances.cash > $autostop_price * 100>>
		<<act 'Agree to pay him'>>
			<<gt 'road' 'autospot_drive'>>
		<</act>>
	<</if>>
	<<actCLA 'Decline his offer'>>
		"I'm sorry, sir. I can't afford that," you apologize and step away from the car. The man shrugs and drives off.
		<<actCLA 'Continue'>>
			<<gt $curloc>>
		<</actCLA>>
	<</actCLA>>
	<<actCLA 'Ask for a lower price'>>
		<<set $textrand = RAND(1,3)>>
		<<if getvar("$textrand") == 1>>
			<<set $road_textrand5 = 'Please, sir! I`m nearly broke... would you please do a girl a favour? I`d be so grateful!'>>

		<</if>>
		<<if getvar("$textrand") == 2>>
			<<set $road_textrand5 = 'Maybe we can work something out?'>>

		<</if>>
		<<if getvar("$textrand") == 3>>
			<<set $road_textrand5 = 'Oh no, I don`t have that much! Could you lower your price? Maybe a bit, just for me?'>>

		<</if>>
		<p>You twirl your hair between your fingers and give the man a cute look, hoping he will have pity on you and lower the price. "$road_textrand5" you ask him sweetly.</p>
		The man seems a bit reluctant and looks at you once more.
		<<set $vnerand = RAND(0,400)>>
		<<if $vnerand <= $pc.pcs_apprnc>>
			"I can take you there for free, but only if you do something for me in return", the guy smiles.
			<p>"Uhh... like what?" you ask him, even though you're pretty sure you know where this is going.</p>
			<p>The man laughs and shifts a bit in his seat. He says, "You're a grown-up girl with a nice body! Surely you can think of something?"</p>
			<<actCLA 'Offer a blowjob'>>
				<<setinit $drive_sex[1] = 1>>
				<p>You bite your lip for a second, quickly going through your options. Then you say, "I really do need this ride, sir! Would a blowjob be okay?"</p>
				<p>The guy grins greedily and says, "Excellent, I knew we would find a way to help each other out! Get in."</p>
				<<act 'Get in the car'>>
					<<gt 'road' 'drive_sex1'>>
				<</act>>
			<</actCLA>>
			<<actCLA 'Offer a handjob'>>
				<<setinit $drive_sex[2] = 1>>
				<p>You bite your lip for a second, quickly going through your options. Then you say, "I really do need this ride, sir! Would a handjob be okay?"</p>
				<p>The guy gives you a slightly disappointed look and says, "What? Only a handjob?"</p>
				<p>You really don't want to go further than that! Your cheeks turn a deep red and you begin to stumble, "I'm sorry. I don't normally do this..."</p>
				After some hesitation, he responds, "Oh, alright then. Getting a handjob from a cute girl such as yourself sounds like a fair deal. Get in."
				<<act 'Get in the car'>>
					<<gt 'road' 'drive_sex2'>>
				<</act>>
			<</actCLA>>
		<<else>>
			<<set $ivrand = RAND(1,2)>>
			<<set $autostop_price -= $ivrand>>
			<p>The man sighs exasperatedly, but yields, "Okay, fine. I'll make it ivrand*100 <b>₽</b> less, because you seem like a nice girl and I want to help you out. I'll take you there for autostop_price*100 <b>₽</b>, but I can't go any lower than that!"</p>
			<<if $finances.cash > $autostop_price * 100>>
				<<actCLA 'Agree to pay him'>>
					<!-- !trip-->
					<<gt 'road' 'autospot_drive'>>
				<</actCLA>>
			<</if>>
			<<actCLA 'Decline his offer'>>
				"I'm sorry, sir. I still can't afford that," you apologize and step away from the car. The man shrugs and drives off.
				<<actCLA 'Continue'>>
					<<gt $curloc>>
				<</actCLA>>
			<</actCLA>>
			<<actCLA 'Offer him a blowjob instead'>>
				<<setinit $drive_sex[1] = 1>>
				<p>You bite your lip, as if you are ashamed of what you're about to say next. In a weak voice, you offer, "I can't pay you money, sir. But... I could give you a blowjob? Would that be okay?"</p>
				You lick your lips seductively and offer him a weak smile, hoping that maybe he'll feel bad for you and just take you with him for free.
				<p>The man grins from ear to ear, and says, "You know what, girl? I was kinda hoping you'd say that. Get in."</p>
				<<act 'Get in the car'>>
					<<gt 'road' 'drive_sex1'>>
				<</act>>
			<</actCLA>>
		<</if>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'autostop_d'>>
	<<set $menu_off = 1>>
	<<set $truck_drive = 0>>
	<<set $bandit_drive = 0>>
	<<setinit $drive_sex[1] = 0>>
	<<setinit $drive_sex[2] = 0>>
	<<set $textrand = RAND(1,5)>>
	<<if getvar("$textrand") == 1>>
		<<set $road_textrand1 = 'Hey there, darling! Where are you going?'>>

	<</if>>
	<<if getvar("$textrand") == 2>>
		<<set $road_textrand1 = 'What`s a gorgeous girl like you doing all alone on a road like this?'>>

	<</if>>
	<<if getvar("$textrand") == 3>>
		<<set $road_textrand1 = 'Hey girl, need a ride?'>>

	<</if>>
	<<if getvar("$textrand") == 4>>
		<<set $road_textrand1 = 'Hey beauty, going somewhere?'>>

	<</if>>
	<<if getvar("$textrand") == 5>>
		<<set $road_textrand1 = 'Darling, you shouldn`t be out here all alone! Do you need a ride?'>>

	<</if>>
	<<set $textrand = RAND(1,5)>>
	<<if getvar("$textrand") == 1>>
		<<set $road_textrand2 = 'perfectly clean and shiny'>>

	<</if>>
	<<if getvar("$textrand") == 2>>
		<<set $road_textrand2 = 'dirty'>>

	<</if>>
	<<if getvar("$textrand") == 3>>
		<<set $road_textrand2 = 'dusty'>>

	<</if>>
	<<if getvar("$textrand") == 4>>
		<<set $road_textrand2 = 'slightly dusty'>>

	<</if>>
	<<if getvar("$textrand") == 5>>
		<<set $road_textrand2 = 'very dirty'>>

	<</if>>
	<<set $textrand = RAND(1,5)>>
	<<if getvar("$textrand") == 1>>
		<<set $road_textrand3 = 'black'>>

	<</if>>
	<<if getvar("$textrand") == 2>>
		<<set $road_textrand3 = 'white'>>

	<</if>>
	<<if getvar("$textrand") == 3>>
		<<set $road_textrand3 = 'red'>>

	<</if>>
	<<if getvar("$textrand") == 4>>
		<<set $road_textrand3 = 'blue'>>

	<</if>>
	<<if getvar("$textrand") == 5>>
		<<set $road_textrand3 = 'grey'>>

	<</if>>
	<!-- !wagon and sedan-->
	<<set $ivrand = RAND(1,2)>>
	<center><B>Main road between St. Petersburg and Pavlovsk</B></center>
	<<if getvar("$ivrand") == 1>>
		<!-- !gangsters or not-->
		<<set $ivrand = RAND(1,4)>>
		<<if getvar("$ivrand") > 1>>
			<<set $picrand = RAND(2,4)>>
			<<set $bandit_drive = 1>>
			<center><img <<$set_imgh>> src="images/locations/highway/guy (<<picrand>>).jpg" ></center>
			<p>After a few minutes of you trying to get someone to pull over, a $road_textrand3, $road_textrand2 car stops near you. The driver rolls down his window and looks at you for a second, probably making sure you wouldn't ruin his seats with dirty clothes or something.</p>
			<<if $pc.pcs_apprnc < 60>>
				<p>Then he shrugs and says, "Where do you need to go, lady?"</p>

			<</if>>
			<<if $pc.pcs_apprnc >= 60>>
				<p>Then he gives you a friendly smile and says, "$road_textrand1"</p>

			<</if>>
		<<else>>
			<center><img <<$set_imgh>> src="images/locations/highway/guy (1).jpg" ></center>
			After a few minutes of you trying to get someone to pull over, a black car with tinted windows stops near you. Two guys wearing leather jackets are clearly appraising your body.
			<p>One says to the other, "Nice, we clearly drove to the right place!"</p>
		<</if>>
	<<elseif getvar("$ivrand") == 2>>
		<<set $picrand = RAND(1,3)>>
		<<set $truck_drive = 1>>
		<center><img <<$set_imgh>> src="images/locations/highway/truck_guy (<<picrand>>).jpg" ></center>
		<p>After a few minutes of you trying to get someone to pull over, a huge $road_textrand3, $road_textrand2 truck stops near you. The truck driver looks at you intently for a second, probably making sure you wouldn't ruin his seats with dirty clothes or something.</p>
		<<if $pc.pcs_apprnc < 60>>
			<p>Then he shrugs and says, "Where do you need to go, lady?"</p>

		<</if>>
		<<if $pc.pcs_apprnc >= 60>>
			<p>Then he gives you a friendly smile and says, "$road_textrand1"</p>

		<</if>>
	<</if>>
<</if>>
*/
