Evet çekiliyor, mIRC 6.35'te denedim.
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 { echo -a Proxy list güncellendi toplam4 $lines(proxy.txt) | sockclose _proxy* }
alias _al {
var %::rand $md5($ticks)
sockopen -e $+(_proxy02,%::rand) api.proxyscrape.com 443
$+(.timer,qproxy) 1 60 _güncel
}
on *:sockopen:_proxy02*:{
var %:sockname2 .sockwrite -n $sockname
%:sockname2 GET /?request=displayproxies&proxytype=http&timeout=10000&country=all&anonymity=all&ssl=all HTTP/1.1
%:sockname2 Host: api.proxyscrape.com
%:sockname2 Connection: Keep-Alive
%:sockname2 $crlf $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))) }
}
Kod: Kodu kopyalamak için üzerine çift tıklayın!
Proxy list guncellendi toplam 2437
Yalnız, daha önce bahsettiğim OpenSSL kütüphanesini kurmadıysanız muhtemelen çalışmayabilir, eğer çalışmaz ise önceki postta belirttiğim, forumda mevcut olan şu konuya göz atıp ilgili dll'leri sisteme atın.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]