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

:: gadroad[mod mod_gad]
<<set $here = 'gadroad'>>
<<set $ARGS = $location_var[$here]>>
<<if !$location_var[$here][0]>>
	<<set $loc = 'gadroad'>>
	<<set $loc_arg = ''>>
	<<set $location_type = 'public_outdoors'>>
	<<set $menu_loc = 'gadroad'>>
	<<set $menu_arg = ''>>
	<<set $menu_off = 0>>
	<<gs 'gadukino_event' 'sound'>>
	<h2>Forest road</h2>
	<<if $time.month >= 4 and $time.month <= 10>>
		<<if $time.hour >= 6 and $time.hour < 22>>
			<<image "locations/gadukino/village/gadroad.jpg">>
		<<else>>
			<<image "locations/gadukino/village/gadroad_night.jpg">>
		<</if>>
	<<else>>
		<<if $time.hour >= 8 and $time.hour < 18>>
			<<image "locations/gadukino/village/gadroad_winter.jpg">>
		<<else>>
			<<image "locations/gadukino/village/gadroad_winter_night.jpg">>
		<</if>>
	<</if>>
	A dirt road leading to the outskirts of Gadukino. You are surrounded by grainfields where the grains appear, reaching all the way to the heavens.
	<p>The forest '+iif(meadow > 0, 'and meadow ',')+'can be found further down the road, away from the village.</p>
	<!-- ! 10% chance of meeting Mitka once per day on the road when Sveta is not the village boys slut or whole villages whore-->
	<<set $mitkarand = rand(1,10)>>
	<<if getvar("$mitka_first_drink") > 0 and $mitkaday != $time.daystart and $time.hour >= 17 and $time.hour < 20 and getvar("$mitkarand") == 1 and ($npc('A63').QW < 11 or getvar("$gadriver_gang") > 2)>>
		<<link "Mitka">><<gt 'mitka'>><</link>> is smoking near the road, he smiles at you as you walk by.
		<!-- ! Meet the boys to drink with them at 20 if Sveta has been invited by Mitka already-->
	<<elseif getvar("$mitka_first_drink") > 0 and $time.hour == 20 and $pc.alko < 10 and $mitkadrinkday != $time.daystart>>
		<<link "Mitka, Kolyamba, and Vasyan">><<gt 'gadroad' 'drinking_invite'>><</link>> are walking down the road towards the woods, drinking moonshine and talking loudly.
		<!-- ! If Sveta is late to go drink with the boys if she already knows where the trailer is she can still get there-->
	<<elseif getvar("$mitka_first_drink") == 2 and $time.hour > 20 and $pc.alko < 10 and $mitkadrinkday != $time.daystart>>
		<!-- ! if Sveta did not bring Mira with her and Mira has met the boys already then there is a 50% chance she will show up too-->
		<<if getvar("$MiraLoc") != 5 and $npc('A60').QW >= 1>>
			<<set $mirarand = rand(1,10)>>
			<<if getvar("$mirarand") >= 6>>
				<<set $MiraLoc = 5>>
				<<if $npc('A60').QW >= 16 and getvar("$gadriver_gang") == 2>>
					You can go drink with Mira, Mitka, Kolyamba and Vasyan at their <<link "trailer">><<gt 'mitkabuh_group' 'partywithMira'>><</link>> hidden in the woods.
				<<else>>
					You can go drink with Mira, Mitka, Kolyamba and Vasyan at their <<link "trailer">><<gt 'mitkabuh' 'partywithMira'>><</link>> hidden in the woods.
				<</if>>
			<<else>>
				You can go drink with Mitka, Kolyamba and Vasyan at their <<link "trailer">><<gt 'mitkabuh' 'partyalone'>><</link>> hidden in the woods.
			<</if>>
		<<else>>
			You can go drink with the Mitka, Kolyamba and Vasyan at their <<link "trailer">><<gt 'mitkabuh' 'partyalone'>><</link>> hidden in the woods.
		<</if>>
	<</if>>
	<<actCLA 'Walk to Gadukino (0:10)'>>
		<<set $time.minutes += 10>> <<gt 'gadukino'>>
	<</actCLA>>
	<<actCLA 'Walk down to the river (0:10)'>>
		<<set $time.minutes += 10>> <<gt 'gadriver' 'start'>>
	<</actCLA>>
	<<actCLA 'Walk into the woods (0:15)'>>
		<<set $time.minutes += 15>> <<gt 'gadforest' 'forest_edge'>>
	<</actCLA>>
	<<actCLA 'Walk to the fields (0:10)'>>
		<<set $time.minutes += 10>> <<gt 'gadfield' 'field'>>
	<</actCLA>>
	<<if $wardrobe.clothingworntype == 'danilovich_outfits' and $wardrobe.shoeworntype == 'danilovich' and $time.hour >= 6 and $time.hour < 22>>
		<<if $pc.pcs_energy >= 5 and $pc.pcs_stam >= $pc.stammax / 5>>
			<<actCLA 'Go for a run (1:00)'>>
				<<set $menu_off = 1>>
				<<gs 'exercise' 'tier1' 60 'run'>>
				<<if $time.month <= 3 or $time.month >= 11>>
					<<image "locations/gadukino/village/gadbeg4.jpg">>
				<<elseif $time.month == 9 or $time.month == 10 or $time.month == 4 or $time.month == 5>>
					<<image "locations/gadukino/village/gadbeg3.jpg">>
				<<else>>
					<<if $pc.muscularity >= $pc.salo>>
						<<image "locations/gadukino/village/gadbeg1.jpg">>
					<<else>>
						<<image "locations/gadukino/village/gadbeg2.jpg">>
					<</if>>
				<</if>>
				You run for an hour enjoying the scenery.
				<<act 'Finish'>>
					<<gt 'gadroad'>>
				<</act>>
			<</actCLA>>
		<<elseif $pc.pcs_stam >= $pc.stammax / 5>>
			<!-- FAILED TO CONVERT
				act 'Go for a run (1:00)': '<br><font color="red">You are so hungry you cannot face going for a run.</font>'
			-----
				<<actCLA 'Go for a run (1:00)'>>
				<<set ERROR: FAILED TO CONVERT LITERAL: """'<br><font color""" = ERROR: FAILED TO CONVERT LITERAL: """"red">You are so hungry you cannot face going for a run.<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>
			<</actCLA>>

			-->
			<<warn "CONVERSION ERROR 0cc5a3cc1b1b8aa1f9bd4d7c172ec66b">>
		<<else>>
			<!-- FAILED TO CONVERT
				act 'Go for a run (1:00)': '<br><font color="red">You are to exhausted to do this. Recover your stamina before trying to go for a run.</font>'
			-----
				<<actCLA 'Go for a run (1:00)'>>
				<<set ERROR: FAILED TO CONVERT LITERAL: """'<br><font color""" = ERROR: FAILED TO CONVERT LITERAL: """"red">You are to exhausted to do this. Recover your stamina before trying to go for a run.<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>
			<</actCLA>>

			-->
			<<warn "CONVERSION ERROR 2547b7e5750e5a472ceaedc66d06c3df">>
		<</if>>
	<<elseif ($wardrobe.clothingworntype != 'danilovich_outfits' or $wardrobe.shoeworntype != 'danilovich') and $time.hour >= 6 and $time.hour < 22>>
		You could go for a run here if you were wearing sports clothes and shoes.
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'drinking_invite'>>
	<<set $loc = 'gadroad'>>
	<<set $loc_arg = 'drinking_invite'>>
	<<set $location_type = 'secluded'>>
	<<set $menu_loc = 'gadroad'>>
	<<set $menu_arg = 'drinking_invite'>>
	<<set $menu_off = 1>>
	<<set $time.minutes += 5>>
	<<image "locations/gadukino/village/drunk.jpg">>
	You quickly catch up to the boys who have already started drinking.
	<!-- ! Sveta has never been drinking with Mitka before-->
	<<if getvar("$mitka_first_drink") == 1>>
		<p>Mitka is the first to greet you, "Hey $pc.name_nick, glad you decided to join us today!"</p>
		Kolyamba and Vasyan nod in agreement as they look you over.
		"We know this great spot in the woods to hang out. No one ever bothers us there."
	<<else>>
		<p>Mitka is the first to greet you, "Hey $pc.name_nick, glad you decided to join us today!"</p>
		Kolyamba and Vasyan nod in agreement as they look you over.
	<</if>>
	<p>Mitka asks, "Are you ready to go?"</p>
	<!-- ! if Sveta came here to kick off Miras quest then she cannot leave otherwise Sveta is free to decline the offer-->
	<<if $npc('A60').QW > 0 or (getvar("$MiraLoc") != 5 and $npc('A60').QW == 0)>>
		<<gs 'willpower' 'drink' 'resist'>>
		<<if $will_cost <= $pc.pcs_willpwr>>
			<<actCLA 'No thanks, not tonight. (will_cost Willpower)'>>
				<<gs 'willpower' 'drink' 'resist'>>
				<<gs 'willpower' 'pay' 'resist'>>
				<<gt 'gadroad'>>
			<</actCLA>>
		<<else>>
			<<actCLA `'No thanks, not tonight. ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
		<</if>>
	<</if>>
	<!-- ! if Sveta did not bring Mira with her and Mira has met the boys already then there is a 50% chance she will show up too-->
	<<if getvar("$MiraLoc") != 5 and $npc('A60').QW >= 1>>
		<<set $mirarand = rand(1,10)>>
		<<if getvar("$mirarand") >= 6>>
			<<set $MiraLoc = 5>>

		<</if>>
		Just as the words leave Mitka''s mouth, Mira comes bounding around the corner.
		<p>"Hey guys, thanks for the invite! $pc.name_nick is here, too, awesome! Let's go!"</p>
	<</if>>
	<!-- ! Mira is here and both her and Sveta are the town whores-->
	<!-- ! mitkabuh_group has the drinking events for group sex for 2 girls and 3 boys-->
	<<if getvar("$MiraLoc") == 5 and $npc('A60').QW >= 16 and getvar("$gadriver_gang") == 2>>
		<<actCLA 'Go with them'>>
			<<set $time.minutes += 15>> <<set $npc('A60').drunk = 0>> <<gt 'mitkabuh_group'>>
		<</actCLA>>
		<!-- ! Mira is here and neither or only 1 out 2 of them is the town whore-->
		<!-- ! mitkabuh has the drinking events for group sex for 1 girl and 3 boys or no sex at all if quest is not far enough along-->
	<<elseif getvar("$MiraLoc") == 5>>
		<<actCLA 'Go with them'>>
			<<set $time.minutes += 15>> <<set $npc('A60').drunk = 0>> <<gt 'mitkabuh'>>
		<</actCLA>>
		<!-- ! Mira is not here so Sveta goes by herself-->
	<<else>>
		<<actCLA 'Go with them'>>
			<<set $time.minutes += 15>> <<gt 'mitkabuh'>>
		<</actCLA>>
	<</if>>
<</if>>