23 Mayıs 2009, 04:26
#1 Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Socket bot Yardim
PHP 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 { sw $sockname 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 Kod Neden Calişmiyor Acaba /sockopen nm Serverip port'u Yazdigim HaLde bot tekrar girmiyor hata nerede acaba yardim ederseniz cok sevinirim.