code:
:: Widgets Upper Clothing [widget]

/* word - widget will output "a" if "a", and nothing if "n". eg - You are wearing <<a>> hat. You are wearing <<a>> shorts.
plural - widget will output "are" if 1, and "is" if 0. eg - Your hat <<upperplural>> wet. Your shorts <<upperplural>> wet.*/

<<widget "init_upper">><<nobr>>
<<set $clothes.upper to [
	{index: 0,
	name: "naked",
	name_cap: "Naked",
	variable: "naked",
	integrity: 0,
	integrity_max: 0,
	fabric_strength: 0,
	reveal: 1000,
	word: "n",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: 0,
	state_base: 0,
	state_top: 0,
	state_top_base: 0,
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 2,
	exposed_base: 2,
	type: ["naked"],
	set: "upper",
	gender: "n",
	cost: 0,
	description: "naked",
	shop: [],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 1,
	name: "sundress",
	name_cap: "Sundress",
	variable: "sundress",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 30,
	reveal: 400,
	word: "a",
	one_piece: 1,
	strap: 1,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "sundress",
	gender: "f",
	cost: 1500,
	description: "Great for frolicking.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 2,
	name: "pyjama shirt",
	name_cap: "Pyjama shirt",
	variable: "pjs",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 20,
	reveal: 200,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 1,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["sleep"],
	set: "upper",
	gender: "n",
	cost: 1000,
	description: "Keeps you warm at night.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 3,
	name: "towel top",
	name_cap: "Towel top",
	variable: "towel",
	integrity: 10,
	integrity_max: 10,
	fabric_strength: 20,
	reveal: 800,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 1,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "n",
	cost: 0,
	description: "Not very secure.",
	shop: [],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	cursed: 0,
	location: 0
},

	{index: 4,
	name: "t-shirt",
	name_cap: "T-shirt",
	variable: "tshirt",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 20,
	reveal: 400,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "n",
	cost: 1000,
	description: "Cool and casual.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 5,
	name: "school shirt",
	name_cap: "School shirt",
	variable: "schoolshirt",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 200,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["school"],
	set: "upper",
	gender: "n",
	cost: 2000,
	description: "The proper shirt for school.",
	shop: ["clothing"],
	accessory: 1,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 6,
	name: "plant top",
	name_cap: "Plant top",
	variable: "plant",
	integrity: 10,
	integrity_max: 10,
	fabric_strength: 20,
	reveal: 900,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 1,
	state: "midriff",
	state_base: "midriff",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 1,
	exposed_base: 1,
	type: ["swim"],
	set: "upper",
	gender: "n",
	cost: 0,
	description: "Plants tied loose together.",
	shop: [],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 7,
	name: "evening gown",
	name_cap: "Evening gown",
	variable: "eveninggown",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["formal"],
	set: "evening gown",
	gender: "f",
	cost: 12000,
	description: "For formal nights out.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 8,
	name: "tank top",
	name_cap: "Tank top",
	variable: "tanktop",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "n",
	cost: 2500,
	description: "Helps stay cool.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 9,
	name: "ballgown",
	name_cap: "Ballgown",
	variable: "ballgown",
	integrity: 80,
	integrity_max: 80,
	fabric_strength: 20,
	reveal: 600,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["formal"],
	set: "ballgown",
	gender: "f",
	cost: 42000,
	description: "Extravagant.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 10,
	name: "kimono",
	name_cap: "Kimono",
	variable: "kimono",
	integrity: 120,
	integrity_max: 120,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["formal"],
	set: "kimono",
	gender: "n",
	cost: 14000,
	description: "Exotic.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 11,
	name: "mini kimono",
	name_cap: "Mini kimono",
	variable: "kimonomini",
	integrity: 120,
	integrity_max: 120,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["formal"],
	set: "kimonomini",
	gender: "n",
	cost: 12000,
	description: "Exotic. Shows off your legs.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 12,
	name: "maid dress",
	name_cap: "Maid dress",
	variable: "maid",
	integrity: 110,
	integrity_max: 110,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 0,
	exposed_base: 0,
	type: ["maid", "costume", "serving"],
	set: "maid",
	gender: "f",
	cost: 2500,
	description: "For looking cute while cleaning.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 13,
	name: "nun's habit",
	name_cap: "Nun's habit",
	variable: "nun",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 20,
	reveal: 200,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 0,
	exposed_base: 0,
	type: ["holy", "costume"],
	set: "nun",
	gender: "f",
	cost: 6000,
	description: "Holy outfit for those sworn to purity.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 14,
	name: "large towel",
	name_cap: "Large towel",
	variable: "towellarge",
	integrity: 10,
	integrity_max: 10,
	fabric_strength: 20,
	reveal: 800,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "towellarge",
	gender: "n",
	cost: 0,
	description: "Not very secure.",
	shop: [],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 15,
	name: "tuxedo jacket",
	name_cap: "Tuxedo jacket",
	variable: "tuxedo",
	integrity: 160,
	integrity_max: 160,
	fabric_strength: 20,
	reveal: 600,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 0,
	exposed_base: 0,
	type: ["formal"],
	set: "upper",
	gender: "m",
	cost: 22000,
	description: "Smart and sophisticated.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 16,
	name: "blouse",
	name_cap: "Blouse",
	variable: "blouse",
	integrity: 80,
	integrity_max: 80,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "f",
	cost: 1000,
	description: "Loose and comfortable.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 17,
	name: "babydoll",
	name_cap: "Babydoll",
	variable: "babydoll",
	integrity: 40,
	integrity_max: 40,
	fabric_strength: 20,
	reveal: 700,
	word: "a",
	one_piece: 0,
	strap: 1,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["brown", "blue", "red", "green", "yellow", "pink", "purple", "tangerine", "black", "white"],
	exposed: 0,
	exposed_base: 0,
	type: ["sleep"],
	set: "upper",
	gender: "f",
	cost: 1500,
	description: "Loose and comfortable.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 18,
	name: "babydoll lingerie",
	name_cap: "Babydoll lingerie",
	variable: "babydolllingerie",
	integrity: 30,
	integrity_max: 30,
	fabric_strength: 20,
	reveal: 900,
	word: "a",
	one_piece: 0,
	strap: 1,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["brown", "blue", "red", "green", "yellow", "pink", "purple", "tangerine", "black", "white"],
	exposed: 1,
	exposed_base: 1,
	type: ["sleep"],
	set: "upper",
	gender: "f",
	cost: 1500,
	description: "Loose, comfortable, and transparent.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 19,
	name: "Crop top",
	name_cap: "Crop top",
	variable: "croptop",
	integrity: 90,
	integrity_max: 90,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "f",
	cost: 1500,
	description: "Show off your tummy.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 20,
	name: "serafuku",
	name_cap: "Serafuku",
	variable: "serafuku",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 20,
	reveal: 500,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["school"],
	set: "upper",
	gender: "f",
	cost: 2500,
	description: "Girl's school shirt design from a foreign country. Accepted by the head of the local school.",
	shop: ["forest"],
	accessory: 1,
	accessory_colour: 0,
	accessory_colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	sleeve_img: 1,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 21,
	name: "tube top",
	name_cap: "Tube top",
	variable: "tubetop",
	integrity: 100,
	integrity_max: 100,
	fabric_strength: 20,
	reveal: 600,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "f",
	cost: 2000,
	description: "Not too tight.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 0,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 22,
	name: "turtleneck",
	name_cap: "Turtleneck",
	variable: "turtleneck",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 200,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "n",
	cost: 4000,
	description: "Keeps your shoulders warm and your waist displayed.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 1,
	cursed: 0,
	location: 0
},

	{index: 23,
	name: "sweater",
	name_cap: "Sweater",
	variable: "sweater",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 200,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "n",
	cost: 6000,
	description: "Snug and comfy.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 24,
	name: "oversized sweater",
	name_cap: "Oversized sweater",
	variable: "sweaterlarge",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 200,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "sweaterlarge",
	gender: "n",
	cost: 7000,
	description: "Snug, comfy and long enough to cover your unmentionables. Just.",
	shop: ["clothing"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 25,
	name: "witch dress",
	name_cap: "Witch dress",
	variable: "witch",
	integrity: 120,
	integrity_max: 120,
	fabric_strength: 20,
	reveal: 400,
	word: "a",
	one_piece: 1,
	strap: 0,
	open: 1,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["costume"],
	set: "witch",
	gender: "f",
	cost: 4500,
	description: "Popular halloween costume. Coloured with forest dyes.",
	shop: ["forest"],
	accessory: 1,
	accessory_colour: 0,
	accessory_colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 26,
	name: "vampire jacket",
	name_cap: "Vampire jacket",
	variable: "vampire",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 700,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: ["black", "blue", "brown", "green", "pink", "purple", "red", "tangerine", "white", "yellow"],
	exposed: 0,
	exposed_base: 0,
	type: ["costume"],
	set: "upper",
	gender: "m",
	cost: 4500,
	description: "The label says it's second-hand. Smells like garlic.",
	shop: ["forest"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
},

	{index: 27,
	name: "slut shirt",
	name_cap: "Slut shirt",
	variable: "slut",
	integrity: 200,
	integrity_max: 200,
	fabric_strength: 20,
	reveal: 800,
	word: "a",
	one_piece: 0,
	strap: 0,
	open: 0,
	state: "waist",
	state_base: "waist",
	state_top: "chest",
	state_top_base: "chest",
	plural: 0,
	colour: 0,
	colour_options: [],
	exposed: 0,
	exposed_base: 0,
	type: ["normal"],
	set: "upper",
	gender: "f",
	cost: 7500,
	description: "SLUT is printed on the front. Sure to attract attention.",
	shop: ["forest"],
	accessory: 0,
	accessory_colour: 0,
	accessory_colour_options: [],
	sleeve_img: 1,
	breast_img: 0,
	cursed: 0,
	location: 0
}

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


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

<<if $spray gte 1>>

<<elseif $spraymax gte 1>>

<</if>>
<<if $spray gte 2>>

<<elseif $spraymax gte 2>>

<</if>>
<<if $spray gte 3>>

<<elseif $spraymax gte 3>>

<</if>>
<<if $spray gte 4>>

<<elseif $spraymax gte 4>>

<</if>>
<<if $spray gte 5>>

<<elseif $spraymax gte 5>>

<</if>>

<<if $worn.upper.type.includes("naked")>>
	<<if !$worn.under_upper.type.includes("naked")>>
		<<if $breastsize gte 12>>

		<<elseif $breastsize gte 8>>

		<<elseif $breastsize gte 6>>

		<<elseif $breastsize gte 4>>

		<<elseif $breastsize gte 3>>

		<<elseif $breastsize gte 1>>

		<</if>>
	<<else>>
		<<if $breastsize gte 12>>

		<<elseif $breastsize gte 8>>

		<<elseif $breastsize gte 6>>

		<<elseif $breastsize gte 4>>

		<<elseif $breastsize gte 3>>

		<<elseif $breastsize gte 1>>

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

<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
	<<if $masturbationimages is 1>>
		<<if $leftaction is "mpenisentrance">>

		<<elseif $leftaction is "mvaginaentrance">>

		<<elseif $leftaction is "manus">>

		<<elseif $leftaction is "manusentrance">>

		<<elseif $leftaction is "manusrub">>

		<<elseif $leftaction is "manustease">>

		<<elseif $leftaction is "manusprostate">>

		<<elseif $leftaction is "mpenisshaft">>

		<<elseif $leftaction is "mpenisglans">>

		<<elseif $leftaction is "mvagina">>

		<<elseif $leftaction is "mvaginaclit">>

		<<elseif $leftaction is "mvaginatease">>

		<</if>>
	<<elseif $exhibitionism gte 95 and $exhibitionismaction isnot "embarrassed" and $exposed gte 2 or $dontHide is true>>

	<<elseif $exhibitionism gte 55 and $exposed is 1 and $lightexhibitionismaction isnot "embarrassed">>

	<<elseif $worn.upper.exposed gte 1 and $exposed gte 1>>

	<<else>>

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

<<if $rightarm isnot "bound" and $rightarm isnot "grappled">>
	<<if $masturbationimages is 1>>
		<<if $rightaction is "mpenisentrance">>

		<<elseif $rightaction is "mvaginaentrance">>

		<<elseif $rightaction is "manus">>

		<<elseif $rightaction is "manusentrance">>

		<<elseif $rightaction is "manusrub">>

		<<elseif $rightaction is "manustease">>

		<<elseif $rightaction is "manusprostate">>

		<<elseif $rightaction is "mpenisshaft">>

		<<elseif $rightaction is "mpenisglans">>

		<<elseif $rightaction is "mvagina">>

		<<elseif $rightaction is "mvaginaclit">>

		<<elseif $rightaction is "mvaginatease">>

		<</if>>
	<<elseif $exhibitionism gte 95 and $exhibitionismaction isnot "embarrassed" and $exposed gte 2 or $dontHide is true>>

	<<elseif $exhibitionism gte 55 and $exposed is 1 and $lightexhibitionismaction isnot "embarrassed">>

	<<elseif $worn.lower.exposed gte 1 and $exposed gte 1>>

	<<else>>

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

<<if $pain gte 80>>

<<elseif $pain gte 60>>

<<elseif $pain gte 40>>

<<elseif $pain gte 20>>

<</if>>

<<if $arousal gte 8000>>

<<elseif $arousal gte 6000>>

<<elseif $arousal gte 4000>>

<<elseif $exposed gte 2>>

<<elseif $arousal gte 2000>>

<<elseif $exposed gte 1>>

<<elseif $arousal gte 100>>

<</if>>

<<if $pain gte 100 and $willpowerpain is 0>>

<</if>>

<<if $trauma gte $traumamax>>

<<elseif $orgasmdown gte 1>>

<<elseif $pain gte 80>>

<<elseif $pain gte 60>>

<<elseif $pain gte 40>>

<<elseif $pain gte 20>>

<<elseif $exposed is 2 and $exhibitionismaction is "embarrassed">>

<<elseif $pain gte 1>>

<<elseif $exposed is 1 and $lightexhibitionismaction is "embarrassed">>

<<elseif $combat is 1 and $consensual isnot 1>>

<<else>>

<</if>>

<<if $trauma gte ($traumamax * 0.9)>>

<<else>>

<</if>>

<<if $pain gte 100 and $willpowerpain is 0>>

<</if>>

<<if $vaginasemen + $vaginagoo gte 5>>

<<elseif $vaginasemen + $vaginagoo gte 4>>

<<elseif $vaginasemen + $vaginagoo gte 3>>

<<elseif $vaginasemen + $vaginagoo gte 2>>

<<elseif $vaginasemen + $vaginagoo gte 1>>

<</if>>

<<if $anussemen + $anusgoo gte 5>>

<<elseif $anussemen + $anusgoo gte 4>>

<<elseif $anussemen + $anusgoo gte 3>>

<<elseif $anussemen + $anusgoo gte 2>>

<<elseif $anussemen + $anusgoo gte 1>>

<</if>>

<<if $mouthsemen + $mouthgoo gte 5>>

<<elseif $mouthsemen + $mouthgoo gte 4>>

<<elseif $mouthsemen + $mouthgoo gte 3>>

<<elseif $mouthsemen + $mouthgoo gte 2>>

<<elseif $mouthsemen + $mouthgoo gte 1>>

<</if>>

<<if $fallenangel gte 2>>

<</if>>

<<if $angel gte 4>>

<</if>>

<<if $angel gte 6>>

<</if>>

<<if $demon gte 2>>

<</if>>

<<if $demon gte 4>>

<</if>>

<<if $demon gte 6>>

<</if>>

<<if $wolfgirl gte 4>>

	<<if $hirsutedisable is "f">>

	<</if>>

<</if>>

<<if $wolfgirl gte 6>>

<</if>>

<<if $cat gte 4>>

<</if>>

<<if $cat gte 6>>

<</if>>

<<if $hairposition is "front">>

<<else>>

<</if>>

<<if $hairlengthstage is "thighs" and $hairtype is "default">>

<<elseif $hairlengthstage is "feet" and $hairtype is "default">>

<</if>>

<<if $trauma gte $traumamax>>

<<elseif $pain gte 60>>

<<elseif $pain gte 20>>

<<else>>

<</if>>

<<upperimg>>
<<lowerimg>>
<<underlowerimg>>
<<underupperimg>>
<<headimg>>
<<faceimg>>
<<neckimg>>
<<legsimg>>
<<feetimg>>

<<if $worn.lower.exposed gte 2 and $worn.under_lower.exposed gte 1 and $penisexist is 1 and !$worn.under_lower.type.includes("chastity")>>
	<<if $penilevirginity is 1>>
		<<if $penissize gte 4>>

		<<elseif $penissize is 3>>

		<<elseif $penissize is 2>>

		<<elseif $penissize is 1>>

		<<else>>

		<</if>>
	<<else>>
		<<if $penissize gte 4>>

		<<elseif $penissize is 3>>

		<<elseif $penissize is 2>>

		<<elseif $penissize is 1>>

		<<else>>

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

<<if $parasite.nipples.name is "urchin" and $exposed gte 2>>
	<<if $breastsize gte 12>>

	<<elseif $breastsize gte 8>>

	<<elseif $breastsize gte 6>>

	<<elseif $breastsize gte 4>>

	<<else>>

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

<<if $parasite.nipples.name is "slime" and $exposed gte 2>>
	<<if $breastsize gte 12>>

	<<elseif $breastsize gte 8>>

	<<elseif $breastsize gte 6>>

	<<elseif $breastsize gte 4>>

	<<else>>

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

<<if $parasite.penis.name is "urchin" and $exposed gte 2>>
	<<if $penissize gte 4>>

	<<elseif $penissize is 3>>

	<<elseif $penissize is 2>>

	<<elseif $penissize is 1>>

	<<else>>

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

<<if $parasite.penis.name is "slime" and $exposed gte 2>>
	<<if $penissize gte 4>>

	<<elseif $penissize is 3>>

	<<elseif $penissize is 2>>

	<<elseif $penissize is 1>>

	<<else>>

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

<<if $parasite.clit.name is "urchin" and $exposed gte 2>>

<</if>>

<<if $parasite.clit.name is "slime" and $exposed gte 2>>

<</if>>

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

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

<<if $worn.upper.set is $worn.lower.set and $worn.lower.skirt is 1>>
	<<if $worn.upper.state is "waist">>
		<<if $worn.lower.skirt_down is 1>>

		<<elseif $worn.lower.skirt_down is 0>>

		<</if>>
	<<elseif $worn.upper.state is "midriff">>

	<<elseif $worn.upper.state is "chest">>

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

<<if $worn.lower.name is "bikini bottoms">>

<<elseif !$worn.lower.type.includes("naked") and $worn.upper.set isnot $worn.lower.set>>
	<<if $worn.lower.skirt is 1 and $worn.lower.skirt_down is 0 and $worn.lower.state is "waist">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "waist">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "thighs">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "knees">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "ankles">>

	<<elseif $worn.lower.state is "waist">>

	<<elseif $worn.lower.state is "thighs">>

	<<elseif $worn.lower.state is "knees">>

	<<elseif $worn.lower.state is "ankles">>

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

<<if !$worn.under_lower.type.includes("naked") and !$worn.under_lower.type.includes("chastity")>>
	<<if $worn.under_lower.state is "waist">>

	<<elseif $worn.under_lower.state is "thighs">>

	<<elseif $worn.under_lower.state is "knees">>

	<<elseif $worn.under_lower.state is "ankles">>

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

<<if $worn.upper.name is "bikini top">>

	<<if $worn.upper.state isnot "chest" and $worn.upper.state isnot "midriff">>

	<<else>>

	<</if>>

<<elseif $worn.upper.name is "tank top" and $tanktoptest is 1>>
	<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
		<<if $worn.upper.state is "waist">>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.upper.state is "waist">>

		<<else>>

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

<<elseif !$worn.upper.type.includes("naked") and $worn.upper.set isnot $worn.lower.set>>
	<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
		<<if $worn.upper.state is "waist">>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.upper.state is "waist">>

		<<else>>

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

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

<<widget "clothesidle">><<nobr>>

<<if $worn.upper.set is $worn.lower.set and $worn.lower.skirt is 1>>
	<<if $worn.upper.state is "waist">>
		<<if $worn.lower.skirt_down is 1>>

		<<elseif $worn.lower.skirt_down is 0>>

		<</if>>
	<<elseif $worn.upper.state is "midriff">>

	<<elseif $worn.upper.state is "chest">>

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

<<if $worn.lower.name is "bikini bottoms">>

<<elseif $worn.lower.name is "towel skirt">>
	<<if $worn.lower.skirt is 1 and $worn.lower.skirt_down is 0 and $worn.lower.state is "waist">>

	<<else>>

	<</if>>

<<elseif !$worn.lower.type.includes("naked") and $worn.upper.set isnot $worn.lower.set>>
	<<if $worn.lower.skirt is 1 and $worn.lower.skirt_down is 0 and $worn.lower.state is "waist">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "waist">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "thighs">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "knees">>

	<<elseif $worn.lower.skirt is 1 and $worn.lower.state is "ankles">>

	<<elseif $worn.lower.state is "waist">>

	<<elseif $worn.lower.state is "thighs">>

	<<elseif $worn.lower.state is "knees">>

	<<elseif $worn.lower.state is "ankles">>

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

<<if !$worn.under_lower.type.includes("naked") and !$worn.under_lower.type.includes("chastity")>>
	<<if $worn.under_lower.state is "waist">>

	<<elseif $worn.under_lower.state is "thighs">>

	<<elseif $worn.under_lower.state is "knees">>

	<<elseif $worn.under_lower.state is "ankles">>

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

<<if $worn.upper.name is "bikini top">>

	<<if $worn.upper.state isnot "chest" and $worn.upper.state isnot "midriff">>

	<<else>>

	<</if>>

<<elseif $worn.upper.name is "towel top">>
	<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
		<<if $worn.upper.state is "waist">>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.upper.state is "waist">>

		<<else>>

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

<<elseif $worn.upper.name is "tank top">>
	<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
		<<if $worn.upper.state is "waist">>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.upper.state is "waist">>

		<<else>>

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

<<elseif !$worn.upper.type.includes("naked") and $worn.upper.set isnot $worn.lower.set>>
	<<if $leftarm isnot "bound" and $leftarm isnot "grappled">>
		<<if $worn.upper.state is "waist">>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.upper.state is "waist">>

		<<else>>

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

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

<<widget "clothesactivemissionary">><<nobr>>

<<if $worn.upper.set is $worn.lower.set and $worn.lower.skirt is 1>>
	<<if $worn.upper.state is "waist">>
		<<if $worn.lower.skirt_down is 1>>

		<<elseif $worn.lower.skirt_down is 0>>

		<</if>>

	<<elseif $worn.upper.state is "midriff">>

	<<elseif $worn.upper.state is "chest">>

	<</if>>

		<<if $leftarm is "penis" or $leftarmstate is "tentacle">>

		<</if>>
		<<if $rightarm is "penis" or $rightarmstate is "tentacle">>

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

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

:: Widgets Clothes Img [widget]

<<widget "headimg">><<nobr>>
<<if $worn.head.name isnot "naked">>
	<<if $worn.head.colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.head.accessory is 1>>
	<<if $worn.head.accessory_colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.head.back_img is 1>>

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

<<widget "faceimg">><<nobr>>
<<if $worn.face.name isnot "naked">>
	<<if $worn.face.colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.face.accessory is 1>>
	<<if $worn.face.accessory_colour isnot 0>>

	<<else>>

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

<<widget "neckimg">><<nobr>>
<<if $worn.neck.name isnot "naked">>
	<<if $worn.neck.colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.neck.accessory is 1>>
	<<if $worn.neck.accessory_colour isnot 0>>

	<<else>>

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

<<widget "legsimg">><<nobr>>
<<if $worn.legs.name isnot "naked">>
	<<if $worn.legs.colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.legs.accessory is 1>>
	<<if $worn.legs.accessory_colour isnot 0>>

	<<else>>

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

<<widget "feetimg">><<nobr>>
<<if $worn.feet.name isnot "naked">>
	<<if $worn.feet.colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.feet.accessory is 1>>
	<<if $worn.feet.accessory_colour isnot 0>>

	<<else>>

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

<<widget "underupperimg">><<nobr>>

<<if $worn.under_upper.name isnot "naked">>
	<<if $worn.under_upper.integrity lte ($worn.under_upper.integrity_max / 10) * 2>>

	<<elseif $worn.under_upper.integrity lte ($worn.under_upper.integrity_max / 10) * 5>>

	<<elseif $worn.under_upper.integrity lte ($worn.under_upper.integrity_max / 10) * 9>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.under_upper.breast_img is 1>>
	<<if $breastsize gte 12>>

	<<elseif $breastsize gte 8>>

	<<elseif $breastsize gte 6>>

	<<elseif $breastsize gte 4>>

	<<elseif $breastsize gte 2>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.under_upper.accessory is 1>>
	<<if $worn.under_upper.accessory_colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $rightarm isnot "bound" and $rightarm isnot "grappled" and $worn.under_upper.sleeve_img is 1>>
	<<if $worn.lower.exposed gte 1 and $exposed gte 2 and $exhibitionism lt 95
	or $worn.lower.exposed gte 1 and $exposed gte 2 and $exhibitionismaction isnot "excited"
	or $worn.lower.exposed gte 1 and $exposed gte 1 and $exhibitionism lt 55
	or $worn.lower.exposed gte 1 and $exposed gte 1 and $lightexhibitionismaction isnot "excited">>

	<<else>>

	<</if>>
<</if>>
<<if $leftarm isnot "bound" and $leftarm isnot "grappled" and $worn.under_upper.sleeve_img is 1>>
	<<if $worn.upper.exposed gte 1 and $exposed gte 2 and $exhibitionism lt 95
	or $worn.upper.exposed gte 1 and $exposed gte 2 and $exhibitionismaction isnot "excited"
	or $worn.upper.exposed gte 1 and $exposed gte 1 and $exhibitionism lt 55
	or $worn.upper.exposed gte 1 and $exposed gte 1 and $lightexhibitionismaction isnot "excited">>

	<<else>>

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

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

<<widget "underlowerimg">><<nobr>>

<<if $worn.under_lower.name isnot "naked">>
	<<if $worn.under_lower.high_img is 1>>
		<<if $worn.under_lower.integrity lte ($worn.under_lower.integrity_max / 10) * 2>>

		<<elseif $worn.under_lower.integrity lte ($worn.under_lower.integrity_max / 10) * 5>>

		<<elseif $worn.under_lower.integrity lte ($worn.under_lower.integrity_max / 10) * 9>>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.under_lower.integrity lte ($worn.under_lower.integrity_max / 10) * 2>>

		<<elseif $worn.under_lower.integrity lte ($worn.under_lower.integrity_max / 10) * 5>>

		<<elseif $worn.under_lower.integrity lte ($worn.under_lower.integrity_max / 10) * 9>>

		<<else>>

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

<<if $worn.under_lower.penis_img is 1 and $penisexist is 1>>

<</if>>
<<if $worn.under_lower.accessory is 1>>
	<<if $worn.under_lower.accessory_colour isnot 0>>

	<<else>>

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

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

<<widget "lowerimg">><<nobr>>

<<if $worn.lower.name isnot "naked">>
	<<if $worn.lower.high_img is 1>>
		<<if $worn.lower.integrity lte ($worn.lower.integrity_max / 10) * 2>>

		<<elseif $worn.lower.integrity lte ($worn.lower.integrity_max / 10) * 5>>

		<<elseif $worn.lower.integrity lte ($worn.lower.integrity_max / 10) * 9>>

		<<else>>

		<</if>>
	<<else>>
		<<if $worn.lower.integrity lte ($worn.lower.integrity_max / 10) * 2>>

		<<elseif $worn.lower.integrity lte ($worn.lower.integrity_max / 10) * 5>>

		<<elseif $worn.lower.integrity lte ($worn.lower.integrity_max / 10) * 9>>

		<<else>>

		<</if>>
	<</if>>
<</if>>
<<if $worn.lower.accessory is 1>>
	<<if $worn.lower.accessory_colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.lower.back_img is 1>>

<</if>>

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

<<widget "upperimg">><<nobr>>

<<if $worn.upper.name isnot "naked">>
	<<if $worn.upper.integrity lte ($worn.upper.integrity_max / 10) * 2>>

	<<elseif $worn.upper.integrity lte ($worn.upper.integrity_max / 10) * 5>>

	<<elseif $worn.upper.integrity lte ($worn.upper.integrity_max / 10) * 9>>

	<<else>>

	<</if>>
<</if>>
<<if $worn.upper.breast_img is 1>>
	<<if $breastsize gte 12>>

	<<elseif $breastsize gte 8>>

	<<elseif $breastsize gte 6>>

	<<elseif $breastsize gte 4>>

	<<elseif $breastsize gte 2>>

	<<else>>

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

<<if $worn.upper.accessory is 1>>
	<<if $worn.upper.accessory_colour isnot 0>>

	<<else>>

	<</if>>
<</if>>
<<if $rightarm isnot "bound" and $rightarm isnot "grappled" and $worn.upper.sleeve_img is 1>>
	<<if $worn.lower.exposed gte 1 and $exposed gte 2 and $exhibitionism lt 95
	or $worn.lower.exposed gte 1 and $exposed gte 2 and $exhibitionismaction isnot "excited"
	or $worn.lower.exposed gte 1 and $exposed gte 1 and $exhibitionism lt 55
	or $worn.lower.exposed gte 1 and $exposed gte 1 and $lightexhibitionismaction isnot "excited">>

	<<else>>

	<</if>>
<</if>>
<<if $leftarm isnot "bound" and $leftarm isnot "grappled" and $worn.upper.sleeve_img is 1>>
	<<if $worn.upper.exposed gte 1 and $exposed gte 2 and $exhibitionism lt 95
	or $worn.upper.exposed gte 1 and $exposed gte 2 and $exhibitionismaction isnot "excited"
	or $worn.upper.exposed gte 1 and $exposed gte 1 and $exhibitionism lt 55
	or $worn.upper.exposed gte 1 and $exposed gte 1 and $lightexhibitionismaction isnot "excited">>

	<<else>>

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

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

repo_name: Trinidad/grados

license: mit


code:
:: Widgets Clothing Init [widget]

<<widget "clothing_data">><<nobr>>
<<init_upper>>
<<init_lower>>
<<init_under_upper>>
<<init_under_lower>>
<<init_head>>
<<init_face>>
<<init_neck>>
<<init_legs>>
<<init_feet>>
<</nobr>><</widget>>

<<widget "clothing_arrays">><<nobr>>

<<set $clothes to {}>>
<<set $worn to {}>>
<<set $wardrobe to {}>>
<<set $store to {}>>
<<set $outfit to []>>
<<set $carried to {}>>

<<clothing_data>>

<<set $worn.upper to clone($clothes.upper[0])>>
<<set $worn.lower to clone($clothes.lower[0])>>
<<set $worn.under_upper to clone($clothes.under_upper[0])>>
<<set $worn.under_lower to clone($clothes.under_lower[0])>>
<<set $worn.head to clone($clothes.head[0])>>
<<set $worn.face to clone($clothes.face[0])>>
<<set $worn.neck to clone($clothes.head[0])>>
<<set $worn.legs to clone($clothes.legs[0])>>
<<set $worn.feet to clone($clothes.feet[0])>>

<<set $wardrobe.upper to []>>
<<set $wardrobe.lower to []>>
<<set $wardrobe.under_upper to []>>
<<set $wardrobe.under_lower to []>>
<<set $wardrobe.head to []>>
<<set $wardrobe.face to []>>
<<set $wardrobe.neck to []>>
<<set $wardrobe.legs to []>>
<<set $wardrobe.feet to []>>
<<set $wardrobe.space to 40>>

<<set $outfit to [

	{index: 0,
	name: "Pyjamas",
	upper: "pyjama shirt",
	lower: "pyjama bottoms",
	under_upper: "naked",
	under_lower: "naked",
	head: "naked",
	face: "naked",
	neck: "naked",
	legs: "naked",
	feet: "naked",
	type: ["sleep"]
}

]>>

<<set $carried.upper to clone($clothes.upper[0])>>
<<set $carried.lower to clone($clothes.lower[0])>>
<<set $carried.under_upper to clone($clothes.under_upper[0])>>
<<set $carried.under_lower to clone($clothes.under_lower[0])>>
<<set $carried.head to clone($clothes.head[0])>>
<<set $carried.face to clone($clothes.face[0])>>
<<set $carried.neck to clone($clothes.neck[0])>>
<<set $carried.legs to clone($clothes.legs[0])>>
<<set $carried.feet to clone($clothes.feet[0])>>

<<set $store.upper to []>>
<<set $store.lower to []>>
<<set $store.under_upper to []>>
<<set $store.under_lower to []>>
<<set $store.head to []>>
<<set $store.face to []>>
<<set $store.neck to []>>
<<set $store.legs to []>>
<<set $store.feet to []>>

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

<<widget "clothinginit">><<nobr>>

<<clothing_arrays>>

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

<<set $upperoff to 0>>
<<set $loweroff to 0>>
<<set $underloweroff to 0>>
<<set $underupperoff to 0>>

<<set $upperwet to 0>>
<<set $lowerwet to 0>>
<<set $underlowerwet to 0>>
<<set $underupperwet to 0>>
<<set $upperwetstage to 0>>
<<set $lowerwetstage to 0>>
<<set $underupperwetstage to 0>>
<<set $underlowerwetstage to 0>>
<<set $waterwash to 0>>

<<set $wear_upper to "none">>
<<set $wear_lower to "none">>
<<set $wear_under_upper to "none">>
<<set $wear_under_lower to "none">>
<<set $wear_head to "none">>
<<set $wear_face to "none">>
<<set $wear_neck to "none">>
<<set $wear_legs to "none">>
<<set $wear_feet to "none">>
<<set $wear_outfit to "none">>

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

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

<<set $worn.upper to clone($clothes.upper[0])>>
<<set $worn.lower to clone($clothes.lower[0])>>
<<set $worn.under_upper to clone($clothes.under_upper[0])>>
<<set $worn.under_lower to clone($clothes.under_lower[0])>>
<<set $worn.head to clone($clothes.head[0])>>
<<set $worn.face to clone($clothes.face[0])>>
<<set $worn.neck to clone($clothes.neck[0])>>
<<set $worn.legs to clone($clothes.legs[0])>>
<<set $worn.feet to clone($clothes.feet[0])>>

<<if ($player.gender is "f" and $background isnot "crossdresser") or ($player.gender is "m" and $background is "crossdresser")>>

<<set $outfit.push(

	{index: $outfit.length,
	name: "Everyday",
	upper: "sundress",
	lower: "sundress skirt",
	under_upper: "naked",
	under_lower: "plain panties",
	head: "naked",
	face: "naked",
	neck: "naked",
	legs: "girl's gym socks",
	feet: "school shoes",
	type: ["normal"]

},

	{index: $outfit.length,
	name: "School",
	upper: "school shirt",
	lower: "school skirt",
	under_upper: "naked",
	under_lower: "plain panties",
	head: "hairpin",
	face: "naked",
	neck: "naked",
	legs: "girl's gym socks",
	feet: "school shoes",
	type: ["school"]

},

	{index: $outfit.length,
	name: "Swimwear",
	upper: "naked",
	lower: "naked",
	under_upper: "school swimsuit",
	under_lower: "school swimsuit bottom",
	head: "naked",
	face: "naked",
	neck: "naked",
	legs: "naked",
	feet: "naked",
	type: ["swim"]

}

)>>

<<set $worn.upper to clone($clothes.upper[1])>>
<<set $worn.upper.colour to "white">>
<<set $worn.lower to clone($clothes.lower[1])>>
<<set $worn.lower.colour to "white">>

<<set $worn.under_lower to clone($clothes.under_lower[1])>>
<<set $worn.under_lower.colour to "black">>
<<set $worn.legs to clone($clothes.legs[3])>>
<<set $wardrobe.upper.push(clone($clothes.upper[5]))>>
<<set $wardrobe.upper.last().colour to "white">>
<<set $wardrobe.lower.push(clone($clothes.lower[7]))>>
<<set $wardrobe.lower.last().colour to "black">>
<<set $wardrobe.upper.push(clone($clothes.upper[2]))>>
<<set $wardrobe.upper.last().colour to "blue">>
<<set $wardrobe.lower.push(clone($clothes.lower[2]))>>
<<set $wardrobe.lower.last().colour to "blue">>
<<set $wardrobe.under_upper.push(clone($clothes.under_upper[2]))>>
<<set $wardrobe.under_upper.last().colour to "blue">>
<<set $wardrobe.under_lower.push(clone($clothes.under_lower[6]))>>
<<set $wardrobe.under_lower.last().colour to "blue">>
<<set $wardrobe.under_upper.push(clone($clothes.under_upper[12]))>>
<<set $wardrobe.under_upper.last().colour to "black">>
<<set $wardrobe.head.push(clone($clothes.head[1]))>>
<<set $wardrobe.feet.push(clone($clothes.feet[1]))>>

<<elseif ($player.gender is "m" and $background isnot "crossdresser") or ($player.gender is "f" and $background is "crossdresser")>>

<<set $outfit.push(

	{index: $outfit.length,
	name: "Everyday",
	upper: "t-shirt",
	lower: "shorts",
	under_upper: "naked",
	under_lower: "briefs",
	head: "naked",
	face: "naked",
	neck: "naked",
	legs: "boy's gym socks",
	feet: "school shoes",
	type: ["normal"]

},

	{index: $outfit.length,
	name: "School",
	upper: "school shirt",
	lower: "school shorts",
	under_upper: "naked",
	under_lower: "briefs",
	head: "naked",
	face: "naked",
	neck: "naked",
	legs: "boy's gym socks",
	feet: "school shoes",
	type: ["school"]

},

	{index: $outfit.length,
	name: "Swimwear",
	upper: "naked",
	lower: "naked",
	under_upper: "naked",
	under_lower: "school swim shorts",
	head: "naked",
	face: "naked",
	neck: "naked",
	legs: "naked",
	feet: "naked",
	type: ["swim"]

}

)>>

<<set $worn.upper to clone($clothes.upper[4])>>
<<set $worn.upper.colour to "tangerine">>
<<set $worn.lower to clone($clothes.lower[5])>>
<<set $worn.lower.colour to "blue">>
<<set $worn.under_lower to clone($clothes.under_lower[4])>>
<<set $worn.under_lower.colour to "black">>
<<set $worn.legs to clone($clothes.legs[2])>>
<<set $wardrobe.upper.push(clone($clothes.upper[5]))>>
<<set $wardrobe.upper.last().colour to "white">>
<<set $wardrobe.lower.push(clone($clothes.lower[6]))>>
<<set $wardrobe.lower.last().colour to "black">>
<<set $wardrobe.upper.push(clone($clothes.upper[2]))>>
<<set $wardrobe.upper.last().colour to "blue">>
<<set $wardrobe.lower.push(clone($clothes.lower[2]))>>
<<set $wardrobe.lower.last().colour to "blue">>
<<set $wardrobe.under_lower.push(clone($clothes.under_lower[7]))>>
<<set $wardrobe.under_lower.last().colour to "blue">>
<<set $wardrobe.head.push(clone($clothes.head[1]))>>
<<set $wardrobe.feet.push(clone($clothes.feet[1]))>>

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


code:
:: Forest Shop [nobr]

<<set $outside to 0>><<set $location to "forest">><<effects>>
<<if $tryOn.autoReset isnot false>><<tryOnReset>><</if>>
<<if $forest_shop_intro isnot 1>>
	<<set $forest_shop_intro to 1>>
	<<npc Gwylan>><<person1>>
	You enter the strange building. The interior is dark and crowded by tall shelves, holding all manner of items. The quiet is broken by a scraping, then a thud. A <<if $pronoun is "m">>boy<<else>>girl<</if>> holding a stepladder appears at the end of the closest aisle.

	"A customer!" <<he>> says, dropping the ladder and walking over. <<He>> wipes <<his>> hands on <<his>> apron. "Welcome to my shop."

	<<He>> looks about your age, with mousy hair and a hint of freckles. "I'm older than I look," <<he>> says, as if reading your mind. "I'm Gwylan," <<he>> reaches forward, lifts your hand from beside your waist, and shakes it in both <<his>> own. "Pleased to meet you. I sell-," <<he>> pauses. "My grand<<if $pronoun is "m">>father<<else>>mother<</if>> sells-" another pause. "I sell knick-knacks here. Things you won't find in normal shops. Even I don't know what I have in stock!" <<He>> sounds proud.

	"I hope you find something you like," <<he>> says, picking the ladder back up. "But don't worry if you don't. My grand<<if $pronoun is "m">>father<<else>>mother<</if>> would say the objects here hide from people they don't want to be bought by." <<He>> laughs. "I could believe it."

	<<link [[Next|Forest Shop]]>><<endevent>><</link>>

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

	You hear Gwylan shuffling somewhere in the gloom.

	[[Look behind the dark screen|Forest Shop Outfit]]

	[[Look in the antique wardrobe|Forest Shop Upper]]

	[[Look in the dusky drawer|Forest Shop Under Lower]]

	[[Look on the spindly hat stand|Forest Shop Head]]

	[[Look in the glowing box|Forest Shop Neck]]

	<<if $tryOn.value gt 0 and $tryOn.value lt $money>>
		<<link[[Buy clothes and send to wardrobe|$passage]]>><<buyTryOnClothes "wardrobe">><</link>>

	<<elseif $tryOn.value is 0>>
		<<link [[Leave|Forest]]>><<endnpc>><<unset $clothes_choice>><<set $tryOn.autoReset to true>><<set $eventskip to 1>><</link>>
	<</if>>
<</if>>

:: Forest Shop Outfit [nobr]

<<set $outside to 0>><<set $location to "forest">><<effects>>

<<if $clothes_choice and $clothes_choice_previous>>
	<<if $clothes_choice is $clothes_choice_previous>>
		<<uppershopbuy>>
	<<else>>
		<<uppershopbuy "reset">>
	<</if>>
<<else>>
	<<uppershopbuy "reset">>
<</if>>
<<outfitshop>>

<<link [[Back to shop|Forest Shop]]>><<unset $clothes_choice>><</link>>

:: Forest Shop Upper [nobr]

<<set $outside to 0>><<set $location to "forest">><<effects>>

<<if $clothes_choice and $clothes_choice_previous>>
	<<if $clothes_choice is $clothes_choice_previous>>
		<<uppershopbuy>>
	<<else>>
		<<uppershopbuy "reset">>
	<</if>>
<<else>>
	<<uppershopbuy "reset">>
<</if>>
<<uppershop>>

<<link [[Back to shop|Forest Shop]]>><<unset $clothes_choice>><</link>>

:: Forest Shop Under Lower [nobr]

<<set $outside to 0>><<set $location to "forest">><<effects>>

<<if $clothes_choice and $clothes_choice_previous>>
	<<if $clothes_choice is $clothes_choice_previous>>
		<<underlowershopbuy>>
	<<else>>
		<<underlowershopbuy "reset">>
	<</if>>
<<else>>
	<<underlowershopbuy "reset">>
<</if>>
<<underlowershop>>

<<link [[Back to shop|Forest Shop]]>><<unset $clothes_choice>><</link>>

:: Forest Shop Head [nobr]

<<set $outside to 0>><<set $location to "forest">><<effects>>

<<if $clothes_choice and $clothes_choice_previous>>
	<<if $clothes_choice is $clothes_choice_previous>>
		<<headshopbuy>>
	<<else>>
		<<headshopbuy "reset">>
	<</if>>
<<else>>
	<<headshopbuy "reset">>
<</if>>
<<headshop>>

<<link [[Back to shop|Forest Shop]]>><<unset $clothes_choice>><</link>>

:: Forest Shop Neck [nobr]

<<set $outside to 0>><<set $location to "forest">><<effects>>

<<if $clothes_choice and $clothes_choice_previous>>
	<<if $clothes_choice is $clothes_choice_previous>>
		<<neckshopbuy>>
	<<else>>
		<<neckshopbuy "reset">>
	<</if>>
<<else>>
	<<neckshopbuy "reset">>
<</if>>
<<neckshop>>

<<link [[Back to shop|Forest Shop]]>><<unset $clothes_choice>><</link>>


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

<<wardrobesanity>>

<<if $wear is "strip">>
You remove your clothing.

<<undress $wardrobe_location>>
<</if>>

<<wearoutfit>>

	<<if $wear_upper gte 0 and $worn.upper.cursed is 1 or $wear_upper gte 0 and $wardrobe.upper[$wear_upper].one_piece is 1 and $worn.lower.cursed is 1>>
		You try to remove the <<bottomscomma>> but fail. <<cursedtext $worn.upper.name $worn.lower.name>>

	<<elseif $wear_upper is "strip">>
		You remove the $worn.upper.name.<<upperundress $wardrobe_location>>

	<<elseif $wear_upper is "large_towel">>
		<<upperundress $wardrobe_location>><<lowerundress $wardrobe_location>><<set $worn.upper to clone($clothes.upper[14])>><<set $worn.upper.colour to clone($worn.upper.colour_options.random())>><<set $worn.lower to clone($clothes.lower[15])>><<set $worn.lower.colour to clone($worn.upper.colour)>>
		You tie a large towel around your chest.

	<<elseif $wear_upper is "towel">>
		<<upperundress $wardrobe_location>><<set $worn.upper to clone($clothes.upper[3])>><<set $worn.upper.colour to clone($worn.upper.colour_options.random())>>
		You tie a towel around your chest.

	<<elseif $wear_upper isnot "none">>
		<<if $wear_delete is 1>>
			<<if $wardrobe.upper[$wear_upper].one_piece is 1>>
				<<for _d to 0; _d lt $wardrobe.lower.length; _d++>>
					<<if $wardrobe.upper[$wear_upper].set is $wardrobe.lower[_d].set and $wardrobe.upper[$wear_upper].colour is $wardrobe.lower[_d].colour and $wardrobe.upper[$wear_upper].accessory_colour is $wardrobe.lower[_d].accessory_colour>>
						<<set $wardrobe.lower.deleteAt(_d)>>
						<<break>>
					<</if>>
				<</for>>
			<</if>>
			You discard the $wardrobe.upper[$wear_upper].name.
			<<set $wardrobe.upper.deleteAt($wear_upper)>>

		<<elseif $wear_delete is 2>>
			<<if $wardrobe.upper[$wear_upper].one_piece is 1>>
				<<for _d to 0; _d lt $wardrobe.lower.length; _d++>>
					<<if $wardrobe.upper[$wear_upper].set is $wardrobe.lower[_d].set and $wardrobe.upper[$wear_upper].colour is $wardrobe.lower[_d].colour and $wardrobe.upper[$wear_upper].accessory_colour is $wardrobe.lower[_d].accessory_colour>>
						<<set $wardrobe.lower[_d].integrity=$wardrobe.lower[_d].integrity_max>>
						<<break>>
					<</if>>
				<</for>>
			<</if>>
			You repair the the $wardrobe.upper[$wear_upper].name.
			<<set $wardrobe.upper[$wear_upper].integrity = $wardrobe.upper[$wear_upper].integrity_max>><<pass 1>>

		<<else>>
			<<upperundress $wardrobe_location>>
			<<set $worn.upper to clone($wardrobe.upper[$wear_upper])>>
			<<set $wardrobe.upper.deleteAt($wear_upper)>>
				<<if $worn.upper.one_piece is 1>>
					<<for _e to 0; _e lt $wardrobe.lower.length; _e++>>
						<<if $wardrobe.lower[_e].set is $worn.upper.set and $wardrobe.lower[_e].colour is $worn.upper.colour>>
							<<set _strip_restrict to 1>>/*Stops lowerundress from removing the top should it be removing the lower half of an outfit identical to the previously worn outfit*/
							<<lowerundress $wardrobe_location>>
							<<set $worn.lower to clone($wardrobe.lower[_e])>>
							<<set $wardrobe.lower.deleteAt(_e)>>
						<</if>>
					<</for>>
				<</if>>
			You put on the $worn.upper.name.

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

	<<if $wear_lower gte 0 and $worn.lower.cursed is 1 or $wear_lower gte 0 and $wardrobe.lower[$wear_lower].one_piece is 1 and $worn.upper.cursed is 1>>
		You try to remove the <<bottomscomma>> but fail. <<cursedtext $worn.upper.name $worn.lower.name>>

	<<elseif $wear_lower is "strip">>
		<<if $wear_upper isnot "strip">>
			You remove the $worn.lower.name.<<lowerundress $wardrobe_location>>

		<</if>>
	<<elseif $wear_lower is "towel">>
		<<lowerundress $wardrobe_location>><<set $worn.lower to clone($clothes.lower[3])>><<set $worn.lower.colour to clone($worn.lower.colour_options.random())>>
		You tie a towel around your waist.

	<<elseif $wear_lower isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.lower[$wear_lower].name.
			<<set $wardrobe.lower.deleteAt($wear_lower)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.lower[$wear_lower].name.
			<<set $wardrobe.lower[$wear_lower].integrity = $wardrobe.lower[$wear_lower].integrity_max>><<pass 1>>

		<<else>>
			<<lowerundress $wardrobe_location>>
			<<set $worn.lower to clone($wardrobe.lower[$wear_lower])>>
			<<set $wardrobe.lower.deleteAt($wear_lower)>>
				<<if $worn.lower.one_piece is 1>>
					<<for _e to 0; _e lt $wardrobe.upper.length; _e++>>
						<<if $wardrobe.upper[_e].set is $worn.lower.set and $wardrobe.upper[_e].colour is $worn.lower.colour>>
							<<upperundress $wardrobe_location>>
							<<set $worn.upper to clone($wardrobe.upper[_e])>>
						<<set $wardrobe.upper.deleteAt(_e)>>
					<</if>>
				<</for>>
			<</if>>
		<</if>>
		You put on the $worn.lower.name.

	<</if>>

	<<if $wear_under_upper gte 0 and $worn.under_upper.cursed is 1 or $wear_under_upper gte 0 and $wardrobe.under_upper[$wear_under_upper].one_piece is 1 and $worn.under_lower.cursed is 1>>
		You try to remove the <<underbottomscomma>> but fail. <<cursedtext $worn.under_upper.name $worn.under_lower.name>>

	<<elseif $wear_under_upper is "strip">>
		You remove the $worn.under_upper.name.<<underupperundress $wardrobe_location>>

	<<elseif $wear_under_upper isnot "none">>
		<<if $wear_delete is 1>>
		<<if $wardrobe.under_upper[$wear_under_upper].one_piece is 1>>
			<<for _d to 0; _d lt $wardrobe.under_lower.length; _d++>>
				<<if $wardrobe.under_upper[$wear_under_upper].set is $wardrobe.under_lower[_d].set and $wardrobe.under_upper[$wear_under_upper].colour is $wardrobe.under_lower[_d].colour and $wardrobe.under_upper[$wear_under_upper].accessory_colour is $wardrobe.under_lower[_d].accessory_colour>>
					<<set $wardrobe.under_lower.deleteAt(_d)>>
					<<break>>
				<</if>>
			<</for>>
		<</if>>
		<<set $wardrobe.under_upper.deleteAt($wear_under_upper)>>
		<<elseif $wear_delete is 2>>
		<<if $wardrobe.under_upper[$wear_under_upper].one_piece is 1>>
			<<for _d to 0; _d lt $wardrobe.under_lower.length; _d++>>
				<<if $wardrobe.under_upper[$wear_under_upper].set is $wardrobe.under_lower[_d].set and $wardrobe.under_upper[$wear_under_upper].colour is $wardrobe.under_lower[_d].colour and $wardrobe.under_upper[$wear_under_upper].accessory_colour is $wardrobe.under_lower[_d].accessory_colour>>
					<<set $wardrobe.under_lower[_d].integrity=$wardrobe.under_lower[_d].integrity_max>>
					<<break>>
				<</if>>
			<</for>>
		<</if>>
		You repair the $wardrobe.under_upper[$wear_under_upper].name.
		<<set $wardrobe.under_upper[$wear_under_upper].integrity = $wardrobe.under_upper[$wear_under_upper].integrity_max>><<pass 1>>

		<<else>>
		<<underupperundress $wardrobe_location>>
		<<set $worn.under_upper to clone($wardrobe.under_upper[$wear_under_upper])>>
		<<set $wardrobe.under_upper.deleteAt($wear_under_upper)>>
			<<if $worn.under_upper.one_piece is 1>>
				<<for _e to 0; _e lt $wardrobe.under_lower.length; _e++>>
					<<if $wardrobe.under_lower[_e].set is $worn.under_upper.set and $wardrobe.under_lower[_e].colour is $worn.under_upper.colour>>
					<<set _strip_restrict to 1>>/*Stops underlowerundress from removing the top should it be removing the lower half of an outfit identical to the previously worn outfit*/
					<<underlowerundress $wardrobe_location>>
					<<set $worn.under_lower to clone($wardrobe.under_lower[_e])>>
					<<set $wardrobe.under_lower.deleteAt(_e)>>
					<</if>>
				<</for>>
			<</if>>
		<</if>>
		You put on the $worn.under_upper.name.

	<</if>>

	<<if $wear_under_lower gte 0 and $worn.under_lower.cursed is 1 or $wear_under_lower gte 0 and $wardrobe.under_lower[$wear_under_lower].one_piece is 1 and $worn.under_upper.cursed is 1>>
		You try to remove the <<underbottomscomma>> but fail. <<cursedtext $worn.under_lower.name $worn.under_upper.name>>

	<<elseif $wear_under_lower is "strip">>
		<<if $wear_under_upper isnot "strip">>
			<<if $worn.under_lower.cursed is 1>>
			You try to remove the <<underbottomscomma>> but fail. <<cursedtext $worn.under_lower.name $worn.under_upper.name>>

			<<else>>
			You remove the $worn.under_lower.name.
			<<underlowerundress $wardrobe_location>>

			<</if>>
		<</if>>
	<<elseif $wear_under_lower isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.under_lower[$wear_under_lower].name.
			<<set $wardrobe.under_lower.deleteAt($wear_under_lower)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.under_lower[$wear_under_lower].name.
			<<set $wardrobe.under_lower[$wear_under_lower].integrity = $wardrobe.under_lower[$wear_under_lower].integrity_max>><<pass 1>>

		<<else>>
			<<underlowerundress $wardrobe_location>>
			<<set $worn.under_lower to clone($wardrobe.under_lower[$wear_under_lower])>>
			<<set $wardrobe.under_lower.deleteAt($wear_under_lower)>>
			<<if $worn.under_lower.one_piece is 1>>
				<<for _e to 0; _e lt $wardrobe.under_upper.length; _e++>>
					<<if $wardrobe.under_upper[_e].set is $worn.under_lower.set and $wardrobe.under_upper[_e].colour is $worn.under_lower.colour>>
						<<underupperundress $wardrobe_location>>
						<<set $worn.under_upper to clone($wardrobe.under_upper[_e])>>
						<<set $wardrobe.under_upper.deleteAt(_e)>>
					<</if>>
				<</for>>
			<</if>>
		<</if>>
		You put on the $worn.under_lower.name.

	<</if>>

	<<if $wear_head isnot "none" and $worn.head.cursed is 1>>
		You try to remove the $worn.head.name, but it won't budge. <<cursedtext $worn.head.name>>

	<<elseif $wear_head is "strip">>
		You remove the $worn.head.name.
		<<headundress $wardrobe_location>>

	<<elseif $wear_head isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.head[$wear_head].name.
			<<set $wardrobe.head.deleteAt($wear_head)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.head[$wear_head].name.
			<<set $wardrobe.head[$wear_head].integrity = $wardrobe.head[$wear_head].integrity_max>><<pass 1>>

		<<else>>
			<<headundress $wardrobe_location>>
			<<set $worn.head to clone($wardrobe.head[$wear_head])>>
			<<set $wardrobe.head.deleteAt($wear_head)>>
			You put on the $worn.head.name.

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

	<<if $wear_face isnot "none" and $worn.face.cursed is 1>>
		You try to remove the $worn.face.name, but it won't budge. <<cursedtext $worn.face.name>>

	<<elseif $wear_face is "strip">>
		You remove the $worn.face.name.
		<<faceundress $wardrobe_location>>

	<<elseif $wear_face isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.face[$wear_face].name.
			<<set $wardrobe.face.deleteAt($wear_face)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.face[$wear_face].name.
			<<set $wardrobe.face[$wear_face].integrity = $wardrobe.face[$wear_face].integrity_max>><<pass 1>>

		<<else>>
			<<faceundress $wardrobe_location>>
			<<set $worn.face to clone($wardrobe.face[$wear_face])>>
			<<set $wardrobe.face.deleteAt($wear_face)>>
			You put on the $worn.face.name.

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

	<<if $wear_neck isnot "none" and $worn.neck.cursed is 1>>
		You try to remove the $worn.neck.name, but it won't budge. <<cursedtext $worn.neck.name>>

	<<elseif $wear_neck is "strip">>
		<<if $worn.neck.cursed is 1>>
			You try to remove the $worn.neck.name, but it won't budge. <<cursedtext $worn.neck.name>>
		<<else>>
			You remove the $worn.neck.name.<<neckundress $wardrobe_location>>

		<</if>>
	<<elseif $wear_neck isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.neck[$wear_neck].name.
			<<set $wardrobe.neck.deleteAt($wear_neck)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.neck[$wear_neck].name.
			<<set $wardrobe.neck[$wear_neck].integrity = $wardrobe.neck[$wear_neck].integrity_max>><<pass 1>>

		<<else>>
			<<neckundress $wardrobe_location>>
			<<set $worn.neck to clone($wardrobe.neck[$wear_neck])>>
			<<set $wardrobe.neck.deleteAt($wear_neck)>>
			You put on the $worn.neck.name.

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

	<<if $wear_legs isnot "none" and $worn.legs.cursed is 1>>
		You try to remove the $worn.legs.name, but it won't budge. <<cursedtext $worn.legs.name>>

	<<elseif $wear_legs is "strip">>
		You remove the $worn.legs.name.<<legsundress $wardrobe_location>>

	<<elseif $wear_legs isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.legs[$wear_legs].name.
			<<set $wardrobe.legs.deleteAt($wear_legs)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.legs[$wear_legs].name.
			<<set $wardrobe.legs[$wear_legs].integrity = $wardrobe.legs[$wear_legs].integrity_max>><<pass 1>>

		<<else>>
			<<legsundress $wardrobe_location>>
			<<set $worn.legs to clone($wardrobe.legs[$wear_legs])>>
			<<set $wardrobe.legs.deleteAt($wear_legs)>>
			You put on the $worn.legs.name.

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

	<<if $wear_feet isnot "none" and $worn.feet.cursed is 1>>
		You try to remove the $worn.feet.name, but it won't budge. <<cursedtext $worn.feet.name>>

	<<elseif $wear_feet is "strip">>
		You remove the $worn.feet.name.<<feetundress $wardrobe_location>>

	<<elseif $wear_feet isnot "none">>
		<<if $wear_delete is 1>>
			You discard the $wardrobe.feet[$wear_feet].name.
			<<set $wardrobe.feet.deleteAt($wear_feet)>>

		<<elseif $wear_delete is 2>>
			You repair the $wardrobe.feet[$wear_feet].name.
			<<set $wardrobe.feet[$wear_feet].integrity = $wardrobe.feet[$wear_feet].integrity_max>><<pass 1>>

		<<else>>
			<<feetundress $wardrobe_location>>
			<<set $worn.feet to clone($wardrobe.feet[$wear_feet])>>
			<<set $wardrobe.feet.deleteAt($wear_feet)>>
			You put on the $worn.feet.name.

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

<<if $wear is "dry">><<set $wear to 0>>
<<set $upperwet to 0>><<set $lowerwet to 0>><<set $underlowerwet to 0>><<set $underupperwet to 0>>
You squeeze the water from your clothes.

<</if>>

<<set $wear to 0>>
<<set $wear_upper to "none">>
<<set $wear_lower to "none">>
<<set $wear_under_upper to "none">>
<<set $wear_under_lower to "none">>
<<set $wear_head to "none">>
<<set $wear_face to "none">>
<<set $wear_neck to "none">>
<<set $wear_legs to "none">>
<<set $wear_feet to "none">>
<<set $wear_outfit to "none">>

<<exposure>>

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

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

<<clotheson>> /*Fixes perma pulled aside clothes introduced by 0.2.3.0 bug.*/

<<if $upperwet gte 1 or $lowerwet gte 1 or $underlowerwet or $underupperwet gte 1>>
<<link [[Dry your clothes|$passage]]>><<set $wear to "dry">><><</link>>

<</if>>

<<link [[Strip all|$passage]]>><<set $wear to "strip">><</link>>

__Clothing sets__

<<listoutfits>>

__Clothing__

<<if $wardrobeRepeat isnot true or ($wear_delete is 2 and $location isnot "home")>><<set $wear_delete to 0>><</if>>
 Wear <<print '<<radiobutton "$wear_delete" 0 '+($wear_delete is 0 or $wardrobeRepeat is false ? "checked" : "")+'>>'>> |
 Discard <<print '<<radiobutton "$wear_delete" 1 '+($wear_delete is 1 and $wardrobeRepeat is true ? "checked" : "")+'>>'>> |
<<if $sewingKit is 1 and $location is "home">>
	 Repair <<print '<<radiobutton "$wear_delete" 2 '+($wear_delete is 2 and $wardrobeRepeat is true ? "checked" : "")+'>>'>> |
<</if>>
 Repeat Actions <<print '<<checkbox "$wardrobeRepeat" false true '+($wardrobeRepeat ? "checked" : "")+'>>'>>

<<if $wear_delete is 1 and $wardrobeRepeat is true>>

Discard On Repeat

<<else>>

<</if>>

<<set _wardrobe_list to "upper">>

__Outfits__ Outfits take up both a top and bottom slot

<<if $worn.upper.name isnot "naked">>

Strip

<</if>>

Towel

<<for _i to 0; _i lt $wardrobe.upper.length; _i++>>
	<<if $wardrobe.upper[_i].one_piece is 1>>

<<print '' + $wardrobe.upper[_i].name_cap + ''>>
		<<if $wardrobe.upper[_i].colour isnot 0>>
		<<print '($wardrobe.upper[_i].colour)'>>
		<</if>>
		<<wardrobeintegrity _wardrobe_list>>

	<</if>>
<</for>>

<<set _wardrobe_list to "upper">>

__Tops__ $wardrobe.upper.length / $wardrobe.space

<<if $worn.upper.name isnot "naked">>

Strip

<</if>>

Towel

<<for _i to 0; _i lt $wardrobe.upper.length; _i++>>
	<<if $wardrobe.upper[_i].one_piece isnot 1>>

<<print '' + $wardrobe.upper[_i].name_cap + ''>>
		<<if $wardrobe.upper[_i].colour isnot 0>>
			<<print '($wardrobe.upper[_i].colour)'>>
		<</if>>
		<<wardrobeintegrity _wardrobe_list>>

	<</if>>
<</for>>

<<set _wardrobe_list to "lower">>

__Bottoms__ $wardrobe.lower.length / $wardrobe.space

<<if $worn.lower.name isnot "naked">>

Strip

<</if>>

Towel

<<for _i to 0; _i lt $wardrobe.lower.length; _i++>>
	<<if $wardrobe.lower[_i].one_piece isnot 1>>

<<print '' + $wardrobe.lower[_i].name_cap + ''>>
		<<if $wardrobe.lower[_i].colour isnot 0>>
		<<print '($wardrobe.lower[_i].colour)'>>
		<</if>><<wardrobeintegrity _wardrobe_list>>

	<</if>>
<</for>>

<<set _wardrobe_list to "under_upper">>

__Under outfits__ Outfits take up both a top and bottom slot

<<if $worn.under_upper.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.under_upper.length; _i++>>
	<<if $wardrobe.under_upper[_i].one_piece is 1>>

<<print '' + $wardrobe.under_upper[_i].name_cap + ''>>
		<<if $wardrobe.under_upper[_i].colour isnot 0>>
		<<print '($wardrobe.under_upper[_i].colour)'>>
		<</if>>
		<<wardrobeintegrity _wardrobe_list>>

	<</if>>
<</for>>

<<set _wardrobe_list to "under_upper">>

__Under tops__ $wardrobe.under_upper.length / $wardrobe.space

<<if $worn.under_upper.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.under_upper.length; _i++>>
	<<if $wardrobe.under_upper[_i].one_piece isnot 1>>

<<print '' + $wardrobe.under_upper[_i].name_cap + ''>>
		<<if $wardrobe.under_upper[_i].colour isnot 0>>
		<<print '($wardrobe.under_upper[_i].colour)'>>
		<</if>>
		<<wardrobeintegrity _wardrobe_list>>

	<</if>>
<</for>>

<<set _wardrobe_list to "under_lower">>

__Under bottoms__ $wardrobe.under_lower.length / $wardrobe.space

<<if $worn.under_lower.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.under_lower.length; _i++>>

	<<if $wardrobe.under_lower[_i].one_piece isnot 1>>

<<print '' + $wardrobe.under_lower[_i].name_cap + ''>>
		<<if $wardrobe.under_lower[_i].colour isnot 0>>
		<<print '($wardrobe.under_lower[_i].colour)'>>
		<</if>>
		<<wardrobeintegrity _wardrobe_list>>

	<</if>>
<</for>>

<<set _wardrobe_list to "head">>

__Head__ $wardrobe.head.length / $wardrobe.space

<<if $worn.head.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.head.length; _i++>>

<<print '' + $wardrobe.head[_i].name_cap + ''>>
	<<if $wardrobe.head[_i].colour isnot 0>>
	<<print '($wardrobe.head[_i].colour)'>>
	<<wardrobeintegrity _wardrobe_list>>
	<</if>>

<</for>>

<<set _wardrobe_list to "face">>

__Face__ $wardrobe.face.length / $wardrobe.space

<<if $worn.face.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.face.length; _i++>>

<<print '' + $wardrobe.face[_i].name_cap + ''>>
	<<if $wardrobe.face[_i].colour isnot 0>>
	<<print '($wardrobe.face[_i].colour)'>>
	<</if>>
	<<wardrobeintegrity _wardrobe_list>>

<</for>>

<<set _wardrobe_list to "neck">>

__Neck__ $wardrobe.neck.length / $wardrobe.space

<<if $worn.neck.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.neck.length; _i++>>

<<print '' + $wardrobe.neck[_i].name_cap + ''>>
	<<if $wardrobe.neck[_i].colour isnot 0>>
	<<print '($wardrobe.neck[_i].colour)'>>
	<</if>>
	<<wardrobeintegrity _wardrobe_list>>

<</for>>

<<set _wardrobe_list to "legs">>

__Legs__ $wardrobe.legs.length / $wardrobe.space

<<if $worn.legs.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.legs.length; _i++>>

<<print '' + $wardrobe.legs[_i].name_cap + ''>>
	<<if $wardrobe.legs[_i].colour isnot 0>>
	<<print '($wardrobe.legs[_i].colour)'>>
	<</if>>
	<<wardrobeintegrity _wardrobe_list>>

<</for>>

<<set _wardrobe_list to "feet">>

__Feet__ $wardrobe.feet.length / $wardrobe.space

<<if $worn.feet.name isnot "naked">>

Strip

<</if>>
<<for _i to 0; _i lt $wardrobe.feet.length; _i++>>

<<print '' + $wardrobe.feet[_i].name_cap + ''>>
	<<if $wardrobe.feet[_i].colour isnot 0>>
	<<print '($wardrobe.feet[_i].colour)'>>
	<</if>>
	<<wardrobeintegrity _wardrobe_list>>

<</for>>

Add new set:

Name: <<textbox "$outfit_name" Custom>>

Type: Everyday <<radiobutton "$outfit_type" 0 checked>> | Sleep<<radiobutton "$outfit_type" "sleep">> | Swimming<<radiobutton "$outfit_type" "swim">>

	Save Clothes Colours in Set
	<<print '<<checkbox "$saveColor" false true '+($saveColor is true ? "checked" : "")+'>>'>>

<<link [[Add current clothes as new set|$passage]]>>
	<<set $outfit.push(
		{index: $outfit.length,
		name: $outfit_name,
		upper: clone($worn.upper.name),
		lower: clone($worn.lower.name),
		under_upper: clone($worn.under_upper.name),
		under_lower: clone($worn.under_lower.name),
		head: clone($worn.head.name),
		face: clone($worn.face.name),
		neck: clone($worn.neck.name),
		legs: clone($worn.legs.name),
		feet: clone($worn.feet.name),
		type: ["normal"]
		},
	)>>

	<<if $outfit_name is "" or $outfit_name is "Custom">><<print '<<set $outfit_name to "Custom ' + $outfit.length + '">>'>><</if>>
	<<set $outfit.last().name to $outfit_name>>
	<<if $outfit_type>>
		<<set $outfit.last().type.push($outfit_type)>>
	<</if>>

	<<if $saveColor is true>>
		<<set _colors to {
			upper: [clone($worn.upper.colour),clone($worn.upper.accessory_colour)],
			lower: [clone($worn.lower.colour),clone($worn.lower.accessory_colour)],
			under_upper: [clone($worn.under_upper.colour),clone($worn.under_upper.accessory_colour)],
			under_lower: [clone($worn.under_lower.colour),clone($worn.under_lower.accessory_colour)],
			head: [clone($worn.head.colour),clone($worn.head.accessory_colour)],
			face: [clone($worn.face.colour),clone($worn.face.accessory_colour)],
			neck: [clone($worn.neck.colour),clone($worn.neck.accessory_colour)],
			legs: [clone($worn.legs.colour),clone($worn.legs.accessory_colour)],
			feet: [clone($worn.feet.colour),clone($worn.feet.accessory_colour)]
		}>>
		<<set $outfit.last().colors to clone(_colors)>>
	<<else>>
		<<set $outfit.last().colors to false>>
	<</if>>
<</link>>

<<set $upperoff to 0>>
<<set $loweroff to 0>>
<<set $underloweroff to 0>>
<<set $underupperoff to 0>>
<<exposure>>

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

<<widget "wardrobeintegrity">><<nobr>>
<<set _war_int to $args[0]>>
<<if $wardrobe[_war_int][_i].integrity gt (($wardrobe[_war_int][_i].integrity_max / 10) * 9)>>
<<elseif $wardrobe[_war_int][_i].integrity gt (($wardrobe[_war_int][_i].integrity_max / 10) * 5)>>
(frayed)
<<elseif $wardrobe[_war_int][_i].integrity gt (($wardrobe[_war_int][_i].integrity_max / 10) * 2)>>
(torn)
<<else>>
(tattered)
<</if>>
<</nobr>><</widget>>

<<widget "wardrobesanity">><<nobr>>
/*Fixes invisible outfit bottoms caused by bugs in previous versions*/

<<for _i to 0; _i lt $wardrobe.lower.length; _i++>>
	<<if $wardrobe.lower[_i].one_piece is 1>><<set _lower_sane to 0>>
		<<for _e to 0; _e lt $wardrobe.upper.length; _e++>>
			<<if $wardrobe.upper[_e].one_piece is 1 and $wardrobe.upper[_e].set is $wardrobe.lower[_i].set and $wardrobe.upper[_e].colour is $wardrobe.lower[_i].colour>>
			<<set _lower_sane to 1>>
			<</if>>
		<</for>>
		<<if _lower_sane isnot 1>>
		<<set $wardrobe.lower[_i].one_piece to "broken">>
		<</if>>
	<</if>>
<</for>>

<<for _i to 0; _i lt $wardrobe.under_lower.length; _i++>>
	<<if $wardrobe.under_lower[_i].one_piece is 1>><<set _under_lower_sane to 0>>
		<<for _e to 0; _e lt $wardrobe.under_upper.length; _e++>>
			<<if $wardrobe.under_upper[_e].one_piece is 1 and $wardrobe.under_upper[_e].set is $wardrobe.under_lower[_i].set and $wardrobe.under_upper[_e].colour is $wardrobe.under_lower[_i].colour>>
			<<set _under_lower_sane to 1>>
			<</if>>
		<</for>>
		<<if _under_lower_sane isnot 1>>
		<<set $wardrobe.under_lower[_i].one_piece to "broken">>
		<</if>>
	<</if>>
<</for>>

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

:: Wardrobe [nobr]
<<effects>>
<<set $wardrobe_location to "wardrobe">>
You look in your wardrobe.

<<wardrobewear>>
<<link [[Close wardrobe|Bedroom]]>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

<<wardrobe>>

:: Changing Room [nobr]
<<effects>><<set $outside to 0>><<set $location to "beach">>
<<set $wardrobe_location to "wardrobe">>
You are in a small wooden changing room.

<<wardrobewear>>
<<if $exposed lte 1>>
<<link[[Leave|Beach]]>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

<<else>>
You can't go out like this!

<</if>>
<<wardrobe>>

:: Eden Wardrobe [nobr]
<<effects>>
You look through the cupboard containing your clothes. There's an old dressing screen for privacy.

<<set $wardrobe_location to "wardrobe">>
<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Done|Eden Cabin]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't remain undressed like this!

	<</if>>
<<else>>
	<<if $exposed lte 1>>
	<<link [[Done|Eden Cabin]]>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't remain undressed like this!

	<</if>>
<</if>>
<<wardrobe>>

:: Asylum Wardrobe [nobr]
<<effects>>
You look through the cupboard containing your clothes.

<<set $wardrobe_location to "wardrobe">>
<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Done|Asylum Cell]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't remain undressed like this!

	<</if>>
<<elseif $exhibitionism gte 75>>
<<link [[Done|Asylum Cell]]>><</link>>

<<else>>
	<<if $exposed lte 1>>
	<<link [[Done|Asylum Cell]]>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't remain undressed like this!

	<</if>>
<</if>>
<<wardrobe>>

:: Strip Club Dressing Room [nobr]
<<effects>><<set $outside to 0>><<set $location to "town">>
<<set $wardrobe_location to "wardrobe">>
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>>

<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Back to the club (0:01)|Strip Club]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't go out like this!

	<</if>>
<<elseif $exhibitionism gte 95>>
<<link [[Back to the club (0:01)|Strip Club]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

<<else>>
	<<if $exposed lte 1>>
	<<link [[Back to the club (0:01)|Strip Club]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't go out like this!

	<</if>>
<</if>>
<<wardrobe>>

:: Brothel Dressing Room [nobr]
<<effects>><<set $outside to 0>><<set $location to "town">>
<<set $wardrobe_location to "wardrobe">>
You are in the brothel's dressing room. There are a few mirrors, currently occupied by staff fixing their hair and makeup.

<<wardrobewear>>
<<if $exhibitionism lte 54>>
	<<if $exposed lte 0>>
	<<link [[Back to the brothel (0:01)|Brothel]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't go out like this!

	<</if>>
<<elseif $exhibitionism gte 95>>
<<link [[Back to the brothel (0:01)|Brothel]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

<<else>>
	<<if $exposed lte 1>>
	<<link [[Back to the brothel (0:01)|Brothel]]>><<pass 1>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

	<<else>>
	You can't go out like this!

	<</if>>
<</if>>
<<wardrobe>>

:: School Boy Wardrobe [nobr]
<<effects>><<set $outside to 0>><<set $location to "pool">>
<<set $wardrobe_location to "wardrobe">>
You stand in front of your open locker.

<<wardrobewear>>
<<if $exposed gte 2 and $exhibitionism lt 75>>
You can't go out like this!

<<else>>
<<link [[Leave|School Boy Changing Room]]>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

<</if>>

<<wardrobe>>

:: School Girl Wardrobe [nobr]
<<effects>><<set $outside to 0>><<set $location to "pool">>
<<set $wardrobe_location to "wardrobe">>
You stand in front of your open locker.

<<wardrobewear>>
<<if $exposed gte 2 and $exhibitionism lt 75>>
You can't go out like this!

<<else>>
<<link [[Leave|School Girl Changing Room]]>><<unset $saveColor>><<unset $wardrobeRepeat>><</link>>

<</if>>

<<wardrobe>>