28 Eylül 2015, 22:00 | #1 |
Üyelik tarihi: 25 Ocak 2015
Mesajlar: 109 WEB Sitesi: * IRC Sunucusu: * İlgi Alanı: Alınan Beğeni: 14 |
Proxy cycle sistemi
Botu başlatma komutu /basla'dır. Botu aktif edebilmeniz içinse nick.txt oluşturmalısınız.
Kod:
alias sw { if $sock($1).status == active { sockwrite -nt $1- } } alias sunucu return irc.lookjapan.com:6667 alias setname return Www.lookjapan.com alias chanlar return #lookjapan,#sohbet,#radyo alias ident return 63 alias basla { foral timerforum 0 120 /foral timercycle 0 1 /clon } alias dur { .timerforum off .timercycle off } alias clon { set %andd $rand(0,9999999999999) set %proxy $read(proxy.txt) sockclose x $+ %andd sockopen x $+ %andd $gettok(%proxy,1,58) $gettok(%proxy,2,58) } on *:sockopen:x*: { if ( $sockerr > 0 ) { return } sw $sockname CONNECT $sunucu $+(HTTP/1.0,$CRLF,$CRLF) } on *:sockread:x*:{ if ( $sockerr > 0 ) { return } var %report .sockread %report tokenize 32 %report var %asasa sockwrite -n $sockname if ($gettok(%report,1-2,32) == HTTP/1.0 200) || ($gettok(%report,1-2,32) == HTTP/1.1 200) { set %and $rand(10,2000) %asasa NICK $read(nick.txt) %asasa USER $ident " " : $+ $setname .timer $+ $sockname 1 %and /sockclose $sockname %asasa join $chanlar } if ($1 == ping) { %asasa pong $2 } if (version isin $4) { %asasa notice $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION esChat v3.6 © 2006 $+ $chr(1) } } alias foral { write -c proxy.txt inc %ss sockopen $+(forum,%ss) elite-proxies.blogspot.com 80 } on *:sockopen:forum*:{ sockwrite -n $sockname GET / HTTP/1.1 sockwrite -n $sockname Host: elite-proxies.blogspot.com $+ $crlf $+ $crlf } on *:sockread:forum*:{ var %forum sockread %forum .tokenize 32 %forum if (*.*:* iswm $1-) && (*a* !iswm $1-) { write proxy.txt $gettok($afree($1-),1,32) } } alias afree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x), %x = $remove(%x, , ) return %x } |
Alıntı
|
Etiketler |
cycle, proxy, sistemi |
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|
Benzer Konular | ||||
Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
Yeni Giriş Güvenlik Sistemi - Anti Koruma Botu (Proxy'i Bitiriyoruz, %99 Başarı Oranı | Emrehan | IRC Ekstra | 2 | 06 Mart 2019 18:08 |
Cycle Socket Proxy Bot | Code | mIRC/Socket Botlar | 2 | 28 Aralık 2017 01:14 |
Güncel Proxy 21-01-17 | Free Proxy Server List (2182) | Ahmet | Güncel Proxy Liste(leri) | 0 | 21 Ocak 2017 19:55 |
Güncel Proxy 21-01-17 | Free Proxy Server List (2607) | Ahmet | Güncel Proxy Liste(leri) | 0 | 21 Ocak 2017 19:55 |
Backlink Takas Sistemi Yada Link Degişim Sistemi Sizlerle | lepel | Link değişimi | 1 | 23 Temmuz 2016 14:34 |