[curl]

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:   Kodu kopyalamak için üzerine çift tıklayın!

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))) } }

[curl]

yok mu yardımcı olacak

[curl]

@[Ü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.

[OperServ]

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

İyi forumlar..

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

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) 
  }
}

[curl]

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

[diEfoRyoU]

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

[MorfiN]

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

[curl]

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

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

bekliyorum hocam yardımlarınızı

[SuLh]

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

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:   Kodu kopyalamak için üzerine çift tıklayın! 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:   Kodu kopyalamak için üzerine çift tıklayın!

  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:   Kodu kopyalamak için üzerine çift tıklayın!

  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...]

[curl]

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