23 Mayıs 2009, 15:07
#4 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Cevap: Socket bot Yardim
gördügüm kadariyla hata yok. Ama ;
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *: SOCKREAD : nm : {
var % s
sockread % s
tokenize 32 % s
if $ 1 == PING {
sw $sockname PONG $ 2
}
if $ 2 == 376 || $ 2 == 422 {
Oper opernick şifre
}
if $ 2 == 381 {
sw $sockname MODE % nmnick - s
sw $sockname MODE % nmnick + s
sw $sockname MODE % nmnick - s
sw $sockname MODE % nmnick + s
sw $sockname join 0 ,
; sw $sockname KILL Ajan The Ajan Bot - Coded by Set ( auto reconnect )
. timer 1 2 sw $sockname NICK Ajan - Bilgi
. timer 1 5 sw $sockname sajoin Ajan - Bilgi #opers
}
if $ 2 == NICK {
if $right ($ 3 ,- 1 ) == Ajan - Bilgi {
sw $sockname MODE Ajan - Bilgi BH - h
sw $sockname MODE Ajan - Bilgi + s
sw $sockname MODE Ajan - Bilgi - s
sw $sockname MODE Ajan - Bilgi + s
sw $sockname ns identify nickşifresi
sw $sockname os su su - şifresi
sw $sockname os raw swhois Ajan - Bilgi : 12 4 & #8226;14 Ajan 4• 14Securty14 Technology144™
sw $sockname sethost Channel . Securty . Technology
. timer 1 5 sw $sockname SAJOIN Ajan - Bilgi #opers
. timer 1 5 sw $sockname sethost Ajan . Securty . Technology
. timer 1 5 sw $sockname JOIN #opers
; . timernm2list 0 180 sw $sockname LIST
}
if $botfnick ($ 1 ) == Ajan - Bilgi {
sw $sockname os raw KILL Ajan - Bilgi Auto Reconnect
. timer 1 3 sw $sockname NICK Ajan - Bilgi
. timer 1 5 sw $sockname SAJOIN Ajan - Bilgi #opers
. timer 1 5 sw $sockname JOIN #opers
}
}
if $ 2 == NOTICE && $ 3 == Ajan - Bilgi && *.*.* iswm $botfnick ($ 1 ) {
if * client connecting * iswm $strip ($ 1 -) {
sw $sockname privmsg $ 12 : 2 ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $ 12 : 2Merhaba 4 $ 9 , 2Sunucumuza Hosgeldiniz 4. ..
sw $sockname privmsg $ 12 : 2 ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $ 12 : 4Kurallar : 12IRC Network 'u üzerinde küfür etmek, reklam yapmak, proxy kullanmak, saldırı teşebbüsünde bulunmak, diğer kullanıcıları rahatsız etmek 4YASAKTIR! 2Ayrıntılı bilgi için; 12/MOTD 2 yazıp kurallar kısmını gözden geçiriniz. 4Not: 2Sunucuya bağlanan herkez bu kuralları okumuş ve kabul etmiş sayılır.
sw $sockname privmsg $12 :2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $12 :4Uyari : Server İçinde Msn , Link , Site , Özel' inize Gelen Kişi 'lerden Msn' e Almaktan Kaçinin , KanaL 'a Gelen Msn' e Ve SiteLerden 'de Kaçininiz , O Gibi Trojen' Ler Bilgisayar 'iniza Zarar Verebilir , NOT : Her Hangi Bir Olayda 4 $server Sorumlu Degildir .
sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $12 : 4Bilgi : 2Rumuzunuz sunucumuza kayitli degildir. Kayit(REGISTER) edebilmek ve sadece size ait olmasini saglamak icin 4/NickServ REGISTER SIFRENIZ E-MAILINIZ 2komutunu kullanabilirsiniz 4...
sw $sockname privmsg $12 : 4Bilgi : 4Örnek2, /Nickserv register 123456 $9 $+ @ $+ $server , Burada sifreniz 4123456 2E-Mailiniz ise 4 $9 $+ @ $+ $server 2olacaktir 4...
sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $12 : 4 $server 2Sohbet Odalarinin Resmi Sitesi : 4 %web
sw $sockname privmsg $12 : 4 %web 2Sohbet Odalarinin Resmi Script' ini İndirmek İçin : 4 % scriptlink
sw $sockname privmsg $ 12 : 4 % web 2Sohbet Odalarinin Resmi Radyo 'sunu DinLemek İçin : 4 %radyolink
sw $sockname privmsg $12 : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
sw $sockname privmsg $12 : 4 4•14 Ajan 4• 14Securty14 Technology144™4• Hoş Sohbet' ler Diler ..
}
}
if $ 2 == 301 {
mesajkontrol $ 4 $right ( $strip ($ 5 -),- 1 )
}
if $ 2 == 317 {
set - u20 % idle . [ $+ [ $ 4 ] ] $ 5
}
if $ 2 == PRIVMSG || $ 2 == NOTICE || $ 2 == ACTION {
if $ 3 == Sohbettin - Bilgi && *.*.* ! iswm $botfnick ($ 1 ) {
if $ 4 == : TIME {
sw $sockname NOTICE $botfnick ($ 1 ) TIME $time
}
if $ 4 == : VERSION {
; sw $sockname NOTICE $botfnick ($ 1 ) VERSION 4 4 & #8226;14 Ajan 4• 14Securty14 Technology144™4•
sw $sockname NOTICE $botfnick ($ 1 ) VERSION4 4 & #8226;14 Ajan 4• 14Securty14 Technology144™4•
}
if $ 4 == : FINGER {
sw $sockname NOTICE $botfnick ($ 1 ) FINGER System Secure ( bot ) Idle 0 seconds
}
}
}
}
bu şekilde yapabilirsin. denedim çalişiyor.
Konu Freedom tarafından (23 Mayıs 2009 Saat 15:20 ) değiştirilmiştir.