code:
:: Widgets Swarm [widget]
<<widget "swarm">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm1 is "steadied">>
<<set $swarm1 to "contained">>
<<elseif $swarm1 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm1 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm1 is "pending">>
	<<set $swarm1 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm1 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm1 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm1 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 2>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 2>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm1 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm1 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm1 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 2>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm1 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm1 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm1 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 2>>
							<<else>>
							<<set $swarm1 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 2>><<if $lowertype is "naked">><<set $underintegrity -= 2>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm1 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm1 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm1 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 2>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm1 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm1 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm1 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 2>>
							<<else>>
							<<set $swarm1 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 2>><<if $lowertype is "naked">><<set $underintegrity -= 2>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm1 is "back">>
<<set $swarm1 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm1 is "front">>
<<set $swarm1 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

<<swarm2>>
<<swarm3>>
<<swarm4>>
<<swarm5>>
<<swarm6>>
<<swarm7>>
<<swarm8>>
<<swarm9>>
<<swarm10>>

<<if $swarmpending gte 1>>
There are <<print $swarmcount - $swarmactive>> $swarmname and $swarmpending of them <<if $swarmpending gte 2>>are<<else>>is<</if>> $swarmmove.
<</if>>

<<if $swarmactivate gte 1>><<set $swarmactivate to 0>>
The $swarmname $swarmspill, surrounding you with more $swarmcreature.
<</if>>

<<if $swarmactive lte 0>>
<<elseif $swarmactive lte 1>>
The $swarmcreature are squirming over you.
<<elseif $swarmactive lte 2>>
The $swarmcreature are swarming over you.
<<elseif $swarmactive lte 3>>
The $swarmcreature teem around you.
<<elseif $swarmactive lte 4>>
You're practically swimming in $swarmcreature.
<<elseif $swarmactive lte 9>>
The $swarmcreature completely surround you.
<<elseif $swarmactive gte 10>>
The $swarmcreature completely surround you, as if you are in a living pit.<<if $orgasmdown gte 1>> Not an inch of skin is spared the torment.<</if>>
<</if>>

<<set $rng to random(1, 100)>>
<<if $rng gte 91 and $leftarm is 0 and $rightarm is 0>>
	<<if $rng gte 96>><<set $leftarm to "swarmgrappled">>
	The $swarmcreature swarm over your left arm, restraining it.
	<<else>><<set $rightarm to "swarmgrappled">>
	The $swarmcreature swarm over your right arm, restraining it.
	<</if>>
<</if>>

<<if $swarmchestcover gte 1>><<set $swarmchestcover to 0>>
You manage to keep them away from your chest.
<</if>>

<<if $swarmchestmolest gte 1>><<set $swarmchestmolest to 0>>
They writhe over your <<print either("chest", "stomach", "back", "neck", "arms")>>.
<</if>>

<<if $swarmchestclothed gte 1>><<set $swarmchestclothed to 0>>
Some of them assault and damage your $upperclothes, trying to get to the skin beneath.
<</if>>

<<if $swarmchestgrabintro gte 1>><<set $swarmchestgrabintro to 0>>
A number of them take a liking to your <<breastsstop>>
<</if>>

<<if $swarmchestgrabclothed gte 1>><<set $swarmchestgrabclothed to 0>>
Some of them wriggle their way into your $upperclothes, where they take a liking to your <<breastsstop>>
<</if>>

<<if $swarmchestgrab gte 1>>
They twist and tease your nipples, keeping them firm.<<neutral 5>><<set $arousal += $swarmchestgrab * 20>>
<</if>>

<<if $swarmbackcover gte 1>><<set $swarmbackcover to 0>>
You manage to keep them away from your butt.
<</if>>

<<if $swarmbackmolest gte 1>><<set $swarmbackmolest to 0>>
They writhe over your <<print either("butt", "thighs", "legs")>>.
<</if>>

<<if $swarmbacklowerclothed gte 1>><<set $swarmbacklowerclothed to 0>>
Some of them burrow into your $lowerclothes, damaging the fabric.
<</if>>

<<if $swarmbackunderclothed gte 1>><<set $swarmbackunderclothed to 0>>
Some of them assail your $underclothes, tearing the fabric.
<</if>>

<<if $swarmbackgrablowerclothed gte 1>><<set $swarmbackgrablowerclothed to 0>>
Some of them wriggle their way into your $lowerclothes, you feel them moving toward your anus.
<</if>>

<<if $swarmbackgrabunderclothed gte 1>><<set $swarmbackgrabunderclothed to 0>>
Some of them wriggle their way into your $underclothes, you feel them moving toward your anus.
<</if>>

<<if $swarmbackgrablowerchastity gte 1>><<set $swarmbackgrablowerchastity to 0>>
Some of them wriggle their way into your $underclothes, you feel them moving toward your <<genitalsstop>> With your chastity belt in the way, you won't be able to get them out!
<<if $parasitedisable is "f">>
	<<set $analchastityparasite to $swarmcreature>><<set $parasitestat += 1>>
	<</if>>
<</if>>

<<if $swarmbackgrab gte 1>><<set $swarmbackgrab to 0>>
They swarm around your butt, you feel them move toward your anus.
<</if>>

<<if $swarmbackinsideintro gte 1>><<set $swarmbackinsideintro to 0>>
They start squirming their way into your <<bottomstop>>
<</if>>

<<if $swarmbackinside gte 1>><<neutral 10>>
They writhe inside your lower intestine<<if $penisexist is 1>>, blindly teasing your prostate.<<else>>.<</if>><<set $arousal += $swarmbackinside * 20>>
<</if>>

<<if $swarmfrontcover gte 1>><<set $swarmfrontcover to 0>>
You manage to keep them away from your <<genitalsstop>>
<</if>>

<<if $swarmfrontmolest gte 1>><<set $swarmfrontmolest to 0>>
You feel them writhing over your <<if $lowertype isnot "naked" and $skirt isnot 1>><<genitals>> through your $lowerclothes.<<elseif $undertype isnot "naked">><<genitals>> through your $underclothes.<<else>>unprotected <<genitalsstop>><</if>>
<</if>>

<<if $swarmfrontlowerclothed gte 1>><<set $swarmfrontlowerclothed to 0>>
Some of them start tearing into your $lowerclothes.
<</if>>

<<if $swarmfrontunderclothed gte 1>><<set $swarmfrontunderclothed to 0>>
Some of them try to breach your $underclothes, trying to get to the skin beneath.
<</if>>

<<if $swarmfrontgrablowerclothed gte 1>><<set $swarmfrontgrablowerclothed to 0>>
Some of them wriggle their way into your $lowerclothes, you feel them moving toward your <<genitalsstop>>
<</if>>

<<if $swarmfrontgrabunderclothed gte 1>><<set $swarmfrontgrabunderclothed to 0>>
Some of them wriggle their way into your $underclothes, you feel them moving toward your <<genitalsstop>>
<</if>>

<<if $swarmfrontgrablowerchastity gte 1>><<set $swarmfrontgrablowerchastity to 0>>
Some of them wriggle their way into your $underclothes, you feel them moving toward your <<genitalsstop>> With your chastity belt in the way, you won't be able to get them out!
	<<if $parasitedisable is "f">>
		<<if $vaginaexist is 1>><<set $vaginalchastityparasite to $swarmcreature>><<set $parasitestat += 1>>
		<<elseif $penisexist is 1>><<set $penilechastityparasite to $swarmcreature>><<set $parasitestat += 1>>
		<</if>>
	<</if>>
<</if>>

<<if $swarmfrontgrab gte 1>><<set $swarmfrontgrab to 0>>
They swarm around your groin, you feel them move toward your <<genitalsstop>>
<</if>>

<<if $swarmfrontinsideintro gte 1>><<set $swarmfrontinsideintro to 0>>
	<<if $vaginaexist is 1>>
They start squirming their way into your pussy!
	<<elseif $penisexist is 1>>
They start enveloping your penis!
	<</if>>
<</if>>

<<if $swarmfrontinside gte 1>>
	<<if $vaginaexist is 1>>
They writhe and squirm inside your vagina, probing and teasing without mercy.<<neutral 10>><<set $arousal += $swarmfrontinside * 20>>
	<<elseif $penisexist is 1>>
They writhe and squirm over your penis, rubbing and teasing the entire length.<<neutral 10>><<set $arousal += $swarmfrontinside * 20>>
	<</if>>
<</if>>

<<if $enemytype isnot "tentacles">>
	<<if $panicattacks gte 1 and $panicviolence is 0 and $panicparalysis is 0 and $controlled is 0>>
		<<set $rng to random(1, 100)>>
		<<if $rng is 100>>
		<<set $panicparalysis to 10>>
		<</if>>
	<</if>>

	<<if $panicattacks gte 2 and $panicviolence is 0 and $panicparalysis is 0 and $controlled is 0>>
		<<set $rng to random(1, 100)>>
		<<if $rng is 100>>
		<<set $panicviolence to 3>>
		<</if>>
	<</if>>

	<<if $arousal gte 10000>>

	<<orgasmpassage>>

	<</if>>

	<<set $seconds += 10>>
	<<if $seconds gte 60>>
	<<set $seconds to 0>>
	<<pass 1>>
	<</if>>
<</if>>

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

:: Widgets Swarm2 [widget]
<<widget "swarm2">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm2 is "steadied">>
<<set $swarm2 to "contained">>
<<elseif $swarm2 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm2 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm2 is "pending">>
	<<set $swarm2 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm2 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm2 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm2 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm2 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm2 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm2 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm2 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm2 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm2 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm2 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm2 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm2 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm2 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm2 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm2 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm2 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm2 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm2 is "back">>
<<set $swarm2 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm2 is "front">>
<<set $swarm2 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm3 [widget]
<<widget "swarm3">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm3 is "steadied">>
<<set $swarm3 to "contained">>
<<elseif $swarm3 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm3 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm3 is "pending">>
	<<set $swarm3 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm3 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm3 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm3 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm3 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm3 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm3 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm3 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm3 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm3 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm3 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm3 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm3 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm3 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm3 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm3 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm3 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm3 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm3 is "back">>
<<set $swarm3 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm3 is "front">>
<<set $swarm3 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm4 [widget]
<<widget "swarm4">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm4 is "steadied">>
<<set $swarm4 to "contained">>
<<elseif $swarm4 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm4 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm4 is "pending">>
	<<set $swarm4 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm4 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm4 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm4 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm4 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm4 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm4 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm4 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm4 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm4 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm4 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm4 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm4 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm4 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm4 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm4 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm4 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm4 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm4 is "back">>
<<set $swarm4 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm4 is "front">>
<<set $swarm4 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm5 [widget]
<<widget "swarm5">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm5 is "steadied">>
<<set $swarm5 to "contained">>
<<elseif $swarm5 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm5 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm5 is "pending">>
	<<set $swarm5 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm5 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm5 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm5 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm5 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm5 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm5 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm5 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm5 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm5 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm5 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm5 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm5 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm5 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm5 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm5 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm5 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm5 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm5 is "back">>
<<set $swarm5 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm5 is "front">>
<<set $swarm5 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm6 [widget]
<<widget "swarm6">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm6 is "steadied">>
<<set $swarm6 to "contained">>
<<elseif $swarm6 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm6 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm6 is "pending">>
	<<set $swarm6 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm6 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm6 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm6 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm6 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm6 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm6 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm6 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm6 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm6 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm6 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm6 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm6 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm6 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm6 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm6 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm6 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm6 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm6 is "back">>
<<set $swarm6 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm6 is "front">>
<<set $swarm6 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm7 [widget]
<<widget "swarm7">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm7 is "steadied">>
<<set $swarm7 to "contained">>
<<elseif $swarm7 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm7 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm7 is "pending">>
	<<set $swarm7 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm7 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm7 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm7 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm7 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm7 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm7 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm7 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm7 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm7 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm7 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm7 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm7 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm7 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm7 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm7 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm7 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm7 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm7 is "back">>
<<set $swarm7 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm7 is "front">>
<<set $swarm7 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm8 [widget]
<<widget "swarm8">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm8 is "steadied">>
<<set $swarm8 to "contained">>
<<elseif $swarm8 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm8 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm8 is "pending">>
	<<set $swarm8 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm8 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm8 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm8 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm8 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm8 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm8 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm8 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm8 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm8 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm8 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm8 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm8 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm8 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm8 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm8 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm8 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm8 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm8 is "back">>
<<set $swarm8 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm8 is "front">>
<<set $swarm8 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm9 [widget]
<<widget "swarm9">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm9 is "steadied">>
<<set $swarm9 to "contained">>
<<elseif $swarm9 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm9 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm9 is "pending">>
	<<set $swarm9 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm9 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm9 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm9 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm9 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm9 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm9 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm9 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm9 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm9 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm9 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm9 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm9 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm9 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm9 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm9 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm9 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm9 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm9 is "back">>
<<set $swarm9 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm9 is "front">>
<<set $swarm9 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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

:: Widgets Swarm10 [widget]
<<widget "swarm10">><<nobr>>

<<set $rng to random(1, 100)>>

<<if $swarm10 is "steadied">>
<<set $swarm10 to "contained">>
<<elseif $swarm10 is "contained">>
	<<if $rng gte 51>>
	<<set $swarm10 to "pending">><<set $swarmpending += 1>>
	<</if>>
<<elseif $swarm10 is "pending">>
	<<set $swarm10 to "active">><<set $swarmpending -= 1>><<set $swarmactive += 1>><<set $swarmactivate += 1>>
<<elseif $swarm10 is "active">>
	<<if $rng lte $swarmactive * 20>>
	<<set $rng to random(1, 100)>>
		<<if $rng gte 70>>
			<<if $chest is "covered">>
			<<set $arousal += 10>><<set $swarmchestcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $uppertype is "naked">>
					<<set $swarm10 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabintro += 1>>
					<<else>>
					<<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
						<<set $swarm10 to "chest">><<neutral 3>><<set $swarmchestgrab += 1>><<set $swarmchestgrabclothed += 1>>
						<<else>>
						<<neutral 1>><<set $swarmchestclothed += 1>><<set $upperintegrity -= 10>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmchestmolest += 1>><<neutral 1>><<set $upperintegrity -= 5>>
				<</if>>
			<</if>>
		<<elseif $rng gte 40 and $analdisable is "f">>
			<<if $back is "covered">>
			<<set $arousal += 10>><<set $swarmbackcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmbackgrablowerclothed += 1>><<set $swarm10 to "back">><<set $swarmback += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm10 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmbackgrabunderclothed += 1>><<set $swarm10 to "back">><<set $swarmback += 1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmbacklowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm10 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<<elseif $undertype is "chastity" and $analshield is 1>>
							<<set $swarm10 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrablowerchastity += 1>>
							<<else>>
<<set $swarmbackgrabunderclothed += 1>><<set $swarm10 to "back">><<set $swarmback += 1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmbackunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm10 to "back">><<set $swarmback += 1>><<neutral 4>><<set $swarmbackgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmbackmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $front is "covered">>
			<<set $arousal += 10>><<set $swarmfrontcover += 1>>
			<<else>>
			<<set $rng to random(1, 100)>>
				<<if $rng lte $swarmactive * 20>>
					<<if $lowertype isnot "naked" and $skirt is 0>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<neutral 4>><<set $swarmfrontgrablowerclothed += 1>><<set $swarm10 to "front">><<set $swarmfront +=1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm10 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
							<<neutral 4>><<set $swarmfrontgrabunderclothed += 1>><<set $swarm10 to "front">><<set $swarmfront +=1>>
							<</if>>
						<<else>>
						<<neutral 1>><<set $swarmfrontlowerclothed += 1>><<set $lowerintegrity -= 10>>
						<</if>>
					<<else>><<set $rng to random(1, 100)>>
						<<if $rng gte 81>>
							<<if $undertype is "naked">>
							<<set $swarm10 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<<elseif $undertype is "chastity">>
							<<set $swarm10 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrablowerchastity += 1>>
							<<else>>
<<set $swarmfrontgrabunderclothed += 1>><<set $swarm10 to "front">><<set $swarmfront +=1>><<neutral 4>>
							<</if>>
						<<else>>
							<<if $undertype isnot "naked">>
							<<neutral 1>><<set $swarmfrontunderclothed += 1>><<set $underintegrity -= 10>>
							<<else>>
							<<set $swarm10 to "front">><<set $swarmfront +=1>><<neutral 4>><<set $swarmfrontgrab += 1>>
							<</if>>
						<</if>>
					<</if>>
				<<else>>
				<<set $swarmfrontmolest += 1>><<neutral 1>><<set $lowerintegrity -= 5>><<if $lowertype is "naked">><<set $underintegrity -= 5>><</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
	<<set $arousal += 10>>
	<</if>>
<<elseif $swarm10 is "back">>
<<set $swarm10 to "backinside">><<set $swarmbackinside += 1>><<set $swarmbackinsideintro += 1>><<set $swarmback -= 1>>
<<elseif $swarm10 is "front">>
<<set $swarm10 to "frontinside">><<set $swarmfrontinside += 1>><<set $swarmfrontinsideintro += 1>><<set $swarmfront -= 1>>
<<else>>
<</if>>

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


code:
:: Widgets Combat Tentacle [widget]
<<widget "tentacleact">><<nobr>>

<<if $alltentacles[$tentacleindex].health lte 0 and $alltentacles[$tentacleindex].shaft isnot "finished">>
Worn out, the $alltentacles[$tentacleindex].name tentacle retracts from you.
<<tentacledisable>>
<<set $alltentacles[$tentacleindex].shaft to "finished">>
<<set $alltentacles[$tentacleindex].head to "finished">>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "tummy">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your tummy,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "thighs">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> between your thighs,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "breasts">>

The $alltentacles[$tentacleindex].name tentacle squeezes your breasts together,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "chest">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your chest,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "waist">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your waist,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "neck">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your neck,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "shoulders">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your shoulders,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "leftleg">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your left leg,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "rightleg">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your right leg,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "leftarm">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your left arm,

<</if>>

<<if $alltentacles[$tentacleindex].shaft is "rightarm">>

The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your right arm,

<</if>>

<<if $alltentacles[$tentacleindex].head is "leftarm">>
The $alltentacles[$tentacleindex].name tentacle writhes in your left hand.<<neutral 5>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "rightarm">>
The $alltentacles[$tentacleindex].name tentacle writhes in your right hand.<<neutral 5>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "feet">>
The $alltentacles[$tentacleindex].name tentacle writhes between your feet.<<neutral 5>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "leftnipplesuck">>
and up to your <<breastscomma>> where it suckles your left nipple.<<neutral 3>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "rightnipplesuck">>
and up to your <<breastscomma>> where it suckles your right nipple.<<neutral 3>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "leftnipple">>

and continues teasing your left nipple. The tip of the tentacle opens up, latches on, then begins sucking.<<neutral 3>><<set $alltentacles[$tentacleindex].head to "leftnipplesuck">><<set $leftnipple to "tentaclesuck">>

<</if>>

<<if $alltentacles[$tentacleindex].head is "rightnipple">>

and continues teasing your right nipple. The tip of the tentacle opens up, latches on, then begins sucking.<<neutral 3>><<set $alltentacles[$tentacleindex].head to "rightnipplesuck">><<set $rightnipple to "tentaclesuck">>

<</if>>

<<if $alltentacles[$tentacleindex].head is "chest">>
	<<if $chestuse is "squeezed">>
	then up between your <<breastscomma>> rubbing itself between them.<<neutral 2>>
	<<else>>
	moves away from your <<breasts>><<set $alltentacles[$tentacleindex].head to 0>><<set $breastuse to 0>>
	<</if>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouthdeep">>
and up into your mouth where it spurts a sweet fluid down your throat at the apex of each thrust.<<set $purity -= 1>><<internalejac>><<sex 5>><<set $drugged += 3>><<set $mouthgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouth">>
and continues thrusting into your mouth. The tip opens and begins oozing a sweet liquid.<<set $purity -= 1>><<internalejac>><<set $mouthstate to "tentacledeep">><<set $alltentacles[$tentacleindex].head to "mouthdeep">><<sex 5>><<oralejacstat>><<ejacstat>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouthimminent">>
	<<if $oralvirginity is 1>>
	 and thrusts between your lips, penetrating your mouth for the first time.<<set $oralvirginity to 0>><<violence 5>>
	<<else>>
	 and thrusts between your lips.
	<</if>>
<<set $mouthstate to "tentacle">><<set $alltentacles[$tentacleindex].head to "mouth">><<sex 5>><<raped>><<oralstat>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouthentrance">>
 and presses against your lips.<<set $mouthstate to "tentacleimminent">><<set $alltentacles[$tentacleindex].head to "mouthimminent">><<neutral 4>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginadeep">>
and <<slithers>> into your <<pussy>> where it pumps a viscous fluid at the apex of each thrust.<<set $purity -= 1>><<internalejac>><<sex 5>><<set $drugged += 3>><<set $vaginagoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vagina">>
and continues thrusting into your <<pussystop>> The tip opens and begins oozing a viscous liquid.<<set $purity -= 1>><<internalejac>><<set $vaginastate to "tentacledeep">><<set $alltentacles[$tentacleindex].head to "vaginadeep">><<sex 5>><<vaginalejacstat>><<ejacstat>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginaimminent">>
	<<if $vaginalvirginity is 1>>
	 and thrusts into your <<pussycomma>> tearing your hymen and forever robbing you of your purity.<<set $vaginalvirginity to 0>><<violence 100>>
	<<else>>
	 and thrusts into your <<pussystop>>
	<</if>>
<<set $vaginastate to "tentacle">><<set $alltentacles[$tentacleindex].head to "vagina">><<sex 5>><<raped>><<vaginaraped>><<vaginalstat>><<violence 1>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginaentrance">>
	<<if $undertype isnot "chastity">>
	 and presses against your <<pussycomma>> about to penetrate.<<set $vaginastate to "tentacleimminent">><<set $alltentacles[$tentacleindex].head to "vaginaimminent">><<neutral 4>>
	<<else>>
	and tries to find a way inside. Failing, it lashes at the metal.<<set $underintegrity -= 10>><<violence 1>>
	<</if>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisdeep">>
and continues thrusting against your <<peniscomma>> caressing and kneading your length.<<sex 5>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penis">>
and continues thrusting against your <<penisstop>> It sucks and kneads your length, trying to milk you of your cum.<<set $penisstate to "tentacledeep">><<set $alltentacles[$tentacleindex].head to "penisdeep">><<sex 5>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisimminent">>
	<<if $penilevirginity is 1>>
	 and thrusts against your <<peniscomma>> swallowing you to the base and  tearing the membrane between your glans and foreskin, forever robbing you of your purity.<<set $penilevirginity to 0>><<violence 100>>
	<<else>>
	 and thrusts against your <<peniscomma>> swallowing you to the base.
	<</if>>
<<set $penisstate to "tentacle">><<set $alltentacles[$tentacleindex].head to "penis">><<sex 5>><<raped>><<penisraped>><<penilestat>><<violence 1>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisentrance">>
	<<if $undertype isnot "chastity">>
	 and <<slithers>> over to your <<penisstop>> The tip opens and presses against your glans, about to envelop you.<<set $penisstate to "tentacleimminent">><<set $alltentacles[$tentacleindex].head to "penisimminent">><<neutral 4>>
	<<else>>
	and tries to find a way inside. Failing, it lashes at the metal.<<set $underintegrity -= 10>><<violence 1>>
	<</if>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anusdeep">>
and <<slithers>> into your <<bottom>> where it pumps a viscous fluid at the apex of each thrust.<<set $purity -= 1>><<internalejac>><<sex 5>><<set $drugged += 3>><<set $anusgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anus">>
and continues thrusting into your <<bottomstop>> The tip opens and begins oozing a viscous liquid.<<set $purity -= 1>><<internalejac>><<set $anusstate to "tentacledeep">><<set $alltentacles[$tentacleindex].head to "anusdeep">><<sex 5>><<analejacstat>><<ejacstat>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anusimminent">>
	<<if $analvirginity is 1>>
	 and thrusts into your <<bottomcomma>> violating you in a way you hadn't conceived of.<<set $analvirginity to 0>><<violence 100>>
	<<else>>
	 and thrusts into your <<bottomstop>>
	<</if>>
<<set $anusstate to "tentacle">><<set $alltentacles[$tentacleindex].head to "anus">><<sex 5>><<raped>><<analstat>><<violence 1>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anusentrance">>
	<<if $analshield is 0>>
	 and presses against your <<bottomcomma>> about to penetrate.<<set $anusstate to "tentacleimminent">><<set $alltentacles[$tentacleindex].head to "anusimminent">><<neutral 4>>
	<<else>>
	and tries to find a way inside. Failing, it lashes at the device.<<set $underintegrity -= 10>><<violence 1>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>
<<if $alltentacles[$tentacleindex].head is "vaginarub">>
	<<if $rng gte 21>>
	and between your thighs where it <<slithers>> against your <<pussycomma>> pressing against your clit.<<sex 3>>
	<<else>>
	and between your thighs where it <<slithers>> toward your <<pussystop>><<neutral 3>><<set $vaginause to "tentacle">><<set $vaginastate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "vaginaentrance">><<set $thighuse to 0>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>
<<if $alltentacles[$tentacleindex].head is "penisrub">>
	<<if $rng gte 21>>
	and between your thighs where it <<slithers>> against your <<peniscomma>> coiling around it.<<sex 3>>
	<<else>>
	and between your thighs where the tip opens and it <<slithers>> toward your <<penisstop>><<neutral 3>><<set $penisuse to "tentacle">><<set $penisstate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "penisentrance">><<set $thighuse to 0>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>
<<if $alltentacles[$tentacleindex].head is "bottomrub">>
	<<if $rng gte 21>>
	and between your <<bottom>> cheeks where it <<slithers>> against your back.<<sex 3>>
	<<else>>
	and between your <<bottom>> cheeks,  toward your anus.<<neutral 3>><<set $anususe to "tentacle">><<set $anusstate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "anusentrance">><<set $bottomuse to 0>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>
<<if $alltentacles[$tentacleindex].head is 0 and $alltentacles[$tentacleindex].shaft isnot 0>>

	<<if $rng lte 10>>
		<<if $chestuse is "squeezed" and $breastuse is 0>>
		<<upperslither>>and up between your squeezed <<breastsstop>><<set $alltentacles[$tentacleindex].head to "chest">><<neutral 2>><<set $breastuse to "tentacle">><<cheststat>>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 20>>
		<<if $leftnipple is 0>>
		<<upperslither>> and teases your left nipple.<<neutral 2>><<set $alltentacles[$tentacleindex].head to "leftnipple">><<set $leftnipple to "tentacle">>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 30>>
		<<if $rightnipple is 0>>
		<<upperslither>> and teases your right nipple.<<neutral 2>><<set $alltentacles[$tentacleindex].head to "rightnipple">><<set $rightnipple to "tentacle">>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 40>>
		<<if $mouthuse is 0>>
		<<upperslither>> and up toward your mouth.<<neutral 2>><<set $mouthuse to "tentacle">><<set $mouthstate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "mouthentrance">>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 50>>
		<<if $anususe is 0 and $analdisable is "f">>
		<<underslither>> and <<slithers>> toward your <<bottomstop>><<neutral 2>><<set $anususe to "tentacle">><<set $anusstate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "anusentrance">>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 60>>
		<<if $vaginaexist is 1 and $vaginause is 0>>
		<<underslither>> and <<slithers>> toward your <<pussystop>><<neutral 2>><<set $vaginause to "tentacle">><<set $vaginastate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "vaginaentrance">>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 70>>
		<<if $penisexist is 1 and $penisuse is 0>>
		<<underslither>> and <<slithers>> toward your <<penisstop>><<neutral 2>><<set $penisuse to "tentacle">><<set $penisstate to "tentacleentrance">><<set $alltentacles[$tentacleindex].head to "penisentrance">>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 80>>
		<<if $thighuse is 0>>
			<<if $penisexist is 1 and $penisuse is 0>>
			<<underslither>> and <<slithers>> between your thighs and against your tummy and <<penisstop>><<set $penisuse to "tentaclerub">><<set $thighuse to "tentaclerub">><<set $alltentacles[$tentacleindex].head to "penisrub">><<sex 3>><<thighstat>>
			<<elseif $vaginaexist is 1 and $vaginause is 0>>
			<<underslither>> and <<slithers>> between your thighs and against your tummy and <<pussystop>><<set $vaginause to "tentaclerub">><<set $thighuse to "tentaclerub">><<set $alltentacles[$tentacleindex].head to "vaginarub">><<sex 3>><<thighstat>>
			<<else>>
			<<tentacledefault>>
			<</if>>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<elseif $rng lte 90>>
		<<if $bottomuse is 0 and $anususe is 0 and $analdisable is "f">>
		<<underslither>> and <<slithers>> between your <<bottom>> cheeks and against your back.<<set $bottomuse to "tentaclerub">><<set $anususe to "tentaclerub">><<set $alltentacles[$tentacleindex].head to "bottomrub">><<sex 1>><<bottomstat>>
		<<else>>
		<<tentacledefault>>
		<</if>>
	<<else>>
	<<tentacledefault>>
	<</if>>
<<elseif $alltentacles[$tentacleindex].head is 0 and $alltentacles[$tentacleindex].shaft is 0>>

	<<if $rng lte 10>>
		<<if $position isnot "wall">>
		The $alltentacles[$tentacleindex].name tentacle winds around your tummy.<<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "tummy">>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle gently slaps your <<bottomstop>><<violence 1>><<hitstat>>
		<</if>>
	<<elseif $rng lte 20>>
	The $alltentacles[$tentacleindex].name tentacle <<slithers>> between your thighs.<<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "thighs">>
	<<elseif $rng lte 30>>
		<<if $position isnot "wall">>
			<<if $breastsize gte 2 and $chestuse is 0>>
		The $alltentacles[$tentacleindex].name tentacle <<slithers>> around your <<breastscomma>> squeezing them together.<<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "breasts">><<set $chestuse to "squeezed">>
			<<else>>
			The $alltentacles[$tentacleindex].name tentacle gently slaps your <<bottomstop>><<violence 1>><<hitstat>>
			<</if>>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle gently slaps your <<bottomstop>><<violence 1>><<hitstat>>
		<</if>>
	<<elseif $rng lte 40>>
		<<if $position isnot "wall">>
		The $alltentacles[$tentacleindex].name tentacle winds its way around your chest, beneath your <<breastsstop>><<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "chest">>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle gently slaps your <<bottomstop>><<violence 1>><<hitstat>>
		<</if>>
	<<elseif $rng lte 50>>
	The $alltentacles[$tentacleindex].name tentacle winds its way around your waist.<<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "waist">>
	<<elseif $rng lte 60>>
		<<if $position isnot "wall">>
			<<if $head is 0>>
			The $alltentacles[$tentacleindex].name tentacle winds its way around your neck, restraining your head.<<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "neck">><<set $head to "grappled">>
			<<else>>
			The $alltentacles[$tentacleindex].name tentacle winds its way around your shoulders.<<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "shoulders">>
			<</if>>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle gently slaps your <<bottomstop>><<violence 1>><<hitstat>>
		<</if>>
	<<elseif $rng lte 70>>
	The $alltentacles[$tentacleindex].name tentacle gently slaps your <<bottomstop>><<violence 1>><<hitstat>>
	<<elseif $rng lte 80>>
		<<if $leftleg is 0>>
		The $alltentacles[$tentacleindex].name tentacle winds its way around your left leg, restraining it.<<neutral 1>><<feettentacledisable>><<set $alltentacles[$tentacleindex].shaft to "leftleg">><<set $leftleg to "grappled">>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle tickles your feet.<<neutral 1>>
		<</if>>
	<<elseif $rng lte 85>>
		<<if $rightleg is 0>>
		The $alltentacles[$tentacleindex].name tentacle winds its way around your right leg, restraining it.<<neutral 1>><<feettentacledisable>><<set $alltentacles[$tentacleindex].shaft to "rightleg">><<set $rightleg to "grappled">>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle tickles your feet.<<neutral 1>>
		<</if>>
	<<elseif $rng lte 90>>
		<<if $leftarm is 0>>
		The $alltentacles[$tentacleindex].name tentacle winds its way around your left arm, restraining it.<<neutral 1>><<leftarmtentacledisable>><<set $alltentacles[$tentacleindex].shaft to "leftarm">><<set $leftarm to "grappled">><<set $leftarmstate to 0>>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle tickles your armpit.<<neutral 1>>
		<</if>>
	<<elseif $rng lte 95>>
		<<if $rightarm is 0>>
		The $alltentacles[$tentacleindex].name tentacle winds its way around your right arm, restraining it.<<rightarmtentacledisable>><<neutral 1>><<set $alltentacles[$tentacleindex].shaft to "rightarm">><<set $rightarm to "grappled">><<set $rightarmstate to 0>>
		<<else>>
		The $alltentacles[$tentacleindex].name tentacle tickles your armpit.<<neutral 1>>
		<</if>>
	<<elseif $rng lte 100>>
	The $alltentacles[$tentacleindex].name tentacle <<slithers>> against your <<bottomstop>><<neutral 1>>
	<</if>>

<</if>>

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

<<widget "tentacledefault">><<nobr>>

		<<set $rng to random(1, 100)>>
		<<if $rng gte 90>>
		then squirts a warm fluid over your neck.<<neutral 1>><<set $neckgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<neckejacstat>><<ejacstat>>
		<<elseif $rng gte 80>>
		then squirts a warm fluid over your right arm.<<neutral 1>><<set $rightarmgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<handejacstat>><<ejacstat>>
		<<elseif $rng gte 70>>
		then squirts a warm fluid over your left arm.<<neutral 1>><<set $leftarmgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<handejacstat>><<ejacstat>>
		<<elseif $rng gte 60>>
		then squirts a warm fluid over your thighs.<<neutral 1>><<set $thighgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<thighejacstat>><<ejacstat>>
		<<elseif $rng gte 50>>
		then squirts a warm fluid over your <<bottomstop>><<neutral 1>><<set $bottomgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<bottomejacstat>><<ejacstat>>
		<<elseif $rng gte 40>>
		then squirts a warm fluid over your tummy.<<neutral 1>><<set $tummygoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<tummyejacstat>><<ejacstat>>
		<<elseif $rng gte 30>>
		then squirts a warm fluid over your chest.<<neutral 1>><<set $chestgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<chestejacstat>><<ejacstat>>
		<<elseif $rng gte 20>>
		then squirts a warm fluid over your face.<<neutral 1>><<set $facegoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<faceejacstat>><<ejacstat>>
		<<elseif $rng gte 10>>
		then squirts a warm fluid over your hair.<<neutral 1>><<set $hairgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<hairejacstat>><<ejacstat>>
		<<else>>
		then squirts a warm fluid over your feet.<<neutral 1>><<set $feetgoo += 1>><<set $alltentacles[$tentacleindex].health -= 1>><<feetejacstat>><<ejacstat>>
		<</if>>

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

<<widget "tentacledisable">><<nobr>>

<<if $alltentacles[$tentacleindex].head is "feet">>
<<set $leftleg to 0>>
<<set $rightleg to 0>>
<<set $feetstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "leftarm">>
<<set $leftarm to 0>>
<<set $leftarmstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "rightarm">>
<<set $rightarm to 0>>
<<set $rightarmstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "leftnipplesuck">>
<<set $leftnipple to 0>>
<</if>>
<<if $alltentacles[$tentacleindex].head is "rightnipplesuck">>
<<set $rightnipple to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "leftnipple">>
<<set $leftnipple to 0>>
<</if>>
<<if $alltentacles[$tentacleindex].head is "rightnipple">>
<<set $rightnipple to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "chest">>
<<set $chestuse to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouthentrance">>
<<set $mouthuse to 0>>
<<set $mouthstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouthimminent">>
<<set $mouthuse to 0>>
<<set $mouthstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouth">>
<<set $mouthuse to 0>>
<<set $mouthstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "mouthdeep">>
<<set $mouthuse to 0>>
<<set $mouthstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anusentrance">>
<<set $anususe to 0>>
<<set $anusstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anusimminent">>
<<set $anususe to 0>>
<<set $anusstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anus">>
<<set $anususe to 0>>
<<set $anusstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "anusdeep">>
<<set $anususe to 0>>
<<set $anusstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginaentrance">>
<<set $vaginause to 0>>
<<set $vaginastate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginaimminent">>
<<set $vaginause to 0>>
<<set $vaginastate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vagina">>
<<set $vaginause to 0>>
<<set $vaginastate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginadeep">>
<<set $vaginause to 0>>
<<set $vaginastate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisentrance">>
<<set $penisuse to 0>>
<<set $penisstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisimminent">>
<<set $penisuse to 0>>
<<set $penisstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penis">>
<<set $penisuse to 0>>
<<set $penisstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisdeep">>
<<set $penisuse to 0>>
<<set $penisstate to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "vaginarub">>
<<set $vaginause to 0>>
<<set $thighuse to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "penisrub">>
<<set $penisuse to 0>>
<<set $thighuse to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "bottomrub">>
<<set $anususe to 0>>
<<set $bottomuse to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "breasts">>
<<set $chestuse to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "neck" and $head isnot "bound">>
<<set $head to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "leftleg" and $leftleg isnot "bound">>
<<set $leftleg to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "rightleg" and $rightleg isnot "bound">>
<<set $rightleg to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "leftarm" and $leftarm isnot "bound">>
<<set $leftarm to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].shaft is "rightarm" and $rightarm isnot "bound">>
<<set $rightarm to 0>>
<</if>>

<<if $alltentacles[$tentacleindex].head is "chest">>
<<set $breastuse to 0>>
<</if>>

<<set $alltentacles[$tentacleindex].shaft to 0>>
<<set $alltentacles[$tentacleindex].head to 0>>

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