Opers kanalı !komutlar eggdrop botu
 

S.a iyi geceler arkadaslar bana #opers Kanalından !komutlar dediğimiz zaman

!zline ac
!spamekle
!global at
vs..

bunu gibi bi tcl lazım elinde olan varsa bi zahmet verebilirmi tşkler simdiden..

Cevap: Opers kanalı !komutlar eggdrop botu
 

Bu nasıl bir proje belirtme şekli?
!komutlar dediğin zaman
!zline ac
!spamekle
!global
vs..
diye bir istek olabilir mi?
!komutlar dediğinde bu işlemleride yapacak mı? Yoksa sadece bunları yazdırmayı mı düşünüyorsun

;frown

Cevap: Opers kanalı !komutlar eggdrop botu
 

!komutlar dediğin zaman
!zline ac
!spamekle
bunları yazdımız zaman işlemde yapsın evet zlinede acsın tam anlamadım konuyu pardon :)

Cevap: Opers kanalı !komutlar eggdrop botu
 

S-Botdur OO s botda paralı

Cevap: Opers kanalı !komutlar eggdrop botu
 

Abi bana s-bot lazım deil sadece o işlemleri yapıcak tcl lazım.. kimsede yokmu o tcl size zahmet bi yardımcı olun :(

Cevap: Opers kanalı !komutlar eggdrop botu
 

set admin_chan "#opers"
bind pub - !bansil ban:kaldirma
proc ban:kaldirma { n u h c a } {
global admin_chan
if {[onchan $n $admin_chan]==1} {
set komut "[string tolower [lindex $a 0]]"
if {$komut==""} {
putquick "PRIVMSG $c : __________________________________________________ ______"
putquick "PRIVMSG $c :| \00305 Banları kaldırmak için kullanabileceğiniz komutlar By AspavA EditioN.\003 |"
putquick "PRIVMSG $c :|________________________________________________ ______|"
putquick "PRIVMSG $c :\002\00302!bansil g :\002\00307 Bütün gline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil gz:\002\00307 Bütün gzline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil k :\002\00307 Bütün kline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil z :\002\00307 Bütün zline'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil s :\002\00307 Bütün shun'ları açar."
putquick "PRIVMSG $c :\002\00302!bansil banlar :\002\00307 Bütün banları açar."
putquick "PRIVMSG $c : --------Her Bişe SizLer İçin By AspavA----------"
return 0
} elseif {$komut=="g"} {
putquick "PRIVMSG $c :\00312Bütün glinelar açılıyor."
putquick "STATS g"
return 0
} elseif {$komut=="k"} {
putquick "PRIVMSG $c :\00312Bütün klinelar açılıyor."
putquick "STATS k"
return 0
} elseif {$komut=="gz"} {
putquick "PRIVMSG $c :\00312Bütün gzlinelar açılıyor."
putquick "STATS g"
return 0
} elseif {$komut=="s"} {
putquick "PRIVMSG $c :\00312Bütün shunlar açılıyor."
putquick "STATS s"
return 0
} elseif {$komut=="z"} {
putquick "PRIVMSG $c :\00312Bütün zlinelar açılıyor."
putquick "STATS k"
return 0
} elseif {$komut=="banlar"} {
putquick "PRIVMSG $c :\00312Bütün banlar açılıyor."
putquick "STATS g"
putquick "STATS k"
putquick "STATS s"
return 0
} else {
putquick "PRIVMSG $c :\00304Bilinmeyen komut! \00301Ban silme komutlarını görmek için \002!Bansil \002yazınız."
}
return 0
}
if {[onchan $n $admin_chan]==0} {
putquick "NOTICE $n :Bu komutu kullanmaya yetkiniz yok!"
}
}
bind raw - 223 serverban_listesi
proc serverban_listesi {from keyword arg} {
set bz [lindex [split $arg] 1]
set ip [lindex [split $arg] 2]
if {$bz == "Z"} {
putquick "GZLINE -$ip"
}
if {$bz == "z"} {
putquick "ZLINE -$ip"
}
if {$bz == "G"} {
putquick "GLINE -$ip"
}
if {$bz == "s"} {
putquick "SHUN -$ip"
}
if {$bz == "K"} {
putquick "KLINE -$ip"
} else {
return 0
}
}

Cevap: Opers kanalı !komutlar eggdrop botu
 

Bu kodlar ScanX botundan alınma kodlar..
hadi lazım oldu sadece bu kodları aldın kullanıyorsun..
hadi yapımcısınıda kim takar dedin..
sunucunda kendin yapmış gibi de gösterdin..
hadi amacın yardımcı olmak paylaşmak..
ama bu şekilde bari ulu orta yerlere serme..
en azından göz önünde bulunan bir ortama paylaşırken..
bu şekilde paylaşma..
yapımcısının gözüne soka soka ayıptır yahu..

Cevap: Opers kanalı !komutlar eggdrop botu
 

Basitçe
Not: ScanX Botundan alıntıdır yazsan daha etik bir hareket olurdu.

Cevap: Opers kanalı !komutlar eggdrop botu
 

Bu tcl değil socket ;)

Cevap: Opers kanalı !komutlar eggdrop botu
 

Haklısın Hocam ;p Socket SagoqaKajmer S-Bot'un İçindekiler. Lazım diye Konu açmış Üstelik Tcl demiş ßenimde. O an Kafama. Tcl Gitmiş demekki Uyandırdığın İçin Teşekkürler ; )