Tekil Mesaj gösterimi
Alt 20 Haziran 2021, 20:57   #1
No_FeaR
Sen Geleceksin Diye, Ben Hep Yarım Kaldım.
No_FeaR - ait Kullanıcı Resmi (Avatar)

Standart 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..