glife/sugarcube/src/autogenerated/EfimovRA/billiard.tw

:: billiard
<<set $here = 'billiard'>>
<<set $ARGS = $location_var[$here]>>
<<set $sexloc = 'billiard'>>
<<set $menu_loc = 'billiard'>>
<<set $menu_arg = ''>>
<<set $menu_off = 0>>
<<set $location_type = 'public_indoors'>>
 <center><b>Pool</b></center>
<<image "locations/city/citycenter/mall/pool/bil.jpg">>
Quite a large billiard room, there are plenty of tables in the main hall, but there are some tables in individual cubicles.
<<act 'Leave'>>
	<<gt 'torgcentr'>>
<</act>>
<<if $time.hour >= 8 and $time.hour <= 20>>
	<<if $finances.cash >= 125>>
		<<actCLA 'Play (125 <b>₽</b>) (1:00)'>>
			<<set $menu_off = 1>>
			<<set $finances.cash -= 125>>
			<<set $time.minutes += 60>>
			<<set $billvar = 0>>
			<<run $pc.skillExperienceGain('pool',rand(0,3))>>
			<<set $billrand = rand(0,5)>>
			<<if getvar("$billrand") == 0>>
				You play one of the guys here and he asks if you want to make it more interesting.
				<<if $finances.cash >= 1000>>
					<<actCLA 'Bet on the game (1000 <b>₽</b>)'>>
	<<set $billvar = 0>> <<gt 'billiard' 'randwin'>>
<</actCLA>>

				<</if>>
				<<if getvar("$strapon") == 1>>
					<<actCLA 'Play for his ass, sex if you lose'>>
	<<set $billvar = 1>> <<gt 'billiard' 'randwin'>>
<</actCLA>>

				<</if>>
				<<actCLA 'Stick to practice games' undefined `{willpower:['anal','resist']}`>>
						
						
						<<gt 'billiard'>>
					<</actCLA>>
				
				<<actCLA 'Let him have the table instead'>>
					<<set $finances.cash += 125>>
					<<set $pool_exp -= rand(0,3)>>
					<<gt 'billiard'>>
				<</actCLA>>
			<<elseif getvar("$billrand") == 1>>
				You play a couple of the guys here and they ask if you want to make it more interesting.
				<<if $finances.cash >= 1000>>
					<<actCLA 'Bet on the game (1000 <b>₽</b>)'>>
	<<set $billvar = 0>> <<gt 'billiard' 'randwin'>>
<</actCLA>>

				<</if>>
				<<if getvar("$strapon") == 1>>
					<<actCLA 'Play for their asses, sex if you lose'>>
	<<set $billvar = 2>> <<gt 'billiard' 'randwin'>>
<</actCLA>>

				<</if>>
				<<gs 'willpower' 'anal' 'resist' 'hard'>>
				<<if $will_cost <= $pc.willpower>>
					<<actCLA 'Stick to practice games (will_cost Willpower)'>>
						<<gs 'willpower' 'anal' 'resist' 'hard'>>
						<<gs 'willpower' 'pay' 'resist'>>
						<<gt 'billiard'>>
					<</actCLA>>
				
				<<actCLA 'Let him have the table instead'>>
					<<set $finances.cash += 125>>
					<<set $pool_exp -= rand(0,3)>>
					<<gt 'billiard'>>
				<</actCLA>>
			<<elseif getvar("$billrand") >= 2>>
				You played billiards by yourself.
				<<act 'Leave'>>
					<<gt 'billiard'>>
				<</act>>
			<</if>>
		<</actCLA>>
	<</if>>
	<<if $finances.cash >= 250>>
		<<actCLA 'Play for money (250 <b>₽</b>)'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 60>>
			<<run $pc.skillExperienceGain('pool',rand(0,1))>>
			<<set $billvar = 3>>
			<<gt 'billiard' 'randwin'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'randwin'>>
	<<set $menu_off = 1>>
	<<if getvar("$pcs_pool") < 10>>
		<<set $billwin = rand(0, 10)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 10 and getvar("$pcs_pool") < 20>>
		<<set $billwin = rand(0, 12)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 20 and getvar("$pcs_pool") < 30>>
		<<set $billwin = rand(0, 14)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 30 and getvar("$pcs_pool") < 40>>
		<<set $billwin = rand(0, 16)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 40 and getvar("$pcs_pool") < 50>>
		<<set $billwin = rand(0, 18)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 50 and getvar("$pcs_pool") < 60>>
		<<set $billwin = rand(0, 20)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 60 and getvar("$pcs_pool") < 70>>
		<<set $billwin = rand(0, 22)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 70 and getvar("$pcs_pool") < 80>>
		<<set $billwin = rand(0, 24)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 80 and getvar("$pcs_pool") < 90>>
		<<set $billwin = rand(0, 26)>>

	<</if>>
	<<if getvar("$pcs_pool") >= 90>>
		<<set $billwin = rand(0, 28)>>

	<</if>>
	<<if getvar("$billwin") > 10 and getvar("$billvar") == 0>>
		<<set $finances.cash += 1000>>
		<p>You won and received 1,000 <b>₽</b>.</p>
		<<act 'Leave'>>
			<<gt 'billiard'>>
		<</act>>
	<<elseif getvar("$billwin") > 10 and getvar("$billvar") == 1>>
		 		<<image "locations/city/citycenter/mall/pool/sex/strapon.jpg">>
		You win, put your strapon, and look at the guy, "Well bend over, today you're my bitch."
		The guy drops his pants and bends over, you peg that butt.
		<<arouse 'anal_strap_give' 10 `['dom']`>>
		
		<<act 'Leave'>>
			<<gt 'billiard'>>
		<</act>>
	<<elseif getvar("$billwin") > 10 and getvar("$billvar") == 2>>
		<<image "locations/city/citycenter/mall/pool/sex/strapon.jpg">>
		You win, put your strapon, and look at the guys, "Come on girls panties down and asses up, now I'm going to fuck this whole harem."
		You fuck them all in turn.
		<<arouse 'anal_strap_give' 10 `['dom']`>>
		
		<<act 'Leave'>>
			<<gt 'billiard'>>
		<</act>>
	<<elseif getvar("$billwin") > 10 and getvar("$billvar") == 3>>
		<<set $finances.cash += 250>>
		<p>You won and received 250 <b>₽</b>.</p>
		<<act 'Get_Away'>>
			<<gt 'billiard'>>
		<</act>>
	<<elseif getvar("$billwin") <= 10 and getvar("$billvar") == 0>>
		<<set $finances.cash -= 1000>>
		<p>You lost and paid 1,000 <b>₽</b>.</p>
		<<act 'Leave'>>
			<<gt 'billiard'>>
		<</act>>
	<<elseif getvar("$billwin") <= 10 and getvar("$billvar") == 1>>
		You lose, open those legs.
		<<set $picrand = 16>>
		<<actCLA 'Pay'>>
			<<xgt 'sex' 'var'>>
		<</actCLA>>
	<<elseif getvar("$billwin") <= 10 and getvar("$billvar") == 2>>
		You lose, open those legs.
		<<set $sex.npcId to null>>
		<<gs 'npcgeneratec' 0 'Billiard Player' `rand(18,40)`>>
		
		<<gs 'npcgeneratec' 0 'Billiard Player' `rand(18,40)`>>
		<<gs 'boyStat' $npclastgenerated '1'>>
		<<gs 'npcgeneratec' 0 'Billiard Player' `rand(18,40)`>>
		<<gs 'boyStat' $npclastgenerated '2'>>
		<<set $picrand = 12>>
		<<act 'Pay'>>
			<<gt 'paysex' 'var'>>
		<</act>>
	<<elseif getvar("$billwin") <= 10 and getvar("$billvar") == 3>>
		<<set $finances.cash -= 300>>
		<p>You lost and paid 300 <b>₽</b>.</p>
		<<act 'Leave'>>
			<<gt 'billiard'>>
		<</act>>
	<<else>>
		<<set $finances.cash -= 300>>
		<p>You lost and paid 300 <b>₽</b>.</p>
		<<act 'Leave'>>
			<<gt 'billiard'>>
		<</act>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'start'>>
	<<set $menu_loc = 'billiard'>>
	<<set $menu_arg = 'start'>>
	<<set $menu_off = 0>>
	<center><b>Pool</b></center>
	<<image "locations/city/citycenter/mall/pool/bil.jpg">>
	<<act 'Leave'>>
		<<gt 'billiard'>>
	<</act>>
<</if>>