[SnypeTEST]

v5.1.9 http://www.snype.us/iotrial/

- oops forgot to change line for !passed.


!trials command.
paste this into iotrial.tcl

bind pub -|- [set cmdtrial]trials trials

proc trials {nick uhost hand chan args} {
	global binary
	set result [exec $binary(ioTRIAL) irc info trial all]
	foreach line [split $result \n] {
		if { ! [info exists newline($line)] } { set newline($line) 0 } else { set newline($line) [expr $newline($line) + 1] }
		puthelp "PRIVMSG $chan :$line\0030,$newline($line)"
	}
}