[Set]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias sw { if $sock($1).status == active { sockwrite -nt $1- } }
alias sunucu return irc.maytap.net:6667
alias setname return [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
alias chanlar return #maytap,#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,&nbsp;, )
  return %x
}

Normalde Cycle Sistemlerin Genelde Services Olduglari Icın Hostlarindan hiç bir tepki vermemelerinden Cok Goze Batarlar , Ben Ise Bunu Daha Aza Indirebilmek Icın sahte ip (proxy) ile birşeyler yapmaya caliştim ve galiba basardim , bir sure deneme amacli kullandim version'lara cevap verme ping'leri alma uzun süreli sunucuda kalma gibisinden bir kaç şeyini ayarladim , sadece tek bir sorunu var proxy korumasi , onada acik bir port yaparak ve o portu korumalardan muaf tutarak sagliyabildim , kullanmak isteyenler sadece ayarlarini tamamlayip /basla yapmasi kafidir insallah işinize yarar

Nick.txt Download : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Hayırlı IF'ler.

[fLayer]

/sockopen: Yetersiz veya eksik parametre (Satır 20, botnet.txt)
-
* /tokenize: Sıra cok uzun (Satır 54, botnet.txt)
-
* /tokenize: Sıra cok uzun (Satır 54, botnet.txt)

Sorun ßeNdemi ?

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

/sockopen: Yetersiz veya eksik parametre (Satır 20, botnet.txt) - * /tokenize: Sıra cok uzun (Satır 54, botnet.txt) - * /tokenize: Sıra cok uzun (Satır 54, botnet.txt) Sorun ßeNdemi ?

Evet aynı sorun bendede cıktı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[diyorumki]

serverda proxy koruması varsa girmez

[SanaLMasteR]

Sorun sende tabi oLm
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[TxceN]

korumayla alakalı bir sey degil komutlarda hata var
/tokenize 54 satır
ve
20 satırda hata veriyor

[sad33]

hata filan yok orda adres vermiş nick.txt diye onu indirin mirc dizinine atın sorun olmayacaktır.

[Crazy]

Arsivinde bulunan varsa paylaşabilirmi?

[IrCbaStarD]

Arsive gerek yok, kod orada proxy.txt hazirla kod calisir.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[ahmetsivas]

/sockopen: Yetersiz veya eksik parametre (Satır 20, script22.mrc)