KVS /toilet

if ($0- == "help fonts") {
	echo Available Fonts:\n
	exec ("ls -A /usr/share/figlet/*.tlf") {
		echo "     $str.replace($str.replace($1,"","/usr/share/figlet/"),"",.tlf)"
	}
} elseif ($0- == "help filters") {
	exec ("toilet -F list") {
		echo "$1"
	}
} elseif (!$0) {
	echo $tr("Usage:")
	echo "     \$toilet([\"Font\"],[\"Filters\"],\"Text\")"
} else {
	%Temp0 = $0
	%Temp1 = $1
	%Temp2 = $2-
	%Text = $0-
	
	exec -t ("ls -A /usr/share/figlet/ | grep ^'%Temp0'.tlf\$"){
		if ($0 == "stdout" && $1) {
			%Font = "-f %Temp0"
			%Text = %Temp1 %Temp2
		}
		if ($0 == "terminated") {
			if (!%Font) {
				%Tester = %Temp0
				%Tester2 = %Temp1 %Temp2
			} else {
				%Tester = %Temp1
				%Tester2 = %Temp2
			}
			exec -t ("toilet -F list | grep \\\"'%Tester'"\\\"){
				if ($1 && $0 =="stdout") {
					%Filter = -F %Tester
					%Text = %Tester2
				}
				if ($0 == "terminated") {
					if (!%Text) {
						echo "Error! Text not supplied!"
					} else {
						if (%Filter == "-F ") {
							unset %Filter
						}
						exec ("toilet --irc %Font %Filter %Text") {
							say $1
						}
						unset %Temp0 %Temp1 %Temp2 %Font %Filter %Text %Tester %Tester2
					}
				}
			}
		}
	}
}