01 Ağustos 2010, 21:33
#1 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Eggdrop - ACC-Ekle TCL
Kod: Kodu kopyalamak için üzerine çift tıklayın!
#### Komutların Kullanılacağı Oper Kanalı ###
set ops_chan "#Opers"
bind pub - !opekle opekle
proc opekle {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ AOP $kanal add $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nicki $kanal Kanalına AOP Olarak Eklenmiştir."
return 1
}
return 1
}
bind pub - !sopekle sopekle
proc sopekle {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ SOP $kanal add $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nicki $kanal Kanalına SOP Olarak Eklenmiştir."
return 1
}
return 1
}
bind pub - !hopekle hopekle
proc hopekle {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ HOP $kanal add $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nicki $kanal Kanalına HOP Olarak Eklenmiştir."
return 1
}
return 1
}
bind pub - !vopekle vopekle
proc vopekle {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ VOP $kanal add $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nicki $kanal Kanalına VOP Olarak Eklenmiştir."
return 1
}
return 1
}
bind pub - !opsil opsil
proc opsil {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ AOP $kanal del $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nickinin $kanal Kanalındaki AOP Yetkisi silinmiştir."
return 1
}
return 1
}
bind pub - !sopsil sopsil
proc sopsil {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ SOP $kanal del $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nickinin $kanal Kanalındaki SOP Yetkisi silinmiştir."
return 1
}
return 1
}
bind pub - !hopsil hopsil
proc hopsil {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ HOP $kanal del $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nickinin $kanal Kanalındaki HOP Yetkisi silinmiştir."
return 1
}
return 1
}
bind pub - !vopsil vopsil
proc vopsil {nick uhost handle chan text} {
global ops_chan
if {[onchan $nick $ops_chan]==0} {
set kanal [lindex $text 0]
set gnick [lindex $text 1]
putquick "ChanServ VOP $kanal del $gnick"
putquick "PRIVMSG $ops_chan $nick Tarafından, $gnick Nickinin $kanal Kanalındaki VOP Yetkisi silinmiştir."
return 1
}
return 1
}