bind ctcp - FINGER gneral proc gneral {from keyword text} { if {[string match -nocase "*reply FINGER*" $text]} { set nick [lindex [split $text] 7] utimer 1 [list putserv "raw close" ] utimer 1 [list putserv "privmsg $nick :Idle süreniz $7 sn." ] } }