:: Wardrobe [nobr]

<<effects>>
You look in your wardrobe.<br><br>
<<wardrobewear>>
[[Close wardrobe|Bedroom]]<br><br>
<<wardrobe>>




:: Changing Room [nobr]
<<effects>><<set $outside to 0>><<set $location to "beach">>
You are in a small wooden changing room.<br><br>
<<wardrobewear>>
<<if $exposed lte 0>>
[[Leave|Beach]]<br><br>
<<else>>
You can't go out like this!<br><br>
<</if>>
<<wardrobe>>




:: Eden Wardrobe [nobr]
<<effects>>
You look through the cupboard containing your clothes. There's an old dressing screen for privacy.<br><br>
<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Done|Eden Cabin]]>><<pass 1>><</link>><br><br>
	<<else>>
	You can't remain undressed like this!<br><br>
	<</if>>
<<else>>
	<<if $exposed lte 1>>
	<<link [[Done|Eden Cabin]]>><</link>><br><br>
	<<else>>
	You can't remain undressed like this!<br><br>
	<</if>>
<</if>>
<<wardrobe>>




:: Strip Club Dressing Room [nobr]
<<effects>><<set $outside to 0>><<set $location to "town">>
You are in the strip club's dressing room. <<if $daystate isnot "day" and $daystate isnot "dawn">>There are a few mirrors, currently occupied by staff fixing their hair and makeup.<</if>><br><br>
<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Back to the club (0:01)|Strip Club]]>><<pass 1>><</link>><br><br>
	<<else>>
	You can't go out like this!<br><br>
	<</if>>
<<elseif $exhibitionism gte 95>>
<<link [[Back to the club (0:01)|Strip Club]]>><<pass 1>><</link>><br><br>
<<else>>
	<<if $exposed lte 1>>
	<<link [[Back to the club (0:01)|Strip Club]]>><<pass 1>><</link>><br><br>
	<<else>>
	You can't go out like this!<br><br>
	<</if>>
<</if>>
<<wardrobe>>




:: Brothel Dressing Room [nobr]
<<effects>><<set $outside to 0>><<set $location to "town">>
You are in the brothel's dressing room. There are a few mirrors, currently occupied by staff fixing their hair and makeup.<br><br>
<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Back to the brothel (0:01)|Brothel]]>><<pass 1>><</link>><br><br>
	<<else>>
	You can't go out like this!<br><br>
	<</if>>
<<elseif $exhibitionism gte 95>>
<<link [[Back to the brothel (0:01)|Brothel]]>><<pass 1>><</link>><br><br>
<<else>>
	<<if $exposed lte 1>>
	<<link [[Back to the brothel (0:01)|Brothel]]>><<pass 1>><</link>><br><br>
	<<else>>
	You can't go out like this!<br><br>
	<</if>>
<</if>>
<<wardrobe>>




:: Testing Room [nobr]
<<silently>><<effects>><</silently>>
/*<<Avatar>>*/

<<link "<<">><<set $pain -= 10>><<goto "Testing Room">><</link>> 
<<link "<">><<set $pain -= 5>><<goto "Testing Room">><</link>> 
Pain (<<= $pain>>)
<<link ">">><<set $pain += 5>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $pain += 10>><<goto "Testing Room">><</link>> <br>
<<link "<<">><<set $arousal -= 1000>><<goto "Testing Room">><</link>> 
<<link "<">><<set $arousal -= 100>><<goto "Testing Room">><</link>> 
Arousal (<<= $arousal>>)
<<link ">">><<set $arousal += 100>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $arousal += 1000>><<goto "Testing Room">><</link>> <br>
<<link "<<">><<set $stress -= 1000>><<goto "Testing Room">><</link>> 
<<link "<">><<set $stress -= 100>><<goto "Testing Room">><</link>> 
Stress (<<= $stress>>)
<<link ">">><<set $stress += 100>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $stress += 1000>><<goto "Testing Room">><</link>> <br>
<<link "<<">><<set $trauma -= 1000>><<goto "Testing Room">><</link>> 
<<link "<">><<set $trauma -= 100>><<goto "Testing Room">><</link>> 
Trauma (<<= $trauma>>)
<<link ">">><<set $trauma += 100>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $trauma += 1000>><<goto "Testing Room">><</link>> <br><br>

<<link "<<">><<set $promiscuity -= 10>><<goto "Testing Room">><</link>> 
<<link "<">><<set $promiscuity -= 2>><<goto "Testing Room">><</link>> 
Promiscuity (<<= $promiscuity>>)
<<link ">">><<set $promiscuity += 2>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $promiscuity += 10>><<goto "Testing Room">><</link>> <br>
<<link "<<">><<set $exhibitionism -= 10>><<goto "Testing Room">><</link>> 
<<link "<">><<set $exhibitionism -= 2>><<goto "Testing Room">><</link>> 
Exhibitionism (<<= $exhibitionism>>)
<<link ">">><<set $exhibitionism += 2>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $exhibitionism += 10>><<goto "Testing Room">><</link>> <br><br>

Toggle:  
<<link "Gender">><<if $playergender is "f">>
<<set $vaginaexist to 0>><<set $playergender to "m">><<set $penisexist to 1>>
<<else>><<set $penisexist to 0>><<set $playergender to "f">><<set $vaginaexist to 1>><</if>>
<<goto "Testing Room">><</link>>  |  
<<link "Virginity">>
<<if $penilevirginity is 0 or $vaginalvirginity is 0>>
  <<set $penilevirginity to 1>><<set $vaginalvirginity to 1>><<set $oralvirginity to 1>><<set $analvirginity to 1>>
<<else>>
  <<set $penilevirginity to 0>><<set $vaginalvirginity to 0>><<set $oralvirginity to 0>><<set $analvirginity to 0>>
<</if>>
<<goto "Testing Room">><</link>> | 
<<link "Hirsute">>
<<if $hirsutedisable is "f">><<set $hirsutedisable to "t">>
<<else>><<set $hirsutedisable to "f">><</if>>
<<goto "Testing Room">><</link>>  |
<<link "Bound Left Arm">>
<<if $leftarm is "bound">><<set $leftarm to 0>><<set $leftboundcarry to 0>>
<<else>><<set $leftarm to "bound">><</if>>
<<goto "Testing Room">><</link>>  |  
<<link "Bound Right Arm">>
<<if $rightarm is "bound">><<set $rightarm to 0>><<set $rightboundcarry to 0>>
<<else>><<set $rightarm to "bound">><</if>>
<<goto "Testing Room">><</link>>  <br><br>

Breast Size - 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12 <br>

Hair Colour (<<= $haircolour>>): 
<<link "Black">><<set $haircolour to "black">><<goto "Testing Room">><</link>> |
<<link "Brown">><<set $haircolour to "brown">><<goto "Testing Room">><</link>> |
<<link "Red">><<set $haircolour to "red">><<goto "Testing Room">><</link>> |
<<link "Ginger">><<set $haircolour to "ginger">><<goto "Testing Room">><</link>> |
<<link "Blond">><<set $haircolour to "blond">><<goto "Testing Room">><</link>> |
<<link "Green">><<set $haircolour to "green">><<goto "Testing Room">><</link>> |
<<link "Blue">><<set $haircolour to "blue">><<goto "Testing Room">><</link>> |
<<link "Purple">><<set $haircolour to "purple">><<goto "Testing Room">><</link>> <br>

<<link "<<">><<set $hairlength -= 100>><<goto "Testing Room">><</link>> 
<<link "<">><<set $hairlength -= 10>><<goto "Testing Room">><</link>> 
Hair Length (<<= $hairlength>>)
<<link ">">><<set $hairlength += 10>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $hairlength += 100>><<goto "Testing Room">><</link>> <br>

Eye Colour (<<= $eyecolour>>): 
<<link "Hazel">><<set $eyecolour to "hazel">><<goto "Testing Room">><</link>> |
<<link "Amber">><<set $eyecolour to "amber">><<goto "Testing Room">><</link>> |
<<link "Green">><<set $eyecolour to "green">><<goto "Testing Room">><</link>> |
<<link "Dark Blue">><<set $eyecolour to "dark blue">><<goto "Testing Room">><</link>> |
<<link "Light Blue">><<set $eyecolour to "light blue">><<goto "Testing Room">><</link>> |
<<link "Purple">><<set $eyecolour to "purple">><<goto "Testing Room">><</link>> <br><br>

<<link "<">><<set $wolfgirl -= 1>><<goto "Testing Room">><</link>> 
Wolf (<<= $wolfgirl>>)
<<link ">">><<set $wolfgirl += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $angel -= 1>><<goto "Testing Room">><</link>> 
Angel (<<= $angel>>)
<<link ">">><<set $angel += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $demon -= 1>><<goto "Testing Room">><</link>> 
Demon (<<= $demon>>)
<<link ">">><<set $demon += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $fallenangel -= 1>><<goto "Testing Room">><</link>> 
Fallen Angel (<<= $fallenangel>>)
<<link ">">><<set $fallenangel += 1>><<goto "Testing Room">><</link>> <br><br>


Semen:  
<<link "<">><<set $vaginasemen -= 1>><<goto "Testing Room">><</link>> 
Vagina (<<= $vaginasemen>>)
<<link ">">><<set $vaginasemen += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $anussemen -= 1>><<goto "Testing Room">><</link>> 
Anus (<<= $anussemen>>)
<<link ">">><<set $anussemen += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $mouthsemen -= 1>><<goto "Testing Room">><</link>> 
Mouth (<<= $mouthsemen>>)
<<link ">">><<set $mouthsemen += 1>><<goto "Testing Room">><</link>> <br>
Goo:  
<<link "<">><<set $vaginagoo -= 1>><<goto "Testing Room">><</link>> 
Vagina (<<= $vaginagoo>>)
<<link ">">><<set $vaginagoo += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $anusgoo -= 1>><<goto "Testing Room">><</link>> 
Anus (<<= $anusgoo>>)
<<link ">">><<set $anusgoo += 1>><<goto "Testing Room">><</link>> |
<<link "<">><<set $mouthgoo -= 1>><<goto "Testing Room">><</link>> 
Mouth (<<= $mouthgoo>>)
<<link ">">><<set $mouthgoo += 1>><<goto "Testing Room">><</link>> <br>

Parasite:  
<<link "Chest">>
<<if $chestparasite is 0>><<set $chestparasite to 1>>
<<else>><<set $chestparasite to 0>><</if>>
<<goto "Testing Room">><</link>>  |  
<<link "Penis">>
<<if $penisparasite is 0>><<set $penisparasite to 1>>
<<else>><<set $penisparasite to 0>><</if>>
<<goto "Testing Room">><</link>>  |  
<<link "Clit">>
<<if $clitparasite is 0>><<set $clitparasite to 1>>
<<else>><<set $clitparasite to 0>><</if>>
<<goto "Testing Room">><</link>>  <br><br>


Upper Clothes:  <<link "<<">><<set $upperintegrity -= 10>><<goto "Testing Room">><</link>> 
<<link "<">><<set $upperintegrity -= 1>><<goto "Testing Room">><</link>> 
Integrity (<<= $upperintegrity>>)
<<link ">">><<set $upperintegrity += 1>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $upperintegrity += 10>><<goto "Testing Room">><</link>>  |  
<<link "<">><<set $upperwet -= 100>><<goto "Testing Room">><</link>> 
Wet (<<= $upperwet>>)
<<link ">">><<set $upperwet += 1>><<goto "Testing Room">><</link>> <br>

Lower Clothes:  <<link "<<">><<set $lowerintegrity -= 10>><<goto "Testing Room">><</link>> 
<<link "<">><<set $lowerintegrity -= 1>><<goto "Testing Room">><</link>> 
Integrity (<<= $lowerintegrity>>)
<<link ">">><<set $lowerintegrity += 1>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $lowerintegrity += 10>><<goto "Testing Room">><</link>>  |  
<<link "<">><<set $lowerwet -= 100>><<goto "Testing Room">><</link>> 
Wet (<<= $lowerwet>>)
<<link ">">><<set $lowerwet += 1>><<goto "Testing Room">><</link>> <br>

Underwear:  <<link "<<">><<set $underintegrity -= 10>><<goto "Testing Room">><</link>> 
<<link "<">><<set $underintegrity -= 1>><<goto "Testing Room">><</link>> 
Integrity (<<= $underintegrity>>)
<<link ">">><<set $underintegrity += 1>><<goto "Testing Room">><</link>> 
<<link ">>">><<set $underintegrity += 10>><<goto "Testing Room">><</link>>  |  
<<link "<">><<set $underwet -= 100>><<goto "Testing Room">><</link>> 
Wet (<<= $underwet>>)
<<link ">">><<set $underwet += 1>><<goto "Testing Room">><</link>> <br>

/*ToDo:  Add handling for toggling clothing.*/
/*ToDo:  Wardrobe and Shop*/

<br><br>

<<link [[Bedroom]]>><</link>><br>







:: Widgets Wardrobe [widget]
<<widget "wardrobewear">><<nobr>>


<<if $wear is "stripall">><<set $wear to 0>>
<<if $uppertype is "naked" and $lowertype is "naked" and $undertype is "naked">>
There's nothing to remove.
<<else>>
You remove your clothing.
<</if>>
<br><br>
<<uppernaked>>
<<lowernaked>>
<<undernaked>>
<</if>>

<<if $wear is "dry">><<set $wear to 0>>
<<set $upperwet to 0>><<set $lowerwet to 0>><<set $underwet to 0>><<set $upperwetstage to 0>><<set $lowerwetstage to 0>><<set $underwetstage to 0>>
You squeeze the water from your clothes.<br><br>
<</if>>

<<if $wear is "sundress">><<set $wear to 0>>
You wear the sundress.<br><br>
	<<if $uppersundressno gte 1 and $lowersundressno gte 1>>
	<<uppernaked>><<lowernaked>>
	<</if>>
	<<if $uppersundressno gte 1>>
<<uppersundress>>
	<</if>>
	<<if $lowersundressno gte 1>>
	<<lowersundress>>
	<</if>>
<</if>>

<<if $wear is "schoolswimsuit">><<set $wear to 0>>
You wear the swimsuit.<br><br>
	<<if $upperschoolswimsuitno gte 1>>
<<upperschoolswimsuit>>
	<</if>>
	<<if $lowerschoolswimsuitno gte 1>>
	<<lowerschoolswimsuit>>
	<</if>>
<</if>>

<<if $wear is "eveninggown">><<set $wear to 0>>
You wear the evening gown.<br><br>
	<<if $uppereveninggownno gte 1>>
<<uppereveninggown>>
	<</if>>
	<<if $lowereveninggownno gte 1>>
	<<lowereveninggown>>
	<</if>>
<</if>>


<<if $wear is "stripupper">><<set $wear to 0>>
<<if $uppertype isnot "naked">>
You take off your $upperclothes.
<<else>>
You are already topless.
<</if>>
<<uppernaked>><br><br>
<</if>>

<<if $wear is "uppertowel">><<set $wear to 0>><<set $uppertowelnew to 1>>
You wrap the towel around your chest.<br><br>
<<uppertowel>>
<</if>>

<<if $wear is "upperpjs">><<set $wear to 0>>
You wear the pyjama shirt.<br><br>
<<upperpjs>>
<</if>>

<<if $wear is "upperbikini">><<set $wear to 0>>
You wear the bikini top.<br><br>
<<upperbikini>>
<</if>> 

<<if $wear is "tshirt">><<set $wear to 0>>
You wear the t-shirt.<br><br>
<<tshirt>>
<</if>> 

<<if $wear is "schoolshirt">><<set $wear to 0>>
You wear the school shirt.<br><br>
<<schoolshirt>>
<</if>>

<<if $wear is "tanktop">><<set $wear to 0>>
You wear the tank top.<br><br>
<<tanktop>>
<</if>>


<<if $wear is "striplower">><<set $wear to 0>>
<<if $lowertype isnot "naked">>
You take off your 
<<if $upperset isnot $lowerset>>
$lowerclothes
<<else>>$upperclothes.
<</if>>
<<else>>
You are already bottomless.
<</if>>
<<lowernaked>><br><br>
<</if>>

<<if $wear is "lowertowel">><<set $wear to 0>><<set $lowertowelnew to 1>>
You wrap the towel around your pelvis.<br><br>
<<lowertowel>>
<</if>>

<<if $wear is "lowerpjs">><<set $wear to 0>>
You wear the pyjama bottoms.<br><br>
<<lowerpjs>>
<</if>>

<<if $wear is "lowerbikini">><<set $wear to 0>>
You wear the bikini bottoms.<br><br>
<<lowerbikini>>
<</if>>

<<if $wear is "waistapron">><<set $wear to 0>>
You wear the waist apron.<br><br>
<<waistapron>>
<</if>>

<<if $wear is "shorts">><<set $wear to 0>>
You wear the shorts.<br><br>
<<shorts>>
<</if>>

<<if $wear is "schoolshorts">><<set $wear to 0>>
You wear the school shorts.<br><br>
<<schoolshorts>>
<</if>>

<<if $wear is "schoolskirt">><<set $wear to 0>>
You wear the school skirt.<br><br>
<<schoolskirt>>
<</if>>

<<if $wear is "schoolswimshorts">><<set $wear to 0>>
You wear the swim shorts.<br><br>
<<schoolswimshorts>>
<</if>>





<<if $wear is "stripunder">><<set $wear to 0>>
<<if $undertype isnot "naked">>
You take off your $underclothes.
<<else>>
You are already pantiless.
<</if>>
<<undernaked>><br><br>
<</if>>

<<if $wear is "plainpanties">><<set $wear to 0>>
You wear the plain panties.<br><br>
<<plainpanties>>
<</if>>

<<if $wear is "lacepanties">><<set $wear to 0>>
You wear the lace panties.<br><br>
<<lacepanties>>
<</if>>

<<if $wear is "yfronts">><<set $wear to 0>>
You wear the Y fronts.<br><br>
<<yfronts>>
<</if>>

<<if $wear is "tights">><<set $wear to 0>>
You wear the tights.<br><br>
<<tights>>
<</if>>



<<accessorieswear>>


<<exposure>>

<</nobr>><</widget>>






<<widget "wardrobe">><<nobr>>

<<if $upperwetstage gte 1 or $lowerwetstage gte 1 or $underwetstage gte 1>>
<<link "Dry your clothes">><<set $wear to "dry">><<script>>state.display(state.active.title, null)<</script>><</link>><br><br>
<</if>>


Outfits<br>
<<if $uppersundressno gte 1>> | 
<<link "Sundress">><<set $wear to "sundress">><<script>>state.display(state.active.title, null)<</script>><</link>>

<<elseif $lowersundressno gte 1>> | 
<<link "Sundress">><<set $wear to "sundress">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $upperschoolswimsuitno gte 1>> | 
<<link "School swimsuit">><<set $wear to "schoolswimsuit">><<script>>state.display(state.active.title, null)<</script>><</link>>

<<elseif $lowerschoolswimsuitno gte 1>> | 
<<link "School swimsuit">><<set $wear to "schoolswimsuit">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $uppereveninggownno gte 1>> | 
<<link "Evening gown">><<set $wear to "eveninggown">><<script>>state.display(state.active.title, null)<</script>><</link>>

<<elseif $lowereveninggownno gte 1>> | 
<<link "Evening gown">><<set $wear to "eveninggown">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>


<br>

<<link "Strip all">><<set $wear to "stripall">><<script>>state.display(state.active.title, null)<</script>><</link>>

<br><br>







Tops<br>
<<if $upperpjsno gte 1>> | 
<<link "Pyjama shirt">><<set $wear to "upperpjs">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $upperbikinino gte 1>> | 
<<link "Bikini top">><<set $wear to "upperbikini">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $tshirtno gte 1>> | 
<<link "T-shirt">><<set $wear to "tshirt">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $schoolshirtno gte 1>> | 
<<link "School shirt">><<set $wear to "schoolshirt">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $tanktopno gte 1>> | 
<<link "Tank top">><<set $wear to "tanktop">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>



 | <<link "Towel">><<set $wear to "uppertowel">>
 <<script>>state.display(state.active.title, null)<</script>>
<</link>>

<br>

<<link "Strip top">><<set $wear to "stripupper">><<script>>state.display(state.active.title, null)<</script>><</link>>

<br><br>







Bottoms<br>
<<if $lowerpjsno gte 1>> | 
<<link "Pyjama bottoms">><<set $wear to "lowerpjs">>
<<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $lowerbikinino gte 1>> | 
<<link "Bikini bottoms">><<set $wear to "lowerbikini">>
<<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $waistapronno gte 1>> | 
<<link "Waist apron">><<set $wear to "waistapron">>
<<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $shortsno gte 1>> | 
<<link "Shorts">><<set $wear to "shorts">><<script>>state.display(state.active.title, null)<</script>>
<</link>>
<</if>>

<<if $schoolshortsno gte 1>> | 
<<link "School shorts">><<set $wear to "schoolshorts">><<script>>state.display(state.active.title, null)<</script>>
<</link>>
<</if>>

<<if $schoolskirtno gte 1>> | 
<<link "School skirt">><<set $wear to "schoolskirt">><<script>>state.display(state.active.title, null)<</script>>
<</link>>
<</if>>

<<if $schoolswimshortsno gte 1>> | 
<<link "School swim shorts">><<set $wear to "schoolswimshorts">><<script>>state.display(state.active.title, null)<</script>>
<</link>>
<</if>>




 | <<link "Towel">><<set $wear to "lowertowel">>
 <<script>>state.display(state.active.title, null)<</script>>
<</link>>


<br>



<<link "Strip bottom">><<set $wear to "striplower">><<script>>state.display(state.active.title, null)<</script>><</link>>

<br><br>






Underwear<br>

<<if $undertype is "chastity">>
You can't remove your chastity belt without help.<br><br>
<<else>>

<<if $plainpantiesno gte 1>> | 
<<link "Plain panties">><<set $wear to "plainpanties">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $lacepantiesno gte 1>> | 
<<link "Lace panties">><<set $wear to "lacepanties">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $yfrontsno gte 1>> | 
<<link "Y fronts">><<set $wear to "yfronts">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>

<<if $tightsno gte 1>> | 
<<link "Tights">><<set $wear to "tights">><<script>>state.display(state.active.title, null)<</script>><</link>>
<</if>>


<br>

<<link "Strip underwear">><<set $wear to "stripunder">><<script>>state.display(state.active.title, null)<</script>><</link>>

<br><br>
<</if>>


<<accessories>>




<<link "Set currently worn clothing as casual outfit">><<set $upperoutfitcasual to $upperclothes>><<set $loweroutfitcasual to $lowerclothes>><<set $underoutfitcasual to $underclothes>><<script>>state.display(state.active.title, null)<</script>><</link>><br>
<<link "Set currently worn clothing as school outfit">><<set $upperoutfitschool to $upperclothes>><<set $loweroutfitschool to $lowerclothes>><<set $underoutfitschool to $underclothes>><<script>>state.display(state.active.title, null)<</script>><</link>><br>
<<link "Set currently worn clothing as custom 1 outfit">><<set $upperoutfitcustom1 to $upperclothes>><<set $loweroutfitcustom1 to $lowerclothes>><<set $underoutfitcustom1 to $underclothes>><<script>>state.display(state.active.title, null)<</script>><</link>><br>
<<link "Set currently worn clothing as custom 2 outfit">><<set $upperoutfitcustom2 to $upperclothes>><<set $loweroutfitcustom2 to $lowerclothes>><<set $underoutfitcustom2 to $underclothes>><<script>>state.display(state.active.title, null)<</script>><</link>><br>
<<link "Set currently worn clothing as custom 3 outfit">><<set $upperoutfitcustom3 to $upperclothes>><<set $loweroutfitcustom3 to $lowerclothes>><<set $underoutfitcustom3 to $underclothes>><<script>>state.display(state.active.title, null)<</script>><</link>><br>
<<link "Set currently worn clothing as custom 4 outfit">><<set $upperoutfitcustom4 to $upperclothes>><<set $loweroutfitcustom4 to $lowerclothes>><<set $underoutfitcustom4 to $underclothes>><<script>>state.display(state.active.title, null)<</script>><</link>><br>

<br>

<<set $upperoff to 0>>
<<set $loweroff to 0>>
<<set $underoff to 0>>



<<exposure>>



<</nobr>><</widget>>









:: Widgets Clothing [widget]
<<widget "clothinginit">><<nobr>>
<<set $uppersundresscolourchoice to 0>>
<<set $lowersundresscolourchoice to 0>>
<<set $upperpjscolourchoice to 0>>
<<set $lowerpjscolourchoice to 0>>
<<set $uppertowelcolourchoice to 0>>
<<set $lowertowelcolourchoice to 0>>
<<set $upperbikinicolourchoice to 0>>
<<set $lowerbikinicolourchoice to 0>>
<<set $plainpantiescolourchoice to 0>>
<<set $lacepantiescolourchoice to 0>>
<<set $tightscolourchoice to 0>>
<<set $waistaproncolourchoice to 0>>
<<set $tshirtcolourchoice to 0>>
<<set $shortscolourchoice to 0>>
<<set $yfrontscolourchoice to 0>>
<<set $schoolshirtcolourchoice to 0>>
<<set $schoolshortscolourchoice to 0>>
<<set $schoolskirtcolourchoice to 0>>
<<set $upperschoolswimsuitcolourchoice to 0>>
<<set $lowerschoolswimsuitcolourchoice to 0>>
<<set $schoolswimshortscolourchoice to 0>>
<<set $chastitybeltcolourchoice to 0>>
<<set $uppereveninggowncolourchoice to 0>>
<<set $lowereveninggowncolourchoice to 0>>

<<set $upperstore to 0>>
<<set $lowerstore to 0>>
<<set $understore to 0>>

<<set $headacc to 0>>
<<set $faceacc to 0>>
<<set $legsacc to 0>>
<<set $feetacc to 0>>
<<set $hairpin to 1>>
<<set $blackshoes to 1>>
<<set $glasses to 1>>

<<set $upperoff to 0>>
<<set $loweroff to 0>>
<<set $underoff to 0>>

<<set $upperwet to 0>>
<<set $lowerwet to 0>>
<<set $underwet to 0>>
<<set $upperwetstage to 0>>
<<set $lowerwetstage to 0>>
<<set $underwetstage to 0>>
<<set $upperwetcarry to 0>>
<<set $lowerwetcarry to 0>>
<<set $underwetcarry to 0>>
<<set $upperwetstagecarry to 0>>
<<set $lowerwetstagecarry to 0>>
<<set $underwetstagecarry to 0>>
<<set $waterwash to 0>>
<</nobr>><</widget>>








<<widget "givestartclothing">><<nobr>>

<<if $playergender is "f">>
<<set $girlsgymsocks to 1>>
<<set $uppersundressnew to 1>>
<<set $lowersundressnew to 1>>
<<set $upperpjsnew to 1>>
<<set $lowerpjsnew to 1>>
<<set $plainpantiesnew to 1>>
<<set $schoolshirtnew to 1>>
<<set $schoolskirtnew to 1>>
<<set $upperschoolswimsuitnew to 1>>
<<set $lowerschoolswimsuitnew to 1>>
<<upperschoolswimsuit>><<lowerschoolswimsuit>><<schoolshirt>><<schoolskirt>><<upperpjs>><<lowerpjs>><<uppersundress>><<lowersundress>><<plainpanties>>
<<set $uppersundressno to 1>>
<<set $upperpjsno to 1>>
<<set $lowersundressno to 1>>
<<set $lowerpjsno to 1>>
<<set $plainpantiesno to 1>>
<<set $schoolshirtno to 1>>
<<set $schoolskirtno to 1>>
<<set $upperschoolswimsuitno to 1>>
<<set $lowerschoolswimsuitno to 1>>
<<set $sundresscolour to "white">>
<<set $sundresscolourchoice to "white">>
<<set $upperpjscolour to "blue">>
<<set $upperpjscolourchoice to "blue">>
<<set $lowerpjscolour to "blue">>
<<set $lowerpjscolourchoice to "blue">>
<<set $plainpantiescolour to "pink">>
<<set $plainpantiescolourchoice to "pink">>
<<set $schoolshirtcolour to "white">>
<<set $schoolshirtcolourchoice to "white">>
<<set $schoolskirtcolour to "black">>
<<set $schoolskirtcolourchoice to "black">>
<<set $schoolswimsuitcolour to "blue">>
<<set $schoolswimsuitcolourchoice to "blue">>
<<set $uppercolour to $sundresscolour>>
<<set $lowercolour to $sundresscolour>>
<<set $undercolour to $plainpantiescolour>>
<<set $upperoff to 0>>
<<set $loweroff to 0>>
<<set $underoff to 0>>

<<set $upperoutfitcasual to "sundress">>
<<set $loweroutfitcasual to "sundress skirt">>
<<set $underoutfitcasual to "plain panties">>

<<set $upperoutfitschool to "school shirt">>
<<set $loweroutfitschool to "school skirt">>
<<set $underoutfitschool to "plain panties">>


<<elseif $playergender is "m">>
<<set $boysgymsocks to 1>>
<<set $upperpjsnew to 1>>
<<set $lowerpjsnew to 1>>
<<set $tshirtnew to 1>>
<<set $shortsnew to 1>>
<<set $yfrontsnew to 1>>
<<set $schoolshirtnew to 1>>
<<set $schoolshortsnew to 1>>
<<set $schoolswimshortsnew to 1>>
<<schoolswimshorts>><<schoolshirt>><<schoolshorts>><<upperpjs>><<lowerpjs>><<shorts>><<tshirt>><<yfronts>>
<<set $upperpjsno to 1>>
<<set $lowerpjsno to 1>>
<<set $tshirtno to 1>>
<<set $shortsno to 1>>
<<set $yfrontsno to 1>>
<<set $schoolshirtno to 1>>
<<set $schoolshortsno to 1>>
<<set $schoolswimshortsno to 1>>
<<set $upperpjscolour to "blue">>
<<set $upperpjscolourchoice to "blue">>
<<set $lowerpjscolour to "blue">>
<<set $lowerpjscolourchoice to "blue">>
<<set $tshirtcolour to "tangerine">>
<<set $tshirtcolourchoice to "tangerine">>
<<set $shortscolour to "blue">>
<<set $shortscolourchoice to "blue">>
<<set $yfrontscolour to "white">>
<<set $yfrontscolourchoice to "white">>
<<set $schoolshirtcolour to "white">>
<<set $schoolshirtcolourchoice to "white">>
<<set $schoolshortscolour to "black">>
<<set $schoolshortscolourchoice to "black">>
<<set $schoolswimshortscolour to "blue">>
<<set $schoolswimshortscolourchoice to "blue">>
<<set $uppercolour to $tshirtcolour>>
<<set $lowercolour to $shortscolour>>
<<set $undercolour to $yfrontscolour>>
<<set $upperoff to 0>>
<<set $loweroff to 0>>
<<set $underoff to 0>>

<<set $upperoutfitcasual to $upperclothes>>
<<set $loweroutfitcasual to $lowerclothes>>
<<set $underoutfitcasual to $underclothes>>

<<set $upperoutfitschool to "school shirt">>
<<set $loweroutfitschool to "school shorts">>
<<set $underoutfitschool to "Y fronts">>

<</if>>
<</nobr>><</widget>>













<<widget "uppernaked">><<nobr>>
<<upperstrip>>
<<if $uppertemp is "init">>
<<set $uppertemp to 1>>
<<elseif $uppertemp is 1>>
<<set $uppertemp to 0>>
<</if>>
<<set $upperclothes to "naked">>
<<set $uppervariable to "naked">>
<<set $upperintegrity to 0>>
<<set $upperintegritymax to 0>>
<<set $upperfabricstrength to 0>>
<<set $upperreveal to 1000>>
<<set $upperword to "n">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 0>>
<<set $upperstate to 0>>
<<set $upperstatetop to 0>>
<<set $upperstatebase to 0>>
<<set $upperstatetopbase to 0>>
<<set $upperplural to 0>>
<<set $uppercolour to 0>>
<<set $upperexposed to 2>>
<<set $upperexposedbase to 2>>
<<set $uppertype to "naked">>
<<if $clothingchange isnot 1 and $ruined isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowernaked>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>

<<widget "uppersundress">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "sundress">>
<<set $uppervariable to "uppersundress">>
<<set $uppersundressintegritymax to 100>>
<<set $upperintegritymax to $uppersundressintegritymax>>
<<set $upperfabricstrength to 30>>
<<set $upperreveal to 200>>
<<set $upperword to "a">>
<<set $upperonepiece to 1>>
<<set $strap to 1>>
<<set $open to 1>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $uppersundressnew is 1>><<set $uppersundressnew to 0>><<set $uppersundressintegrity to $uppersundressintegritymax>>
<<set $sundresscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $sundresscolourchoice isnot 0>>
<<set $sundresscolour to $sundresscolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $sundresscolour>>
<<set $upperintegrity to $uppersundressintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "sundress">>
<<set $uppergender to "f">>
<</nobr>><</widget>>

<<widget "upperpjs">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "pyjama shirt">>
<<set $uppervariable to "upperpjs">>
<<set $upperpjsintegritymax to 100>>
<<set $upperintegritymax to $upperpjsintegritymax>>
<<set $upperfabricstrength to 20>>
<<set $upperreveal to 100>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 0>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $upperpjsnew is 1>><<set $upperpjsnew to 0>><<set $upperpjsintegrity to $upperpjsintegritymax>>
<<set $upperpjscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $upperpjscolourchoice isnot 0>>
<<set $upperpjscolour to $upperpjscolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $upperpjscolour>>
<<set $upperintegrity to $upperpjsintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "sleep">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>

<<widget "uppertowel">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "towel">>
<<set $uppervariable to "uppertowel">>
<<set $uppertowelintegritymax to 10>>
<<set $upperintegritymax to $uppertowelintegritymax>>
<<set $upperfabricstrength to 20>>
<<set $upperreveal to 800>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 1>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $uppertowelnew is 1>><<set $uppertowelnew to 0>><<set $uppertowelintegrity to $uppertowelintegritymax>>
<<set $uppertowelcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $uppertowelcolourchoice isnot 0>>
<<set $uppertowelcolour to $uppertowelcolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $uppertowelcolour>>
<<set $upperintegrity to $uppertowelintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>

<<widget "upperbikini">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "bikini top">>
<<set $uppervariable to "upperbikini">>
<<set $upperbikiniintegritymax to 20>>
<<set $upperintegritymax to $upperbikiniintegritymax>>
<<set $upperfabricstrength to 20>>
<<set $upperreveal to 900>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 1>>
<<set $open to 1>>
<<set $upperstate to "midriff">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "midriff">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $upperbikininew is 1>><<set $upperbikininew to 0>><<set $upperbikiniintegrity to $upperbikiniintegritymax>><<set $upperbikinicolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $upperbikinicolourchoice isnot 0>>
<<set $upperbikinicolour to $upperbikinicolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $upperbikinicolour>>
<<set $upperintegrity to $upperbikiniintegrity>>
<<set $upperexposed to 1>>
<<set $upperexposedbase to 1>>
<<set $uppertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "f">>
<</nobr>><</widget>>

<<widget "tshirt">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "t-shirt">>
<<set $uppervariable to "tshirt">>
<<set $tshirtintegritymax to 100>>
<<set $upperintegritymax to $tshirtintegritymax>>
<<set $upperfabricstrength to 20>>
<<set $upperreveal to 200>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 0>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $tshirtnew is 1>><<set $tshirtnew to 0>><<set $tshirtintegrity to $tshirtintegritymax>>
<<set $tshirtcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $tshirtcolourchoice isnot 0>>
<<set $tshirtcolour to $tshirtcolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $tshirtcolour>>
<<set $upperintegrity to $tshirtintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>

<<widget "schoolshirt">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "school shirt">>
<<set $uppervariable to "schoolshirt">>
<<set $schoolshirtintegritymax to 200>>
<<set $upperintegritymax to $schoolshirtintegritymax>>
<<set $upperfabricstrength to 30>>
<<set $upperreveal to 100>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 0>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $schoolshirtnew is 1>><<set $schoolshirtnew to 0>>
<<set $schoolshirtintegrity to $schoolshirtintegritymax>>
<<set $schoolshirtcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $schoolshirtcolourchoice isnot 0>>
<<set $schoolshirtcolour to $schoolshirtcolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $schoolshirtcolour>>
<<set $upperintegrity to $schoolshirtintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "school">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>

<<widget "upperschoolswimsuit">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "school swimsuit">>
<<set $uppervariable to "upperschoolswimsuit">>
<<set $upperschoolswimsuitintegritymax to 40>>
<<set $upperintegritymax to $upperschoolswimsuitintegritymax>>
<<set $upperfabricstrength to 30>>
<<set $upperreveal to 600>>
<<set $upperword to "a">>
<<set $upperonepiece to 1>>
<<set $strap to 1>>
<<set $open to 1>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $upperschoolswimsuitnew is 1>><<set $upperschoolswimsuitnew to 0>><<set $upperschoolswimsuitintegrity to $upperschoolswimsuitintegritymax>>
<<set $schoolswimsuitcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $schoolswimsuitcolourchoice isnot 0>>
<<set $schoolswimsuitcolour to $schoolswimsuitcolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $schoolswimsuitcolour>>
<<set $upperintegrity to $upperschoolswimsuitintegrity>>
<<set $upperexposed to 1>>
<<set $upperexposedbase to 1>>
<<set $uppertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "school swimsuit">>
<<set $uppergender to "f">>
<</nobr>><</widget>>

<<widget "upperplant">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "plant top">>
<<set $uppervariable to "upperplant">>
<<set $upperplantintegritymax to 10>>
<<set $upperintegritymax to $upperplantintegritymax>>
<<set $upperfabricstrength to 20>>
<<set $upperreveal to 900>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 1>>
<<set $upperstate to "midriff">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "midriff">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $upperplantnew is 1>><<set $upperplantnew to 0>><<set $upperplantintegrity to $upperplantintegritymax>>
<</if>>
<<set $upperplantcolour to "green">>
<<set $uppercolour to $upperplantcolour>>
<<set $upperintegrity to $upperplantintegrity>>
<<set $upperexposed to 1>>
<<set $upperexposedbase to 1>>
<<set $uppertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>

<<widget "uppereveninggown">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "evening gown">>
<<set $uppervariable to "uppereveninggown">>
<<set $uppereveninggownintegritymax to 200>>
<<set $upperintegritymax to $uppereveninggownintegritymax>>
<<set $upperfabricstrength to 30>>
<<set $upperreveal to 500>>
<<set $upperword to "a">>
<<set $upperonepiece to 1>>
<<set $strap to 1>>
<<set $open to 1>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $uppereveninggownnew is 1>><<set $uppereveninggownnew to 0>><<set $uppereveninggownintegrity to $uppereveninggownintegritymax>>
<<set $eveninggowncolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $eveninggowncolourchoice isnot 0>>
<<set $eveninggowncolour to $eveninggowncolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $eveninggowncolour>>
<<set $upperintegrity to $uppereveninggownintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "evening gown">>
<<set $uppergender to "f">>
<</nobr>><</widget>>

<<widget "tanktop">><<nobr>>
<<upperstrip>><<upperundress>>
<<set $upperclothes to "tank top">>
<<set $uppervariable to "tanktop">>
<<set $tanktopintegritymax to 100>>
<<set $upperintegritymax to $tanktopintegritymax>>
<<set $upperfabricstrength to 20>>
<<set $upperreveal to 300>>
<<set $upperword to "a">>
<<set $upperonepiece to 0>>
<<set $strap to 0>>
<<set $open to 0>>
<<set $upperstate to "waist">>
<<set $upperstatetop to "chest">>
<<set $upperstatebase to "waist">>
<<set $upperstatetopbase to "chest">>
<<set $upperplural to 0>>
<<if $tanktopnew is 1>><<set $tanktopnew to 0>><<set $tanktopintegrity to $tanktopintegritymax>>
<<set $tanktopcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $tanktopcolourchoice isnot 0>>
<<set $tanktopcolour to $tanktopcolourchoice>>
<</if>>
<</if>>
<<set $uppercolour to $tanktopcolour>>
<<set $upperintegrity to $tanktopintegrity>>
<<set $upperexposed to 0>>
<<set $upperexposedbase to 0>>
<<set $uppertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowerstrip>><<lowerundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $upperset to "upper">>
<<set $uppergender to "n">>
<</nobr>><</widget>>









<<widget "lowernaked">><<nobr>>
<<lowerstrip>>
<<if $lowertemp is "init">>
<<set $lowertemp to 1>>
<<elseif $lowertemp is 1>>
<<set $lowertemp to 0>>
<</if>>
<<set $lowerclothes to "naked">>
<<set $lowervariable to "naked">>
<<set $lowerintegrity to 0>>
<<set $lowerintegritymax to 0>>
<<set $lowerfabricstrength to 0>>
<<set $lowerreveal to 1000>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to 0>>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to 0>>
<<set $lowervaginaexposed to 1>>
<<set $loweranusexposed to 1>>
<<set $lowerplural to 0>>
<<set $lowercolour to 0>>
<<set $lowerexposed to 2>>
<<set $lowerexposedbase to 2>>
<<set $lowervaginaexposedbase to 1>>
<<set $loweranusexposedbase to 1>>
<<set $lowertype to "naked">>
<<if $clothingchange isnot 1 and $ruined isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<uppernaked>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "n">>
<</nobr>><</widget>>

<<widget "lowersundress">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "sundress skirt">>
<<set $lowervariable to "lowersundress">>
<<set $lowersundressintegritymax to 100>>
<<set $lowerintegritymax to $lowersundressintegritymax>>
<<set $fabricstrength to 30>>
<<set $lowerreveal to 200>>
<<set $lowerword to "a">>
<<set $loweronepiece to 1>>
<<set $lowerstate to "waist">>
<<set $skirt to 1>>
<<set $skirtdown to 1>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 0>>
<<if $lowersundressnew is 1>><<set $lowersundressnew to 0>><<set $lowersundressintegrity to $lowersundressintegritymax>>
<</if>>
<<set $lowercolour to $sundresscolour>>
<<set $lowerintegrity to $lowersundressintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "sundress">>
<<set $lowergender to "f">>
<</nobr>><</widget>>

<<widget "lowerpjs">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "pyjama bottoms">>
<<set $lowervariable to "lowerpjs">>
<<set $lowerpjsintegritymax to 100>>
<<set $lowerintegritymax to $lowerpjsintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 100>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 1>>
<<if $lowerpjsnew is 1>><<set $lowerpjsnew to 0>><<set $lowerpjsintegrity to $lowerpjsintegritymax>><<set $lowerpjscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $lowerpjscolourchoice isnot 0>>
<<set $lowerpjscolour to $lowerpjscolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $lowerpjscolour>>
<<set $lowerintegrity to $lowerpjsintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "sleep">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "n">>
<</nobr>><</widget>>

<<widget "lowertowel">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "towel">>
<<set $lowervariable to "lowertowel">>
<<set $lowertowelintegritymax to 10>>
<<set $lowerintegritymax to $lowertowelintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 800>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 1>>
<<set $skirtdown to 1>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 0>>
<<if $lowertowelnew is 1>><<set $lowertowelnew to 0>><<set $lowertowelintegrity to $lowertowelintegritymax>><<set $lowertowelcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $lowertowelcolourchoice isnot 0>>
<<set $lowertowelcolour to $lowertowelcolourchoice>>
<<set $lowertowelcolourchoice to 0>>
<</if>>
<</if>>
<<set $lowercolour to $lowertowelcolour>>
<<set $lowerintegrity to $lowertowelintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "n">>
<</nobr>><</widget>>

<<widget "lowerbikini">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "bikini bottoms">>
<<set $lowervariable to "lowerbikini">>
<<set $lowerbikiniintegritymax to 20>>
<<set $lowerintegritymax to $lowerbikiniintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 900>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 1>>
<<if $lowerbikininew is 1>><<set $lowerbikininew to 0>><<set $lowerbikiniintegrity to $lowerbikiniintegritymax>><<set $lowerbikinicolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $lowerbikinicolourchoice isnot 0>>
<<set $lowerbikinicolour to $lowerbikinicolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $lowerbikinicolour>>
<<set $lowerintegrity to $lowerbikiniintegrity>>
<<set $lowerexposed to 1>>
<<set $lowerexposedbase to 1>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<if $undertype isnot "chastity">>
<<underundress>>
<</if>>
<<set $lowergender to "f">>
<</nobr>><</widget>>

<<widget "waistapron">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "waist apron">>
<<set $lowervariable to "waistapron">>
<<set $waistapronintegritymax to 10>>
<<set $lowerintegritymax to $waistapronintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 800>>
<<set $lowerword to "a">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 1>>
<<set $skirtdown to 1>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 1>>
<<set $loweranusexposed to 1>>
<<set $lowerplural to 0>>
<<if $waistapronnew is 1>><<set $waistapronnew to 0>><<set $waistapronintegrity to $waistapronintegritymax>><<set $waistaproncolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $waistaproncolourchoice isnot 0>>
<<set $waistaproncolour to $waistaproncolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $waistaproncolour>>
<<set $lowerintegrity to $waistapronintegrity>>
<<set $lowerexposed to 1>>
<<set $lowerexposedbase to 1>>
<<set $lowervaginaexposedbase to 1>>
<<set $loweranusexposedbase to 1>>
<<set $lowertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "n">>
<</nobr>><</widget>>

<<widget "shorts">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "shorts">>
<<set $lowervariable to "shorts">>
<<set $shortsintegritymax to 120>>
<<set $lowerintegritymax to $shortsintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 300>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 1>>
<<if $shortsnew is 1>><<set $shortsnew to 0>><<set $shortsintegrity to $shortsintegritymax>><<set $shortscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $shortscolourchoice isnot 0>>
<<set $shortscolour to $shortscolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $shortscolour>>
<<set $lowerintegrity to $shortsintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "n">>
<</nobr>><</widget>>

<<widget "schoolshorts">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "school shorts">>
<<set $lowervariable to "schoolshorts">>
<<set $schoolshortsintegritymax to 160>>
<<set $lowerintegritymax to $schoolshortsintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 200>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 1>>
<<if $schoolshortsnew is 1>><<set $schoolshortsnew to 0>><<set $schoolshortsintegrity to $schoolshortsintegritymax>><<set $schoolshortscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $schoolshortscolourchoice isnot 0>>
<<set $schoolshortscolour to $schoolshortscolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $schoolshortscolour>>
<<set $lowerintegrity to $schoolshortsintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "school">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "m">>
<</nobr>><</widget>>

<<widget "schoolskirt">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "school skirt">>
<<set $lowervariable to "schoolskirt">>
<<set $schoolskirtintegritymax to 160>>
<<set $lowerintegritymax to $schoolskirtintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 200>>
<<set $lowerword to "a">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 1>>
<<set $skirtdown to 1>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 0>>
<<if $schoolskirtnew is 1>><<set $schoolskirtnew to 0>><<set $schoolskirtintegrity to $schoolskirtintegritymax>><<set $schoolskirtcolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $schoolskirtcolourchoice isnot 0>>
<<set $schoolskirtcolour to $schoolskirtcolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $schoolskirtcolour>>
<<set $lowerintegrity to $schoolskirtintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "school">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<set $lowergender to "f">>
<</nobr>><</widget>>

<<widget "lowerschoolswimsuit">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "school swimsuit bottom">>
<<set $lowervariable to "lowerschoolswimsuit">>
<<set $lowerschoolswimsuitintegritymax to 40>>
<<set $lowerintegritymax to $lowerschoolswimsuitintegritymax>>
<<set $fabricstrength to 30>>
<<set $lowerreveal to 600>>
<<set $lowerword to "a">>
<<set $loweronepiece to 1>>
<<set $lowerstate to "waist">>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 0>>
<<if $lowerschoolswimsuitnew is 1>><<set $lowerschoolswimsuitnew to 0>><<set $lowerschoolswimsuitintegrity to $lowerschoolswimsuitintegritymax>>
<</if>>
<<set $lowercolour to $schoolswimsuitcolour>>
<<set $lowerintegrity to $lowerschoolswimsuitintegrity>>
<<set $lowerexposed to 1>>
<<set $lowerexposedbase to 1>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "school swimsuit">>
<<if $undertype isnot "chastity">>
<<underundress>>
<</if>>
<<set $lowergender to "f">>
<</nobr>><</widget>>

<<widget "schoolswimshorts">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "school swim shorts">>
<<set $lowervariable to "schoolswimshorts">>
<<set $schoolswimshortsintegritymax to 40>>
<<set $lowerintegritymax to $schoolswimshortsintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 600>>
<<set $lowerword to "n">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 0>>
<<set $skirtdown to 0>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 1>>
<<if $schoolswimshortsnew is 1>><<set $schoolswimshortsnew to 0>><<set $schoolswimshortsintegrity to $schoolswimshortsintegritymax>><<set $schoolswimshortscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $schoolswimshortscolourchoice isnot 0>>
<<set $schoolswimshortscolour to $schoolswimshortscolourchoice>>
<</if>>
<</if>>
<<set $lowercolour to $schoolswimshortscolour>>
<<set $lowerintegrity to $schoolswimshortsintegrity>>
<<set $lowerexposed to 1>>
<<set $lowerexposedbase to 1>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<if $undertype isnot "chastity">>
<<underundress>>
<</if>>
<<set $lowergender to "m">>
<</nobr>><</widget>>

<<widget "lowerplant">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "plant skirt">>
<<set $lowervariable to "lowerplant">>
<<set $lowerplantintegritymax to 10>>
<<set $lowerintegritymax to $lowerplantintegritymax>>
<<set $lowerfabricstrength to 20>>
<<set $lowerreveal to 900>>
<<set $lowerword to "a">>
<<set $loweronepiece to 0>>
<<set $lowerstate to "waist">>
<<set $skirt to 1>>
<<set $skirtdown to 1>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 1>>
<<set $loweranusexposed to 1>>
<<set $lowerplural to 0>>
<<if $lowerplantnew is 1>><<set $lowerplantnew to 0>><<set $lowerplantintegrity to $lowerplantintegritymax>><<set $lowerplantcolour to "green">>
<</if>>
<<set $lowercolour to $lowerplantcolour>>
<<set $lowerintegrity to $lowerplantintegrity>>
<<set $lowerexposed to 1>>
<<set $lowerexposedbase to 1>>
<<set $lowervaginaexposedbase to 1>>
<<set $loweranusexposedbase to 1>>
<<set $lowertype to "swim">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "lower">>
<<if $undertype isnot "chastity">>
<<underundress>>
<</if>>
<<set $lowergender to "n">>
<</nobr>><</widget>>

<<widget "lowereveninggown">><<nobr>>
<<lowerstrip>><<lowerundress>>
<<set $lowerclothes to "evening gown skirt">>
<<set $lowervariable to "lowereveninggown">>
<<set $lowereveninggownintegritymax to 200>>
<<set $lowerintegritymax to $lowereveninggownintegritymax>>
<<set $fabricstrength to 30>>
<<set $lowerreveal to 200>>
<<set $lowerword to "a">>
<<set $loweronepiece to 1>>
<<set $lowerstate to "waist">>
<<set $skirt to 1>>
<<set $skirtdown to 1>>
<<set $lowerstatebase to "waist">>
<<set $lowervaginaexposed to 0>>
<<set $loweranusexposed to 0>>
<<set $lowerplural to 0>>
<<if $lowereveninggownnew is 1>><<set $lowereveninggownnew to 0>><<set $lowereveninggownintegrity to $lowereveninggownintegritymax>>
<</if>>
<<set $lowercolour to $eveninggowncolour>>
<<set $lowerintegrity to $lowereveninggownintegrity>>
<<set $lowerexposed to 0>>
<<set $lowerexposedbase to 0>>
<<set $lowervaginaexposedbase to 0>>
<<set $loweranusexposedbase to 0>>
<<set $lowertype to "normal">>
<<if $clothingchange isnot 1>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<upperstrip>><<upperundress>>
	<</if>>
<</if>>
<<set $clothingchange to 0>>
<<set $lowerset to "evening gown">>
<<set $lowergender to "f">>
<</nobr>><</widget>>






<<widget "undernaked">><<nobr>>
	<<if $undertype isnot "chastity">>
<<understrip>>
<<if $undertemp is "init">>
<<set $undertemp to 1>>
<<elseif $undertemp is 1>>
<<set $undertemp to 0>>
<</if>>
<<set $underclothes to "naked">>
<<set $undervariable to "naked">>
<<set $underintegrity to 0>>
<<set $underintegritymax to 0>>
<<set $underfabricstrength to 0>>
<<set $underreveal to 1000>>
<<set $underword to "n">>
<<set $understate to 0>>
<<set $understatebase to 0>>
<<set $undervaginaexposed to 1>>
<<set $underanusexposed to 1>>
<<set $underplural to 0>>
<<set $undercolour to 0>>
<<set $underexposed to 1>>
<<set $underexposedbase to 1>>
<<set $undervaginaexposedbase to 1>>
<<set $underanusexposedbase to 1>>
<<set $undertype to "naked">>
<<set $undergender to "n">>
	<</if>>
<</nobr>><</widget>>

<<widget "plainpanties">><<nobr>>
	<<if $undertype isnot "chastity">>
<<understrip>><<underundress>>
<<set $underclothes to "plain panties">>
<<set $undervariable to "plainpanties">>
<<set $plainpantiesintegritymax to 100>>
<<set $underintegritymax to $plainpantiesintegritymax>>
<<set $underfabricstrength to 15>>
<<set $underreveal to 200>>
<<set $underword to "n">>
<<set $understate to "waist">>
<<set $understatebase to "waist">>
<<set $undervaginaexposed to 0>>
<<set $underanusexposed to 0>>
<<set $underplural to 1>>
<<if $plainpantiesnew is 1>><<set $plainpantiesnew to 0>><<set $plainpantiesintegrity to $plainpantiesintegritymax>><<set $plainpantiescolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $plainpantiescolourchoice isnot 0>>
<<set $plainpantiescolour to $plainpantiescolourchoice>>
<</if>>
<</if>>
<<set $undercolour to $plainpantiescolour>>
<<set $underintegrity to $plainpantiesintegrity>>
<<set $underexposed to 0>>
<<set $underexposedbase to 0>>
<<set $undervaginaexposedbase to 0>>
<<set $underanusexposedbase to 0>>
<<set $undertype to "normal">>
<<if $lowertype is "swim">>
	<<if $upperset is $lowerset>>
	<<uppernaked>>
	<</if>>
<<lowerundress>>
<</if>>
<<set $undergender to "f">>
	<</if>>
<</nobr>><</widget>>

<<widget "lacepanties">><<nobr>>
	<<if $undertype isnot "chastity">>
<<understrip>><<underundress>>
<<set $underclothes to "lace panties">>
<<set $undervariable to "lacepanties">>
<<set $lacepantiesintegritymax to 60>>
<<set $underintegritymax to $lacepantiesintegritymax>>
<<set $underfabricstrength to 15>>
<<set $underreveal to 400>>
<<set $underword to "n">>
<<set $understate to "waist">>
<<set $understatebase to "waist">>
<<set $undervaginaexposed to 0>>
<<set $underanusexposed to 0>>
<<set $underplural to 1>>
<<if $lacepantiesnew is 1>><<set $lacepantiesnew to 0>><<set $lacepantiesintegrity to $lacepantiesintegritymax>><<set $lacepantiescolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $lacepantiescolourchoice isnot 0>>
<<set $lacepantiescolour to $lacepantiescolourchoice>>
<</if>>
<</if>>
<<set $undercolour to $lacepantiescolour>>
<<set $underintegrity to $lacepantiesintegrity>>
<<set $underexposed to 0>>
<<set $underexposedbase to 0>>
<<set $undervaginaexposedbase to 0>>
<<set $underanusexposedbase to 0>>
<<set $undertype to "normal">>
<<if $lowertype is "swim">>
	<<if $upperset is $lowerset>>
	<<uppernaked>>
	<</if>>
<<lowerundress>>
<</if>>
<<set $undergender to "f">>
	<</if>>
<</nobr>><</widget>>

<<widget "yfronts">><<nobr>>
	<<if $undertype isnot "chastity">>
<<understrip>><<underundress>>
<<set $underclothes to "Y fronts">>
<<set $undervariable to "yfronts">>
<<set $yfrontsintegritymax to 100>>
<<set $underintegritymax to $yfrontsintegritymax>>
<<set $underfabricstrength to 15>>
<<set $underreveal to 200>>
<<set $underword to "n">>
<<set $understate to "waist">>
<<set $understatebase to "waist">>
<<set $undervaginaexposed to 0>>
<<set $underanusexposed to 0>>
<<set $underplural to 1>>
<<if $yfrontsnew is 1>><<set $yfrontsnew to 0>><<set $yfrontsintegrity to $yfrontsintegritymax>><<set $yfrontscolour to either("blue", "white", "red", "green", "black", "pink", "purple", "tangerine", "yellow")>>
<<if $yfrontscolourchoice isnot 0>>
<<set $yfrontscolour to $yfrontscolourchoice>>
<</if>>
<</if>>
<<set $undercolour to $yfrontscolour>>
<<set $underintegrity to $yfrontsintegrity>>
<<set $underexposed to 0>>
<<set $underexposedbase to 0>>
<<set $undervaginaexposedbase to 0>>
<<set $underanusexposedbase to 0>>
<<set $undertype to "normal">>
<<if $lowertype is "swim">>
	<<if $upperset is $lowerset>>
	<<uppernaked>>
	<</if>>
<<lowerundress>>
<</if>>
<<set $undergender to "m">>
	<</if>>
<</nobr>><</widget>>

<<widget "chastitybelt">><<nobr>>
	<<if $undertype isnot "chastity">>
<<understrip>><<underundress>>
<<set $underclothes to "chastity belt">>
<<set $undervariable to "chastitybelt">>
<<set $chastitybeltintegritymax to 2000>>
<<set $underintegritymax to $chastitybeltintegritymax>>
<<set $underfabricstrength to 15>>
<<set $underreveal to 1000>>
<<set $underword to "a">>
<<set $understate to "chastity">>
<<set $understatebase to "chastity">>
<<set $undervaginaexposed to 0>>
<<set $undervaginaexposedbase to 0>>
<<if $analshield is 1>>
<<set $underanusexposed to 0>>
<<set $underanusexposedbase to 0>>
<<else>>
<<set $underanusexposed to 1>>
<<set $underanusexposedbase to 1>>
<</if>>
<<set $underplural to 0>>
<<if $chastitybeltnew is 1>><<set $chastitybeltnew to 0>><<set $chastitybeltintegrity to $chastitybeltintegritymax>>
<</if>>
<<set $undercolour to "restrictive">>
<<set $underintegrity to $chastitybeltintegrity>>
<<set $underexposed to 1>>
<<set $underexposedbase to 1>>
<<set $undertype to "chastity">>
<<set $undergender to "n">>
	<</if>>
<</nobr>><</widget>>


<<widget "tights">><<nobr>>
	<<if $undertype isnot "chastity">>
<<understrip>><<underundress>>
<<set $underclothes to "tights">>
<<set $undervariable to "tights">>
<<set $tightsintegritymax to 120>>
<<set $underintegritymax to $tightsintegritymax>>
<<set $underfabricstrength to 5>>
<<set $underreveal to 800>>
<<set $underword to "n">>
<<set $understate to "waist">>
<<set $understatebase to "waist">>
<<set $undervaginaexposed to 0>>
<<set $underanusexposed to 0>>
<<set $underplural to 1>>
<<if $tightsnew is 1>><<set $tightsnew to 0>><<set $tightsintegrity to $tightsintegritymax>><<set $tightscolour to "sheer">>
<<if $tightscolourchoice isnot 0>>
<<set $tightscolour to $tightscolourchoice>>
<</if>>
<</if>>
<<set $undercolour to $tightscolour>>
<<set $underintegrity to $tightsintegrity>>
<<set $underexposed to 1>>
<<set $underexposedbase to 1>>
<<set $undervaginaexposedbase to 0>>
<<set $underanusexposedbase to 0>>
<<set $undertype to "normal">>
<<if $lowertype is "swim">>
	<<if $upperset is $lowerset>>
	<<uppernaked>>
	<</if>>
<<lowerundress>>
<</if>>
<<set $undergender to "f">>
	<</if>>
<</nobr>><</widget>>



<<widget "upperstrip">><<nobr>>
<<set $upperlast to $upperclothes>>

<<if $uppertemp is 1>>
<<else>>
<<if $upperclothes is "sundress">>
<<set $uppersundressintegrity to $upperintegrity>>
<<set $upperoff to "sundress">>
<</if>>
<<if $upperclothes is "pyjama shirt">>
<<set $upperpjsintegrity to $upperintegrity>>
<<set $upperoff to "pyjama shirt">>
<</if>>
<<if $upperclothes is "towel">>
<<set $uppertowelintegrity to $upperintegrity>>
<<set $upperoff to "towel">>
<</if>>
<<if $upperclothes is "bikini top">>
<<set $upperbikiniintegrity to $upperintegrity>>
<<set $upperoff to "bikini top">>
<</if>>
<<if $upperclothes is "t-shirt">>
<<set $tshirtintegrity to $upperintegrity>>
<<set $upperoff to "t-shirt">>
<</if>>
<<if $upperclothes is "school shirt">>
<<set $schoolshirtintegrity to $upperintegrity>>
<<set $upperoff to "school shirt">>
<</if>>
<<if $upperclothes is "school swimsuit">>
<<set $upperschoolswimsuitintegrity to $upperintegrity>>
<<set $upperoff to "school swimsuit">>
<</if>>
<<if $upperclothes is "plant top">>
<<set $upperplantintegrity to $upperintegrity>>
<<set $upperoff to "plant top">>
<</if>>
<<if $upperclothes is "evening gown">>
<<set $uppereveninggownintegrity to $upperintegrity>>
<<set $upperoff to "evening gown">>
<</if>>
<<if $upperclothes is "tank top">>
<<set $tanktopintegrity to $upperintegrity>>
<<set $upperoff to "tank top">>
<</if>>
<</if>>
<</nobr>><</widget>>

<<widget "lowerstrip">><<nobr>>
<<set $lowerlast to $lowerclothes>>

<<if $lowertemp is 1>>
<<else>>
<<if $lowerclothes is "sundress skirt">>
<<set $lowersundressintegrity to $lowerintegrity>>
<<set $loweroff to "sundress skirt">>
<</if>>
<<if $lowerclothes is "pyjama bottoms">>
<<set $lowerpjsintegrity to $lowerintegrity>>
<<set $loweroff to "pyjama bottoms">>
<</if>>
<<if $lowerclothes is "towel">>
<<set $lowertowelintegrity to $lowerintegrity>>
<<set $loweroff to "towel">>
<</if>>
<<if $lowerclothes is "bikini bottoms">>
<<set $lowerbikiniintegrity to $lowerintegrity>>
<<set $loweroff to "bikini bottoms">>
<</if>>
<<if $lowerclothes is "waist apron">>
<<set $waistapronintegrity to $lowerintegrity>>
<<set $loweroff to "waist apron">>
<</if>>
<<if $lowerclothes is "shorts">>
<<set $shortsintegrity to $lowerintegrity>>
<<set $loweroff to "shorts">>
<</if>>
<<if $lowerclothes is "school shorts">>
<<set $schoolshortsintegrity to $lowerintegrity>>
<<set $loweroff to "school shorts">>
<</if>>
<<if $lowerclothes is "school skirt">>
<<set $schoolskirtintegrity to $lowerintegrity>>
<<set $loweroff to "school skirt">>
<</if>>
<<if $lowerclothes is "school swimsuit bottom">>
<<set $lowerschoolswimsuitintegrity to $lowerintegrity>>
<<set $loweroff to "school swimsuit bottom">>
<</if>>
<<if $lowerclothes is "school swim shorts">>
<<set $schoolswimshortsintegrity to $lowerintegrity>>
<<set $loweroff to "school swim shorts">>
<</if>>
<<if $lowerclothes is "plant skirt">>
<<set $lowerplantintegrity to $lowerintegrity>>
<<set $loweroff to "plant skirt">>
<</if>>
<<if $lowerclothes is "evening gown skirt">>
<<set $lowereveninggownintegrity to $lowerintegrity>>
<<set $loweroff to "evening gown skirt">>
<</if>>
<</if>>
<</nobr>><</widget>>

<<widget "understrip">><<nobr>>
<<set $underlast to $underclothes>>

<<if $undertemp is 1>>
<<else>>
<<if $underclothes is "plain panties">>
<<set $plainpantiesintegrity to $underintegrity>>
<<set $underoff to "plain panties">>
<</if>>
<<if $underclothes is "lace panties">>
<<set $lacepantiesintegrity to $underintegrity>>
<<set $underoff to "lace panties">>
<</if>>
<<if $underclothes is "Y fronts">>
<<set $yfrontsintegrity to $underintegrity>>
<<set $underoff to "Y fronts">>
<</if>>
<<if $underclothes is "chastity belt">>
<<set $chastitybeltintegrity to $underintegrity>>
<<set $underoff to "chastity belt">>
<</if>>
<<if $underclothes is "tights">>
<<set $tightsintegrity to $underintegrity>>
<<set $underoff to "tights">>
<</if>>
<</if>>
<</nobr>><</widget>>


<<widget "upperruined">><<nobr>><<set $ruined to 1>><<set $eventskipoverrule to 1>><<set $uncladupper to 0>><<set $uncladoutfit to 0>>
<<if $uppertemp is 1>>
<<uppernaked>>
<<set $upperoff to 0>>
<<else>>

<<if $upperclothes is "sundress">>
<<set $uppersundressno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 750>>
		<<set $clothingrebuytext to 1>>
		<<set $uppersundressnew to 1>>
		<<set $uppersundressno to 1>>
		<<set $lowersundressnew to 1>>
		<<set $lowersundressno to 1>>
		<<set $money -= 750>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "pyjama shirt">>
<<set $upperpjsno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1000>>
		<<set $clothingrebuytext to 1>>
		<<set $upperpjsnew to 1>>
		<<set $upperpjsno to 1>>
		<<set $money -= 1000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "towel">>
<<set $uppertowelno to 0>>
<<uppernaked>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "bikini top">>
<<set $upperbikinino to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1000>>
		<<set $clothingrebuytext to 1>>
		<<set $upperbikininew to 1>>
		<<set $upperbikinino to 1>>
		<<set $money -= 1000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "t-shirt">>
<<set $tshirtno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1000>>
		<<set $clothingrebuytext to 1>>
		<<set $tshirtnew to 1>>
		<<set $tshirtno to 1>>
		<<set $money -= 1000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "school shirt">>
<<set $schoolshirtno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 2500>>
		<<set $clothingrebuytext to 1>>
		<<set $schoolshirtnew to 1>>
		<<set $schoolshirtno to 1>>
		<<set $money -= 2500>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "school swimsuit">>
<<set $upperschoolswimsuitno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 750>>
		<<set $clothingrebuytext to 1>>
		<<set $upperschoolswimsuitnew to 1>>
		<<set $upperschoolswimsuitno to 1>>
		<<set $lowerschoolswimsuitnew to 1>>
		<<set $lowerschoolswimsuitno to 1>>
		<<set $money -= 750>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "plant top">>
<<set $upperplantno to 0>>
<<uppernaked>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "evening gown">>
<<set $uppereveninggownno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 6000>>
		<<set $clothingrebuytext to 1>>
		<<set $uppereveninggownnew to 1>>
		<<set $uppereveninggownno to 1>>
		<<set $lowereveninggownnew to 1>>
		<<set $lowereveninggownno to 1>>
		<<set $money -= 6000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>
<<if $upperclothes is "tank top">>
<<set $tanktopno to 0>>
<<uppernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1000>>
		<<set $clothingrebuytext to 1>>
		<<set $tanktopnew to 1>>
		<<set $tanktopno to 1>>
		<<set $money -= 1000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $upperoff to 0>>
<</if>>

<</if>>
<<set $ruined to 0>><</nobr>><</widget>>




<<widget "lowerruined">><<nobr>><<set $ruined to 1>><<set $eventskipoverrule to 1>><<set $uncladlower to 0>><<set $uncladoutfit to 0>>
<<if $lowertemp is 1>>
<<lowernaked>>
<<set $loweroff to 0>>
<<else>>
<<if $lowerclothes is "sundress skirt">>
<<set $lowersundressno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 750>>
		<<set $clothingrebuytext to 1>>
		<<set $uppersundressnew to 1>>
		<<set $uppersundressno to 1>>
		<<set $lowersundressnew to 1>>
		<<set $lowersundressno to 1>>
		<<set $money -= 750>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "pyjama bottoms">>
<<set $lowerpjsno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1000>>
		<<set $clothingrebuytext to 1>>
		<<set $lowerpjsnew to 1>>
		<<set $lowerpjsno to 1>>
		<<set $money -= 1000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "towel">>
<<set $lowertowelno to 0>>
<<lowernaked>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "bikini bottoms">>
<<set $lowerbikinino to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 3000>>
		<<set $clothingrebuytext to 1>>
		<<set $lowerbikininew to 1>>
		<<set $lowerbikinino to 1>>
		<<set $money -= 3000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "waist apron">>
<<set $waistapronno to 0>>
<<lowernaked>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "shorts">>
<<set $shortsno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1000>>
		<<set $clothingrebuytext to 1>>
		<<set $shortsnew to 1>>
		<<set $shortsno to 1>>
		<<set $money -= 1000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "school shorts">>
<<set $schoolshortsno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 2000>>
		<<set $clothingrebuytext to 1>>
		<<set $schoolshortsnew to 1>>
		<<set $schoolshortsno to 1>>
		<<set $money -= 2000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "school skirt">>
<<set $schoolskirtno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 2000>>
		<<set $clothingrebuytext to 1>>
		<<set $schoolskirtnew to 1>>
		<<set $schoolskirtno to 1>>
		<<set $money -= 2000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "school swimsuit bottom">>
<<set $lowerschoolswimsuitno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 750>>
		<<set $clothingrebuytext to 1>>
		<<set $upperschoolswimsuitnew to 1>>
		<<set $upperschoolswimsuitno to 1>>
		<<set $lowerschoolswimsuitnew to 1>>
		<<set $lowerschoolswimsuitno to 1>>
		<<set $money -= 750>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "school swim shorts">>
<<set $schoolswimshortsno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1500>>
		<<set $clothingrebuytext to 1>>
		<<set $schoolswimshortsnew to 1>>
		<<set $schoolswimshortsno to 1>>
		<<set $money -= 1500>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "plant skirt">>
<<set $lowerplantswimsuitno to 0>>
<<lowernaked>>
<<set $loweroff to 0>>
<</if>>
<<if $lowerclothes is "evening gown skirt">>
<<set $lowereveninggownno to 0>>
<<lowernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 6000>>
		<<set $clothingrebuytext to 1>>
		<<set $uppereveninggownnew to 1>>
		<<set $uppereveninggownno to 1>>
		<<set $lowereveninggownnew to 1>>
		<<set $lowereveninggownno to 1>>
		<<set $money -= 6000>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $loweroff to 0>>
<</if>>

<</if>>
<<set $ruined to 0>><</nobr>><</widget>>

<<widget "underruined">><<nobr>><<set $ruined to 1>><<set $eventskipoverrule to 1>><<set $uncladunder to 0>>
<<if $undertemp is 1>>
<<undernaked>>
<<set $underoff to 0>>
<<else>>
<<if $underclothes is "plain panties">>
<<set $plainpantiesno to 0>>
<<undernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 200>>
		<<set $clothingrebuytext to 1>>
		<<set $plainpantiesnew to 1>>
		<<set $plainpantiesno to 1>>
		<<set $money -= 200>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $underoff to 0>>
<</if>>
<<if $underclothes is "lace panties">>
<<set $lacepantiesno to 0>>
<<undernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 600>>
		<<set $clothingrebuytext to 1>>
		<<set $lacepantiesnew to 1>>
		<<set $lacepantiesno to 1>>
		<<set $money -= 600>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $underoff to 0>>
<</if>>
<<if $underclothes is "Y fronts">>
<<set $yfrontsno to 0>>
<<undernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 200>>
		<<set $clothingrebuytext to 1>>
		<<set $yfrontsnew to 1>>
		<<set $yfrontsno to 1>>
		<<set $money -= 200>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $underoff to 0>>
<</if>>
<<if $underclothes is "tights">>
<<set $tightsno to 0>>
<<undernaked>>
	<<if $clothingrebuy is 1>>
		<<if $money gte 1200>>
		<<set $clothingrebuytext to 1>>
		<<set $tightsnew to 1>>
		<<set $tightsno to 1>>
		<<set $money -= 1200>>
		<<else>>
		<<set $clothingrebuyfailedtext to 1>>
		<</if>>
	<</if>>
<<set $underoff to 0>>
<</if>>
<<if $underclothes is "chastity belt">>
	<<if $undertype is "brokenchastity">>
<<set $chastitybeltno to 0>>
<<undernaked>>
<<set $underoff to 0>>
<<set $analshield to 0>>
	<<else>>
<<set $chastitybeltno to 1>>
<<chastitybelt>>
<<set $underoff to 0>>
	<</if>>
<</if>>

<</if>>

<<set $ruined to 0>><</nobr>><</widget>>



<<widget "upperon">><<nobr>>
<<if $upperoff isnot 0>>
<<set $upperwetcarry to $upperwet>><<set $upperwetstagecarry to $upperwetstage>>
<</if>>

<<if $upperoff is "sundress" and $uppersundressno gte 1>>
<<uppersundress>>
<</if>>
<<if $upperoff is "pyjama shirt" and $upperpjsno gte 1>>
<<upperpjs>>
<</if>>
<<if $upperoff is "towel">>
<<uppertowel>>
<</if>>
<<if $upperoff is "bikini top" and $upperbikinino gte 1>>
<<upperbikini>>
<</if>>
<<if $upperoff is "t-shirt" and $tshirtno gte 1>>
<<tshirt>>
<</if>>
<<if $upperoff is "school shirt" and $schoolshirtno gte 1>>
<<schoolshirt>>
<</if>>
<<if $upperoff is "school swimsuit" and $upperschoolswimsuitno gte 1>>
<<upperschoolswimsuit>>
<</if>>
<<if $upperoff is "plant top">>
<<upperplant>>
<</if>>
<<if $upperoff is "evening gown" and $uppereveninggownno gte 1>>
<<uppereveninggown>>
<</if>>
<<if $upperoff is "tank top" and $tanktopno gte 1>>
<<tanktop>>
<</if>>

<<set $upperoff to 0>>
<<if $upperwetcarry isnot 0>>
<<set $upperwet to $upperwetcarry>><<set $upperwetstage to $upperwetstagecarry>>
<</if>>
<<set $upperwetcarry to 0>><<set $upperwetstagecarry to 0>>

<</nobr>><</widget>>

<<widget "loweron">><<nobr>>
<<if $loweroff isnot 0>>
<<set $lowerwetcarry to $lowerwet>><<set $lowerwetstagecarry to $lowerwetstage>>
<</if>>

<<if $loweroff is "sundress skirt" and $lowersundressno gte 1>>
<<lowersundress>>
<</if>>
<<if $loweroff is "pyjama bottoms" and $lowerpjsno gte 1>>
<<lowerpjs>>
<</if>>
<<if $loweroff is "towel">>
<<lowertowel>>
<</if>>
<<if $loweroff is "bikini bottoms" and $lowerbikinino gte 1>>
<<lowerbikini>>
<</if>>
<<if $loweroff is "waist apron" and $waistapronno gte 1>>
<<waistapron>>
<</if>>
<<if $loweroff is "shorts" and $shortsno gte 1>>
<<shorts>>
<</if>>
<<if $loweroff is "school shorts" and $schoolshortsno gte 1>>
<<schoolshorts>>
<</if>>
<<if $loweroff is "school skirt" and $schoolskirtno gte 1>>
<<schoolskirt>>
<</if>>
<<if $loweroff is "school swimsuit bottom" and $lowerschoolswimsuitno gte 1>>
<<lowerschoolswimsuit>>
<</if>>
<<if $loweroff is "school swim shorts" and $schoolswimshortsno gte 1>>
<<schoolswimshorts>>
<</if>>
<<if $loweroff is "plant skirt">>
<<lowerplant>>
<</if>>
<<if $loweroff is "evening gown skirt" and $lowereveninggownno gte 1>>
<<lowereveninggown>>
<</if>>

<<set $loweroff to 0>>
<<if $lowerwetcarry isnot 0>>
<<set $lowerwet to $lowerwetcarry>><<set $lowerwetstage to $lowerwetstagecarry>>
<</if>>
<<set $lowerwetcarry to 0>><<set $lowerwetstagecarry to 0>>

<</nobr>><</widget>>

<<widget "underon">><<nobr>>
<<if $underoff isnot 0>>
<<set $underwetcarry to $underwet>><<set $underwetstagecarry to $underwetstage>>
<</if>>

<<if $underoff is "plain panties" and $plainpantiesno gte 1>>
<<plainpanties>>
<</if>>
<<if $underoff is "lace panties" and $lacepantiesno gte 1>>
<<lacepanties>>
<</if>>
<<if $underoff is "Y fronts" and $yfrontsno gte 1>>
<<yfronts>>
<</if>>
<<if $underoff is "chastity belt" and $chastitybeltno gte 1>>
<<chastitybelt>>
<</if>>
<<if $underoff is "tights" and $tightsno gte 1>>
<<tights>>
<</if>>

<<set $underoff to 0>>
<<if $underwetcarry isnot 0>>
<<set $underwet to $underwetcarry>><<set $underwetstage to $underwetstagecarry>>
<</if>>
<<set $underwetcarry to 0>><<set $underwetstagecarry to 0>>

<</nobr>><</widget>>

<<widget "outfiton">><<nobr>>
<<upperon>>
<<loweron>>
<</nobr>><</widget>>

<<widget "clotheson">><<nobr>>
<<upperon>>
<<loweron>>
<<underon>>
<<set $uncladupper to 0>>
<<set $uncladlower to 0>>
<<set $uncladunder to 0>>
<<set $uncladoutfit to 0>>
<<set $unclad to 0>>
<<if $upperclothes is "naked" and $lowerclothes is "naked" and $underclothes is "naked">>
<<else>>
You fix your clothing.<br><br>
<</if>>
<<set $upperstate to $upperstatebase>>
<<set $upperstatetop to $upperstatetopbase>>
<<set $lowerstate to $lowerstatebase>>
<<if $skirt is 1>>
<<set $skirtdown to 1>>
<</if>>
<<set $understate to $understatebase>>
<<set $upperexposed to $upperexposedbase>>
<<set $lowerexposed to $lowerexposedbase>>
<<set $lowervaginaexposed to $lowervaginaexposedbase>>
<<set $loweranusexposed to $loweranusexposedbase>>
<<set $underexposed to $underexposedbase>>
<<set $undervaginaexposed to $undervaginaexposedbase>>
<<set $underanusexposed to $underanusexposedbase>>
<<exposure>>
<<if $exposed gte 1>>
You are conscious of your <<nuditystop>><br><br>
<</if>>

<</nobr>><</widget>>

<<widget "clothesontowel">><<nobr>>
<<upperon>>
<<loweron>>
<<underon>>
<<set $uncladupper to 0>>
<<set $uncladlower to 0>>
<<set $uncladunder to 0>>
<<set $uncladoutfit to 0>>
<<set $unclad to 0>>
<<if $upperclothes is "naked" and $lowerclothes is "naked" and $underclothes is "naked">>
<<else>>
You fix your clothing.<br><br>
<</if>>
<<set $upperstate to $upperstatebase>>
<<set $upperstatetop to $upperstatetopbase>>
<<set $lowerstate to $lowerstatebase>>
<<if $skirt is 1>>
<<set $skirtdown to 1>>
<</if>>
<<set $understate to $understatebase>>
<<set $upperexposed to $upperexposedbase>>
<<set $lowerexposed to $lowerexposedbase>>
<<set $lowervaginaexposed to $lowervaginaexposedbase>>
<<set $loweranusexposed to $loweranusexposedbase>>
<<set $underexposed to $underexposedbase>>
<<set $undervaginaexposed to $undervaginaexposedbase>>
<<set $underanusexposed to $underanusexposedbase>>
<<exposure>>
<<towelup>>
<<if $exposed gte 1>>
You are conscious of your <<nuditystop>><br><br>
<</if>>

<</nobr>><</widget>>

<<widget "uppersteal">><<nobr>>
<<if $upperoff is "sundress">><<uppersundress>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "pyjama shirt">><<upperpjs>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "towel">><<uppertowel>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "bikini top">><<upperbikini>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "t-shirt">><<tshirt>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "school shirt">><<schoolshirt>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "school swimsuit">><<upperschoolswimsuit>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "plant top">><<upperplant>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "evening gown">><<uppereveninggown>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<<if $upperoff is "tank top">><<tanktop>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $upperclothes as a souvenir.<br><br><</if>>
<<upperruined>><<set $upperoff to 0>><<uppernaked>>
<</if>>
<</nobr>><</widget>>

<<widget "lowersteal">><<nobr>>
<<if $loweroff is "sundress skirt">><<lowersundress>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "pyjama bottoms">><<lowerpjs>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "towel">><<lowertowel>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "bikini bottoms">><<lowerbikini>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "waist apron">><<waistapron>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "shorts">><<shorts>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "school shorts">><<schoolshorts>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "school skirt">><<schoolskirt>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "school swimsuit bottom">><<lowerschoolswimsuit>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "school swim shorts">><<schoolswimshorts>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "plant skirt">><<lowerplant>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<<if $loweroff is "evening gown skirt">><<lowereveninggown>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $lowerclothes as a souvenir.<br><br><</if>>
<<lowerruined>><<set $loweroff to 0>><<lowernaked>>
<</if>>
<</nobr>><</widget>>

<<widget "understeal">><<nobr>>
<<if $underoff is "plain panties">><<plainpanties>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $underclothes as a souvenir.<br><br><</if>>
<<underruined>><<set $underoff to 0>><<undernaked>>
<</if>>
<<if $underoff is "lace panties">><<lacepanties>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $underclothes as a souvenir.<br><br><</if>>
<<underruined>><<set $underoff to 0>><<undernaked>>
<</if>>
<<if $underoff is "Y fronts">><<yfronts>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $underclothes as a souvenir.<br><br><</if>>
<<underruined>><<set $underoff to 0>><<undernaked>>
<</if>>
<<if $underoff is "tights">><<tights>>
<<if $stealtextskip isnot 1>><<He>> decides to keep your $underclothes as a souvenir.<br><br><</if>>
<<underruined>><<set $underoff to 0>><<undernaked>>
<</if>>
<<if $underoff is "chastity belt">>
<</if>>
<</nobr>><</widget>>

<<widget "upperundress">><<nobr>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<lowernaked>><<set $loweroff to 0>><<set $lowerwet to 0>><<set $lowerwetstage to 0>>
	<</if>>
<<uppernaked>><<set $upperoff to 0>><<set $uncladupper to 0>><<set $uncladoutfit to 0>><<set $upperwet to 0>><<set $upperwetstage to 0>>
<</nobr>><</widget>>

<<widget "lowerundress">><<nobr>>
	<<if $upperset is $lowerset>>
	<<set $clothingchange to 1>><<uppernaked>><<set $upperoff to 0>><<set $upperwet to 0>><<set $upperwetstage to 0>>
	<</if>>
<<lowernaked>><<set $loweroff to 0>><<set $uncladlower to 0>><<set $uncladoutfit to 0>><<set $lowerwet to 0>><<set $lowerwetstage to 0>>
<</nobr>><</widget>>

<<widget "underundress">><<nobr>>
<<undernaked>><<set $underoff to 0>><<set $uncladunder to 0>><<set $underwet to 0>><<set $underwetstage to 0>>
<</nobr>><</widget>>

<<widget "undress">><<nobr>>
<<upperundress>>
<<lowerundress>>
<<underundress>>
<</nobr>><</widget>>

<<widget "storeupper">><<nobr>>
<<if $uppertemp isnot 1>>
	<<if $uppertype isnot "naked">>
		<<if $upperset is $lowerset>>
		<<set $lowerstore to $lowerclothes>>
		<</if>>
	<<set $upperstore to $upperclothes>>
	<</if>>
<</if>>
<<upperundress>>
<</nobr>><</widget>>

<<widget "storelower">><<nobr>>
<<if $lowertemp isnot 1>>
	<<if $lowertype isnot "naked">>
		<<if $upperset is $lowerset>>
		<<set $upperstore to $upperclothes>>
		<</if>>
	<<set $lowerstore to $lowerclothes>>
	<</if>>
<</if>>
<<lowerundress>>
<</nobr>><</widget>>

<<widget "storeunder">><<nobr>>
<<if $undertemp isnot 1>>
	<<if $undertype isnot "naked" and $undertype isnot "chastity">>
	<<set $understore to $underclothes>>
	<</if>>
<</if>>
	<<underundress>>
<</nobr>><</widget>>

<<widget "storeclothes">><<nobr>>
<<storeupper>>
<<storelower>>
<<storeunder>>
<<if $location is "pool">>
	<<set $faceacccarry to $faceacc>>
	<<set $headacccarry to $headacc>>
	<<set $legsacccarry to $legsacc>>
	<<set $feetacccarry to $feetacc>>
	<<set $faceacc to 0>>
	<<set $headacc to 0>>
	<<set $legsacc to 0>>
	<<set $feetacc to 0>>
<</if>>
<</nobr>><</widget>>

<<widget "storeon">><<nobr>>
<<if $upperstore isnot 0>>
<<set $upperoff to $upperstore>>
<<set $upperstore to 0>>
<</if>>
<<if $lowerstore isnot 0>>
<<set $loweroff to $lowerstore>>
<<set $lowerstore to 0>>
<</if>>
<<if $understore isnot 0>>
<<set $underoff to $understore>>
<<set $understore to 0>>
<</if>>
<<if $location is "pool">>
<<set $faceacc to $faceacccarry>>
<<set $headacc to $headacccarry>>
<<set $legsacc to $legsacccarry>>
<<set $feetacc to $feetacccarry>>
<<set $faceacccarry to 0>>
<<set $headacccarry to 0>>
<<set $legsacccarry to 0>>
<<set $feetacccarry to 0>>
<</if>>
<<clotheson>>
<<set $storelocation to 0>>
<</nobr>><</widget>>

<<widget "storeclear">><<nobr>>
<<set $upperstore to 0>>
<<set $lowerstore to 0>>
<<set $understore to 0>>
<<set $storelocation to 0>>
<</nobr>><</widget>>



<<widget "storelocation">><<nobr>>
<<if $undertemp isnot 1 and $lowertemp isnot 1 and $uppertemp isnot 1>>
<<set $storelocation to $storelocationinit>>
<<else>>
<</if>>
<</nobr>><</widget>>









:: Widgets Img [widget]
<<widget "img">><<nobr>>




<div id="img" @class="colourContainerClasses()">

<img id="bg" src="img/topleftbg.png">


<img id="base" src="img/body/basenoarms.gif">

<<if $leftarm isnot "bound">>
	<<if $masturbationimages is 1>>
		<<if $leftaction is "mpenisentrance">>
		<img id="leftarm" src="img/body/masturbation/leftarmballs.gif">
		<<elseif $leftaction is "mvaginaentrance">>
		<img id="leftarm" src="img/body/masturbation/leftarmpussy.gif">
		<<elseif $leftaction is "manus">>
		<img id="leftarm" src="img/body/masturbation/leftarmass.gif">
		<<elseif $leftaction is "manusentrance">>
		<img id="leftarm" src="img/body/masturbation/leftarmass.gif">
		<<elseif $leftaction is "manusrub">>
		<img id="leftarm" src="img/body/masturbation/leftarmass.gif">
		<<elseif $leftaction is "manustease">>
		<img id="leftarm" src="img/body/masturbation/leftarmass.gif">
		<<elseif $leftaction is "manusprostate">>
		<img id="leftarm" src="img/body/masturbation/leftarmass.gif">
		<<elseif $leftaction is "mpenisshaft">>
		<img id="leftarm" src="img/body/masturbation/leftarmshaft.gif">
		<<elseif $leftaction is "mpenisglans">>
		<img id="leftarm" src="img/body/masturbation/leftarmglans.gif">
		<<elseif $leftaction is "mvagina">>
		<img id="leftarm" src="img/body/masturbation/leftarmpussy.gif">
		<<elseif $leftaction is "mvaginaclit">>
		<img id="leftarm" src="img/body/masturbation/leftarmclit.gif">
		<<elseif $leftaction is "mvaginatease">>
		<img id="leftarm" src="img/body/masturbation/leftarmpussy.gif">
		<</if>>
	<<elseif $exhibitionism gte 95>>
	<img id="base" src="img/body/leftarmidle.png">
	<<elseif $exhibitionism gte 55 and $exposed lte 1>>
	<img id="base" src="img/body/leftarmidle.png">
	<<elseif $upperexposed gte 1 and $exposed gte 1>>
	<img id="leftarm" src="img/body/leftarm.gif">
	<<else>>
	<img id="base" src="img/body/leftarmidle.png">
	<</if>>
<</if>>

<<if $rightarm isnot "bound">>
	<<if $masturbationimages is 1>>
		<<if $rightaction is "mpenisentrance">>
		<img id="rightarm" src="img/body/masturbation/rightarmballs.gif">
		<<elseif $rightaction is "mvaginaentrance">>
		<img id="rightarm" src="img/body/masturbation/rightarmpussy.gif">
		<<elseif $rightaction is "manus">>
		<img id="rightarm" src="img/body/masturbation/rightarmass.gif">
		<<elseif $rightaction is "manusentrance">>
		<img id="rightarm" src="img/body/masturbation/rightarmass.gif">
		<<elseif $rightaction is "manusrub">>
		<img id="rightarm" src="img/body/masturbation/rightarmass.gif">
		<<elseif $rightaction is "manustease">>
		<img id="rightarm" src="img/body/masturbation/rightarmass.gif">
		<<elseif $rightaction is "manusprostate">>
		<img id="rightarm" src="img/body/masturbation/rightarmass.gif">
		<<elseif $rightaction is "mpenisshaft">>
		<img id="rightarm" src="img/body/masturbation/rightarmshaft.gif">
		<<elseif $rightaction is "mpenisglans">>
		<img id="rightarm" src="img/body/masturbation/rightarmglans.gif">
		<<elseif $rightaction is "mvagina">>
		<img id="rightarm" src="img/body/masturbation/rightarmpussy.gif">
		<<elseif $rightaction is "mvaginaclit">>
		<img id="rightarm" src="img/body/masturbation/rightarmclit.gif">
		<<elseif $rightaction is "mvaginatease">>
		<img id="rightarm" src="img/body/masturbation/rightarmpussy.gif">
		<</if>>
	<<elseif $exhibitionism gte 95>>
	<img id="base" src="img/body/rightarmidle.png">
	<<elseif $exhibitionism gte 55 and $exposed lte 1>>
	<img id="base" src="img/body/rightarmidle.png">
	<<elseif $lowerexposed gte 1 and $exposed gte 1>>
	<img id="rightarm" src="img/body/rightarm.png">
	<<else>>
	<img id="base" src="img/body/rightarmidle.png">
	<</if>>
<</if>>



<<if $pain gte 80>>
<img id="tears" src="img/body/tear4.gif">
<<elseif $pain gte 60>>
<img id="tears" src="img/body/tear3.gif">
<<elseif $pain gte 40>>
<img id="tears" src="img/body/tear2.gif">
<<elseif $pain gte 20>>
<img id="tears" src="img/body/tear1.png">
<</if>>

<<if $arousal gte 8000>>
<img id="blush" src="img/body/blush5.png">
<<elseif $arousal gte 6000>>
<img id="blush" src="img/body/blush4.png">
<<elseif $arousal gte 4000>>
<img id="blush" src="img/body/blush3.png">
<<elseif $exposed gte 2>>
<img id="blush" src="img/body/blush2.png">
<<elseif $arousal gte 2000>>
<img id="blush" src="img/body/blush2.png">
<<elseif $exposed gte 1>>
<img id="blush" src="img/body/blush1.png">
<<elseif $arousal gte 100>>
<img id="blush" src="img/body/blush1.png">
<</if>>

<<if $pain gte 100>>
<img id="sclera" src="img/eyes/sclerabloodshot.png">
<</if>>


<<if $trauma gte $traumamax>>
<img id="mouth" src="img/body/mouthneutral.png">
<<elseif $orgasmdown gte 1>>
<img id="mouth" src="img/body/mouthcry.png">
<<elseif $pain gte 80>>
<img id="mouth" src="img/body/mouthcry.png">
<<elseif $pain gte 60>>
<img id="mouth" src="img/body/mouthcry.png">
<<elseif $pain gte 40>>
<img id="mouth" src="img/body/mouthfrown.png">
<<elseif $pain gte 20>>
<img id="mouth" src="img/body/mouthfrown.png">
<<elseif $exposed is 2 and $exhibitionism lt 95>>
<img id="mouth" src="img/body/mouthfrown.png">
<<elseif $pain gte 1>>
<img id="mouth" src="img/body/mouthneutral.png">
<<elseif $exposed is 1 and $exhibitionism lt 55>>
<img id="mouth" src="img/body/mouthneutral.png">
<<elseif $combat is 1 and $consensual isnot 1>>
<img id="mouth" src="img/body/mouthneutral.png">
<<else>>
<img id="mouth" src="img/body/mouthsmile.png">
<</if>>

<<if $trauma gte $traumamax>>
	<img id="eyes" class="colour-eye" src="img/eyes/eyeshazelempty.png">
<<else>>
	<img id="eyes" class="colour-eye" src="img/eyes/eyeshazel.gif">
<</if>>

<<if $pain gte 100>>
<img id="sclera" src="img/eyes/sclerabloodshot.png">
<</if>>



<<if $vaginasemen + $vaginagoo gte 5>>
<img id="tears" src="img/body/cum/VaginalCumDripVeryFast.gif">
<<elseif $vaginasemen + $vaginagoo gte 4>>
<img id="tears" src="img/body/cum/VaginalCumDripFast.gif">
<<elseif $vaginasemen + $vaginagoo gte 3>>
<img id="tears" src="img/body/cum/VaginalCumDripSlow.gif">
<<elseif $vaginasemen + $vaginagoo gte 2>>
<img id="tears" src="img/body/cum/VaginalCumDripVerySlow.gif">
<<elseif $vaginasemen + $vaginagoo gte 1>>
<img id="tears" src="img/body/cum/VaginalCumDripStart.gif">
<</if>>

<<if $anussemen + $anusgoo gte 5>>
<img id="tears" src="img/body/cum/AnalCumDripVeryFast.gif">
<<elseif $anussemen + $anusgoo gte 4>>
<img id="tears" src="img/body/cum/AnalCumDripFast.gif">
<<elseif $anussemen + $anusgoo gte 3>>
<img id="tears" src="img/body/cum/AnalCumDripSlow.gif">
<<elseif $anussemen + $anusgoo gte 2>>
<img id="tears" src="img/body/cum/AnalCumDripVerySlow.gif">
<<elseif $anussemen + $anusgoo gte 1>>
<img id="tears" src="img/body/cum/AnalCumDripStart.gif">
<</if>>

<<if $mouthsemen + $mouthgoo gte 5>>
<img id="sclera" src="img/body/cum/MouthCumDripVeryFast.gif">
<<elseif $mouthsemen + $mouthgoo gte 4>>
<img id="sclera" src="img/body/cum/MouthCumDripFast.gif">
<<elseif $mouthsemen + $mouthgoo gte 3>>
<img id="sclera" src="img/body/cum/MouthCumDripSlow.gif">
<<elseif $mouthsemen + $mouthgoo gte 2>>
<img id="sclera" src="img/body/cum/MouthCumDripVerySlow.gif">
<<elseif $mouthsemen + $mouthgoo gte 1>>
<img id="sclera" src="img/body/cum/MouthCumDripStart.png">
<</if>>


<<if $fallenangel gte 2>>
<img id="backhair" src="img/transformations/angel/brokenwings.gif">
<img id="backhair" src="img/transformations/angel/brokenhalo.png">
<</if>>

<<if $angel gte 4>>
<img id="backhair" src="img/transformations/angel/halo.gif">
<</if>>

<<if $angel gte 6>>
<img id="backhair" src="img/transformations/angel/wings.gif">
<</if>>


<<if $demon gte 2>>
<img id="lashes" src="img/transformations/demon/demonhorns.gif">
<</if>>

<<if $demon gte 4>>
<img id="backhair" src="img/transformations/demon/demontail.gif">
<</if>>

<<if $demon gte 6>>
<img id="backhair" src="img/transformations/demon/demonwings.gif">
<</if>>


<<if $wolfgirl gte 4>>
	<img id="backhair" class="colour-hair" src="img/transformations/wolf/wolfearsred.gif">
	
	<<if $hirsutedisable is "f">>
		<img id="hirsute" class="colour-hair" src="img/transformations/hirsute/bushtamered.gif">
	<</if>>
	
<</if>>

<<if $wolfgirl gte 6>>
	<img id="backhair" class="colour-hair" src="img/transformations/wolf/wolftailred.gif">
<</if>>

<<if $hairlength gte 900>>
	<img id="hair" class="colour-hair" src="img/hair/red/hairfeetred.gif">
	<img id="backhair" class="colour-hair" src="img/hair/red/backhairfeetred.gif">
<<elseif $hairlength gte 700>>
	<img id="hair" class="colour-hair" src="img/hair/red/hairthighsred.gif">
	<img id="backhair" class="colour-hair" src="img/hair/red/backhairthighsred.gif">
<<elseif $hairlength gte 600>>
	<img id="hair" class="colour-hair" src="img/hair/red/hairnavelred.gif">
<<elseif $hairlength gte 400>>
	<img id="hair" class="colour-hair" src="img/hair/red/hairchestred.gif">
<<elseif $hairlength gte 200>>
	<img id="hair" class="colour-hair" src="img/hair/red/hairshoulderred.gif">
<<else>>
	<img id="hair" class="colour-hair" src="img/hair/red/hairshortred.gif">
<</if>>

<img id="lashes" class="colour-hair" src="img/hair/red/lashesred.png">

<<if $trauma gte $traumamax>>
	<img id="brow" class="colour-hair" src="img/hair/red/browtopred.png">
<<elseif $pain gte 60>>
	<img id="brow" class="colour-hair" src="img/hair/red/browlowred.png">
<<elseif $pain gte 20>>
	<img id="brow" class="colour-hair" src="img/hair/red/browmidred.png">
<<else>>
	<img id="brow" class="colour-hair" src="img/hair/red/browtopred.png">
<</if>>





<<if $underwetstage gte 3>>
<<underclothesimg>>
<<elseif $underwetstage is 2>>
<<underclothesimg>>
<<else>>
<<underclothesimg>>
<</if>>


<<if $lowerwetstage gte 3>>
<<lowerclothesimg>>
<<elseif $lowerwetstage is 2>>
<<lowerclothesimg>>
<<else>>
<<lowerclothesimg>>
<</if>>


<<if $upperwetstage gte 3>>
<<upperclothesimg>>
<<elseif $upperwetstage is 2>>
<<upperclothesimg>>
<<else>>
<<upperclothesimg>>
<</if>>




<<if $collared is 1>>
<img id="collar" src="img/otherclothes/collar.png">
<</if>>

<<if $exposed gte 2 and $penisexist is 1>>
	<<if $penilevirginity is 1>>
	<img id="tears" src="img/body/penisvirgin.gif">
	<<else>>
	<img id="tears" src="img/body/penis.gif">
	<</if>>
<</if>>

<<if $chestparasite is 1>>
<img id="tears" src="img/body/chestparasite.gif">
<</if>>

<<if $penisparasite is 1 and $exposed gte 2>>
<img id="tears" src="img/body/penisparasite.png">
<</if>>

<<if $clitparasite is 1 and $exposed gte 2>>
<img id="tears" src="img/body/clitparasite.png">
<</if>>


<<if $headacc is "hairpin">>
<img id="headacc" src="img/accessories/hairpin.gif">
<</if>>

<<if $headacc is "beanie">>
<img id="headacc" src="img/accessories/beanie.png">
<</if>>


<<if $faceacc is "glasses">>
<img id="faceacc" src="img/accessories/glasses.gif">
<</if>>

<<if $faceacc is "cool shades">>
<img id="faceacc" src="img/accessories/coolshades.png">
<</if>>


<<if $legsacc is "boys gym socks">>
<img id="legsacc" src="img/accessories/boysgymsocks.png">
<</if>>

<<if $legsacc is "girls gym socks">>
<img id="legsacc" src="img/accessories/girlsgymsocks.png">
<</if>>

<<if $legsacc is "stockings">>
<img id="legsacc" src="img/accessories/stockings.png">
<</if>>

<<if $legsacc is "fishnet stockings">>
<img id="legsacc" src="img/accessories/fishnetstockings.png">
<</if>>


<<if $feetacc is "black shoes">>
<img id="feetacc" src="img/accessories/blackshoes.png">
<</if>>






</div>


<</nobr>><</widget>>









:: Clothing Rebuy [nobr]
<<set $outside to 0>><<effects>>


Enabling clothing rebuy will activate chips in all your clothing. When damaged beyond repair, the clothes automatically order a replacement for no extra charge beyond the cost of the garment. This will not work if you don't have enough money, which will be deducted immediately.<br><br>

Would you like to enable this?<br><br>

<<link [[Yes|Clothing Shop]]>><<set $clothingrebuy to 1>><</link>><br>
<<link [[No|Clothing Shop]]>><</link>><br>









:: Widgets Accessories [widget]
<<widget "accessorieswear">><<nobr>>

<<if $wear is "striphead">><<set $wear to 0>>
<<set $headacc to 0>>
<</if>>

<<if $wear is "stripface">><<set $wear to 0>>
<<set $faceacc to 0>>
<</if>>

<<if $wear is "striplegs">><<set $wear to 0>>
<<set $legsacc to 0>>
<</if>>

<<if $wear is "stripfeet">><<set $wear to 0>>
<<set $feetacc to 0>>
<</if>>

<<if $wear is "hairpin">><<set $wear to 0>>
You put on the hairpin.<br><br>
<<set $headacc to "hairpin">>
<</if>>

<<if $wear is "beanie">><<set $wear to 0>>
You put on the beanie.<br><br>
<<set $headacc to "beanie">>
<</if>>

<<if $wear is "glasses">><<set $wear to 0>>
You put on the glasses.<br><br>
<<set $faceacc to "glasses">>
<</if>>

<<if $wear is "cool shades">><<set $wear to 0>>
You put on the cool shades.<br><br>
<<set $faceacc to "cool shades">>
<</if>>

<<if $wear is "boys gym socks">><<set $wear to 0>>
You put on the boy's gym socks.<br><br>
<<set $legsacc to "boys gym socks">>
<</if>>

<<if $wear is "girls gym socks">><<set $wear to 0>>
You put on the girl's gym socks.<br><br>
<<set $legsacc to "girls gym socks">>
<</if>>

<<if $wear is "stockings">><<set $wear to 0>>
You put on the stockings.<br><br>
<<set $legsacc to "stockings">>
<</if>>

<<if $wear is "fishnet stockings">><<set $wear to 0>>
You put on the fishnet stockings.<br><br>
<<set $legsacc to "fishnet stockings">>
<</if>>

<<if $wear is "black shoes">><<set $wear to 0>>
You put on the shoes.<br><br>
<<set $feetacc to "black shoes">>
<</if>>

<</nobr>><</widget>>





<<widget "accessories">><<nobr>>
<hr>
Head<br>
<<if $headacc isnot 0>>
You are wearing a $headacc.<br>
<</if>>


<<if $hairpin is 1>>
<<link "Hairpin">><<set $wear to "hairpin">><<script>>state.display(state.active.title, null)<</script>><</link>> - Greatly accelerates hair growth.<br>
<</if>>

<<if $beanie is 1>>
<<link "Beanie">><<set $wear to "beanie">><<script>>state.display(state.active.title, null)<</script>><</link>> - Looks pretty cool. Makes status increase faster.<br>
<</if>>


<<link "Nothing">><<set $wear to "striphead">><<script>>state.display(state.active.title, null)<</script>><</link>><br>

<br>


Face<br>
<<if $faceacc isnot 0>>
You are wearing $faceacc.<br>
<</if>>


<<if $glasses is 1>>
<<link "Glasses">><<set $wear to "glasses">><<script>>state.display(state.active.title, null)<</script>><</link>> - Makes studying easier, but you might be picked on at school.<br>
<</if>>

<<if $coolshades is 1>>
<<link "Cool shades">><<set $wear to "cool shades">><<script>>state.display(state.active.title, null)<</script>><</link>> - Makes status increase faster, but the teachers won't like them.<br>
<</if>>

<<link "Nothing">><<set $wear to "stripface">><<script>>state.display(state.active.title, null)<</script>><</link>><br>

<br>

Legs<br>
<<if $legsacc isnot 0>>
You are wearing $legsacc.<br>
<</if>>

<<if $boysgymsocks is 1>>
<<link "Boy's gym socks">><<set $wear to "boys gym socks">><<script>>state.display(state.active.title, null)<</script>><</link>> - Just socks.<br>
<</if>>

<<if $girlsgymsocks is 1>>
<<link "Girl's gym socks">><<set $wear to "girls gym socks">><<script>>state.display(state.active.title, null)<</script>><</link>> - Just socks.<br>
<</if>>

<<if $stockings is 1>>
<<link "Stockings">><<set $wear to "stockings">><<script>>state.display(state.active.title, null)<</script>><</link>> - Attractive and alluring.<br>
<</if>>

<<if $fishnetstockings is 1>>
<<link "Fishnet stockings">><<set $wear to "fishnet stockings">><<script>>state.display(state.active.title, null)<</script>><</link>> - Attractive and alluring.<br>
<</if>>


<<link "Nothing">><<set $wear to "striplegs">><<script>>state.display(state.active.title, null)<</script>><</link>><br>

<br>

Feet<br>
<<if $feetacc isnot 0>>
You are wearing $feetacc.<br>
<</if>>


<<if $blackshoes is 1>>
<<link "Black shoes">><<set $wear to "black shoes">><<script>>state.display(state.active.title, null)<</script>><</link>> - Suitable for school.<br>
<</if>>


<<link "Nothing">><<set $wear to "stripfeet">><<script>>state.display(state.active.title, null)<</script>><</link>><br>

<br>


<br><br>
<</nobr>><</widget>>






:: Accessory Shop [nobr]
<<set $outside to 1>><<set $location to "forest">><<effects>>

You are in the accessory shop. The interior is dark and crowded by tall shelves, holding all manner of items. Most are useless knick-knacks, but some interest you.<br><br>

<<if $buy isnot 0>>
You buy the $buy.<br><br>
<</if>>

<<if $buy is "hairpin">><<set $buy to 0>>
<<set $hairpin to 1>><<set $money -= 1000>>
<</if>>

<<if $buy is "beanie">><<set $buy to 0>>
<<set $beanie to 1>><<set $money -= 7000>>
<</if>>

<<if $buy is "glasses">><<set $buy to 0>>
<<set $glasses to 1>><<set $money -= 2000>>
<</if>>

<<if $buy is "cool shades">><<set $buy to 0>>
<<set $coolshades to 1>><<set $money -= 15000>>
<</if>>

<<if $buy is "girl's gym socks">><<set $buy to 0>>
<<set $girlsgymsocks to 1>><<set $money -= 900>>
<</if>>

<<if $buy is "boy's gym socks">><<set $buy to 0>>
<<set $boysgymsocks to 1>><<set $money -= 900>>
<</if>>

<<if $buy is "stockings">><<set $buy to 0>>
<<set $stockings to 1>><<set $money -= 2200>>
<</if>>

<<if $buy is "fishnet stockings">><<set $buy to 0>>
<<set $fishnetstockings to 1>><<set $money -= 2200>>
<</if>>

<<if $buy is "black shoes">><<set $buy to 0>>
<<set $blackshoes to 1>><<set $money -= 3000>>
<</if>>




<<if $hairpin isnot 1>>
<span class="teal">Hairpin.</span> Costs £10. Greatly accelerates hair growth.<br>
	<<if $money gte 1000>>
	<<link [[Buy hairpin|Accessory Shop]]>><<set $buy to "hairpin">><</link>>
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Hairpin.</span><br> <span class="green">Owned</span>
<</if>><br><br>

<<if $beanie isnot 1>>
<span class="teal">Beanie.</span> Costs £70. Makes status rise faster.<br>
	<<if $money gte 7000 and $headdrive is 1>>
	<<link [[Buy beanie|Accessory Shop]]>><<set $buy to "beanie">><</link>>
	<<elseif $headdrive isnot 1>>
	<span class="black">Locked.</span> Discover the headteacher's secret.
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Beanie.</span><br> <span class="green">Owned.</span>

<</if>><br><br>


<br>
<br>

<<if $glasses isnot 1>>
<span class="teal">Glasses.</span> Costs £20. Makes studying easier, but other students might pick on you.<br>
	<<if $money gte 2000>>
	<<link [[Buy glasses|Accessory Shop]]>><<set $buy to "glasses">><</link>>
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Glasses.</span><br> <span class="green">Owned.</span>

<</if>><br><br>


<<if $coolshades isnot 1>>
<span class="teal">Cool Shades.</span> Costs £150. Makes status rise faster.<br>
	<<if $money gte 15000 and $cool gte 160>>
	<<link [[Buy cool shades|Accessory Shop]]>><<set $buy to "cool shades">><</link>>
	<<elseif $cool lt 160>>
	<span class="black">Locked.</span> Make your peers think you're cool.
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Cool shades.</span><br> <span class="green">Owned.</span>

<</if>><br><br>



<br>
<br>

<<if $girlsgymsocks isnot 1>>
<span class="teal">Girl's gym socks.</span> Costs £9. Just socks.<br>
	<<if $money gte 900>>
	<<link [[Buy girl's gym socks|Accessory Shop]]>><<set $buy to "girl's gym socks">><</link>>
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Girl's gym socks.</span><br> <span class="green">Owned.</span>

<</if>><br><br>

<<if $boysgymsocks isnot 1>>
<span class="teal">Boy's gym socks.</span> Costs £9. Just socks.<br>
	<<if $money gte 900>>
	<<link [[Buy boy's gym socks|Accessory Shop]]>><<set $buy to "boy's gym socks">><</link>>
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Boy's gym socks.</span><br> <span class="green">Owned.</span>
	
<</if>><br><br>

<<if $stockings isnot 1>>
<span class="teal">Stockings.</span> Costs £22. Attractive and alluring.<br>
	<<if $money gte 2200 and $moleststat gte 30>>
	<<link [[Buy stockings|Accessory Shop]]>><<set $buy to "stockings">><</link>>
	<<elseif $moleststat lt 30>>
	<span class="black">Locked.</span> Be molested thirty times.
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Stockings.</span><br> <span class="green">Owned.</span>

<</if>><br><br>


<<if $fishnetstockings isnot 1>>
<span class="teal">Fishnet stockings.</span> Costs £22. Attractive and alluring.<br>
	<<if $money gte 2200 and $prostitutionstat gte 10>>
	<<link [[Buy fishnet stockings|Accessory Shop]]>><<set $buy to "fishnet stockings">><</link>>
	<<elseif $prostitutionstat lt 10>>
	<span class="black">Locked.</span> Whore yourself ten times.
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Fishnet stockings.</span><br> <span class="green">Owned.</span>
	
<</if>><br><br>



<br>
<br>


<<if $blackshoes isnot 1>>
<span class="teal">Black shoes.</span> Costs £30. Suitable for school.<br>
	<<if $money gte 3000>>
	<<link [[Buy black shoes|Accessory Shop]]>><<set $buy to "black shoes">><</link>>
	<<else>>
	<span class="blue">You cannot afford it.</span>
	<</if>>
<<else>>
<span class="teal">Black shoes.</span><br> <span class="green">Owned.</span>
	
<</if>><br><br>


<br><br>






<<link [[Leave|Forest]]>><</link>><br>










:: Widgets Combat Clothes Img [widget]
<<widget "clothesidle">><<nobr>>

<<if $upperset is $lowerset and $skirt is 1>>
	<<if $upperstate is "waist">>
		<<if $skirtdown is 1>>
			<img id="sexlower" class="colour-upper" src="img/sex/doggy/idle/dress/red/doggyidle_dressred_thighs.gif">
		<<elseif $skirtdown is 0>>
			<img id="sexlower" class="colour-upper" src="img/sex/doggy/idle/dress/red/doggyidle_dressred_hips.gif">
		<</if>>
	<<elseif $upperstate is "midriff">>
			<img id="sexlower" class="colour-upper" src="img/sex/doggy/idle/dress/red/doggyidle_dressred_tummy.gif">
	<<elseif $upperstate is "chest">>
			<img id="sexlower" class="colour-upper" src="img/sex/doggy/idle/dress/red/doggyidle_dressred_neck.gif">
	<</if>>
<</if>>





<<if $lowerclothes is "bikini bottoms">>

<<print "<img id=sexlower class="colour-lower" src='img/sex/doggy/idle/bikinibottom/red/" + "doggyidle_bikinibottom" + "red" + "_" + $lowerstate + ".gif'>">>

<<elseif $lowertype isnot "naked" and $upperset isnot $lowerset>>
	<<if $skirt is 1 and $skirtdown is 0 and $lowerstate is "waist">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/skirt/red/doggyidle_skirtred_waist.gif">
	<<elseif $skirt is 1 and $lowerstate is "waist">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/skirt/red/doggyidle_skirtred_hips.gif">
	<<elseif $skirt is 1 and $lowerstate is "thighs">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/skirt/red/doggyidle_skirtred_thighs.gif">
	<<elseif $skirt is 1 and $lowerstate is "knees">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/skirt/red/doggyidle_skirtred_knees.gif">
	<<elseif $skirt is 1 and $lowerstate is "ankles">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/skirt/red/doggyidle_skirtred_ankles.gif">
	<<elseif $lowerstate is "waist">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/shorts/red/doggyidle_shortsred_hips.gif">
	<<elseif $lowerstate is "thighs">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/shorts/red/doggyidle_shortsred_thighs.gif">
	<<elseif $lowerstate is "knees">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/shorts/red/doggyidle_shortsred_knees.gif">
	<<elseif $lowerstate is "ankles">>
		<img id="sexlower" class="colour-lower" src="img/sex/doggy/idle/shorts/red/doggyidle_shortsred_ankles.gif">
	<</if>>
<</if>>
















<<if $undertype isnot "naked" and $undertype isnot "chastity">>
	<<if $understate is "waist">>
		<img id="sexunder" class="colour-under" src="img/sex/doggy/idle/plainpanties/red/doggyidle_plainpantiesred_hips.gif">
	<<elseif $understate is "thighs">>
		<img id="sexunder" class="colour-under" src="img/sex/doggy/idle/plainpanties/red/doggyidle_plainpantiesred_thighs.gif">
	<<elseif $understate is "knees">>
		<img id="sexunder" class="colour-under" src="img/sex/doggy/idle/plainpanties/red/doggyidle_plainpantiesred_knees.gif">
	<<elseif $understate is "ankles">>
		<img id="sexunder" class="colour-under" src="img/sex/doggy/idle/plainpanties/red/doggyidle_plainpantiesred_ankles.gif">
	<</if>>
<</if>>



















<<if $upperclothes is "bikini top">>

	<<if $upperstate isnot "chest" and $upperstate isnot "midriff">>
<<print "<img id="sexunder" class="colour-upper" src='img/sex/doggy/idle/bikinitop/" + "red" + "/" + "doggyidle_bikinitop" + "red" + "_" + "thorax.gif'>">>
	<<else>>
<<print "<img id="sexunder" class="colour-upper" src='img/sex/doggy/idle/bikinitop/" + "red" + "/" + "doggyidle_bikinitop" + "red" + "_" + $upperstate + ".gif'>">>
	<</if>>

<<elseif $uppertype isnot "naked" and $upperset isnot $lowerset>>
	<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
		<<if $upperstate is "waist">>
			<img id="sexunder" class="colour-upper" src="img/sex/doggy/idle/t-shirt/red/doggyidle_tshirtred_waist.gif">
		<<else>>
			<img id="sexunder" class="colour-upper" src="img/sex/doggy/idle/t-shirt/red/doggyidle_tshirtred_neck.gif">
		<</if>>
	<<else>>
		<<if $upperstate is "waist">>
			<img id="sexunder" class="colour-upper" src="img/sex/doggy/idle/t-shirt/red/doggyidle_tshirtred_boundwaist.gif">

			
		<<else>>
			<img id="sexunder" class="colour-upper" src="img/sex/doggy/idle/t-shirt/red/doggyidle_tshirtred_boundneck.gif">
		<</if>>
	<</if>>
<</if>>















<</nobr>><</widget>>


:: Widgets Clothes Img [widget]
<<widget "underclothesimg">><<nobr>>

<<if $underclothes is "plain panties">>
	<<if $underintegrity lte ($underintegritymax / 10) * 2>>
		<img id="under" class="colour-under" src="img/underclothes/plainpanties/plainpantiestatteredred.png">
	<<elseif $underintegrity lte ($underintegritymax / 10) * 5>>
		<img id="under" class="colour-under" src="img/underclothes/plainpanties/plainpantiestornred.png">
	<<elseif $underintegrity lte ($underintegritymax / 10) * 9>>
		<img id="under" class="colour-under" src="img/underclothes/plainpanties/plainpantiesfrayedred.png">
	<<else>>
		<img id="under" class="colour-under" src="img/underclothes/plainpanties/plainpantiesred.png">
	<</if>>
<<elseif $underclothes is "lace panties">>
	<<if $underintegrity lte ($underintegritymax / 10) * 2>>
		<img id="under" class="colour-under" src="img/underclothes/lacepanties/lacepantiestatteredred.png">
	<<elseif $underintegrity lte ($underintegritymax / 10) * 5>>
		<img id="under" class="colour-under" src="img/underclothes/lacepanties/lacepantiestornred.png">
	<<elseif $underintegrity lte ($underintegritymax / 10) * 9>>
		<img id="under" class="colour-under" src="img/underclothes/lacepanties/lacepantiesfrayedred.png">
	<<else>>
		<img id="under" class="colour-under" src="img/underclothes/lacepanties/lacepantiesred.png">
	<</if>>
<<elseif $underclothes is "Y fronts">>
	<<if $underintegrity lte ($underintegritymax / 10) * 2>>
		<img id="under" class="colour-under" src="img/underclothes/yfronts/yfrontstatteredred.png">
	<<elseif $underintegrity lte ($underintegritymax / 10) * 5>>
		<img id="under" class="colour-under" src="img/underclothes/yfronts/yfrontstornred.png">
	<<elseif $underintegrity lte ($underintegritymax / 10) * 9>>
		<img id="under" class="colour-under" src="img/underclothes/yfronts/yfrontsfrayedred.png">
	<<else>>
		<img id="under" class="colour-under" src="img/underclothes/yfronts/yfrontsred.png">
	<</if>>
	
<<elseif $underclothes is "tights">>
	<<if $underintegrity lte ($underintegritymax / 10) * 2>>
<img id="under" src="img/underclothes/tights/tightstattered.png">	

	<<elseif $underintegrity lte ($underintegritymax / 10) * 5>>
<img id="under" src="img/underclothes/tights/tightstorn.png">

	<<elseif $underintegrity lte ($underintegritymax / 10) * 9>>
<img id="under" src="img/underclothes/tights/tightsfrayed.png">

	<<else>>
<img id="under" src="img/underclothes/tights/tights.png">

	<</if>>
	
<<elseif $underclothes is "chastity belt">>
<img id="under" src="img/underclothes/chastitybelt/chastitybelt.png">	
<<else>>
<</if>>

<</nobr>><</widget>>












<<widget "lowerclothesimg">><<nobr>>

<<if $lowerclothes is "bikini bottoms">>
	<img id="lower" class="colour-lower" src="img/lowerclothes/bikinilower/bikinilowerred.gif">
<<elseif $lowerclothes is "pyjama bottoms">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/pjslower/pjslowertatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/pjslower/pjslowertornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/pjslower/pjslowerfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/pjslower/pjslowerred.gif">
	<</if>>
<<elseif $lowerclothes is "shorts">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/shorts/shortstatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/shorts/shortstornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/shorts/shortsfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/shorts/shortsred.gif">
	<</if>>
<<elseif $lowerclothes is "sundress skirt">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/sundresslower/sundresslowertatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/sundresslower/sundresslowertornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/sundresslower/sundresslowerfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/sundresslower/sundresslowerred.gif">
	<</if>>
<<elseif $lowerclothes is "towel">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/towellower/towellowertatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/towellower/towellowertornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/towellower/towellowerfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/towellower/towellowerred.gif">
	<</if>>
<<elseif $lowerclothes is "waist apron">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/waistapron/waistaprontatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/waistapron/waistaprontornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/waistapron/waistapronfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/waistapron/waistapronred.gif">
	<</if>>
<<elseif $lowerclothes is "school shorts">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolshorts/schoolshortstatteredred.png">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolshorts/schoolshortstornred.png">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolshorts/schoolshortsfrayedred.png">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolshorts/schoolshortsred.png">
	<</if>>
<<elseif $lowerclothes is "school skirt">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolskirt/schoolskirttatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolskirt/schoolskirttornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolskirt/schoolskirtfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolskirt/schoolskirtred.gif">
	<</if>>
<<elseif $lowerclothes is "school swimsuit bottom">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimsuitlower/schoolswimsuitlowertatteredred.png">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimsuitlower/schoolswimsuitlowertornred.png">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimsuitlower/schoolswimsuitlowerfrayedred.png">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimsuitlower/schoolswimsuitlowerred.png">
	<</if>>
<<elseif $lowerclothes is "school swim shorts">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimshorts/schoolswimshortstatteredred.png">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimshorts/schoolswimshortstornred.png">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimshorts/schoolswimshortsfrayedred.png">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/schoolswimshorts/schoolswimshortsred.png">
	<</if>>
	
	
<<elseif $lowerclothes is "evening gown skirt">>
	<<if $lowerintegrity lte ($lowerintegritymax / 10) * 2>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/eveninggownlower/eveninggownlowertatteredred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 5>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/eveninggownlower/eveninggownlowertornred.gif">
	<<elseif $lowerintegrity lte ($lowerintegritymax / 10) * 9>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/eveninggownlower/eveninggownlowerfrayedred.gif">
	<<else>>
		<img id="lower" class="colour-lower" src="img/lowerclothes/eveninggownlower/eveninggownlowerred.gif">
	<</if>>
	
	
<<elseif $lowerclothes is "plant skirt">>
<img id="lower" src="img/lowerclothes/plantlower/plantlower.gif">
<<else>>
<</if>>


<</nobr>><</widget>>


















<<widget "upperclothesimg">><<nobr>>


<<if $upperclothes is "bikini top">>
	<img id="upper" class="colour-upper" src="img/upperclothes/bikiniupper/bikiniupperred.gif">
<<elseif $upperclothes is "pyjama shirt">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/pjsupper/pjsuppertatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/pjsupper/pjsuppertornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/pjsupper/pjsupperfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/pjsupper/pjsupperred.gif">
	<</if>>
<<elseif $upperclothes is "sundress">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/sundressupper/sundressuppertatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/sundressupper/sundressuppertornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/sundressupper/sundressupperfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/sundressupper/sundressupperred.gif">
	<</if>>
<<elseif $upperclothes is "towel">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/towelupper/toweluppertatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/towelupper/toweluppertornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/towelupper/towelupperfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/towelupper/towelupperred.gif">
	<</if>>
	
	
<<elseif $upperclothes is "t-shirt">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tshirt/tshirttatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tshirt/tshirttornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tshirt/tshirtfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tshirt/tshirtred.gif">
	<</if>>
<<elseif $upperclothes is "school swimsuit">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolswimsuitupper/schoolswimsuituppertatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolswimsuitupper/schoolswimsuituppertornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolswimsuitupper/schoolswimsuitupperfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolswimsuitupper/schoolswimsuitupperred.gif">
	<</if>>
<<elseif $upperclothes is "school shirt">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirttatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirttornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirtfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirtred.gif">
	<</if>>
	
<<elseif $upperclothes is "evening gown">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/eveninggownupper/eveninggownuppertatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/eveninggownupper/eveninggownuppertornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/eveninggownupper/eveninggownupperfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/eveninggownupper/eveninggownupperred.gif">
	<</if>>
	
<<elseif $upperclothes is "tank top">>
	<<if $upperintegrity lte ($upperintegritymax / 10) * 2>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tanktop/tanktoptatteredred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 5>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tanktop/tanktoptornred.gif">
	<<elseif $upperintegrity lte ($upperintegritymax / 10) * 9>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tanktop/tanktopfrayedred.gif">
	<<else>>
		<img id="upper" class="colour-upper" src="img/upperclothes/tanktop/tanktopred.gif">
	<</if>>
	
<<elseif $upperclothes is "plant top">>
	<img id="upper" src="img/upperclothes/plantupper/plantupper.gif">
<<else>>
<</if>>


<<if $rightarm isnot "bound">>
	<<if $lowerexposed gte 1 and $exposed gte 2 and $exhibitionism lt 95 or $lowerexposed gte 1 and $exposed gte 1 and $exhibitionism lt 55>>
		<<if $upperclothes is "pyjama shirt">>
			<img id="rightarmclothes" class="colour-upper" src="img/upperclothes/pjsupper/pjsrightcover/pjsrightcoverred.png">
		<<elseif $upperclothes is "t-shirt">>
			<img id="rightarmclothes" class="colour-upper" src="img/upperclothes/tshirt/tshirtrightcover/tshirtrightcoverred.png">
		<<elseif $upperclothes is "school shirt">>
			<img id="rightarmclothes" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirtcover/schoolshirtcoverred.png">
		<<elseif $upperclothes is "tank top">>
			<img id="rightarmclothes" class="colour-upper" src="img/upperclothes/tanktop/tanktoprightcover/tanktoprightcoverred.png">
		<<else>>
		<</if>>

		
		
		
		
		
	<<else>>
		<<if $upperclothes is "pyjama shirt">>
			<img id="upper" class="colour-upper" src="img/upperclothes/pjsupper/pjsrightarm/pjsrightarmred.png">
		<<elseif $upperclothes is "t-shirt">>
			<img id="upper" class="colour-upper" src="img/upperclothes/tshirt/tshirtrightarm/tshirtrightarmred.png">
		<<elseif $upperclothes is "school shirt">>
			<img id="upper" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirtrightarm/schoolshirtrightarmred.png">
		<<else>>
		<</if>>
	<</if>>
<</if>>






<<if $leftarm isnot "bound">>
	<<if $upperexposed gte 1 and $exposed gte 2 and $exhibitionism lt 95 or $upperexposed gte 1 and $exposed gte 1 and $exhibitionism lt 55>>
	<<else>>
		<<if $upperclothes is "pyjama shirt">>
			<img id="upper" class="colour-upper" src="img/upperclothes/pjsupper/pjsleftarm/pjsleftarmred.png">
		<<elseif $upperclothes is "t-shirt">>
			<img id="upper" class="colour-upper" src="img/upperclothes/tshirt/tshirtleftarm/tshirtleftarmred.png">
		<<elseif $upperclothes is "school shirt">>
			<img id="upper" class="colour-upper" src="img/upperclothes/schoolshirt/schoolshirtleftarm/schoolshirtleftarmred.png">
		<<else>>
		<</if>>
	<</if>>
<</if>>

<</nobr>><</widget>>











