Clone – Eski nick uyarı
Eski nicklerle giriş yapan kullanıcıları gösterme
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
on *:start:if $isfile(eskinicks.63) { hmake eskinicks | hload eskinicks eskinicks.63 } on *:join:#: { if !$ial { ial on } if $nick == $me || $regex($wildsite,/(Admin|Op)/i) { return } hadd -m eskinicks $wildsite $addtok($hget(eskinicks,$wildsite),$nick,32) hsave eskinicks eskinicks.63 if $numtok($hget(eskinicks,$wildsite),32) >= 2 { echo # $wildsite hostundan girmis eski nickler: $hget(eskinicks,$wildsite) } if $ialchan($wildsite,#,0) >= 2 { var %x 1 | while $ialchan($wildsite,#,%x) { var %v1 $token($v1,1,$asc(!)) | var %nicks %nicks %v1 | inc %x } echo # $wildsite bagli kanaldaki cloneler: %nicks } } |
önceki yazımızda « mIRC Türkçe Sözlük makelemiz var.
Clone – Eski nick uyarı İle Benzer Sohbet Yazıları
Clone – Eski nick uyarı yazına yapılan yorumlar