eggdro cycle Yardim - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Tupac · 17 Eylül 2020, 10:56

merhaba arkadaslar unreal 4.0.18 anope servislere eggdrop cycle bot yaptim hersey ok ama eggdrop bot kanala botlari sokmuyor ne yapmam lazim kanala sokuyor olusturuyor diyor ama girmiyor

AspavA · 17 Eylül 2020, 10:58

Tupac Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

merhaba arkadaslar unreal 4.0.18 anope servislere eggdrop cycle bot yaptim hersey ok ama eggdrop bot kanala botlari sokmuyor ne yapmam lazim kanala sokuyor olusturuyor diyor ama girmiyor

botun raw komutlarına erişimi olması lazım supass girişi yaptırdınız mı

Tupac · 17 Eylül 2020, 12:00

walla ircservices degil usta supass anope super admin var onuda nasil bilmiyorum sevices.conf yazdim cycle botuna ama sifre yok ./os set superadmin on böyle girince super admin oliyorsun komut var mi uygulayabilecegim

AspavA · 17 Eylül 2020, 12:23

tcl nin kedinisi atman lazım buraya

Tupac · 17 Eylül 2020, 14:42

set pwhost "euirc.ch"
set listfile [open host.txt r]
set nickflist [split [subst -nocommands [read $listfile]] \n]

##### Bota baslama komutunu verecek kisinin nickini girin #####
set authorized "red"

##### Services adresini girin. #####
set servicesadr "services.euirc.ch"
set logit 1
set logchany "#bot"

proc pwjoin {what what2 what3 what4 what5 what6 what7 what8 what9} {
global kanal logit logchany
if {$logit == 1} {
puthelp "PRIVMSG $logchany :$what Kanala sokuluyor --> $what9"
}
putquick "os :raw :$what join $what9 "
utimer $what2 "pwpart $what $what3 $what $what2 $what3 $what4 $what5 $what6 $what7 $what8 $what9"
}

proc pwpart {whad whad2 oldu1 oldu2 oldu3 oldu4 oldu5 oldu6 oldu7 oldu8 oldu9} {
global kanal logit logchany
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whad Kanaldan cikartiliyor --> $oldu9" }
putquick "os :raw :$whad part $oldu9 "
putquick "kill $oldu4 :this is a bot nick. u cant use it."
putquick "os :raw :$whad nick $oldu4"
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whad Nick degistiriliyor --> $oldu4" }
utimer $whad2 "pwjoin2 $oldu4 $whad2 $oldu1 $oldu2 $oldu3 $oldu4 $oldu5 $oldu6 $oldu7 $oldu8 $oldu9"
}

proc pwjoin2 {whas whas2 oldud1 oldud2 oldud3 oldud4 oldud5 oldud6 oldud7 oldud8 oldud9} {
global kanal logit logchany
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whas Kanala tekrar sokuluyor --> $oldud9" }
putquick "os :raw :$whas join $oldud9 "
utimer $oldud2 "pwbquit $whas $oldud1 $oldud2 $oldud3 $oldud4 $oldud5 $oldud6 $oldud7 $oldud8 $oldud9"
}

proc pwbquit {whaaq oldukha1 oldukha2 oldukha3 oldukha4 oldukha5 oldukha6 oldukha7 oldukha8 oldukha9} {
global quitmsg kanal logit logchany listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
foreach iii $nickflist {
if {[regexp {(.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+)} $iii tmppp botident3 before3 after3 botadi3 wait3 partwait3 joinwait3 yenisi3 quitmes3 cikmadan3 kanallar3]} {
if { $whaaq == $after3 } {
if { $cikmadan3 != 0 } {
putquick "os :raw :$whaaq privmsg $kanallar3 :$cikmadan3"
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whaaq Konusturuluyor." }
utimer 10 "pwquit $whaaq $oldukha1 $oldukha2 $oldukha3 $oldukha4 $oldukha5 $oldukha6 $oldukha7 $oldukha8 $oldukha9"
return
}
}
}
}
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whaaq Konusturulamadi - Konusma modu kapali!" }
utimer 10 "pwquit $whaaq $oldukha1 $oldukha2 $oldukha3 $oldukha4 $oldukha5 $oldukha6 $oldukha7 $oldukha8 $oldukha9"
}

proc pwquit {whaq olduk1 olduk2 olduk3 olduk4 olduk5 olduk6 olduk7 olduk8 olduk9} {
global quitmsg kanal logit logchany listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
foreach ii $nickflist {
if {[regexp {(.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+)} $ii tmpp botident2 before2 after2 botadi2 wait2 partwait2 joinwait2 yenisi2 quitmes2 cikmadan2 kanallar2]} {
if { $whaq == $after2 } {
putquick "os :raw :$whaq quit :$quitmes2"
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whaq Serverdan cikartiliyor" }
utimer $olduk6 "olustur $olduk1 $olduk2 $olduk3 $olduk4 $olduk5 $olduk6 $olduk7 $olduk8 $olduk9"
return
}
}
}
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$whaq SERVERDAN CIKARTILAMADI !" }
}

proc olustur {olsun1 olsun2 olsun3 olsun4 olsun5 olsun6 olsun7 olsun8 olsun9} {
global servicesadr pwhost kanal logit logchany
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$olsun1 Yeniden olusturuluyor." }
puthelp "kill $olsun1 :this is a bot nick. u cant use it."
puthelp "os :raw nick $olsun1 1 1 $olsun8 2[rand 4][rand 9].[rand 9][rand 9][rand 9].[rand 9][rand 9][rand 9].$pwhost-[rand 9][rand 9][rand 9][rand 9][rand 9] $servicesadr :$olsun5"
utimer $olsun7 "pwjoin $olsun1 $olsun2 $olsun3 $olsun4 $olsun5 $olsun6 $olsun7 $olsun8 $olsun9"
}

proc pwornek {nick host hand {text ""}} {
global pwhost
}

proc pworn {ornekcik} {
puthelp "NOTICE absolut : $ornekcik snlikti. "
}

proc pwstart {nick host hand {text ""}} {
global listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
if {$nick == "$authorized"} {
puthelp "NOTICE $nick :Olusum basliyor. "
foreach i $nickflist {
if {[regexp {(.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+)} $i tmp botident before after botadi wait partwait joinwait yenisi quitmes cikmadan kanallar]} {
puthelp "os :raw nick $before 1 1 $botident 2[rand 4][rand 9].[rand 9][rand 9][rand 9].[rand 9][rand 9][rand 9].$pwhost-[rand 9][rand 9][rand 9][rand 9][rand 9] $servicesadr :$botadi"
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$before olusturuluyor." }
utimer $wait "pwjoin $before $partwait $joinwait $after $botadi $yenisi $wait $botident $kanallar"
}
}
}
}

proc pwdestroy {nick host hand {text ""}} {
global listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
if {$nick == "$authorized"} {
puthelp "NOTICE $nick
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
otlar yok ediliyor. "
if { $logit == 1 } { puthelp "PRIVMSG $logchany :YOK ETME KOMUTU VERILDI ($authorized)." }
foreach i $nickflist {
if {[regexp {(.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+):
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.+)} $i tmp botident before after botadi wait partwait joinwait yenisi quitmes cikmadan kanallar]} {
puthelp "kill $before :destroyed by $authorized"
puthelp "kill $after :destroyed by $authorized"
if { $logit == 1 } { puthelp "PRIVMSG $logchany :$before - $after YOK EDiLiYOR." }
}
}
}
}

bind msg - baslat pwstart
bind msg - yoket pwdestroy
bind msg - ornek pwornek

putlog "===============TCL CycLe ==============="
putlog "= ="
putlog "= OperServ raw -auto- bot control 2.0 ="
putlog "= [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] - absolut ="
putlog "= System Admin ="
putlog "============================================= ="

AspavA · 18 Eylül 2020, 10:24

putquick "os :raw :$what join $what9 "
utimer $what2 "pwpart $what $what3 $what $what2 $what3 $what4 $what5 $what6 $what7 $what8 $what9"
}

bu kısımı aşağıdaki gibi değişerek bota super admin girişi yaptırmayı dene bi
putquick "os set superadmin on " super admin giriş kısmını kendine göre düzenleyerek

putquick "os :raw :$what join $what9 "
putquick "os set superadmin on "
utimer $what2 "pwpart $what $what3 $what $what2 $what3 $what4 $what5 $what6 $what7 $what8 $what9"
}

Tupac · 18 Eylül 2020, 14:57

yine olmadi kanka denedim

aquabluee · 18 Eylül 2020, 15:45

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] anope2 versionlarında raw yok bu sebeple proxy cycle kullanmanı öneririm

Tupac · 18 Eylül 2020, 16:09

tmm kanka öyle yapaiym
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Cycle Bot Kurulumuna Yardim	MaviBereLi	TCL Scriptler	3	22 Haziran 2014 18:17
özele !yardim yazildiginda yardim kanalına sajoinlemek	BunaLim	mIRC Scripting Sorunları	2	15 Eylül 2009 15:36

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.