|
|
20 Haziran 2021, 20:57
|
#1 |
|
Nick kopyalandı!
|
Kanal Modları ve !Zline !Gline !Kline TCL..
Denedim Çalışıyor İşinize Yararsa Buyrun ; )
Ekleme veyahut Silme Yapabilirsiniz Kendinize Göre... Hoşça Paylaşımlar... Kod:
bind pub - !+m chanmod
#Komut algılama
proc chanmod {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +m"
putquick "privmsg $nick : $chan +m Moduna Alindi $nick"
}
bind pub - !-m chanmod
#Komut algılams
proc chanmod {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan -m"
putquick "privmsg $nick : $chan -m Moduna Alindi $nick"
}
bind pub - !+s chanmod
#Komut algılamas
proc chanmod {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +s"
putquick "privmsg $nick : $chan +s Moduna Alindi $nick"
}
bind pub - !-s chanmod
#Komut algılamw
proc chanmod {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan -s"
putquick "privmsg $nick : $chan -s Moduna Alindi $nick"
}
bind pub - !+RM chanmod
#Komut algılamıs
proc chanmod {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +RM"
putquick "privmsg $nick : $chan +RM Moduna Alindi $nick"
}
bind pub - !+RM chanmod
#Komut algılaaddddımm
proc chanmod {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan -RM"
putquick "privmsg $nick : $chan -RM Moduna Alindi $nick"
}
#Oper Odası
set yonetim "#Opers"
bind pub - !zline uzaklas
#Komut algılama
proc uzaklas {nick uhand host chan text} {
global yonetim
if {[isop $nick $chan] || [onchan $nick $yonetim]==0} {
putquick "zline $text"
}
#Oper Odası
set yonetim "#Opers"
bind pub - !kline uzaklass
#Komut algılama
proc uzaklass {nick uhand host chan text} {
global yonetim
if {[isop $nick $chan] || [onchan $nick $yonetim]==0} {
putquick "kline $text"
}
#Oper Odası
set yonetim "#Opers"
bind pub - !gline uzaklaa
#Komut algılama
proc uzaklaa {nick uhand host chan text} {
global yonetim
if {[isop $nick $chan] || [onchan $nick $yonetim]==0} {
putquick "gline $text"
}
NOT; Gördüğünüz gibi çalışma şaması çok basit. Takılan olursa post altında yorum yapabilir. Sabrettiğimi Sanarken, Vazgeçtiğimi Öğrendim.. |
|
|
Alıntı Yap |
| Şu anda bu konuyu görüntüleyen etkin kullanıcılar: 1 (0 üye ve 1 ziyaretçi) | |
|
|
3Beğeni
Ağaç şeklinde