Function a($)
	Dim $z,$t,$!,$d,$v,$w,$x
	For Each $ in $
		For $t=-9 to 1
			$=Join(Split($,"  "))
		Next
		$x=$x+#Knight:\+$+#
		For Each $v in Split($)
			$a=0
			$z=1
			For $w=1 to 72
				$z=$z+(SubStr($,$w,1)=SubStr(theholygrail,$z,1))
				$a=$a | SubStr($v,$w)>'@'
			Next
			$t=$t+$a	
		Next
		For $v=1 to $t/3
			$ = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered")
			If $v=1&$z>12
				$="(A childish hand gesture)"
			Else
				$d=$d+1
				If $d mod 3=2
					$z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+IIf($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24]
					$!=$!+1
					$v=$v+1
				Else
					$z=Your\+$[$!/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a
 				EndIf
				$=$z+\+LCase($[$! mod 11+13])
				$!=$!+1
			EndIf
			$x=$x+Taunter:\+$+".#"
			$a=Split(Right(Join(Split($x,\)),~),#)
EndFunction