:: pornhist
<<set $here = 'pornhist'>>
<<set $ARGS = $location_var[$here]>>
<!-- !! Short description of made movies, without details-->
<<if $location_var[$here][0] == 'short'>>
	<<set $i = 1>>
	<<set $pfilmhistory = ''>>
	<<warn 'JUMP MARKER ENCOUNTERED: :pornhistloop'>>
	<<pornfilmdesc  pornfilmType[$i]>>
	<<if getvar("$pornfilmMonth["+$i+"]") >= 10 and getvar("$pornfilmDay["+$i+"]") >= 10>>
		<<setinit $pornfilmDate[$i] = 'pornfilmYear[$i]-pornfilmMonth[$i]-pornfilmDay[$i]'>>
	<<elseif getvar("$pornfilmMonth["+$i+"]") >= 10 and getvar("$pornfilmDay["+$i+"]") < 10>>
		<<setinit $pornfilmDate[$i] = 'pornfilmYear[$i]-pornfilmMonth[$i]-0pornfilmDay[$i]'>>
	<<elseif getvar("$pornfilmMonth["+$i+"]") < 10 and getvar("$pornfilmDay["+$i+"]") >= 10>>
		<<setinit $pornfilmDate[$i] = 'pornfilmYear[$i]-0pornfilmMonth[$i]-pornfilmDay[$i]'>>
	<<else>>
		<<setinit $pornfilmDate[$i] = 'pornfilmYear[$i]-0pornfilmMonth[$i]-0pornfilmDay[$i]'>>
	<</if>>
	<<if $porntitle[$i] == ''>>
		<<set $pfilmhistory += '● <b>i. Movie</b><br><font size=2></font><br>'>>
	<<else>>
		<<if getvar("$i") == 1>>
			<<set $pfilmhistory += '● <b>'+$porntitle[$i]+'$pfname</b><br><font size=2>'+$pfilmtext+'</font><br>'>>
		<<else>>
			<<set $pfilmhistory += '● <b>'+$porntitle[$i]+'</b><br><font size=2>'+$pfilmtext+'</font><br>'>>
		<</if>>
	<</if>>
	<<if $i < $film>>
		<<setn $i += 1>> 

	<</if>>
<</if>>
<!-- !! Detailed description of movies, only available after selecting the "Filmography" link-->
<<if $location_var[$here][0] == 'pdetail'>>
	<center><h1>Filmography of <font color="magenta"><<$pfname>></font></h1></center>
	<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>
	<td cellspacing="0" cellpadding="0" valign="top">
	<<set $i = 1>>
	<<set $firstvariable to null>>
	<<set $firstvariable2 to null>>
	<<warn 'JUMP MARKER ENCOUNTERED: :pornhistloop2'>>
	<<pornfilmdesc  pornfilmType[$i]>>
	<<if $porntitle[$i] == ''>>
		<<if getvar("$firstvariable") == 0>>
			<<set $firstvariable = 1>> <<set $fvvalue = $i>>

		<</if>>
		<b><a href="exec:$porntitle[$fvvalue] = input(''<font color=#FF0000>WARNING!</font> No matter where you clicked, it will name the <b>first</b> unnamed movie! This action can be done only once!'') & gs ''pornhist'', ''pdetail''"><<i>>. Movie</a></b>
	<<else>>
		<<if getvar("$i") == 1>>
			<b><font color="brown"><<$porntitle[$i]>><<$pfname>></font></b>
		<<else>>
			<b><font color="brown"><<$porntitle[$i]>></font></b>
		<</if>>
	<</if>>
	<<if $time.daystart - getvar("$porndaystart["+$i+"]") == 0>>
		<!-- FAILED TO CONVERT
			' <b>Production date:</b> <font size=2><<$pornfilmDate[i]>> (Today)</font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Production date:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>$pornfilmDate[$i] (Today)<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR 1cc03194fe340a99e34c048ced7892c0">>
	<<elseif $time.daystart - getvar("$porndaystart["+$i+"]") == 1>>
		<!-- FAILED TO CONVERT
			' <b>Production date:</b> <font size=2><<$pornfilmDate[i]>> (Yesterday)</font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Production date:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>$pornfilmDate[$i] (Yesterday)<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR d359e1498aff023e4590615770ac654e">>
	<<else>>
		<!-- FAILED TO CONVERT
			' <b>Production date:</b> <font size=2><<$pornfilmDate[i]>> (<<daystart - porndaystart[i]>> days ago)</font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Production date:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>$pornfilmDate[$i] (ERROR: FAILED TO CONVERT LITERAL: """<<daystart""" - ERROR: FAILED TO CONVERT LITERAL: """porndaystart[$i]>> days ago""")<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR 7ecd9e443227842703a3d3e7509d3609">>
	<</if>>
	<!-- FAILED TO CONVERT
		' <b>Actress age:</b> <font size=2><<pornfilmActAge[i]>></font>  <font size=2>(Appears: <<pornfilmAppAge[i]>>)</font>'
	-----
		<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Actress age:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2><<pornfilmActAge[$i]>><""" / ERROR: FAILED TO CONVERT LITERAL: """font>  <font size=2>(Appears: <<pornfilmAppAge[$i]>>)<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

	-->
	<<warn "CONVERSION ERROR 3678162962235fb151a657c1f7a72451">>
	<<if $pornfilmActor[$i] == 'Fifty fans of'>>
		<!-- FAILED TO CONVERT
			' <b>Actors:</b> <font size=2><<$pornfilmActor[i]>> <<$pfname>> and <<$pfname>> herself</font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Actors:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>$pornfilmActor[$i] $pfname and $pfname herself<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR d0b217855322f8635e43d1a88ed8e7f1">>
	<<else>>
		<!-- FAILED TO CONVERT
			' <b>Actors:</b> <font size=2><<$pornfilmActor[i]>> and <<$pfname>></font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Actors:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>$pornfilmActor[$i] and $pfname<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR 194611de4e3a952adfb8a8829e96542f">>
	<</if>>
	<!-- FAILED TO CONVERT
		' <b>Income:</b> <font size=2><<pornfilmCash[i]>>₽</font>'
	-----
		<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Income:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2><<pornfilmCash[$i]>>₽<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

	-->
	<<warn "CONVERSION ERROR 942b940789f1e6badc4e04a61f197b5e">>
	<<if getvar("$pornfilmacting["+$i+"]") < 15>>
		<!-- FAILED TO CONVERT
			' <b>Acting:</b> <font size=2>Your acting was as fake as a bad boobjob. Did you get paid for this?</font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Acting:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>Your acting was as fake as a bad boobjob. Did you get paid for this?<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR 62a842a2c3b3537062ca09e563948743">>
	<<elseif getvar("$pornfilmacting["+$i+"]") < 30>>
		 <b>Acting:</b> <font size=2>You were acting quite fake, but it was passable.</font>
	<<elseif getvar("$pornfilmacting["+$i+"]") < 45>>
		 <b>Acting:</b> <font size=2>You probably could have done better, but at least you were not totally unconvincing.</font>
	<<elseif getvar("$pornfilmacting["+$i+"]") < 60>>
		 <b>Acting:</b> <font size=2>You were actually acting, even if it wasn''t entirely convincing.</font>
	<<elseif getvar("$pornfilmacting["+$i+"]") < 75>>
		 <b>Acting:</b> <font size=2>You were acting really well.</font>
	<<elseif getvar("$pornfilmacting["+$i+"]") < 90>>
		 <b>Acting:</b> <font size=2>As a professional actress, everybody believed your every gesture and sentence.</font>
	<<else>>
		 <b>Acting:</b> <font size=2>Your performance was phenomenal. You may actually win some awards with this one.</font>
	<</if>>
	<<if getvar("$pornfilmvnesh["+$i+"]") >= 9>>
		 <b>Look:</b> <font size=2>Amazingly beautiful.</font>
	<<elseif getvar("$pornfilmvnesh["+$i+"]") >= 7>>
		 <b>Look:</b> <font size=2>Beautiful.</font>
	<<elseif getvar("$pornfilmvnesh["+$i+"]") >= 5>>
		 <b>Look:</b> <font size=2>Attractive.</font>
	<<else>>
		 <b>Look:</b> <font size=2>Unnoticeable.</font>
	<</if>>
	<!-- FAILED TO CONVERT
		' <b>Description:</b> <font size=2><<$pfilmtext>></font>'
	-----
		<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Description:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = ERROR: FAILED TO CONVERT LITERAL: """2>$pfilmtext<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

	-->
	<<warn "CONVERSION ERROR ce5ef73ee979fbf8700e7da905ac667e">>
	<<if $pornfilmstory[$i] == ''>>
		<<if getvar("$firstvariable2") == 0>>
			<<set $firstvariable2 = 1>> <<set $fvvalue2 = $i>>

		<</if>>
		<!-- FAILED TO CONVERT
			' <b>Story:</b> <font size=2><a href="exec:$pornfilmstory[fvvalue2] = input(''<font color=#FF0000>WARNING!</font> No matter where you clicked, you will enter the story of the <b>first</b> movie missing it! This action can be done only once!'') & gs ''pornhist'', ''pdetail''">Missing story</a></font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Story:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font size""" = 2><<link "Missing story">><<set $pornfilmstory[$fvvalue2] = ERROR: FAILED TO CONVERT LITERAL: """input(''<font color=#FF0000>WARNING!<""" / ERROR: FAILED TO CONVERT LITERAL: """font> No matter where you clicked""" , ERROR: FAILED TO CONVERT LITERAL: """you will enter the story of the <b>first<""" / ERROR: FAILED TO CONVERT LITERAL: """b> movie missing it! This action can be done only once!'')>> <<gs 'pornhist' 'pdetail'""">><</link>></font>'>>

		-->
		<<warn "CONVERSION ERROR dbfea95112dc893d09848802fe72ca2b">>
	<<else>>
		<!-- FAILED TO CONVERT
			' <b>Story:</b> <font color=#1B4532 size=2><<$pornfilmstory[i]>></font>'
		-----
			<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Story:<""" / ERROR: FAILED TO CONVERT LITERAL: """b> <font color""" = ERROR: FAILED TO CONVERT LITERAL: """#1B4532 size=2>$pornfilmstory[$i]<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR 387099f87a6d382c90c77c21f9a5c3fb">>
	<</if>>
	<!-- FAILED TO CONVERT
		' <b>Tags: <font color=#541717 size=2><<$pfilmtags>></font></b>'
	-----
		<<set ERROR: FAILED TO CONVERT LITERAL: """' <b>Tags: <font color""" = ERROR: FAILED TO CONVERT LITERAL: """#541717 size=2>$pfilmtags<""" / ERROR: FAILED TO CONVERT LITERAL: """font><""" / ERROR: FAILED TO CONVERT LITERAL: """b>'""">>

	-->
	<<warn "CONVERSION ERROR 0fb50ffd2f6ee2c10e11bdecafb9b7c5">>
	<<if getvar("$pornDanger["+$i+"]") == 1 and getvar("$pfType") == 1>>
		 <font color="red" size=2><b>You were unprotected and fertile during the shoot.</b></font>

	<</if>>
	<<set $pfilmtags to null>>
	<<if $i < $film>>
		<!-- FAILED TO CONVERT
			*p '<font color="sienna"><hr></font>'
		-----
			<<set  * ERROR: FAILED TO CONVERT LITERAL: """p '<font color""" = ERROR: FAILED TO CONVERT LITERAL: """"sienna"><hr><""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>

		-->
		<<warn "CONVERSION ERROR fa66e0590668512d3209f4b282c22e3f">>
		<<set $i += 1>>
		<<warn 'JUMP COMMAND ENCOUNTERED: jump pornhistloop2'>>
	<</if>>
	<<act 'Return to Reputation'>>
		  <<gt 'obj_din' 'reputation'>>
	<</act>>
	</td></tr></table></center>
<</if>>
<!-- !! Dynamic of selectable porn movies, called from:-->
<!-- !!	pornhist: 'short', 'pdetail'-->
<!-- !!	pornschedule: 'pornmiss'-->
<!-- !!	pornstudio: 'options', 'medical', 'postvideo'-->
:: pornfilmdesc_macro[widget]
<<widget 'pornfilmdesc'>>
	<<set $film_type = _args[0]>>
	<<set $pstory to null>>
	<<if $pc.tits >= 4>>
		<<setinit $porndesc[1] = 'Titfuck'>>
	<<else>>
	<<setinit $porndesc[1] = 'Handjob'>>
	<</if>>
	<<setinit $porndesc[2] = 'Blowjob'>>
	<<setinit $porndesc[3] = 'Vaginal sex with facial'>>
	<<setinit $porndesc[4] = 'Vaginal and anal sex with facial'>>
	<<setinit $porndesc[5] = 'Threesome with anal creampie and facial'>>
	<<setinit $porndesc[6] = 'Threesome with double penetration, facial and swallowing'>>
	<<setinit $porndesc[7] = 'Vaginal sex with creampie'>>
	<<setinit $porndesc[8] = 'Double penetration with vaginal creampies'>>
	<<setinit $porndesc[9] = 'Spitroast with two guys with creampie and swallowing'>>
	<<setinit $porndesc[10] = 'Four guy gangbang with vaginal sex and cumshots'>>
	<<setinit $porndesc[11] = 'Four guy gangbang with vaginal sex and creampies'>>
	<<setinit $porndesc[12] = 'Four guy gangbang with anal sex and anal creampies'>>
	<<setinit $porndesc[13] = 'Two double penetration with four guys, vaginal and anal creampies'>>
	<<setinit $porndesc[14] = 'Gangbang with 50 guys'>>
	<<setinit $porndesc[15] = 'Anal sex with anal creampie'>>
	<<setinit $porndesc[16] = 'Anal sex with cumshot'>>
	<<setinit $porndesc[17] = 'Lesbian sex with double dildo'>>
	<<setinit $porndesc[18] = 'Lesbian sex with strapon'>>
	<<setinit $porndesc[19] = 'Primary role in MFF threesome'>>
	<<setinit $porndesc[20] = 'Secondary role in MFF threesome'>>
	<<if getvar("$film_type") == 1>>
		<<set $pfType = 0>>
		<<set $pcash = 20>>
		<<set $pfactor = 1>>
		<<set $actbonus = 1>>
		<<if $pc.tits >= 4>>
			<<set $tags = 'titjob, handjob, cumshot'>>
			<<set $pfilmtext = 'You gave a guy a titfuck and he came on your tits.'>>
		<<else>>
		<<set $tags = 'handjob, cumshot'>>
		<<set $pfilmtext = 'You jerked off a guy and he came on your tits.'>>
		<</if>>
	<<elseif getvar("$film_type") == 2>>
		<<set $pfType = 0>>
		<<set $pcash = 30>>
		<<set $pfactor = 1>>
		<<set $actbonus = 1>>
		<<set $tags = 'blowjob, facial'>>
		<<set $pfilmtext = 'You gave a guy a blowjob and got a facial.'>>
	<<elseif getvar("$film_type") == 3>>
		<<set $pfType = 0>>
		<<set $pcash = 50>>
		<<set $pfactor = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'blowjob, vaginal, facial'>>
		<<set $pfilmtext = 'You gave a guy a blowjob and he fucked you before giving you a facial.'>>
	<<elseif getvar("$film_type") == 4>>
		<<set $pfType = 0>>
		<<set $pcash = 60>>
		<<set $pfactor = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'blowjob, facial, vaginal, anal'>>
		<<set $pfilmtext = 'You gave a guy a blowjob and he fucked your pussy and ass before giving you a facial.'>>
	<<elseif getvar("$film_type") == 5>>
		<<set $pfType = 0>>
		<<set $pcash = 70>>
		<<set $pfactor = 2>>
		<<set $actbonus = rand(1,3)>>
		<<set $tags = 'facial, vaginal, anal, blowjob, anal creampie'>>
		<<set $pfilmtext = 'A guy fucked your pussy and ass and came in your ass while you sucked off another guy who gave you a facial.'>>
	<<elseif getvar("$film_type") == 6>>
		<<set $pfType = 0>>
		<<set $pcash = 90>>
		<<set $pfactor = 2>>
		<<set $actbonus = rand(1,3)>>
		<<set $tags = 'DP, vaginal, anal, blowjob, facial, swallowing'>>
		<<set $pfilmtext = 'A guy fucked your pussy and ass while you sucked off another guy. They then double penetrated you before cumming on your face. You swallowed their loads.'>>
	<<elseif getvar("$film_type") == 7>>
		<<set $pfType = 1>>
		<<set $pcash = 80>>
		<<set $pfactor = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'vaginal'>>
		<<set $pfilmtext = 'You gave a guy a blowjob before he fucked you and gave you a creampie.'>>
	<<elseif getvar("$film_type") == 8>>
		<<set $pfType = 1>>
		<<set $pcash = 100>>
		<<set $pfactor = 2>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'DP, vaginal, anal'>>
		<<set $pfilmtext = 'Two guys fucked you in double penetration before giving you a double creampie.'>>
	<<elseif getvar("$film_type") == 9>>
		<<set $pfType = 1>>
		<<set $pcash = 90>>
		<<set $pfactor = 2>>
		<<set $actbonus = rand(1,3)>>
		<<set $tags = 'blowjob, vaginal, swallowing'>>
		<<set $pfilmtext = 'Two guys fucked your pussy and mouth. One gave you a creampie and the other came in your mouth and you swallowed.'>>
	<<elseif getvar("$film_type") == 10>>
		<<set $pfType = 1>>
		<<set $pcash = 120>>
		<<set $pfactor = 4>>
		<<set $actbonus = rand(2,3)>>
		<<set $tags = 'vaginal, cumshot'>>
		<<set $pfilmtext = 'Four guys fucked your pussy and they all ejaculated on your body and face.'>>
	<<elseif getvar("$film_type") == 11>>
		<<set $pfType = 1>>
		<<set $pcash = 150>>
		<<set $pfactor = 4>>
		<<set $actbonus = rand(2,3)>>
		<<set $tags = 'vaginal'>>
		<<set $pfilmtext = 'Four guys fucked your pussy, giving you four creampies.'>>
	<<elseif getvar("$film_type") == 12>>
		<<set $pfType = 0>>
		<<set $pcash = 150>>
		<<set $pfactor = 4>>
		<<set $actbonus = rand(2,3)>>
		<<set $tags = 'anal, anal creampie'>>
		<<set $pfilmtext = 'Four guys fucked your ass, giving you four anal creampies.'>>
	<<elseif getvar("$film_type") == 13>>
		<<set $pfType = 1>>
		<<set $pcash = 150>>
		<<set $pfactor = 4>>
		<<set $actbonus = rand(2,3)>>
		<<set $tags = 'DP, vaginal, anal'>>
		<<set $pfilmtext = 'Four guys fucked you in double penetration in pairs. You got two double creampies.'>>
	<<elseif getvar("$film_type") == 14>>
		<<set $pfType = 1>>
		<<set $pcash = 300>>
		<<set $pfactor = 50>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'vaginal, anal, blowjob, cumshot, facial, swallowing'>>
		<<set $pfilmtext = 'Fifty of your fans fucked you however they could. Almost all of them came in your pussy.'>>
		<<set $pstory = 'You called out to your fans on the internet, giving them an opportunity to fuck you however they like.'>>
	<<elseif getvar("$film_type") == 15>>
		<<set $pfType = 0>>
		<<set $pcash = 50>>
		<<set $pfactor = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'blowjob, anal, anal creampie'>>
		<<set $pfilmtext = 'You gave a guy a blowjob before he fucked your ass and gave you an anal creampie.'>>
	<<elseif getvar("$film_type") == 16>>
		<<set $pfType = 0>>
		<<set $pcash = 50>>
		<<set $pfactor = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'blowjob, anal, cumshot'>>
		<<set $pfilmtext = 'You gave a guy a blowjob and he fucked your ass. He came over your ass.'>>
	<<elseif getvar("$film_type") == 17>>
		<<set $pfType = 0>>
		<<set $pcash = 50>>
		<<set $pfactress = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'lesbian, tribbing, double dildo, vaginal'>>
		<<set $pfilmtext = 'You had sex with a girl using a double dildo.'>>
	<<elseif getvar("$film_type") == 18>>
		<<set $pfType = 0>>
		<<set $pcash = 50>>
		<<set $pfactress = 1>>
		<<set $actbonus = rand(1,2)>>
		<<set $tags = 'lesbian, strapon, vaginal, anal'>>
		<<set $pfilmtext = 'You had sex with a girl using a strapon.'>>
	<<elseif getvar("$film_type") == 19>>
		<<set $pfType = 0>>
		<<set $pcash = 100>>
		<<set $pfactor = 1>>
		<<set $pfactress = 1>>
		<<set $actbonus = rand(2,3)>>
		<<set $tags = 'threesome, mff, blowjob, anal, cumshare'>>
		<<set $pfilmtext = 'You took part in an MFF threesome, sucking a guy off before he fucked your ass while the girl licked your pussy. You got an anal creampie and shared it with the girl.'>>
	<<elseif getvar("$film_type") == 20>>
		<<set $pfType = 0>>
		<<set $pcash = 100>>
		<<set $pfactor = 1>>
		<<set $pfactress = 1>>
		<<set $actbonus = rand(2,3)>>
		<<set $tags = 'threesome, mff, blowjob, anal, creampie, cumshare, cuni'>>
		<<set $pfilmtext = 'You took part in an MFF threesome, sucking him off before he fucked her ass while you licked her pussy. She shared her anal creampie with you.'>>
	<</if>>
	<<porntag>>
<</widget>>
:: porntag_macro[widget]
<<widget 'porntag'>>
	<<if getvar("$pornfilmAppAge["+$i+"]") < 20>>
		<<set $pfilmtags = 'teen'>>
	<<elseif getvar("$pornfilmAppAge["+$i+"]") >= 40>>
		<<set $pfilmtags = 'mature'>>
	<<else>>
		<<set $pfilmtags = ''>>
	<</if>>
	<<if getvar("$pornfilmpreg["+$i+"]") == 1>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', pregnant'>>
		<<else>>
			<<set $pfilmtags = 'pregnant'>>
		<</if>>
	<</if>>
	<<if getvar("$pfactor") == 0 and getvar("$pfactress") > 0>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', lesbian'>>
		<<else>>
			<<set $pfilmtags = 'lesbian'>>
		<</if>>
	<</if>>
	<<if getvar("$pfactor") > 2 and getvar("$pfactress") == 0>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', gangbang'>>
		<<else>>
			<<set $pfilmtags = 'gangbang'>>
		<</if>>
	<<elseif getvar("$pfactor") > 2 and getvar("$pfactress") > 1>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', orgy'>>
		<<else>>
			<<set $pfilmtags = 'orgy'>>
		<</if>>
	<<elseif getvar("$pfactor") == 2 and getvar("$pfactress") == 0>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', threesome'>>
		<<else>>
			<<set $pfilmtags = 'threesome'>>
		<</if>>
	<<elseif getvar("$pfactor") == 1 and getvar("$pfactress") == 1>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', threesome'>>
		<<else>>
			<<set $pfilmtags = 'threesome'>>
		<</if>>
	<<elseif getvar("$pfactor") == 0 and getvar("$pfactress") == 2>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', threesome'>>
		<<else>>
			<<set $pfilmtags = 'threesome'>>
		<</if>>
	<</if>>
	<<if getvar("$pfType") == 1>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', creampie'>>
		<<else>>
			<<set $pfilmtags = 'creampie'>>
		<</if>>
	<</if>>
	<<if $pc.tits >= 4>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', big tits'>>
		<<else>>
			<<set $pfilmtags = 'big tits'>>
		<</if>>
	<</if>>
	<<if $pc.pcs_butt > 12>>
		<<if $pfilmtags <> ''>>
			<<set $pfilmtags += ', big ass'>>
		<<else>>
			<<set $pfilmtags = 'big ass'>>
		<</if>>
	<</if>>
	<<if $pfilmtags <> ''>>
		<<set $pfilmtags += ', ' + $tags>>
	<<else>>
		<<set $pfilmtags = $tags>>
	<</if>>
<</widget>>
