IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Güncel proxy list mirc kodu çekme sorunu

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Güncel proxy list mirc kodu çekme sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/849213-proxy-list-mirc-kodu-cekme-sorunu.html)

proxy list mirc kodu çekme sorunu

merhaba arkadaşlar bir siteden mirc ile proxy çekmek istiyorum aşagıdaki kodda 0 proxy çekiyor yardımınızı bekliyorum.

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

Kod:

alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 

alias _güncel { msg %opers Proxy list güncellendi toplam4 $lines(proxy.txt) | sockclose _proxy* }

alias _al {

  var %::rand $md5($ticks)

  sockopen $+(_proxy02,%::rand) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80

  $+(.timer,qproxy) 1 60 _güncel

}

on *:sockopen:_proxy02*:{ var %:sockname2 .sockwrite -n $sockname | %:sockname2 GET /api/v1/get?type=http HTTP/1.1 | %:sockname2 Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Connection: Keep-Alive | %:sockname2 $crlf }

on *:sockread:_proxy02*:{ var %:proxy2 | sockread %:proxy2 | if (*.*:* iswm %:proxy2) && (*a* !iswm %:proxy2) { $iif(!$read(proxy.txt,w,$token($htmlfree(%:proxy2),1,58)), write proxy.txt $+($token($htmlfree(%:proxy2),1,58),:,$token($htmlfree(%:proxy2),2,58))) } }

Cevap: proxy list mirc kodu çekme sorunu

yok mu yardımcı olacak

Cevap: proxy list mirc kodu çekme sorunu

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

selam coderlerim şu kodun proxy çekmesini nasıl saglarım biraz yardımcı olmanızı bekliyorum.

Cevap: proxy list mirc kodu çekme sorunu

Merhaba codeyi mirce ekledikden sonra mirci kapatip ac guncel proxy çekip mircin ana klasörüne proxy.txt olarak atar

İyi forumlar..

Kod:

on *:start:_al

alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 

alias _güncel { echo -a Proxy list güncellendi toplam4 $lines(proxy.txt) | sockclose _proxy* | unset %* | .timercycle 1 5 kontrol }

alias _ekle {

  if $regex($1,/(\d+\.\d+\.\d+\.\d+)) {

    if !$read(proxy.txt,w,$1) { .write proxy.txt $+($1,:,$2) }

  }

}

alias _al { 

  .remove proxy.txt 

  sockclose links 

  sockopen links 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 

  $+(.timer,qproxy) 1 60 _güncel 

}

on *:sockopen:links:{ 

  sockwrite -nt $sockname GET / HTTP/1.1 

  sockwrite -nt $sockname Host: $sock($sockname).addr

  sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */*

  sockwrite -nt $sockname Accept-Language: tr-TR

  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)

  sockwrite -nt $sockname Connection: Keep-Alive

  sockwrite -nt $sockname $crlf

}

on *:sockread:links:{ 

  var %links | sockread %links | .tokenize 32 %links 

  if (*#more* iswm %links) { return }

  if (*timestamp-link*.html* iswm %links) {

    var %rand $rand(10,999999)

    .sockopen $+(ipal,%rand) $sock($sockname).addr 80

    .sockmark $+(ipal,%rand) $token($token(%links,3-5,47),1,39)

  }

}

on *:sockopen:ipal*:{ 

  sockwrite -nt $sockname GET $+(/,$sock($sockname).mark) HTTP/1.1 

  sockwrite -nt $sockname Host: $sock($sockname).addr

  sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */*

  sockwrite -nt $sockname Accept-Language: tr-TR

  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)

  sockwrite -nt $sockname Connection: Keep-Alive

  sockwrite -nt $sockname $crlf

}

on *:sockread:ipal*:{ 

  var %ipal | sockread %ipal | .tokenize 32 %ipal 

  if (*.*.*:* iswm %ipal) && (*a* !iswm %ipal) { 

    _ekle $token(%ipal,1,58) $token(%ipal,2,58) 

  }

}

Cevap: proxy list mirc kodu çekme sorunu

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] o site bende mevcut, benim verdigim siteden proxyleri çekebilirmisin.

Cevap: proxy list mirc kodu çekme sorunu

Bu site için hazır yazdığım bi kod vardı fakat şuan şehir dışında olduğum için yardımcı olamıyorum mobilden yazmak için baya zaman harcamam gerekecek ve o kadar zamanım yok maalesef eve dönünce yardımcı olabilirim

Cevap: proxy list mirc kodu çekme sorunu

sockopen links [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 burayı değiştirdiniz mi ?

Cevap: proxy list mirc kodu çekme sorunu

Alıntı:

diEfoRyoU Nickli Üyeden Alıntı (Mesaj 1042223990)

bekliyorum hocam yardımlarınızı

Cevap: proxy list mirc kodu çekme sorunu

Alıntı:

curl Nickli Üyeden Alıntı (Mesaj 1042215299)

Kod:

alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 

alias _güncel { msg %opers Proxy list güncellendi toplam4 $lines(proxy.txt) | sockclose _proxy* }

alias _al {

  var %::rand $md5($ticks)

  sockopen $+(_proxy02,%::rand) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80

  $+(.timer,qproxy) 1 60 _güncel

}

on *:sockopen:_proxy02*:{ var %:sockname2 .sockwrite -n $sockname | %:sockname2 GET /api/v1/get?type=http HTTP/1.1 | %:sockname2 Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Connection: Keep-Alive | %:sockname2 $crlf }

on *:sockread:_proxy02*:{ var %:proxy2 | sockread %:proxy2 | if (*.*:* iswm %:proxy2) && (*a* !iswm %:proxy2) { $iif(!$read(proxy.txt,w,$token($htmlfree(%:proxy2),1,58)), write proxy.txt $+($token($htmlfree(%:proxy2),1,58),:,$token($htmlfree(%:proxy2),2,58))) } }

Merhaba uzun süredir girmiyordum. Sanırım cevap veren olmamış.

Öncelikle kullandığınız site, SSL kullanıyor. Bu da eğer socket oluşturmak istiyorsanız, güvenli bağlantı protokolü ile hareket etmeniz gerektiği anlamına gelir. Socket parametrelerini incelemenizi tavsiye ederim.
Standart bir HTTP protokolünün portu 80, standart bir güvenli protokol(SSL)'in portu 443'tür. Mirc Scripting üzerinde socketlerde kullanılan "e" anahtarı socket üzerinde güvenli bağlantı açmanızı sağlar. Öyleyse;

kodunuzda bulunan,

Kod:

  sockopen $+(_proxy02,%::rand) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80

satırını

Kod:

sockopen -e $+(_proxy02,%::rand) proxy-list.download 443

olarak değiştirmeniz yeterli olacaktır.Mirc 7.58 versiyonunda denedim, çalışıyor. Daha fazla kaynak için:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: proxy list mirc kodu çekme sorunu

Bana 6.35 sürümüne göre lazım 7.58 kullanmıyorum.. Bu kodu bana hawkee sitesinden yardımcı oldular.

http://hawkee.com/snippet/20629/#c134750