Tekil Mesaj gösterimi
Alt 22 Mart 2015, 13:58   #1
No_FeaR
 
No_FeaR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 27 Ocak 2015
Bulunduğu yer: Denizli
Mesajlar: 136
WEB Sitesi: www.AlemTR.com
IRC Sunucusu: www.AlemTR.com
İlgi Alanı:
Alınan Beğeni: 69
Standart Kanal Mod TCL(İsteğinize Göre Düzenleyebilirsiniz)

Kendim İçin Derlediğim Kanal Mod TCL'si Kendinize Göre Düzenleyebilir/Silme/Ekleme Yapabilirsiniz.

NOT ; Parça Olarak Toparladım Direk Olarak Yazmadım : )


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"
}






Aynı Dünyada Yaşamamalı Cellatlar Ve Çocuklar .
Ya Ölmeli Cellatlar,Yada Hiç Doğmamalı Çocuklar...!
 No_FeaR isimli Üye şimdilik offline konumundadır   Alıntı