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