glife/sugarcube/src/autogenerated/unsorted/Komp.tw

:: komp
<<set $here = 'komp'>>
<<set $ARGS = $location_var[$here]>>
<!-- !2021/04/26-->
<<if $location_var[$here][0] == 'start'>>
	<<set $account_used to null>>
	<!-- !! This is stupid, if Sveta uses the library computer or Artem's computer, her electricity bill won't go up-->
	<!-- !!elektro += 5-->
	<<image "pc/items/accessories/computer/komp.jpg">>
	Your computer boots up, and soon you're looking at your operating system''s main screen.
	<<actCLA 'Shut your computer down'>>
		<<set $subs to null>>
		<<set $access to null>>
		<<gt 'komp' 'fin'>>
	<</actCLA>>
	<<actCLA 'Play Solitaire (0:20)'>>
		<<gt 'komp' 'pasians'>>
	<</actCLA>>
	<<if getvar("$AlbinaQW['flashdrive']") == 1>>
		<<if $loc == 'dachain' or $loc == 'sitr' or $loc == 'bedr' or $loc == 'bedr2x' or ($loc == 'uni_dorm' and $loc_arg == 'dorm_room') or ($loc == 'city_mansion_residence_2' and $loc_arg == 'yoffice') or ($loc == 'pav_shared_apt' and $loc_arg == 'pcsRoom') or ($loc == 'mey_home' and $loc_arg == '3') or ($loc == 'city_house_res_misc' and $loc_arg == 'livroom') or $loc == 'nichBedroomServant' or (getvar("$locat['Anya_inroom']") == 0 and $loc == 'bedrPar')>>
			<<actCLA 'Check Albina`s flash drive'>>
				<<gt 'albina_house_events' 'flash_drive'>>
			<</actCLA>>
		<</if>>
	<</if>>
	<<if getvar("$GameCD") > 0>>
		<<actCLA 'Play Disopl'>>
	<<gt 'KGDstart'>>
<</actCLA>>

	<</if>>
	<<if getvar("$GameCD2") > 0>>
		<<actCLA 'Play Sunset Dead'>>
	<<gt 'KGZstart'>>
<</actCLA>>

	<</if>>
	<<if getvar("$GameCD3") > 0>>
		<<actCLA 'Play Albido'>>
	<<gt 'FSstart'>>
<</actCLA>>

	<</if>>
	<!-- !!act 'SunReview of the Dead': gt 'KGZstart'-->
	<!-- !! If the access uses one of the home connections (i.e. Sveta is at home, or in a location that she owns)-->
	<!-- !! and the 'internet_enabled' value is 1, the Sveta is paying utlities.-->
	<!-- !! Now electricity can go up - but by 5???-->
	<<set $elektro += 5>>
	<!-- !! Only because subscription[$subs] is easier to type than subscription[$access[''subscription'']]-->
	<<set $subs = $access['subscription']>>
	<!-- !! Any location that calls 'komp', 'start' has to set up $access.-->
	<!-- !! $access includes the subscription/conection used, and limitations like 'noporn' and 'nocamshow'-->
	<!-- !! arrived here from mobile net.-->
	<!-- !! Sveta can access the internet if > 0-->
	<<if getvar("$subscription["+$subs+"]") > 0>>
		<<if getvar("$access['metered']") == 0>>
			<<actCLA 'Browse the internet'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<<else>>
			<<actCLA 'Browse the internet - You have subscription['+$subs]+' minutes of access left'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<</if>>
	<<else>>
		You don't have internet access here, and you don't even have mobile internet.
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'browse'>>
	<<set $menu_off = 0>>
	<<actCLA 'Close the browser'>>
		<<gt 'komp' 'start'>>
	<</actCLA>>
	<!-- !! TODO: Update-->
	<!-- !! check if the original account still valid?-->
	<!-- !! if account_used > 0-->
	<!-- !! There are 3 ways this can happen during the use of the inernet:-->
	<!-- !!  1. Sveta is using a minute based internet and ran out of minutes.-->
	<!-- !!  2. Sveta is using a subscription, she didn''t have enough money to pay the monthly fee, grace period expired and-->
	<!-- !!		the interned service has been cut off-->
	<!-- !!  3. Sveta is using a free internet and something went really, really wrong that set subscription[''free''] to 0.-->
	<<if getvar("$subscription["+$subs+"]") < 1>>
		<center><b>Browser</b></center>
		<<image "pc/items/accessories/computer/eror.jpg">>
		'You have no internet access, '+iif(access['metered'], ' you have to buy more minutes.', ' maybe you forgot to pay the internet bill?')
		<<if getvar("$camwhore") == 1 and getvar("$access['nocamshow']") == 0 and getvar("$webcamera") == 1>>
			Since MyFreeCams will cover the cost, you can still log on to do a cam show.
			<<actCLA 'Go to MyFreeCams.org'>>
				<<gt 'komp' 'mfc'>>
			<</actCLA>>
		<</if>>
	<<else>>
		<<image "pc/items/accessories/computer/komp.jpg">>
		<<if $access['general-text'] == 1>>
			<center><h4 style="color: red;"><b><<$access[''general-text'']>></b></h4></center>

		<</if>>
		You go to your favourite start page, while you try to decide on what you want to see right now.
		A blinking banner for a <<link "Kirsanova Real Estate Agency">><<gt 'komp' 'agent'>><</link>> keeps popping up in the corner.
		<<if func('homes_properties', 'is_property_of_status', 'owned', 'city_apartment') and getvar("$husband") == 0>>
			<<actCLA 'Rent your apartment out'>>
	<<gt 'komp' 'sale'>>
<</actCLA>>

		<</if>>
		<<if getvar("$access['noporn']") == 0>>
			<<actCLA 'Watch porn'>>
	<<gt 'komp' 'porno'>>
<</actCLA>>

		<</if>>
		<<actCLA 'Browse a dating website (1:00)'>>
			<<gt 'komp' 'znak'>>
		<</actCLA>>
		<<if $time.hour < 20 and $time.hour > 7>>
			<<if $wardrobe.clothingworntype == 'nude'>>
				You need to be dressed before searching jobs.
			<<else>>
				<<actCLA 'Look for a job online'>>
					<<gt 'komp' 'rabota'>>
				<</actCLA>>
			<</if>>
		<</if>>
		<<actCLA 'Search for cable TV services (1:00)'>>
			<<gt 'komp' 'kabtv'>>
		<</actCLA>>
		<<actCLA 'Play an online game'>>
			<<gt 'KGstart'>>
		<</actCLA>>
		<<if getvar("$fuckornot") == 3>>
			<<actCLA 'Visit 'Fuckable or not' site'>>
	<<set $view_location = 'komp`>> <<gt `komp` `fuckornot'>>
<</actCLA>>

		<</if>>
		<<if getvar("$hotornot") >= 2>>
			<<actCLA 'Visit 'Hot or not' site'>>
	<<set $view_location = 'komp`>> <<gt `komp` `hotornot'>>
<</actCLA>>

		<</if>>
		<!-- !!if bankAccount > 0: act 'Visit your bank, maybe to purchase more online time': gt 'komp', 'bank'-->
		<<if getvar("$shantfoto") > 0>>
			<<actCLA 'Find the girl you took photos of in the park on "Assbook"'>>
	<<gt 'komp' 'foto'>>
<</actCLA>>

		<</if>>
		<<if getvar("$gor_dorm") == 7>>
			<<actCLA 'Read letter from Eugene'>>
	<<gt 'etoexhib' 'pos91'>>
<</actCLA>>

		<</if>>
		<<if getvar("$camwhore") == 1 and getvar("$access['nocamshow']") == 0 and getvar("$webcamera") == 1>>
			<<actCLA 'Go to MyFreeCams.org'>>
	<<gt 'komp' 'mfc'>>
<</actCLA>>

		<</if>>
		<<if (mid($start_type,1,2) == 'sg' and getvar("$SchoolAtestat") == 0) or func('uniutil', 'student', 'enrolled')>>
			<<actCLA 'Spend time studying'>>
	<<gt 'komp' 'study'>>
<</actCLA>>

		<</if>>
		<<if getvar("$sucpcinfo") == 0 and getvar("$succubxp") > 0>>
			<<actCLA 'Research the strange feelings you`ve been having'>>
	<<gt 'succubus' 'kompresearch'>>
<</actCLA>>

		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'sale'>>
	<!-- !! TODO: Update time and internet-->
	<!-- !! IMPORTANT: What happens if an activity takes more time than the minutes Sveta has? We just say "You tried, but could not finish"?-->
	<<if $access['metered'] and getvar("$subscription["+$subs+"]") < 15>>
		<p>You check the website, but realise that subscription[$subs] minutes won't be enough to fill out all the forms.</p>
	<<else>>
		<<set $time.minutes += 30>>
		<<set $elektro += 3>>
		<<gs 'internet_mobile' 'use_internet' $subs 30>>
		<<image "pc/items/accessories/computer/komp.jpg">>
		You go to a popular website where people can post advertisements for free. You could post an advertisement here.
		<<if getvar("$obkvsdam") >= 1 and func('homes_properties', 'property_status', 'city_apartment') == 2>>
			You placed an advertisement to rent out your apartment. You should probably check every once in a while to see if anyone responded.

		<</if>>
		<<if getvar("$obkvsdam") == 0 and func('homes_properties', 'property_status', 'city_apartment') == 2>>
			<<actCLA 'Rent out your city residential apartment'>>
				<<set $obkvsdam = 1>> <<gt 'komp' 'sale'>>
			<</actCLA>>
		<<elseif getvar("$obkvsdam") > 0>>
			<<actCLA 'Check if you got any replies'>>
				<<if getvar("$obkvsdam") == 1>>
					No one has responded to your offer to rent out your apartment just yet.
				<<elseif getvar("$obkvsdam") > 1>>
					<<set $predsum = 14000 + ($obkvsdam * 1000)>>
					<p>Someone wants to stay in your apartment for a month! They're offering you predsumm <b>₽</b> in cash.</p>
					<<actCLA 'Accept the offer'>>
						<<gs 'homes_properties' 'tenants_move_in' 'city_apartment' iif(month + 1 > 12, 1, month + 1) MIN(day, monthsEnd[$tenant_endmonth])>>
						<<set $finances.bank += $predsumm>>
						<<gt 'komp' 'start'>>
					<</actCLA>>
					<<set $predsum to null>>
				<</if>>
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
	<</if>>
	<<actCLA 'Leave this website'>>
		<<gt 'komp' 'browse'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'porno'>>
	<<if getvar("$subscription["+$subs+"]") < 1>>
		<center><b>Browser</b></center>
		<<image "pc/items/accessories/computer/eror.jpg">>
		'You have no internet access, '+iif(access['metered'], ' you have to buy more minutes.', ' maybe you forgot to pay the internet bill?')
		<<actCLA '<B>Close the browser</B>'>>
			<<gt 'komp' 'start'>>
		<</actCLA>>
	<<elseif getvar("$access['noporn']") == 1>>
		<<image "pc/items/accessories/computer/komp.jpg">>
		<<$access[''noporn'']>>
		<<actCLA 'Leave this website'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<<else>>
		<<image "pc/items/accessories/computer/komp.jpg">>
		You go to a porn site and browse for a few minutes, trying to find a hot video.
		<<actCLA 'Watch porn'>>
			<<set $elektro += 3>>
			<<set $pc.mood += rand(10, 20)>>
			<<set $time.minutes += 30>>
			<<gs 'internet_mobile' 'use_internet' $subs 30>>
			<<image "pc/items/accessories/computer/porno.jpg">>
			You find a video you think you''d enjoy, and spend some time watching it. Wow, that girl is so lucky...
			<<arouse 'porn' 30 >>
			<<set $time.minutes -= 30>>
			<<actCLA 'The video ends...'>>
				<<gt 'komp' 'porno'>>
			<</actCLA>>
		<</actCLA>>
		<<if $pc.horny >= 50>>
			<<actCLA 'Masturbate'>>
	<<gt 'komp' 'masturbate'>>
<</actCLA>>

		<</if>>
		<<actCLA 'Leave this website'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'masturbate'>>
	<!-- !! needs this because can arrive here from this code block and time can be gone-->
	<<if getvar("$subscription["+$subs+"]") < 1>>
		'You have no internet access, '+iif(access['metered'], ' you have to buy more minutes.', ' maybe you forgot to pay the internet bill?')
	<<else>>
		<<gs 'sweat' 'add' 10>>
		<<if getvar("$divanmastr") == 0>>
			<<set $divanmastr = 1>>
			<<if $pc.pcs_inhib < 30>>
				<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>

			<</if>>
		<</if>>
		<<image "pc/items/accessories/computer/kompmas.jpg">>
		You get comfortable in front of your computer and with one hand begin to fondle your breasts, while you click on a link to something really dirty.
		You let go of the mouse and start rubbing your pussy, imagining you're the woman in the video. The fantasy and your touching are getting you all hot and bothered.
		<<arouse 'clit_finger' 30 `['masturbate']`>>
		<<set $time.minutes -= 30>>
		<<if $pc.horny >= 100>>
			<<set $orgasm_or = 'yes'>>
			<<set $orgasm_txt = 'Suddenly your muscles tighten and you cum powerfully, while you stifle your moans so your neighbours won`t find out. Afterwards, you have goosebumps all over your skin. That was just what you needed!'>>
			<<arouse 'clit_finger' -1 `['masturbate']`>>
		<</if>>
		<<actCLA 'Stop masturbating'>>
			<<set $divanmastr = 0>> <<gt 'komp' 'porno'>>
		<</actCLA>>
		<<arousalEnd>>
		<<if $pc.horny >= 50>>
			<<actCLA 'Masturbate some more'>>
	<<gt 'komp' 'masturbate'>>
<</actCLA>>

		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'pasians'>>
	<<set $time.minutes += 20>>
	<<set $elektro += 3>>
	<<set $pc.mood += rand(10, 20)>>
	<<image "pc/items/accessories/computer/komp.jpg">>
	You entertain yourself for about twenty minutes, playing a game of solitaire on the computer.
	<<actCLA 'Play for another 20 minutes'>>
		<<gt 'komp' 'pasians'>>
	<</actCLA>>
	<<actCLA 'Return to desktop'>>
		<<gt 'komp' 'start'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'znak'>>
	<<set $time.minutes += 30>>
	<<set $pc.mood += 5>>
	<<set $elektro += 3>>
	<<gs 'internet_mobile' 'use_internet' $subs 30>>
	<<image "pc/items/accessories/computer/komp.jpg">>
	You enter a dating site, and immediately see all sorts of profiles of both men and women.
	<p>The guys on this site are rather cute! If you're single, you could try contacting one. Who knows, maybe you'll meet the man of your dreams through here!</p>
	<<if getvar("$gor_dorm") == 8>>
		<<actCLA 'Pick someone suitable for Eugenia'>>
			<<set $gor_dorm = 9>>
			You click through dozens of profiles, before choosing a guy who you think would be a good match for Eugenia. You send him a message, asking if he wants to meet up somewhere.
			<p>Now the waiting game begins! Let's hope you picked a nice guy for her...</p>
			<<actCLA 'Leave this website'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<</actCLA>>
		<!-- !! Eligible homes: 1, 2, 3, 4, 5, 7 , 10, 11, 15-->
	<<elseif $home['type'] != 'permanent_residence'>>
		<<set $pc.mood += rand(5, 10)>>
		You spend time looking at the various profiles, but it won''t let you register unless you have your own home and it is set as your current home.
		Still, some of the pictures were quite raunchy and the more desperate profiles were really funny.
	<<else>>
		<<if getvar("$pcs_lover") < 3>>
			<<actCLA 'Look for a kind man'>>
				<<gs 'boy'>>
				<<gs 'boyfrend' 'start'>>
				<<setinit $haraklover[$lover_number] = 0>>
				<p>You find a guy named $loverdesc[$lover_number], and send him your number after checking out his profile. You hope he will call you!</p>
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
			<<actCLA 'Look for a normal guy'>>
				<<gs 'boy'>>
				<<gs 'boyfrend' 'start'>>
				<<setinit $haraklover[$lover_number] = 1>>
				<p>You find a guy named $loverdesc[$lover_number], and send him your number after checking out his profile. You hope he will call you!</p>
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
			<<actCLA 'Look for a strong man'>>
				<<gs 'boy'>>
				<<gs 'boyfrend' 'start'>>
				<<setinit $haraklover[$lover_number] = 2>>
				<p>You find a guy named $loverdesc[$lover_number], and send him your number after checking out his profile. You hope he will call you!</p>
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
	<</if>>
	<<actCLA 'Leave this website'>>
		<<gt 'komp' 'browse'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'kabtv'>>
	<<set $time.minutes += 5>>
	<<set $elektro += 3>>
	<<gs 'internet_mobile' 'use_internet' $subs 5>>
	<<image "pc/items/accessories/computer/komp.jpg">>
	<p>You check out the website of the local cable TV provider. A subscription for cable TV costs 300 <b>₽</b> per month, payable on the 25th.</p>
	<p></p>
	<<if getvar("$kabel") == 1>>
		You currently have a cable subscription for your TV.
		<<actCLA 'Cancel your cable subscription (300 <b>₽</b>)'>>
			<<set $kabel = 0>>
			<<set $finances.bank -= 300>>
			<<msg 'Your subscription has been cancelled and you can no longer watch the extra channels. The cable firm charges a one-time fee of 300 <b>₽</b> for disconnecting you.'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<<elseif getvar("$kabel") == 0 and getvar("$TV") == 1>>
		You currently do not have a cable subscription for your TV.
		<<actCLA 'Get cable services for your TV'>>
			<<msg 'Unfortunately your TV is too old and crap for cable. You""ll have to get a modern TV first.'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<<elseif getvar("$kabel") == 0 and getvar("$TV") >= 2>>
		You currently do not have a cable subscription for your TV.
		<<actCLA 'Get cable services for your TV (300 <b>₽</b> per month)'>>
			<<set $kabel = 1>>
			<<set $time.minutes += 10>>
			<<gs 'internet_mobile' 'use_internet' $subs 10>>
			<<msg 'Soon after you fill out the form, you get a confirmation message that your sign-up was successful. You should have the extra channels on your TV now.'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<<else>>
		<p>You don't even have a TV!</p>
		<<actCLA 'Leave this website'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<</if>>
	<<actCLA 'Leave this website'>>
		<<gt 'komp' 'browse'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'foto'>>
	<<if getvar("$subscription["+$subs+"]") < 1>>
		<center><b>Browser</b></center>
		<<image "pc/items/accessories/computer/eror.jpg">>
		'You have no internet access, '+iif(access['metered'], ' you have to buy more minutes.', ' maybe you forgot to pay the internet bill?')
		<<actCLA '<B>Close the browser</B>'>>
			<<gt 'komp' 'start'>>
		<</actCLA>>
	<<else>>
		<<image "pc/items/accessories/computer/komp.jpg">>
		<p>You're currently on Russia's biggest social network site, "Assbook". Almost everyone has an account here, probably including the girl you took that photo of the other day!</p>
		<p>"Maybe if I can find her, I can blackmail her", you think to yourself. "This photo is very raunchy, after all... I bet she would hate to see it published, if she's important!"</p>
		<p>You can't help but rub your pussy every now and then while you look at it. You'll probably keep a copy of this for yourself, either way!</p>
		<<if getvar("$shantfoto") > 0>>
			<<actCLA 'Try to find out who she is (1:00)'>>
				<<set $time.minutes += 60>>
				<<set $elektro += 6>>
				<<gs 'internet_mobile' 'use_internet' $subs 60>>
				<<set $fotsearchrand = rand(0,10)>>
				<<if getvar("$fotsearchrand") <= 7>>
					Despite your best efforts, you don't manage to find the girl this time.
					<<actCLA 'Go back to the "Assbook" main page'>>
						<<gt 'komp' 'foto'>>
					<</actCLA>>
				<</if>>
				<<if getvar("$fotsearchrand") > 7>>
					<<set $shantfoto -= 1>>
					<p>Despite your best efforts, you don't manage to... wait, that's her! You found her!</p>
					<<set $gerofotorand = rand(0,100)>>
					<<if getvar("$gerofotorand") > 30>>
						Your dreams of making a fortune are quickly shattered when you check out her profile. Cheap clothes, few friends, lives in a poor district of the city... this girl is not worth blackmailing.
						<<actCLA 'Go back to the "Assbook" main page'>>
							<<gt 'komp' 'foto'>>
						<</actCLA>>
					<</if>>
					<<if getvar("$gerofotorand") >= 5 and getvar("$gerofotorand") <= 30>>
						<<set $shantsr += 1>>
						When you click through her profile, you estimate she's an unknown middle class girl. Still, she has a lot of friends and the outfits she's wearing in her photos look stylish... she has money to spend.
						<p>"Why not make her spend some of it on me?" you laugh to yourself, and begin to write a private message.</p>
						<p>You send her a copy of the photo with the private message, and tell her to transfer a very modest amount of 5,000 <b>₽</b> to your bank account. If she doesn't want that photo to be sent to her entire friends list (which you secured before sending the message), the money needs to be on your bank account within 48 hours.</p>
						<<actCLA 'Go back to the "Assbook" main page'>>
							<<gt 'komp' 'foto'>>
						<</actCLA>>
					<</if>>
					<<if getvar("$gerofotorand") < 5>>
						<<set $shantbog += 1>>
						<p>You can barely believe it when you read her profile, this girl is a celebrity! It would be a major scandal if this photo got published!</p>
						<p>You send her a copy of the photo with a private message, telling her to transfer 30,000 <b>₽</b> to your bank account. If she doesn't want that photo to be sent to the press, the money needs to be on your bank account within 48 hours.</p>
						<<actCLA 'Go back to the "Assbook" main page'>>
							<<gt 'komp' 'foto'>>
						<</actCLA>>
					<</if>>
				<</if>>
			<</actCLA>>
		<</if>>
		<<actCLA 'Leave this website'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'rabota'>>
	<<if getvar("$subscription["+$subs+"]") < 1>>
		<center><b>Browser</b></center>
		<<image "pc/items/accessories/computer/eror.jpg">>
		'You have no internet access, '+iif(access['metered'], ' you have to buy more minutes.', ' maybe you forgot to pay the internet bill?')
		<<actCLA '<B>Close the browser</B>'>>
			<<gt 'komp' 'start'>>
		<</actCLA>>
	<<else>>
		<<set $time.minutes += 30>>
		<<set $elektro += 3>>
		<<gs 'internet_mobile' 'use_internet' $subs 30>>
		<<set $komprabota = rand(0, 10)>>
		<<if $loc == 'vasilyhome'>>
			<<set $komprabota = rand(5, 15)>>

		<</if>>
		<<image "pc/items/accessories/computer/komp.jpg">>
		<<if getvar("$komprabota") == 0 and getvar("$gorodokkomp") == 0>>
			<p>You find a job vacancy, on a legit looking website. It reads: "Wanted! <b>URGENTLY!</b> Female underwear model, for a photoshoot. Pay: 2000 <b>₽</b> cash."</p>
			The description explains that they need someone today. If you decide to take this job, you will have to shut down your computer and go there right away.
			<<if $pc.pcs_apprnc < 120>>
				You consider it for a moment, but decide against it. You're probably not pretty enough to be an underwear model.
			<<elseif $pc.pcs_apprnc >= 120>>
				<<actCLA 'Accept the job and go there'>>
					<<gt 'qjob' 'var1'>>
				<</actCLA>>
			<</if>>
			<<if $time.hour < 20 and $time.hour > 7>>
				<<actCLA 'Search for more jobs'>>
	<<gt 'komp' 'rabota'>>
<</actCLA>>

			<</if>>
			<<actCLA 'Leave this website'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<<elseif getvar("$komprabota") == 1 and getvar("$gorodokkomp") == 0>>
			<p>You find a job vacancy, on a legit looking website. It reads: "Wanted! <b>URGENTLY!</b> Female underwear model, for a photoshoot. Pay: 2000 <b>₽</b> cash."</p>
			The description explains that they need someone today. If you decide to take this job, you will have to shut down your computer and go there right away.
			<<if $pc.pcs_apprnc < 120>>
				You consider it for a moment, but decide against it. You're probably not pretty enough to be an underwear model.
			<<elseif $pc.pcs_apprnc >= 120>>
				<<actCLA 'Accept the job and go there'>>
					<<gt 'qjob' 'var2'>>
				<</actCLA>>
			<</if>>
			<<if $time.hour < 20 and $time.hour > 7>>
				<<actCLA 'Search for more jobs'>>
	<<gt 'komp' 'rabota'>>
<</actCLA>>

			<</if>>
			<<actCLA 'Leave this website'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<<elseif getvar("$komprabota") > 1 and getvar("$komprabota") < 5 and getvar("$gorodokkomp") == 0>>
			<p>You find a job vacancy, on a legit looking website. It reads: "Wanted! <b>URGENTLY!</b> Good looking female model, posing for artwork. Must be able to stand still in one pose for a long time. Pay: 1000 <b>₽</b> cash."</p>
			The description explains that they need someone today. If you decide to take this job, you will have to shut down your computer and go there right away.
			<<if $pc.pcs_apprnc < 60>>
				You consider it for a moment, but decide against it. You're probably not pretty enough to be a model.
			<<elseif $pc.pcs_apprnc >= 60>>
				<<actCLA 'Accept the job and go there'>>
					<<gt 'qjob' 'var3'>>
				<</actCLA>>
			<</if>>
			<<if $time.hour < 20 and $time.hour > 7>>
				<<actCLA 'Search for more jobs'>>
	<<gt 'komp' 'rabota'>>
<</actCLA>>

			<</if>>
			<<actCLA 'Leave this website'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<<elseif getvar("$komprabota") > 4 and getvar("$komprabota") < 8 and getvar("$camwhore") == 0>>
			<p>You find a job vacancy, on a legit looking website. It reads: "Wanted! Webcam models. Flexible working hours. Click for more info."</p>
			<<actCLA 'Gather more information'>>
				<<set $time.minutes += 5>>
				<<set $elektro += 1>>
				<<gs 'internet_mobile' 'use_internet' $subs 5>>
				<<image "pc/items/accessories/computer/camwhore1.jpg">>
				You click the button and get taken to the full job description.
				<i>For this job, you will have to expose your body in front of customers, fulfilling their wishes. Payment is completely based on a tip system: customers on the website can buy tokens, which they can use to tip girls they enjoy watching.
				The website will cover all costs during your shows. But how much money you make is up to you: the better you are at attracting viewers, and the more you are willing to do to please them, the more likely they will be to tip you.
				After a quick verification, you usually get paid immediately after a session ends. The tokens you earn will be converted to rubles, and paid to your bank account right away.
				The website hides your stream for viewers from your region, so the chance of being recognized by someone you know in real life is very low.
				If you're interested in becoming a webcam girl, please fill in this questionnaire below.</i>
				<<if $finances.hasBankAccount == 0>>
					You need a valid bank account to be able to register for this job.
				<<else>>
					<<if $pc.pcs_inhib >= 40 or getvar("$exhibitionist_lvl") > 1 or ($pc.pcs_inhib >= 35 and getvar("$exhibitionist_lvl") > 0)>>
						<<actCLA 'Fill in the questionnaire'>>
							<<set $camwhore = 1>>
							<<set $mfcclients = 0>>
							<<set $camclients = 0>>
							<<set $mfccum = 0>>
							<<set $time.minutes += 20>>
							<<image "pc/items/accessories/computer/camwhore2.jpg">>
							<<if $pcs_webcamname == ''>>
								You consider which name you''d like to register under.
								<<set $pcs_webcamname = input("Which name would you like to use? (Leave blank for <<$pc.name_nick>>)")>>
								<<if $pcs_webcamname == ''>>
									<<set $pcs_webcamname = '$pc.name_nick'>>

								<</if>>
							<</if>>
							You fill out the questionnaire and register yourself as a webcam model. Ten minutes later, you have already been approved and you can now earn money as a webcam girl.
							<p>Of course, you will need a functioning webcam to do this! If you don't have one yet, they are fairly cheap to buy at most local supermarket chains.</p>
							<<actCLA 'Leave this website'>>
								<<gt 'komp' 'browse'>>
							<</actCLA>>
						<</actCLA>>
						<<actCLA 'Leave this website'>>
							<<gt 'komp' 'browse'>>
						<</actCLA>>
					<<else>>
						You don't feel comfortable showing off your body in this way.
					<</if>>
				<</if>>
				<<if $time.hour < 20 and $time.hour > 7>>
					<<actCLA 'Search for more jobs'>>
	<<gt 'komp' 'rabota'>>
<</actCLA>>

				<</if>>
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
		<<else>>
			Unfortunately, you do not find any jobs you would consider doing.
			<<if $time.hour < 20 and $time.hour > 7>>
				<<actCLA 'Search for more jobs'>>
	<<gt 'komp' 'rabota'>>
<</actCLA>>

			<</if>>
			<<actCLA 'Leave this website'>>
				<<gt 'komp' 'browse'>>
			<</actCLA>>
		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'study'>>
	<<set $time.minutes += 30>>
	<<set $elektro += 3>>
	<<gs 'internet_mobile' 'use_internet' $subs 30>>
	<<run $pc.skillExperienceGain('intelligence',1 + (mentats_dose - rand(0,mentats_dose)))>>
	<<run $pc.skillExperienceGain('computer',1)>>
	<center><b>The Institute for Education Measurement</b></center>
	<<image "pc/items/accessories/computer/study.jpg">>
	You spend an hour on the IEM website, reading news articles and educational blogs. You feel a bit smarter afterwards.
	<<actCLA 'Leave this website'>>
		<<gt 'komp' 'browse'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'agent'>>
	<<set $time.minutes += 30>>
	<<set $elektro += 3>>
	<<gs 'internet_mobile' 'use_internet' $subs 30>>
	<<gs 'housing' 'rent'>>
	<<gs 'housing' 'sale'>>
	<center><b>Kirsanova Real Estate Agency</b></center>
	<<image "pc/items/accessories/computer/agent.jpg">>
	You're currently at the website of the largest real estate agency in the area, Kirsanova Real Estate Agency.
	<br>The website shows they have apartments available for rent or purchase in various areas, both in and out of the city. Renting or purchase requires you visit the agency in the city center to fill an application and collect the keys. Rent on all properties is deducted every month on the 25th.
	<b>Property listing</b>:
	<<if func('homes_properties', 'is_property_of_status', 'rented', 'city_apartment')>>
		<<if func('homes_properties', 'get_rent_days', 'city_apartment') > 0>>
			You have <B><<func(''homes_properties'', ''get_rent_days'', ''city_apartment'')>> days</B> remaining on the rental of your St. Petersburg apartment.
		<</if>>
		<<if $finances.bankAvailable >= func('homes_properties', 'get_rent_amount', 'city_apartment')>>
			<<actCLA 'Pay rent on St. Petersburg'>>
				<<gs 'homes_properties' 'pay_rent' 'city_apartment' 'card'>>
				After a very simple procedure, you can now call an apartment in the city residential district home for another month. You have <B><<func(''homes_properties'', ''get_rent_days'', ''city_apartment'')>> days</B> remaining on the rental of your apartment.
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
	<<elseif func('homes_properties', 'has_access', 'city_apartment') == 0>>
		There is an apartment in St. Petersburg residental area available, for rent or puchase.
		<p>Rent is: func('homes_properties', 'get_rent_amount', 'city_apartment')<b>₽</b> per month. Current sale price is listed at: func('homes_properties', 'get_property_sales_price', 'city_apartment') <b>₽</b>.</p>
	<</if>>
	<<if func('homes_properties', 'has_access', 'village_cottage') == 0>>
		There is a holiday cottage with an adjacent allotment in the communal village for sale.
		<p>Current sale price is listed at: func('homes_properties', 'get_property_sales_price', 'village_cottage') <b>₽</b>.</p>
	<</if>>
	<<if func('homes_properties', 'is_property_of_status', 'rented', 'old_town_apartment')>>
		<<if func('homes_properties', 'get_rent_days', 'old_town_apartment') >= 0>>
			You have <B><<func(''homes_properties'', ''get_rent_days'', ''old_town_apartment'')>> days</B> remaining on the rental of your Pushkin apartment.
		<</if>>
		<<if $finances.bankAvailable >= func('homes_properties', 'get_rent_amount', 'old_town_apartment')>>
			<<actCLA 'Pay rent on Pushkin'>>
				<<gs 'homes_properties' 'pay_rent' 'old_town_apartment' 'card'>>
				After a very simple procedure, you can now call an apartment in Pushkin home for another month. You have <B><<func(''homes_properties'', ''get_rent_days'', ''old_town_apartment'')>> days</B> remaining on the rental of your apartment.
				<<actCLA 'Leave this website'>>
					<<gt 'komp' 'browse'>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
	<<elseif func('homes_properties', 'has_access', 'old_town_apartment') == 0>>
		There is an apartment in Pushkin area (Old Town) available to rent.
		<p>Rent is: func('homes_properties', 'get_rent_amount', 'old_town_apartment')<b>₽</b> per month.</p>
	<</if>>
	<<if func('homes_properties', 'has_access', 'matryona_mansion') == 0>>
		There is a plot in the suburbs available for puchase, with planning permission for a mansion.
		<p>Current sale price is listed at: func('homes_properties', 'get_property_sales_price', 'matryona_mansion') <b>₽</b>.</p>
	<</if>>
	<<actCLA 'Leave this website'>>
		<<gt 'komp' 'browse'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'mfc'>>
	<<gs 'family_schedule'>>
	<<if getvar("$mesec") > 0>>
		<<set $time.minutes += 2>>
		<<set $topmfc = 1>>
		<<set $backmfc = 1>>
		<<set $tokens = 0>>
		<<set $camclients = 0>>
		<<gs 'internet_mobile' 'use_internet' $subs 2>>
		<<image "pc/items/accessories/computer/camwhore2.jpg">>
		<p>It's that time of the month! You feel sick to your stomach and the cramps hurt pretty badly from time to time... you're in no condition to earn money showing off your body.</p>
		<<actCLA 'Leave this website'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<<elseif getvar("$access['nocamshow']") == 1>>
		<<set $time.minutes += 2>>
		<<set $topmfc = 1>>
		<<set $backmfc = 1>>
		<<set $tokens = 0>>
		<<set $camclients = 0>>
		<<gs 'internet_mobile' 'use_internet' $subs 2>>
		<<image "pc/items/accessories/computer/camwhore2.jpg">>
		<<$access[''nocamshow'']>>
		<<actCLA 'Leave this website'>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<<else>>
		<<actCLA 'Go to your MFC homepage'>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<image "pc/items/accessories/computer/camwhore3.jpg">>
			You enter your own chatroom on the website. You currently have <<camclients>> viewers.
			<<actCLA 'Continue'>>
				<<gt 'komp' 'startpagemfc'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Leave this website'>>
			<<set $time.minutes += 2>>
			<<set $topmfc = 1>>
			<<set $backmfc = 1>>
			<<set $tokens = 0>>
			<<set $camclients = 0>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<gt 'komp' 'browse'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'startpagemfc'>>
	<<if $pc.vgape > 10 or $pc.agape > 10>>
		<p>While you sit in your chair, you can't help but wince every time you move. You want to put up a show, but it hurts too much. And besides... you doubt your viewers would want to see you in your current state! You should heal up a bit before trying again.</p>
		<<actCLA 'Collect your earnings and leave'>>
			<<set $finances.bank += $tokens * 2>>
			<<set $tokens = 0>>
			<<gt 'komp' 'mfc'>>
		<</actCLA>>
	<<else>>
		<<image "pc/items/accessories/computer/camwhore3.jpg">>
		You casually chat with the <<camclients>> visitors currently in your chatroom. Once you turn on your webcam, things will probably get busier.
		<<actCLA 'Turn on your webcam'>>
			<<gt 'komp' 'waitclients'>>
		<</actCLA>>
		<<actCLA 'Collect your earnings and leave'>>
			<<set $finances.bank += $tokens * 2>>
			<<set $tokens = 0>>
			<<gt 'komp' 'mfc'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'waitclients'>>
	<<gs 'family_schedule'>>
	<<set $rnd_minut = rand(1,4)>>
	<<set $time.minutes += $rnd_minut>>
	<<gs 'internet_mobile' 'use_internet' $subs $rnd_minut>>
	<<if getvar("$mfccum") > 0>>
		<<set $mfcdaycum = $time.daystart>>

	<</if>>
	<<set $mfcclients += 1>>
	<<set $menu_loc = 'komp'>>
	<<set $menu_arg = 'waitclients'>>
	<<set $menu_off = 0>>
	<<if getvar("$topmfc") == 1 and getvar("$backmfc") == 1>>
		<<if $pc.pcs_apprnc < 100>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(1,3)>>
				<<else>>
					<<set $camclients += rand(1,3)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(3,5)>>
				<<else>>
					<<set $camclients += rand(3,5)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(4,8)>>
				<<else>>
					<<set $camclients += rand(4,8)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(5,15)>>
				<<else>>
					<<set $camclients += rand(5,15)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(0,100)>>
			<<set $clientask = rand(20,100)>>
			<<if getvar("$chancetips") >= 95 and getvar("$camclients") >= 250>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(10,30)>>
				<<else>>
					<<set $tokens += rand(1,20)>>
				<</if>>
			<</if>>
		<<else>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(1,3)>>
				<<else>>
					<<set $camclients += rand(3,5)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(3,5)>>
				<<else>>
					<<set $camclients += rand(5,8)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(5,8)>>
				<<else>>
					<<set $camclients += rand(5,12)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(8,12)>>
				<<else>>
					<<set $camclients += rand(8,15)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(5,100)>>
			<<set $clientask = rand(30,100)>>
			<<if getvar("$chancetips") >= 95 and getvar("$camclients") >= 200>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(10,40)>>
				<<else>>
					<<set $tokens += rand(1,20)>>
				<</if>>
			<</if>>
		<</if>>
	<<elseif getvar("$topmfc") == 0 and getvar("$backmfc") == 1>>
		<<if $pc.pcs_apprnc < 100>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(1,3)>>
				<<else>>
					<<set $camclients += rand(1,3)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(1,5)>>
				<<else>>
					<<set $camclients += rand(1,5)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(5,10)>>
				<<else>>
					<<set $camclients += rand(5,10)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(6,15)>>
				<<else>>
					<<set $camclients += rand(6,15)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(5,90)>>
			<<set $clientask = rand(30,100)>>
			<<if getvar("$chancetips") >= 85 and getvar("$camclients") >= 230>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(10,35)>>
				<<else>>
					<<set $tokens += rand(1,20)>>
				<</if>>
			<</if>>
		<<else>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(1,3)>>
				<<else>>
					<<set $camclients += rand(3,6)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(3,6)>>
				<<else>>
					<<set $camclients += rand(5,10)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(6,10)>>
				<<else>>
					<<set $camclients += rand(7,12)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(7,12)>>
				<<else>>
					<<set $camclients += rand(10,15)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(10,90)>>
			<<set $clientask = rand(35,100)>>
			<<if getvar("$chancetips") >= 85 and getvar("$camclients") >= 200>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(15,35)>>
				<<else>>
					<<set $tokens += rand(1,20)>>
				<</if>>
			<</if>>
		<</if>>
	<<elseif getvar("$topmfc") == 1 and getvar("$backmfc") == 0>>
		<<if $pc.pcs_apprnc < 100>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(1,3)>>
				<<else>>
					<<set $camclients += rand(1,3)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(2,5)>>
				<<else>>
					<<set $camclients += rand(2,5)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(5,15)>>
				<<else>>
					<<set $camclients += rand(5,15)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(5,20)>>
				<<else>>
					<<set $camclients += rand(5,20)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(10,80)>>
			<<set $clientask = rand(30,100)>>
			<<if getvar("$chancetips") >= 75 and getvar("$camclients") >= 200>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(10,40)>>
				<<else>>
					<<set $tokens += rand(1,20)>>
				<</if>>
			<</if>>
		<<else>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(1,3)>>
				<<else>>
					<<set $camclients += rand(4,7)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(4,8)>>
				<<else>>
					<<set $camclients += rand(5,12)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(5,12)>>
				<<else>>
					<<set $camclients += rand(9,15)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(8,15)>>
				<<else>>
					<<set $camclients += rand(15,20)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(15,80)>>
			<<set $clientask = rand(35,100)>>
			<<if getvar("$chancetips") >= 75 and getvar("$camclients") >= 170>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(15,45)>>
				<<else>>
					<<set $tokens += rand(1,20)>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
		<<if $pc.pcs_apprnc < 100>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(1,4)>>
				<<else>>
					<<set $camclients += rand(1,4)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(3,10)>>
				<<else>>
					<<set $camclients += rand(3,10)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(10,20)>>
				<<else>>
					<<set $camclients += rand(10,20)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 3>>
					<<set $camclients -= rand(10,30)>>
				<<else>>
					<<set $camclients += rand(10,30)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(15,50)>>
			<<set $clientask = rand(35,100)>>
			<<if getvar("$chancetips") >= 45 and getvar("$camclients") >= 150>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(20,50)>>
				<<else>>
					<<set $tokens += rand(5,25)>>
				<</if>>
			<</if>>
		<<else>>
			<<if getvar("$webpopular") < 15>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(1,4)>>
				<<else>>
					<<set $camclients += rand(3,8)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(3,8)>>
				<<else>>
					<<set $camclients += rand(3,15)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(5,12)>>
				<<else>>
					<<set $camclients += rand(10,20)>>
				<</if>>
			<<elseif getvar("$webpopular") >= 75>>
				<<if getvar("$mfcclients") > 5>>
					<<set $camclients -= rand(8,18)>>
				<<else>>
					<<set $camclients += rand(10,30)>>
				<</if>>
			<</if>>
			<<set $chancetips = rand(20,50)>>
			<<set $clientask = rand(45,100)>>
			<<if getvar("$chancetips") >= 45 and getvar("$camclients") >= 100>>
				<<if getvar("$webpopular") >= 50>>
					<<set $tokens += rand(30,50)>>
				<<else>>
					<<set $tokens += rand(10,30)>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
	<<if getvar("$camclients") <= 0>>
		<<set $camclients = 0>>

	<</if>>
	<<if getvar("$topmfc") == 1 and getvar("$backmfc") == 1>>
		<<image "pc/items/accessories/computer/camwhore3.jpg">>
	<<elseif getvar("$topmfc") == 0 and getvar("$backmfc") == 1>>
		<<image "pc/items/accessories/computer/camwhore4.jpg">>
	<<elseif getvar("$topmfc") == 1 and getvar("$backmfc") == 0>>
		<<image "pc/items/accessories/computer/camwhore5.jpg">>
	<<else>>
		<<image "pc/items/accessories/computer/camwhore6.jpg">>
	<</if>>
	<<set $tokenpay = $tokens * 2>>
	You take a moment of rest, and just chat casually with your <<camclients>> visitors.
	<p>You have earned tokens tokens so far this session, which amounts to tokenpay <b>₽</b>.</p>
	<<actCLA 'Wait for more visitors'>>
		<<gt 'komp' 'waitclients'>>
	<</actCLA>>
	<<if getvar("$topmfc") == 1 and getvar("$clientask") >= 91>>
		<<set $menu_off = 1>>
		<p>One of your visitors really wants to see your boobs! He's willing to leave you some tokens as a tip, if you take off your bra right now...</p>
		<<actCLA 'Remove your bra'>>
			<<set $webpopular += 1>>
			<<set $topmfc = 0>>
			<<set $mfcclients -= 1>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(10,25)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(15,25)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(25,50)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(50,150)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore7.jpg">>
			You stand up and lean forward, so your boobs are in full view of the camera. You slowly take off your bra and give the camera a sweet smile.
			<p>While you sit back down and toss your bra to the ground, you hear the donation sound several times. Your visitors enjoyed that!</p>
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Tease instead'>>
			<<set $webpopular += rand(-1,1)>>
			<<set $mfcclients += rand (-1,1)>>
			<<set $time.minutes += 5>>
			<<gs 'internet_mobile' 'use_internet' $subs 5>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(0,10)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(0,15)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(5,30)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(25,50)>>
			<</if>>
			<<video "pc/items/accessories/computer/webcam/tits2.mp4">>
			Not quite prepared to reveal your breasts you play with them trough your shirt hoping that will appease the crowd.
			<<arouse 'porn' 5 `['exhibitionism']`>>
			<<set $time.minutes -= 5>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Give them a brief look'>>
			<<set $webpopular += rand(-1,1)>>
			<<set $mfcclients += rand(-1,1)>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(0,15)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(0,25)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(5,40)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(25,75)>>
			<</if>>
			<<video "pc/items/accessories/computer/webcam/undress4.mp4">>
			You playfully lift your top hoping a short viewing will sate them for the time being and encourage them to stay for more.
			<<arouse 'porn' 2 >>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Refuse to take off your bra' undefined `{willpower:['exhib','resist','hard']}`>>
				<<set $webpopular -= 1>>
				
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		
	<</if>>
	<<if getvar("$backmfc") == 1 and getvar("$clientask") >= 81 and getvar("$clientask") < 91>>
		<<set $menu_off = 1>>
		One of the visitors asks you to remove your panties, and show your bare pussy to the camera. A second visitor chimes in, adding some extra tokens to the offer.
		<<actCLA 'Take off your panties'>>
			<<set $mfcclients -= 1>>
			<<set $webpopular += 1>>
			<<set $backmfc = 0>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(10,25)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(15,25)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(25,50)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(50,150)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore8.jpg">>
			You make a show of pointing the camera at your groin, and slowly push your panties down your legs. The chat explodes for a moment, with several visitors complimenting your body, and a few more making lewd comments on what they would do to you if they were with you right now.
			As promised, you receive some tokens.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Tease instead'>>
			<<set $webpopular += rand(-1,1)>>
			<<set $mfcclients += rand(-1,1)>>
			<<set $time.minutes += 4>>
			<<gs 'internet_mobile' 'use_internet' $subs 4>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(0,15)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(0,25)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(5,40)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(25,75)>>
			<</if>>
			<<if getvar("$topmfc") == 1>>
				<<video "pc/items/accessories/computer/webcam/undress2.mp4">>
				Deciding to stay clothed a little longer you feel that you won''t be able to satisfy the crowd without showing at least some skin.
				Standing up you start to dancing flashing your tits and ass to cam.
			<</if>>
			<<if getvar("$topmfc") == 0>>
				<<video "pc/items/accessories/computer/webcam/show5.mp4">>
				Lowering your panties to emphasize your butt you shake it briefly in an effort to appease the crowd
			<</if>>
			<<arouse 'porn' 4 `['exhibitionism']`>>
			<<set $time.minutes -= 4>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Give them a brief look'>>
			<<set $webpopular += rand(-1,1)>>
			<<set $mfcclients += rand(-1,1)>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(0,15)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(0,25)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(5,40)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(25,75)>>
			<</if>>
			<<video "pc/items/accessories/computer/webcam/show1.mp4">>
			You push your panties to the side and bend over to give a short preview of what''s to come before quickly covering up again and hoping it was enough to keep viewers interested.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Refuse to take off your panties' undefined `{willpower:['exhib','resist','hard']}`>>
				<<set $webpopular -= 1>>
				
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		
	<</if>>
	<<if getvar("$topmfc") == 0 and getvar("$clientask") >= 95 and getvar("$clientask") < 99>>
		<<set $menu_off = 1>>
		<p>One of the visitors types: "Play with those titties, girl! I'll pay!"</p>
		<<actCLA 'Play with your boobs'>>
			<<set $mfcclients = 0>>
			<<set $webpopular += rand(hotcat/2 -2,hotcat/2)>>
			<<set $backmfc = 0>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(15,25)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(20,30)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(50,100)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(50,150)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore10.jpg">>
			You adjust your camera and lie down on your bed, and start to knead your tits and pinch your nipples playfully. When you hear the donation sound, you smile sweetly at the camera and thank the person who donated personally, immediately prompting a second visitor to donate as well.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Refuse to play with your boobs' undefined `{willpower:['exhib','resist','hard']}`>>
				<<set $webpopular -= 1>>
				
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$clientask") == 99>>
		<<set $menu_off = 1>>
		<p>"Let's see that sweet cunt of yours again, whore!" one of your visitors says.</p>
		He's kinda rude about it, but then again... he's willing to pay.
		<<actCLA 'Do it'>>
			<<set $mfcclients = 0>>
			<<set $webpopular += rand(hotcat/2 -2,hotcat/2)>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(20,25)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(25,50)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(50,100)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(100,150)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore12.jpg">>
			You lie down comfortably and put your hand between your legs, gently rubbing your labia with your fingers. You put some effort into showing how wet you are already, which is met with some enthusiastic chatter.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<if $pc.horny >= 100>>
				<<set $mfccum += 1>>
				<<set $pc.mood = 100>>
				<<set $orgasm_or = 'custom'>>
				<<set $orgasm_txt = 'You groan despite yourself, and realize you're about to have an orgasm on camera! Deciding it's too late to stop, you flick your fingers over your clit several more times and moan loudly as your whole body begins to tremble. When you look at the chat again, you see a mixture of compliments and lewd comments on your show. Either way: they loved it!'>>
			<</if>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Ignore him' undefined `{willpower:['exhib','resist','hard']}`>>
				<<set $webpopular -= 1>>
				
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$clientask") == 100>>
		<<set $menu_off = 1>>
		<p>One of the visitors asks very politely: "Uh, hi! Could you please show me your vagina up close?"</p>
		<<actCLA 'Show him your vagina'>>
			<<set $mfcclients = 0>>
			<<set $webpopular += rand(hotcat/2 -2,hotcat/2)>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(10,25)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(15,25)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(25,50)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(50,150)>>
			<</if>>
			
			<<if getvar("$pc.analplugin") == 1>>
				<<image "pc/items/accessories/computer/camwhore19.jpg">>
			<<elseif $pc.pcs_vag == 0>>
				<<image "pc/items/accessories/computer/camwhore18.jpg">>
			<<elseif $pc.pcs_vag <= 10>>
				<<image "pc/items/accessories/computer/camwhore13.jpg">>
			<<elseif $pc.pcs_vag <= 15>>
				<<image "pc/items/accessories/computer/camwhore14.jpg">>
			<<elseif $pc.pcs_vag <= 25>>
				<<image "pc/items/accessories/computer/camwhore15.jpg">>
			<<elseif $pc.pcs_vag <= 35>>
				<<image "pc/items/accessories/computer/camwhore16.jpg">>
			<<else>>
				<<image "pc/items/accessories/computer/camwhore17.jpg">>
			<</if>>
			<p>Aww, what a sweetheart! You smile at the camera and do what your client wants. He delivers on his promise as well, sending some tokens your way. The rest of the chat is thanking him too, everyone wanted to see that!</p>
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Ignore him' undefined `{willpower:['exhib','resist','hard']}`>>
				<<set $webpopular -= 1>>
				
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		
	<</if>>
	<<if getvar("$backmfc") == 0 and $pc.pcs_ass >= 30 and getvar("$webpopular") >= 50 and getvar("$clientask") == 80>>
		<<set $menu_off = 1>>
		One of the visitors makes several comments on how badly he wants to fuck your ass, and then offers you tokens to show your anus to him...
		<<actCLA 'Show them your battered sphincter'>>
			<<set $mfcclients = 0>>
			<<set $webpopular += rand(hotcat/2-1,1+hotcat/2)>>
			<<set $backmfc = 0>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if $pc.pcs_apprnc > 100>>
				<<set $tokens += rand(50,100)>>
			<<else>>
				<<set $tokens += rand(40,75)>>
			<</if>>
			<<if getvar("$webpopular") < 15>>
				<<set $tokens += rand(25,50)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $tokens += rand(50,100)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $tokens += rand(100,150)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $tokens += rand(100,200)>>
			<</if>>
			
			<<if getvar("$pc.analplugin") == 0>>
				<<if getvar("$cumsumass") > 39>>
					<<image "pc/items/accessories/computer/camwhore74.jpg">>
					You turn your back to the camera and pull your ass cheeks aside, showing everyone your battered anus. When you push softly, you suddenly hear the chat exploding.
					<p>"Oh my god, is that sperm!?" someone wonders.</p>
					<p>"Definitely! What a whore!" someone else adds.</p>
					<p>"I'd love to add my load to that!" a third one laughs.</p>
					<p>Oh no! Your face turns a deep red... you're so ashamed right now! You try to calm the chat down, but the vulgar comments just keep coming and coming.</p>
					At least the visitor who promised to donate did, so you're a few tokens richer.
					<<arouse 'porn' 2 `['exhibitionism']`>>
					<<set $time.minutes -= 2>>
				<<else>>
					<<image `'pc/items/accessories/computer/camwhore20,<<rand(0,7)>>.jpg'`>>
					You bite your lip for a second, trying to think of a way to get out of his request. Then, you sigh and show them your rectum. It's obviously quite used to having objects shoved in, something your audience notices immediately.
					<p>Then your greed overcomes you. They already know... you might as well earn some money by showing them properly, right?</p>
					You pull your ass cheeks aside, giving them a good view of your worn out anus.
					<<arouse 'porn' 2 `['exhibitionism']`>>
					<<set $time.minutes -= 2>>
				<</if>>
			<<else>>
				<<image "pc/items/accessories/computer/camwhore21.jpg">>
				<p>You smile to yourself, he's going to love what you have in store for him!</p>
				"I'm sorry", you tell him, explicitly mentioning his username as well. "I can't right now..."
				Then you turn around, and show him the large plug you currently have shoved inside you. You wiggle your ass seductively at the camera, and hear the donation sound mere seconds later.
				<<arouse 'porn' 2 `['exhibitionism']`>>
				<<set $time.minutes -= 2>>
			<</if>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
		<<actCLA 'Ignore him' undefined `{willpower:['exhib','resist','hard']}`>>
				<<set $webpopular -= 1>>
				
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		
	<</if>>
	<<if getvar("$webpopular") >= 15 and $pc.pcs_ass >= 15 and getvar("$clientask") == 89>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 89>>
	<</if>>
	<<if getvar("$webpopular") < 50 and getvar("$clientask") == 88>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 88>>
	<</if>>
	<<if getvar("$webpopular") >= 50 and $pc.pcs_vag >= 35 and getvar("$clientask") == 87>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 87>>
	<</if>>
	<<if getvar("$webpopular") >= 35 and $pc.pcs_vag >= 25 and $pc.alko >= 4 and getvar("$clientask") == 86>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 86>>
	<</if>>
	<<if getvar("$webpopular") >= 50 and $pc.pcs_vag + $pc.pcs_ass > 0 and $pc.alko >= 4 and getvar("$clientask") == 85>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 85>>
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$webpopular") >= 25 and $pc.pcs_vag + $pc.pcs_ass >= 30 and $pc.alko >= 4 and getvar("$clientask") == 84>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 84>>
	<</if>>
	<<if getvar("$backmfc") == 0 and $pc.pcs_vag > 20 and getvar("$clientask") == 83>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 83>>
	<</if>>
	<<if getvar("$webpopular") > 25 and getvar("$backmfc") == 0 and getvar("$sub") > 25 and $pc.pcs_vag > 10 and $inventory.get("condom") > 0 and getvar("$clientask") == 82>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 82>>
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$webpopular") >= 50 and $pc.pcs_ass > 25 and getvar("$clientask") == 81>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCtwo' 81>>
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$clientask") < 80 and getvar("$clientask") >= 77>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCanal'>>
	<</if>>
	<<if getvar("$clientask") < 77 and getvar("$clientask") >= 74>>
		<<set $menu_off = 1>>
		<<gt 'kompMFCoral'>>
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$clientask") >= 90 and getvar("$clientask") < 95>>
		<<set $menu_off = 1>>
		<p>One of the visitors asks: "Do you have a vibrator or dildo? I want you to put up a little show..."</p>
		<<gt 'kompMFC'>>
	<</if>>
	<<if getvar("$clientask") < 74>>
		<<actCLA 'Dance'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 5>>
			<<gs 'internet_mobile' 'use_internet' $subs 5>>
			<<if getvar("$topmfc") == 1 and getvar("$backmfc") == 1>>
				<<if getvar("$webpopular") < 15>>
					<<set $camclients += rand(pcs_dancero - 60,pcs_dancero - 55)>>
				<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
					<<set $camclients += rand(pcs_dancero - 55,pcs_dancero - 45)>>
				<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
					<<set $camclients += rand(pcs_dancero - 50,pcs_dancero - 42)>>
				<<elseif getvar("$webpopular") >= 75>>
					<<set $camclients += rand(pcs_dancero - 40,pcs_dancero - 25)>>
				<</if>>
				<<video "pc/items/accessories/computer/webcam/strip4.mp4">>
				Turning on some music you dance eroticiy hoping to entice some viewers.
			<</if>>
			<<if getvar("$topmfc") == 0 and getvar("$backmfc") == 1>>
				<<if getvar("$webpopular") < 15>>
					<<set $camclients += rand(pcs_dancero - 55,pcs_dancero - 45)>>
				<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
					<<set $camclients += rand(pcs_dancero - 50,pcs_dancero - 40)>>
				<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
					<<set $camclients += rand(pcs_dancero - 45,pcs_dancero - 35)>>
				<<elseif getvar("$webpopular") >= 75>>
					<<set $camclients += rand(pcs_dancero - 40,pcs_dancero - 25)>>
				<</if>>
				<<video "pc/items/accessories/computer/webcam/strip7.mp4">>
				Turning on some music you dance eroticly hoping to entice some viewers.
			<</if>>
			<<if getvar("$topmfc") == 1 and getvar("$backmfc") == 0>>
				<<if getvar("$webpopular") < 15>>
					<<set $camclients += rand(pcs_dancero - 55,pcs_dancero - 45)>>
				<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
					<<set $camclients += rand(pcs_dancero - 50,pcs_dancero - 40)>>
				<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
					<<set $camclients += rand(pcs_dancero - 45,pcs_dancero - 35)>>
				<<elseif getvar("$webpopular") >= 75>>
					<<set $camclients += rand(pcs_dancero - 40,pcs_dancero - 25)>>
				<</if>>
				<<video "pc/items/accessories/computer/webcam/strip6.mp4">>
				Turning on some music you dance eroticly hoping to entice some viewers.
			<</if>>
			<<if getvar("$topmfc") == 0 and getvar("$backmfc") == 0>>
				<<if getvar("$webpopular") < 15>>
					<<set $camclients += rand(pcs_dancero - 50,pcs_dancero - 40)>>
				<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
					<<set $camclients += rand(pcs_dancero - 45,pcs_dancero - 35)>>
				<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
					<<set $camclients += rand(pcs_dancero - 40,pcs_dancero - 25)>>
				<<elseif getvar("$webpopular") >= 75>>
					<<set $camclients += rand(pcs_dancero - 30,pcs_dancero - 10)>>
				<</if>>
				<<video "pc/items/accessories/computer/webcam/strip5.mp4">>
				Turning on some music you dance eroticly hoping to entice some viewers.
			<</if>>
			<<run $pc.skillExperienceGain('eroticdance',1)>>
			<<arouse 'porn' 5 >>
			<<set $time.minutes -= 5>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$topmfc") == 1 and getvar("$backmfc") == 1 and getvar("$clientask") < 74>>
		<<actCLA 'Perform a striptease'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 3>>
			<<gs 'internet_mobile' 'use_internet' $subs 3>>
			<<if getvar("$webpopular") < 15>>
				<<set $camclients += rand(pcs_dancero - 50,pcs_dancero - 40)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $camclients += rand(pcs_dancero - 45,pcs_dancero - 35)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $camclients += rand(pcs_dancero - 40,pcs_dancero - 25)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $camclients += rand(pcs_dancero - 30,pcs_dancero - 10)>>
			<</if>>
			<<video "locations/city/residential/sauna/sex/striptease4.mp4">>
			You decide that making a show of stripping yourself might encourage some attention.  Repositioning your cam, you stand up and dance as you remove your underwear.
			<<run $pc.skillExperienceGain('eroticdance',1)>>
			<<set $topmfc = 0>>
			<<set $backmfc = 0>>
			<<arouse 'porn' 3 >>
			<<set $time.minutes -= 3>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$topmfc") == 1 and getvar("$clientask") < 74>>
		<<actCLA 'Take off your bra'>>
			<<set $menu_off = 1>>
			<<set $topmfc = 0>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$backmfc") == 1>>
				<<image "pc/items/accessories/computer/camwhore4.jpg">>
			<</if>>
			<<if getvar("$backmfc") == 0>>
				<<image "pc/items/accessories/computer/camwhore5.jpg">>
			<</if>>
			Even though no one requested you to do so, you figure showing off your nice boobs might get some more viewers into the channel. You slowly take off your bra and wiggle your breasts seductively at the camera.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$topmfc") == 0 and getvar("$clientask") < 74>>
		<<actCLA 'Idly play with your boobs'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $camclients += rand(3,6)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $camclients += rand(5,10)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $camclients += rand(10,20)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $camclients += rand(15,35)>>
			<</if>>
			<<if $pc.alko >= 4>>
				<<gs 'pain' 2 'slap' 'breasts'>>
			<</if>>
			<<set $chancetips = rand(0,100)>>
			<<if getvar("$chancetips") >= 85>>
				<<set $tokens += rand(2,10)>>
			<</if>>
			<<if $pc.alko >= 4>>
				<<image "pc/items/accessories/computer/camwhore80.jpg">>
			<<else>>
				<<image "pc/items/accessories/computer/camwhore9.jpg">>
			<</if>>
			<p>You chat with your visitors for a little while, but begin to play with your boobs absent-mindedly in a slow moment. It feels quite nice! You knead your boobs and play with them more and more intently, almost completely forgetting about the camera.</p>
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$backmfc") == 1 and getvar("$clientask") < 74>>
		<<actCLA 'Take off your panties'>>
			<<set $menu_off = 1>>
			<<set $backmfc = 0>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$topmfc") == 1>>
				<<image "pc/items/accessories/computer/camwhore5.jpg">>
			<</if>>
			<<if getvar("$topmfc") == 0>>
				<<image "pc/items/accessories/computer/camwhore6.jpg">>
			<</if>>
			You know that the fewer clothes you have on, the more visitors will be inclined to check out your channel. You slowly take off your panties in front of the camera, rewarding the viewers already in your channel to a free show when you expose your naked pussy to them.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$clientask") < 74>>
		<<actCLA 'Play with your pussy'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 4>>
			<<gs 'internet_mobile' 'use_internet' $subs 4>>
			<<if getvar("$webpopular") < 15>>
				<<set $camclients += rand(5,10)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $camclients += rand(10,15)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $camclients += rand(10,30)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $camclients += rand(15,40)>>
			<</if>>
			<<set $chancetips = rand(0,100)>>
			<<if getvar("$chancetips") >= 75>>
				<<set $tokens += rand(10,15)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore11.jpg">>
			You get bored during a slow moment in the chat, and begin to play with your pussy without giving it another thought.
			<p>"How does that feel, girl?" one of your visitors asks. "I bet you love fingering yourself, with a bunch of strangers watching you!" another adds.</p>
			Giving them a defensive smile, you shrug and reply with one hand, while you keep rubbing your clit slowly with the other.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<arouse 'vaginal_finger' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 4>>
			<<if $pc.horny >= 100>>
				<<set $webpopular -= 1>>
				<<set $mfccum += 1>>
				<<set $pc.mood = 100>>
				<p>Oh crap! You misjudged your endurance, and suddenly squirm and gasp in front of the camera. You're having an orgasm!</p>
				<p>When it subsides, you look at your current viewer count. Damn... you just came in front of camclients users, completely free of charge!</p>
				<<set $orgasm_or = 'yes'>>
			<</if>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$backmfc") == 0 and getvar("$clientask") < 74>>
		<<actCLA 'Play with your ass'>>
			<<set $menu_off = 1>>
			<!-- FAILED TO CONVERT
				*clr &
			-----
				 * ERROR: FAILED TO CONVERT LITERAL: """clr &"""

			-->
			<<warn "CONVERSION ERROR 7ab4036323d9e45db025dd7a81c447f6">>
			<<set $time.minutes += 4>>
			<<gs 'internet_mobile' 'use_internet' $subs 4>>
			<<if getvar("$webpopular") < 15>>
				<<set $camclients += rand(5,10)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $camclients += rand(10,15)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $camclients += rand(10,30)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $camclients += rand(15,40)>>
			<</if>>
			<<if $pc.pcs_ass < 10>>
				<<setn $analplay += 1>>

			<</if>>
			<<set $mfcclients -= 1>>
			<<set $time.minutes += 2>>
			<<set $pc.horny += rand(5,10)>>
			<<set $chancetips = rand(0,100)>>
			<<if getvar("$chancetips") >= 60>>
				<<set $tokens += rand(10,20)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore45.jpg">>
			You put two fingers in your mouth and generously cover them in saliva, and then turn your back to the camera. Much to the appreciation of your viewers, you give them a short preview of what an anal show would look like from you. You finger your anus for the camera for a little while, giving your viewers a happy smile the whole time.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<arouse 'anal_finger' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 4>>
			<<if $pc.horny >= 100>>
				<<set $webpopular -= 1>>
				<<set $mfccum += 1>>
				<<set $pc.mood = 100>>
				<<set $orgasm_or = 'yes'>>
				<<set $orgasm_txt = 'It feels too good to stop! Before you know it, your fingers are repeatedly penetrating your ass and you moan excitedly, barely keeping yourself from screaming. You just had an anal orgasm in front of camclients users, completely free of charge! Oops...'>>
			<</if>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$topmfc") == 0 and $pc.pain('nippleR') < 10 and $pc.pain('nippleL') < 10 and getvar("$clientask") < 74>>
		<<actCLA 'Pinch your nipples hard'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 2>>
			<<gs 'internet_mobile' 'use_internet' $subs 2>>
			<<if getvar("$webpopular") < 15>>
				<<set $camclients += rand(5,10)>>
			<<elseif getvar("$webpopular") >= 15 and getvar("$webpopular") < 35>>
				<<set $camclients += rand(10,15)>>
			<<elseif getvar("$webpopular") >= 35 and getvar("$webpopular") < 75>>
				<<set $camclients += rand(10,30)>>
			<<elseif getvar("$webpopular") >= 75>>
				<<set $camclients += rand(15,40)>>
			<</if>>
			<<set $mfcclients -= 1>>
			<<gs 'pain' 2 'pinch' 'nipples'>>
			<<set $chancetips = rand(0,100)>>
			<<if getvar("$chancetips") >= 75>>
				<<set $tokens += rand(20,40)>>
			<</if>>
			<<image "pc/items/accessories/computer/camwhore80.jpg">>
			<p>You're getting too turned on, and need to slow yourself down a little!</p>
			You tightly pinch your nipples and pull hard on them. It hurts a lot, and the sharp pain lowers your excitement by quite a lot. Nevertheless, your viewers enjoy the free show and have no idea you actually did that for your own good.
			<<arouse 'porn' 2 `['exhibitionism']`>>
			<<set $time.minutes -= 2>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'waitclients'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if getvar("$locat['Anya_inroom']") == 1 and $loc == 'bedrPar'>>
		<<set $topmfc = 1>>
		<<set $backmfc = 1>>
		<<set $finances.bank += $tokens * 2>>
		<<set $tokens = 0>>
		<<image "pc/items/accessories/computer/camwhore2.jpg">>
		<p>Suddenly you hear the handle of your door creak, and an annoyed voice shouting: "$pc.name_nick, what the hell!? Why is the door locked? Let me in!"</p>
		<p>Oh crap, it's your sister! "Sorry everyone, show's over!" you whisper to the camera, and you close the stream and hide the website. You quickly put your clothes back on and open your door, trying to avoid the scrutinizing gaze of your sister.</p>
		When she's no longer paying attention to you, you open the site again and find yourself in the main lobby of MyFreeCams. You're a bit bummed that you couldn''t get more out of that session, but cash in your earnings.
		<<gs 'internet_mobile' 'add_limitation' 'noporn' 'You can't watch porn with your sister in the room'>>
		<<gs 'internet_mobile' 'add_limitation' 'nocamshow' 'You can't do a camshow with your sister in the room'>>
		<<actCLA 'Continue'>>
			<<gt 'komp' 'mfc'>>
		<</actCLA>>
	<<else>>
		<<actCLA 'Turn off the webcam'>>
			<<gt 'komp' 'startpagemfc'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'bank'>>
	<<image "pc/items/accessories/computer/online_bank.jpg">>
	<<if $finances.bankAvailable >= 10>>
		 * $pl
		<p>You can buy prepaid internet access online through your bank account. 1 hour of internet only costs 10 <b>₽</b>! *</p>
		 * $pl
		<<if $finances.bank >= 0>>
			<p>You have karta <b>₽</b> in your account.</p>
			<!-- FAILED TO CONVERT
				'You have an overdraft limit of <font color="blue"><<bankDebtLimit>></font>!'
			-----
				<<set ERROR: FAILED TO CONVERT LITERAL: """'You have an overdraft limit of <font color""" = ERROR: FAILED TO CONVERT LITERAL: """"blue"><<bankDebtLimit>><""" / ERROR: FAILED TO CONVERT LITERAL: """font>!'""">>

			-->
			<<warn "CONVERSION ERROR 9a220b64286b0988d8f273a837f6d12c">>
		<<else>>
			<!-- FAILED TO CONVERT
				'You are overdrawn by <font color="red"><<-1 * karta>> <b>₽</b></font>.'
			-----
				<<set ERROR: FAILED TO CONVERT LITERAL: """'You are overdrawn by <font color""" = ERROR: FAILED TO CONVERT LITERAL: """"red"><<""" - 1 * ERROR: FAILED TO CONVERT LITERAL: """karta>> <b>₽<""" / ERROR: FAILED TO CONVERT LITERAL: """b><""" / ERROR: FAILED TO CONVERT LITERAL: """font>.'""">>

			-->
			<<warn "CONVERSION ERROR ac2462f7bdc2bd796377d882cae5b387">>
			<!-- FAILED TO CONVERT
				'You have a remaining credit limit of <font color="blue"><<bankDebtLimit + karta>></font>!'
			-----
				<<set ERROR: FAILED TO CONVERT LITERAL: """'You have a remaining credit limit of <font color""" = ERROR: FAILED TO CONVERT LITERAL: """"blue"><<bankDebtLimit""" + ERROR: FAILED TO CONVERT LITERAL: """karta>><""" / ERROR: FAILED TO CONVERT LITERAL: """font>!'""">>

			-->
			<<warn "CONVERSION ERROR e37b59c0d34f20940f02a507fc3e6fb9">>
		<</if>>
		 * $pl
		<!-- !! TODO: This needs to be updated-->
		<<actCLA 'Buy internet time'>>
			<!-- FAILED TO CONVERT
				intinp = input ("How many hours of internet access do you wish to purchase? (1hr = 10 <b>₽</b>)")
			-----
				<<set $intinp = input ("How many hours of internet access do you wish to purchase? (ERROR: FAILED TO CONVERT LITERAL: """1hr = 10 <b>₽<""" / ERROR: FAILED TO CONVERT LITERAL: """b>""")")>>

			-->
			<<warn "CONVERSION ERROR ad5397d5723ed1c3be1b420356877311">>
			<<if getvar("$intinp") <= 0 or $intinp * 10 > $finances.bankAvailable>>
				Invalid amount.
			<<else>>
				<<set $finances.bank -= $intinp * 10>>
				<<set $internet += $intinp>>
				You pay for <<intinp>> hours of prepaid internet access. You have a total of <<internet>> hours of internet access remaining.
				<p>intinp * 10 <b>₽</b> was removed from your account to pay for it.</p>
			<</if>>
			<<actCLA 'Continue'>>
				<<gt 'komp' 'bank'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<actCLA 'Close your browser'>>
		<<gt 'komp' 'browse'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'fuckornot'>>
	<<set $time.minutes += 5>>
	<<gs 'internet_mobile' 'use_internet' $subs 5>>
	<<if getvar("$fuckornot") == 2>>
		<<set $fuckornot = 3>>

	<</if>>
	<<image "pc/items/accessories/computer/fuckornot/fuckable_list.jpg">>
	<<gs 'gschool_groups' 'fuckornot'>>
	<p>10: Perfection - Would let her do whatever she wants to me.</p>
	<p>9: Smoking Hot - Would eat her ass.</p>
	<p>8: Hot - Would fuck that ass.</p>
	<p>7: Damn girl - Bragging rights for fucking.</p>
	<p>6: Smashable - Totally fuckable. Fuck buddy material</p>
	<p>5: Merely fuckable - Wouldn't mind smashing it. Blowjob buddy material.</p>
	<p>4: Almost fuckable - Doable in the dark or to get a blowjob from.</p>
	<p>3: Unattractive - Doable if I get myself drunk first. Good match for Petia.</p>
	<p>2: Fugly - Has potential compared to a trash bin. Even Lesco could do better.</p>
	<p>1: Hideous - Wouldn't touch it with a stick.</p>
	<<actCLA 'Leave the site'>>
		<<if $view_location == 'school'>>
			<<gt 'gschool_lessons' 'short_break'>>
		<<else>>
			<<gt 'komp' 'browse'>>
		<</if>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'hotornot'>>
	<<set $time.minutes += 5>>
	<<gs 'internet_mobile' 'use_internet' $subs 5>>
	<<if getvar("$hotornot") == 2>>
		<<set $hotornot = 3>>

	<</if>>
	<<image "system/image_needed.png">>
	<<gs 'gschool_groups' 'hotornot'>>
	<p>10: Perfection - Would let him do whatever he wants to me.</p>
	<p>9: Smoking Hot - Arm candy.</p>
	<p>8: Hot - Would ride him.</p>
	<p>7: Damn son - Bragging rights for fucking.</p>
	<p>6: Rideable - Totally fuckable. Fuck buddy material</p>
	<p>5: Merely fuckable. - Doggy style so I don't have to look at him.</p>
	<p>4: Almost fuckable - Might sit on his face.</p>
	<p>3: Unattractive - Not even Zinaida would be seen with him.</p>
	<p>2: Fugly - Horribly ugly. Just being seen with him would lose you social standing.</p>
	<p>1: Hideous - Wouldn't touch it with a stick. Not even a whore would take his money.</p>
	<<actCLA 'Leave the site'>>
		<<if $view_location == 'school'>>
			<<set $access to null>>
			<<gt 'gschool_lessons' 'short_break'>>
		<<else>>
			<<gt 'komp' 'browse'>>
		<</if>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'fin'>>
	<<gt $location>>

<</if>>