bind raw * notice connect 
proc connect {from keyword text} { 
if 
{[string match -nocase "*Client connecting on port*" $text]} { 
set nick 
[lindex $text 9] 
if {$nick == "MesqeN"} {return 0} 
if {$nick == "kelebekscript"} {return 0}   
putquick "SPY ADD $nick #UserLog" 
 
putquick "PRIVMSG #UserLog \[Özel Okuma Sistemi\] Sunucuya Kullanıcı 
Bağlandı. Sunucu Güvenliği için \[ $nick \] Nickinin Özeli Bu Kanala 
Loglanacaktır." 
} 
}