#Bilgi TCL

[No_FeaR]

Kod'un Amacı X Kanalında Uygulanan +b(banları) Op Kanalında #Ops Kanalında Bildirilmesidir.

NOT ; Bot Bilgi Kanalında Olmak Zorundadır.

bind pub - !nick msg_nickban
proc msg_nickban {nick uhost handle chan arg} {
global botnick
set person [lindex $arg 0]
if {$person == $botnick} {return}
if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
putquick "PRIVMSG IRC mode $chan +b $person"
putquick "kick $chan $person Kanal kurallarına uymadığınız tespit edildi. IP'niz banlandı."
putquick "PRIVMSG #bilgi $chan kanalında $person nickli üye $nick tarafından kanaldan atıldı."
}
}

HaLfOpları ve Opları Muah Tutmak İçin İse ;

bind pub - !nick msg_nickban
proc msg_nickban {nick uhost handle chan arg} {
global botnick
set person [lindex $arg 0]
if {$person == $botnick} {return}
if {[isop $nick $chan] || [ishalfop $nick $chan] || [onchan $nick "#Opers"]} {
İf {![ishalfop $person $chan] && ![isop $person $chan]} {
putquick "PRIVMSG IRC mode $chan +b $person"
putquick "kick $chan $person Kanal kurallarına uymadığınız tespit edildi. IP'niz banlandı."
putquick "PRIVMSG #bilgi $chan kanalında $person nickli üye $nick tarafından kanaldan atıldı."
}
}
}

Yapımcıları ; Kablosuz Net & rascoLn