IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   IRCd Botlar (https://www.ircforumlari.net/ircd-botlar/)
-   -   Proxy Cycle Bot Sorunu (https://www.ircforumlari.net/ircd-botlar/892769-proxy-cycle-bot-sorunu.html)

Waldyrious 30 Aralık 2020 19:21

Proxy Cycle Bot Sorunu
 
Merhaba if ailesi..

Proxyler eskisi gibi giriş yapmıyor..
Hangi alanları güncellemek gerek?
Yardımlarınızı rica ediyorum..

Kod:

on *:start: {
  basla
  unset %*
}
alias sunucu return Server:Port
alias sunucuident return ident
alias sunucusetname return NAME
alias radyo return

alias sw { if $sock($1).status == active { sockwrite -nt $1- } }
alias basla {
  .timercycle 0 5 girisler
  .timerproxy 0 $calc(6 * 300) _xproxyal
  echo -a Cycle sistem aktiftir.
}
alias stop {
  .timercycle off
  echo -a Cycle sistem deaktiftir.
}
alias girisler {
  var %saat  $token($time,1,58)
  if $istok(12 13 14 15 16 17,%saat,32) && (%girisler !== oglen) { echo -a ** Oglen girisi | set -e %girisler Oglen | .timergiris 0 5 clon }
  if $istok(18 19 20 21 22 23,%saat,32) && (%girisler !== aksam) { echo -a ** Aksam girisi | set -e %girisler Aksam | .timergiris 0 2 clon }
  if $istok(00 01 02 03 04 05,%saat,32) && (%girisler !== gece) { echo -a ** Gece girisi | set -e %girisler Gece | .timergiris 0 5 clon }
  if $istok(06 07 08 09 10 11,%saat,32) && (%girisler !== sabah) { echo -a ** Sabah girisi | set -e %girisler Sabah | .timergiris 0 5 clon }
}
alias rands {
  Var %rmsg $sunucuident, %rsayi $rand(1,$token(%rmsg,0,32)), %random $token(%rmsg,%rsayi,32)
  return %random
}
alias saatler {
  var %saat  $token($time,1,58)
  if $istok(12 13 14 15 16 17,%saat,32) { return 150 }
  if $istok(18 19 20 21 22 23,%saat,32) { return 100 }
  if $istok(00 01 02 03 04 05,%saat,32) { return 150 }
  if $istok(06 07 08 09 10 11,%saat,32) { return 100 }
}
alias clon {
  var  %proxy $read(proxy.txt)
  if !%proxy {
    hinc -m proxys yok 1
    if $hget(proxys,yok) = 2 { _xproxyal | .hfree -sw proxys | return }
  }
  if %proxy {
    if $sock(aegx*,0) >= $calc($saatler - $rand(1,20)) {
      var %randsock $sock(aegx*,$rand(1,$sock(aegx*,0)))
      if $sock(%randsock) { .timer 1 $rand(10,50) sockwrite -nt %randsock quit $(|) hdel -m socks %randsock }
    }
    if $sock(aegxxxx*,0) <= $saatler {
      :bastan
      var %rand $rand(0,9999999)
      if $sock($+(aegxxxx,%rand)) { goto bastan }
      sockopen $+(aegxxxx,%rand) $gettok(%proxy,1,58) $gettok(%proxy,2,58)
    }
    if $sock(aegradyoc*,0) <= $saatler {
      :radyobastan
      var %rand $rand(0,9999999)
      if $sock($+(aegradyoc,%rand)) { goto radyobastan }
      sockopen $+(aegradyoc,%rand) $gettok(%proxy,1,58) $gettok(%proxy,2,58)
    }
    ;echo -a $readn - %proxy
    ;write $+(-dl,$readn) proxy.txt
  }
}

on *:sockopen:aegradyoc*:{
  if ($sockerr > 0) { sockclose $sockname | returnex }
  sw $sockname CONNECT $radyo $+(HTTP/1.1,$CRLF,$CRLF)
}
on *:sockread:aegradyoc*:{
  var %;rdin | sockread %;rdin | tokenize 32 %;rdin
  if ($gettok(%;rdin,1-2,32) == HTTP/1.0 200) || ($gettok(%;rdin,1-2,32) == HTTP/1.1 200) {
    sockwrite -nt $sockname GET /;*.nsv HTTP/1.1
    sockwrite -nt $sockname Host: $sock($sockname).addr
    sockwrite -nt $sockname Connection: keep-alive
    sockwrite -nt $sockname Accept-Encoding: identity;q=1, *;q=0
    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/39.0.2171.95 Safari/537.36
    sockwrite -nt $sockname Accept: */*
    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
    sockwrite -nt $sockname Range: bytes=0-
    sockwrite -nt $sockname $crlf
    ;echo -s 5 Radyo Giris: $sock($sockname).ip Dinliyor.
    $+(.timer,$sockname) 1  $rand(1000,3000) sockclose $sockname
  }
}
on *:sockopen:aegxxxx*: {
  if ( $sockerr > 0 ) { return }
  sw $sockname CONNECT $sunucu $+(HTTP/1.0,$CRLF,$CRLF)
}
on *:sockread:aegxxxx*:{
  if ( $sockerr > 0 ) { return }
  var %report | .sockread %report | tokenize 32 %report
  var %komut sockwrite -n $sockname, %nick $read(nick.txt), %ident  $rands($sunucuident)
  if ($gettok(%report,1-2,32) == HTTP/1.0 200) || ($gettok(%report,1-2,32) == HTTP/1.1 200) {
    %komut PASS $sunucupass
    %komut NICK %nick
    %komut USER %ident " "  : $+ $sunucusetname
  }
  if $2 == 001 {
    %komut join $kanallar
  }
  if $2 == join {
    if $istok(#ChatZone, $right($3,-1),32) {
      %komut join $kanallar
    }
  }
  if ($1 == ping) { %komut pong $2 }
}
on *:sockclose:aegxx*: {
  if $hget(socks,$sockname) { .hdel -m socks $sockname }
}
alias _xproxyal {
  write -c proxy.txt
  var %rand $rand(0,9999)
  sockopen $+(proxyal,%rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
  sockopen $+(3proxy,%rand) spys.one 80
  sockopen $+(4proxytext,%rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]  80
  ;sockopen $+(5proxytext,%rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}
alias ports {
  if $1 == 50 { return 80 }
  if $1 == 51 { return 81 }
  if $1 == 34B { return 843 }
  if $1 == 1F90 { return 8080 }
  if $1 == 1F40 { return 8000 }
  if $1 == 1F91 { return 8081 }
  if $1 == C38 { return 3128 }
  if $1 == C39 { return 3129 }
  if $1 == 2326 { return 8998 }
  if $1 == 1FB6 { return 8118 }
  if $1 == 270F { return 9999 }
}

on *:sockopen:proxyal*: {
  var %komut sockwrite -nt $sockname
  %komut GET /proxylist/country/?c=Turkey HTTP/1.0
  %komut Host: $sock($sockname).addr
  %komut $crlf
}
on *:sockread:proxyal*: {
  var %x | sockread %x
  if $regex(%x,/\"PROXY_IP\"\:\"(.+)\"/i) {
    var %ip $token($regml(1),1,34)
  }
  if $regex(%x,/\"PROXY_PORT\"\:\"(.+)\"/i) {
    var %port $sifrecoz($token($regml(1),1,34))
    proxyekle $+(%ip,:,%port)
  }
}
alias sifrecoz {
  if $1 == 50 { return 80 }
  if $1 == 51 { return 81 }
  if $1 == 34B { return 843 }
  if $1 == 1F90 { return 8080 }
  if $1 == 1F40 { return 8000 }
  if $1 == 1F91 { return 8081 }
  if $1 == C38 { return 3128 }
  if $1 == C39 { return 3129 }
  if $1 == 2326 { return 8998 }
  if $1 == 1FB6 { return 8118 }
  if $1 == 270F { return 9999 }
  else { return $1 }
}
on *:sockopen:3proxy*: {
  var %komut sockwrite -nt $sockname
  %komut GET /free-proxy-list/TR/ HTTP/1.1
  %komut Host: $sock($sockname).addr
  %komut $crlf
}
on *:sockread:3proxy*: {
  var %x | sockread %x
  if $regex(%x,/([0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})/gi) {
    var %y 1
    while $regml(%y) {
      var %c 1, %r1 $v1
      while $token(3128 3129 80 8080 8000 808 8081,%c,32) {
        proxyekle $+(%r1,:,$v1)
        inc %c
      }
      inc %y
    }
  }
}
on *:sockopen:4proxytext*:{
  var %s sockwrite -n $sockname
  %s GET $+(/,$sock($sockname).mark) HTTP/1.1
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf
}
on *:sockread:4proxytext*:{
  var %63 | sockread %63
  if (*timestamp-link*.html* iswm %63) {
    4ekproxyal $+(/,$token($token(%63,4,39),3-,47))
  }
}
alias 4ekproxyal {
  var %rand $rand(0,999999999)
  sockopen $+(4ekproxytext,%rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
  sockmark $+(4ekproxytext,%rand) $1
}

on *:sockopen:4ekproxytext*:{
  var %s sockwrite -n $sockname
  %s GET $sock($sockname).mark HTTP/1.1
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf
}
on *:sockread:4ekproxytext*:{
  var %63 | sockread %63
  if (*.*:* iswm %63) && (*a* !iswm %63) {
    var %ip $token($afree(%63),1,32)
    proxyekle %ip
  }
}

on *:sockopen:5proxytext*:{
  var %s sockwrite -n $sockname
  %s GET $+(/,$sock($sockname).mark) HTTP/1.1
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf
}
on *:sockread:5proxytext*:{
  var %63 | sockread %63
  if (*timestamp-link*.html* iswm %63) {
    4ekproxyal $+(/,$token($token(%63,4,39),3-,47))
  }
}
alias 5ekproxyal {
  var %rand $rand(0,999999999)
  sockopen $+(5ekproxytext,%rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
  sockmark $+(5ekproxytext,%rand) $1
}

on *:sockopen:5ekproxytext*:{
  var %s sockwrite -n $sockname
  %s GET $sock($sockname).mark HTTP/1.1
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf
}
on *:sockread:5ekproxytext*:{
  var %63 | sockread %63
  if (*.*:* iswm %63) && (*a* !iswm %63) {
    var %ip $token($afree(%63),1,32)
    proxyekle %ip
  }
}
alias proxyekle {
  if !$read(proxy.txt,w,$1) {
    write proxy.txt $1
  }
}

alias afree {
  var %x, %i =  $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x),  %x = $remove(%x,&nbsp;, )
  return %x
}


Turk06 08 Nisan 2021 10:53

Cevap: Proxy Cycle Bot Sorunu
 
Cr sunucu da sorunsuz çalışıyor Unreal sunucuda calışmıyor cycle sorunu cozemedım cozebılen var ıse yardımcı olabılırmı

No_FeaR 05 Eylül 2021 15:13

Cevap: Proxy Cycle Bot Sorunu
 
Alıntı:

Turk06 Nickli Üyeden Alıntı (Mesaj 1042471756)
Cr sunucu da sorunsuz çalışıyor Unreal sunucuda calışmıyor cycle sorunu cozemedım cozebılen var ıse yardımcı olabılırmı


Merhaba, Telefondan giriyorum şuanda detaylı bakamıyorum ama. Eğer konu güncel ise proxy.txt olarak bir göz atabilirsiniz.
Belki IP çekilen server IP özelliğini yitirdi. O yüzden gerekli giriş çıkış sağlayamıyor olabilir. En güzel yeni bir Proxy.txt listesi bulup, Güncelleyip tekrar denemeniz Olabilir.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:08.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net