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•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•14 Ajan 4• 14Securty14 Technology144™4• sw $sockname NOTICE $botfnick($1) VERSION4 4•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. |
| |