:: girl
<<set $here = 'girl'>>
<<set $ARGS = $location_var[$here]>>
<!-- !!'<<$girldesc>> <<$girlbody>> <<$girlbod>> <<$girlface>>. <<$girldesc>> <<$girlClo>>'-->
<<if !$location_var[$here][0]>>
	<!-- !randomly age-->
	<<set $girlage = rand(18,35)>>
	<!-- !! {The NPC generator is now the primary system of creating new characters.}-->
	<<if getvar("$girlage") <= 25>>
		<<gs 'npcgeneratec' 1 'A Girl' $girlage>>
	<<else>>
		<<gs 'npcgeneratec' 1 'A Woman' $girlage>>
	<</if>>
	
	<<gs 'girl' 'details'>>
<</if>>
<<if $location_var[$here][0] == 'details'>>
	<!-- !Select Photos-->
	<<warn 'JUMP MARKER ENCOUNTERED: :girldetailsloop'>>
	<!-- !! boys 1-30, girlfriends 31-60-->
	<<set $lover_picrand = RAND(31,60)>>
	<<if $lover_picrand == $lover_picture[0] or $lover_picrand == $lover_picture[1] or $lover_picrand == $lover_picture[2]>>
		<<warn 'JUMP COMMAND ENCOUNTERED: jump girldetailsloop'>>

	<</if>>
	<<set $loverGenderTmp = 1>>
	<<set $silaVag = $npc($npclastgenerated).sexskill>>
	<<set $npc($npclastgenerated).usedname = $npc($npclastgenerated).firstname>>
	<<set $boydesc = $npc($npclastgenerated).usedname>>
	<!-- !!appearance-->
	<<set $boybodyrand = rand(1, 3)>>
	<<if getvar("$boybodyrand") == 1>>
		<<set $boybody = 'short'>>

	<</if>>
	<<if getvar("$boybodyrand") == 2>>
		<<set $boybody = 'average'>>

	<</if>>
	<<if getvar("$boybodyrand") == 3>>
		<<set $boybody = 'tall'>>

	<</if>>
	<<set $boybodrand = rand(1, 4)>>
	<<if getvar("$boybodrand") == 1 and getvar("$boybodyrand") == 1>>
		<<set $boybod = 'petite'>>

	<</if>>
	<<if getvar("$boybodrand") == 1 and getvar("$boybodyrand") > 1>>
		<<set $boybod = 'slender'>>

	<</if>>
	<<if getvar("$boybodrand") == 2>>
		<<set $boybod = 'toned'>>

	<</if>>
	<<if getvar("$boybodrand") == 3>>
		<<set $boybod = 'average'>>

	<</if>>
	<<if getvar("$boybodrand") == 4>>
		<<set $boybod = 'chubby'>>

	<</if>>
	<<set $boyfacerand = rand(1, 3)>>
	<<if getvar("$boyfacerand") == 1>>
		<<set $boyface = 'black'>>

	<</if>>
	<<if getvar("$boyfacerand") == 2>>
		<<set $boyface = 'brunette'>>

	<</if>>
	<<if getvar("$boyfacerand") == 3>>
		<<set $boyface = 'blond'>>

	<</if>>
	<!-- !!Variables responsible for any features like-->
	<!-- !!security, is responsible for the money and requirements-->
	<<set $harakboy = rand(0, 2)>>
	<<set $finance = rand(0, 2)>>
	<<if getvar("$finance") == 0>>
		<!-- !!Gopnik beggar or a hard worker-->
		<!-- !!check in appearance Primary-->
		<<if getvar("$harakboy") == 0>>
			<<set $npc($npclastgenerated).apprnc = rand(0, 8)>>

		<</if>>
		<<if getvar("$harakboy") == 1>>
			<<set $npc($npclastgenerated).apprnc = rand(0, 16)>>

		<</if>>
		<<if getvar("$harakboy") == 2>>
			<<set $npc($npclastgenerated).apprnc = rand(0, 32)>>

		<</if>>
		<<set $boyClo = 'wearing a tracksuit.'>>
	<<elseif getvar("$finance") == 1>>
		<!-- !!middle_peasant-->
		<!-- !!check in appearance-->
		<<if getvar("$harakboy") == 0>>
			<<set $npc($npclastgenerated).apprnc = rand(0, 16)>>

		<</if>>
		<<if getvar("$harakboy") == 1>>
			<<set $npc($npclastgenerated).apprnc = rand(0, 24)>>

		<</if>>
		<<if getvar("$harakboy") == 2>>
			<<set $npc($npclastgenerated).apprnc = rand(0, 32)>>

		<</if>>
		<<set $boyClo = 'wearing jeans and a blouse.'>>
	<<elseif getvar("$finance") == 2>>
		<!-- !!middle_peasant-->
		<!-- !!check in appearance-->
		<<if getvar("$harakboy") == 0>>
			<<set $npc($npclastgenerated).apprnc = rand(16, 32)>>

		<</if>>
		<<if getvar("$harakboy") == 1>>
			<<set $npc($npclastgenerated).apprnc = rand(24, 32)>>

		<</if>>
		<<if getvar("$harakboy") == 2>>
			<<set $npc($npclastgenerated).apprnc = rand(32, 40)>>

		<</if>>
		<<set $boyClo = 'wearing an expensive dress.'>>
	<</if>>
	<!-- !!requirements of the figure, chest size, hair color.-->
	<!-- !!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100-->
	<<set $figurboy = rand(0, 2)>>
	<!-- !!0 - 60  curve around 22,5 (C/D cups)-->
	<<set $npc($npclastgenerated).bust = rand(0,15 + rand(0,15) + rand(0,15))>> <<set if rand(1,10) = 1: npc_bust[$npclastgenerated] += rand(0,15)>>
	<!-- !!0 - black, 1 - brown, 2 - Redhead, 3 - blonde-->
	<<set $npc($npclastgenerated).haircol = rand(0, 3)>>
	<!-- !!character 0 - soft, 1 -norm 2 - aggressor-->
	<<if rand(0, 100) < 90>>
		<<set $izvrat = 0>>
	<<else>>
		<<set $izvrat = 1>>
	<</if>>
	<<set $hairboy = $npc($npclastgenerated).haircol>>
	<<set $titboy = $npc($npclastgenerated).bust>>
	<<set $vneshboy = $npc($npclastgenerated).apprnc>>
	<!-- !! trying to make the preference section-->
	<!-- !! Variables here are clotTypePrefTmp, clotQualPrefTmp, clotTopPrefTmp, bottShorPrefTmp, clotThinPrefTmp, bimbPrefTmp, pierPrefTmp, tattPrefTmp, lipsPrefTmp, bodyPrefTmp, makePrefTmp, IQPrefTmp.-->
	<!-- !!This is for clothing type preference-->
	<!-- !! If you notice how rare it is to get a preference that is intentional-->
	<!-- !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.-->
	<<set $clotTypePrefTmp = 0>>
	<<if rand(0, 4) == 4>>
		<<if getvar("$finance") == 0>>
			<<set $clotTypePrefTmp = rand(1,2)>>
			<<if rand(0, 1) == 1 and getvar("$izvrat") == 1>>
				<<set $clotTypePrefTmp = 4>>

			<</if>>
		<<elseif getvar("$finance") == 1>>
			<<set $clotTypePrefTmp = rand(1,3)>>
			<<if rand(0, 2) == 2 and getvar("$izvrat") == 1>>
				<<set $clotTypePrefTmp = 4>>

			<</if>>
		<<elseif getvar("$finance") == 2>>
			<<set $clotTypePrefTmp = rand(2,3)>>
			<<if rand(0, 1) == 1 and getvar("$izvrat") == 1>>
				<<set $clotTypePrefTmp = 4>>

			<</if>>
		<</if>>
	<</if>>
	<!-- !!This is for the quality of clothing-->
	<!-- !! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)-->
	<<set $clotQualPrefTmp = 0>>
	<<if rand(0, 5) == 5>>
		<<if getvar("$finance") == 0>>
			<<set $clotQualPrefTmp = 1>>
		<<elseif getvar("$finance") == 1>>
			<<set $clotQualPrefTmp = rand(1, 2)>>
			<<set $randchan = rand(0, 1)>>
			<<if getvar("$randchan") == 0 and getvar("$clotTypePrefTmp") != 3>>
				<<set $clotQualPrefTmp = 1>>
			<<elseif getvar("$randchan") == 1 and getvar("$clotTypePrefTmp") != 1>>
				<<set $clotQualPrefTmp = 2>>
			<</if>>
		<<elseif getvar("$finance") == 2>>
			<<set $randchan = rand(0, 2)>>
			<<if getvar("$randchan") == 2 and getvar("$clotTypePrefTmp") != 1>>
				<<set $clotQualPrefTmp = 2>>
			<</if>>
		<</if>>
	<</if>>
	<!-- !!This is for the clothing top cut for the clothing-->
	<!-- !!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.-->
	<!-- !! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring-->
	<!-- !! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titboy + 0/3 depending on the players breast size-->
	<!-- !!0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe-->
	<!-- !! It doesn''t matter if your poor or rich, everyone loves tits.-->
	<<set $slutConstant = 0>>
	<<if rand(0, 2) == 2 and getvar("$izvrat") == 1>>
		<<set $slutConstant = 1>>

	<</if>>
	<<set $clotTopPrefTmp = 0>>
	<<if rand(0, 2) == 2>>
		<<set $randchan = rand(0, 5)>>
		<<if getvar("$randchan") < 3 and getvar("$clotTypePrefTmp") != 4>>
			<<set $clotTopPrefTmp = 1 + $slutConstant>>
		<<elseif getvar("$randchan") < 5 and getvar("$clotTypePrefTmp") != 4>>
			<<set $clotTopPrefTmp = 2 + $slutConstant>>
		<<elseif getvar("$randchan") == 5 and getvar("$clotTypePrefTmp") != 3>>
			<<set $clotTopPrefTmp = 3>>
		<</if>>
		<<if getvar("$clotTopPrefTmp") != 0 and getvar("$titboy") == 2>>
			<<if getvar("$clotPref") != 3>>
				<<set $clotTopPrefTmp += 1>>
			<</if>>
		<</if>>
	<</if>>
	<!-- !! This is for pants and skirt shortness and will be grouped together as such.-->
	<!-- !! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.-->
	<<set $bottShorPrefTmp = 0>>
	<<if rand(0, 2) == 2>>
		<<set $randchan = rand(0, 5)>>
		<<if getvar("$randchan") < 3 and getvar("$clotTypePrefTmp") != 4>>
			<<set $bottShorPrefTmp = 1>>
		<<elseif getvar("$randchan") < 5>>
			<<set $bottShorPrefTmp = 2>>
		<<elseif getvar("$randchan") == 5>>
			<<set $bottShorPrefTmp = 3>>
		<</if>>
		<<set $randchan = rand(0, 1)>>
		<<if getvar("$slutConstant") == 1 and getvar("$randchan") == 1 and getvar("$clotTypePrefTmp") == 4>>
			<<set $bottShorPrefTmp = 3>>
		<</if>>
	<</if>>
	<!-- !! This is for clothes thinness.-->
	<!-- !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)-->
	<!-- !! I see the moderate to really thin overlapping. Its intentional.-->
	<<set $clotThinPrefTmp = 0>>
	<<if rand(0, 2) == 2>>
		<<set $randchan = rand(0, 5)>>
		<<if getvar("$randchan") < 3>>
			<<set $clotThinPrefTmp = 1 + $slutConstant>>
		<<elseif getvar("$randchan") < 5>>
			<<set $clotThinPrefTmp = 2 + $slutConstant>>
		<<elseif getvar("$randchan") == 5 and getvar("$clotTypePrefTmp") != 3>>
			<<set $clotThinPrefTmp = 3>>
		<</if>>
	<</if>>
	<!-- !!This is to find out if they want you to wear bimbo clothing-->
	<!-- !! 0 - no preference, 1 - Prefers bimbo clothing.-->
	<<set $bimbPrefTmp = 0>>
	<<if rand(0, 10) == 0 and getvar("$clotTypePrefTmp") != 3>>
		<<set $bimbPrefTmp = 1>>

	<</if>>
	<!-- !!This is to find out if they want you to wear piercings.-->
	<!-- !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.-->
	<<set $pierPrefTmp = 0>>
	<<if rand(0, 3) == 3>>
		<<set $randchan = rand(0, 2)>>
		<<if getvar("$randchan") == 0>>
			<<set $pierPrefTmp = 1 + $slutConstant>>
		<<elseif getvar("$randchan") == 1>>
			<<set $pierPrefTmp = 2 + $slutConstant>>
		<<elseif getvar("$randchan") == 2>>
			<<set $pierPrefTmp = 3>>
		<</if>>
	<</if>>
	<!-- !!This is to find out if they want you to have tattoos.-->
	<!-- !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.-->
	<<set $tattPrefTmp = 0>>
	<<if rand(0, 3) == 3>>
		<<set $tattPrefTmp = rand(1, 3)>>

	<</if>>
	<!-- !!This is to find out how big they want your lips.-->
	<!-- !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)-->
	<<set $lipsPrefTmp = 0>>
	<<if rand(0, 3) == 3>>
		<<set $randchan = rand(0, 2)>>
		<<if getvar("$randchan") == 0>>
			<<set $lipsPrefTmp = 1 + $slutConstant>>
		<<elseif getvar("$randchan") == 2>>
			<<set $lipsPrefTmp = 2>>
		<</if>>
	<</if>>
	<!-- !!This is to find out how big they want YOU.-->
	<!-- !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)-->
	<!-- !! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.-->
	<<set $pc.bodyPrefTmp = 0>>
	<<if rand(0, 3) == 3>>
		<<set $pc.bodyPrefTmp = rand(1, 3)>>

	<</if>>
	<!-- !!This is to find out how much makeup they want you to wear.-->
	<!-- !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)-->
	<!-- !! Plan to make a way for you to set what you makeup you want to wear at your bedside and giving into their wishes would automatically change the automated setting.-->
	<<set $makePrefTmp = 0>>
	<<if rand(0, 1) == 1>>
		<<set $randchan = rand(0, 5)>>
		<<if getvar("$randchan") < 3>>
			<<set $makePrefTmp = 1 + $slutConstant>>
		<<elseif getvar("$randchan") < 5>>
			<<set $makePrefTmp = 2 + $slutConstant>>
		<<elseif getvar("$randchan") == 5 and getvar("$clotTypePrefTmp") != 3>>
			<<set $makePrefTmp = 3>>
		<</if>>
	<</if>>
	<!-- !! This is to see if they like a ditz, average, or a smartypants-->
	<!-- !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.-->
	<<set $IQPrefTmp = 0>>
	<!-- !! IQPrefTmp is capped at 3. With old code: rand(1, 2) + rand(1, 2) + rand(0,1) => 1/8 chance for 2 else 3 (or more)-->
	<<if rand(0, 4) == 4>>
		<<set $IQPrefTmp = iif(rand(1,8) = 1, 2, 3)>>

	<</if>>
	<<set $randchan to null>>
<</if>>
