Code:

Your solution passed all tests

KiXtart
KiXtart Version  = 4.60
KiXGolf Script   = kixgolf_tg.KIX

Computer
OS               = Windows Vista Business Edition
CPU              = Intel Pentium Model 15
Speed            = 2194 MHz
Memory           = 2038 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 19:22:29.170
Processing End   = 2007/12/18 19:22:29.436
Duration         = 0000/00/00 00:00:00.266
KiXGolf Score    = 871
 
Thank you for participating in KiXtart Golf!


 Code:
; begin Taunt Generator
;
;!
Function a($b)
	Dim $z,$c,$t,$,$d,$v,$w
	For Each $c in $b
		For $t=-30 To 1
			$c=Join(Split($c,"  "))
		Next
		$a=$a+"#Knight: "+$c+#
		For Each $v in Split($c)
			$b=0
			$z=1
			For $w=1 To 72
				$z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1))
				$b=$b | Substr($v,$w)>'@'
			Next
			$t=$t+$b		
		Next
		$b = 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")
		For $v=1 to $t/3
			If $v=1&$z>12
				$z="(A childish hand gesture).#"
			Else
				$d=$d+1
				If $d mod 3=2
					$z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24]
					$=$+1
					$v=$v+1
				Else
					$z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a"
 				EndIf
				$z=$z+" "+LCase($b[$ mod 11+13])+".#"
				$=$+1
			EndIf
			$a=$a+"Taunter: "+$z
		Next
	Next
	$a=Split(Right($a,~),#)
EndFunction
;!
;!
; end Taunt Generator
_________________________
The Code is out there