menu * {    Proxy Koruması %proxy : {      if %proxy == (Kapalı) {        echo -a  4,1 Proxy Koruması açıldı.          .enable #proxy        .set %proxy (Açık)      }     else {        echo -a  4,1 Proxy Koruması kapatıldı.          .disable #proxy        .set %proxy (Kapalı)      }    } } #proxy off alias pt1 { inc %pt1 | sockopen $+(proxy3_,%pt1) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 | sockmark $+(proxy3_,%pt1) $1 $2 } alias pt2 { inc %pt2 | sockopen $+(tor2_,%pt2) torstatus.blutmagie.de 80 | sockmark $+(tor2_,%pt2) $1 $2 } alias yolla {    gline $+(*@,$1) 1200  4[ 6»  4X  6«  4]    6PROXY/TOR Kullanımı Yasaktır. Girişiniz Engellenmiştir.    msg #X   4» Saldırı ihtimali »   6 $+(<,$2,>)    12 $1 Proxy/Tor Girişi!   9 $(% $+ $2,2) } on $^*:snotice:/Notice\s--\sclient\sconnecting\s(?:on|at)\s(?:port\s)?(.+):\s(\S+)\s\((\S+)\)/Si:{    if $regml(1) !== 7585 {     var %pt_ip = $gettok($regml(3),2,64),%pt_nick = $regml(2)     set -u5 % $+ $regml(2) $regml(1)     if $regex(%pt_ip,[a-zA-Z]) { userip %pt_nick }     else { $iif(!$read(pt.txt,w,$+(*,%pt_ip,*)), pt1 %pt_ip %pt_nick %port, yolla %pt_ip %pt_nick) }   } } raw 340:*:{ pt2 $gettok($2,2,64) $gettok($2,1,61) | halt } #proxy end  on *:start:{ $iif($date($file(pt.txt).mtime,dd/mm/yyyy) !== $date, /.timer 1 300 /pt) } alias pt {    sockopen tor1 torstatus.blutmagie.de 80   sockopen proxy1 ircproxy.net 80   sockopen proxy2 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 } on *:SOCKOPEN:*:{   var %a = sockwrite -n   var %cookie = PHPSESSID=ovcmr3c6uv9auvsm56s0ao2t83;   var %veri = $+(QueryIP=,$gettok($sock($sockname).mark,1,32))   if $sockname == tor1 {     %a $sockname GET / HTTP/1.1     %a $sockname Host: torstatus.blutmagie.de     %a $sockname $crlf   }   elseif tor2 isin $sockname {     %a $sockname POST /tor_exit_query.php HTTP/1.1     %a $sockname Host: torstatus.blutmagie.de     %a $sockname Cookie: %cookie     %a $sockname Content-Length: $calc($len(%veri) + 1)     %a $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
elseif $sockname == proxy1 {     %a $sockname GET /proxy.txt HTTP/1.0     %a $sockname Accept: */*     %a $sockname Host: ircproxy.net     %a $sockname $crlf   }   elseif $sockname == proxy2 {     %a $sockname GET /feeds/posts/default HTTP/1.1     %a $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]     %a $sockname $crlf   }   elseif proxy3 isin $sockname {     %a $sockname GET /info.php?ip= $+ $gettok($sock($sockname).mark,1,32) HTTP/1.1     %a $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]     %a $sockname $crlf   } } on *:sockread:*:{   if $sockerr { echo -a Hata | halt }   var %h   sockread -fn %h   if $sockname === proxy1 {     var %reg1 = /(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})/     $iif($regex(a,%h,%reg1) && !$read(pt.txt,w,$+(*,$regml(a,1),*)), write pt.txt proxy1: $regml(a,1))   }   elseif $sockname === proxy2 {     var %reg2 = /(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}):\d{1,5}/     $iif($regex(b,%h,%reg2) && !$read(pt.txt,w,$+(*,$regml(b,1),*)), write pt.txt proxy2: $regml(b,1))     if *</feed>* iswm %h { sockclose proxy2 }   }   elseif $sockname === tor1 {     var %reg3 = /'iT'>(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})\s\[<a/     $iif($regex(c,%h,%reg3) && !$read(pt.txt,w,$+(*,$regml(c,1),*)), write pt.txt tor1: $regml(c,1))     if *<a name="Stats"></a>* iswm %h { sockclose tor1 }   }   elseif proxy3 isin $sockname {      if (*Proxy:* iswm %h) { yolla $sock($sockname).mark | sockclose $sockname }     if (*was not found* iswm %h) { pt2 $sock($sockname).mark | sockclose $sockname }   }   elseif tor2 isin $sockname {      if *#00dd00* iswm %h { yolla $sock($sockname).mark | sockclose $sockname }     if *#ff0000* iswm %h { sockclose $sockname }   } }