IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum - Botunuz Global Oplarınız Nick Değiştirdiğinde kill atsın

Merhaba arkadaşlar

Forumdan bir arkadaşın isteği üzerine yazılmış basit bir tcl daha Global oplarınıza global op kanalınızda nick değiştirdiğinde kill atılmasını sağlayan bir sistemdir. Buyrun kodlarımız ;

Kod:

#######################################

#  Op Kanalı Nick Değişim Yasaklama   #

#             coded by Raw            #

#######################################
 

########

# Op kanalı yazınız

########

set op(kanal) "#ops"
 

########

# Muaf kanalı yazınız

########

set op(muaf) "#opers"
 

########

# Kill Mesajı Yazınız

########

set op(kill) "Global op kanalında nick değiştirdiğiniz için uzaklaştırıldınız"
 
 

bind nick - * raw

proc raw {nick chan uhost hand newnick} {

 global op

  if {$chan == $op(kanal) && ![onchan $newnick $op(muaf)]} {

 putquick "mode $op(kanal) +b $newnick"

 putquick "kill $newnick $op(kill)"

 putquick "privmsg $op(kanal) \002Dikkat :\002$newnick global op nickini değiştirdiği için uzaklaştırılmıştır. Lütfen global op nickinizi değiştirmeyiniz."

 }

}
 

########

putlog "Op Kanali Nick Degisim.Tcl Yuklendi - coded by Raw"

########