bind ctcp - "FINGER" ctcp:reply
proc ctcp:reply {nick host hand dest key text} {
set idle [lindex [split $text] 7]
utimer 1 [list putserv putserv "PRIVMSG $nick :Idle sureniz $idle sn." ]
return 0
}