ForumTEK.Net - IRC Forumu

ForumTEK.Net - IRC Forumu (http://www.forumtek.net/index.php)
-   TCL Scriptler (http://www.forumtek.net/forumdisplay.php?f=69)
-   -   #Bilgi TCL (http://www.forumtek.net/showthread.php?t=1448)

No_FeaR 22 Mart 2015 13:53

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

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


Kod:

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 ;

Kod:

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


All times are GMT +3. The time now is 11:04.

Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.