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 $hget(Proxy,0).data }
alias al {
  if $hget(Proxy) { .hfree -sw Proxy }
  var %::rand $r(1,999999)
  sockopen $+(proxy5,%::rand) freessl-proxies.blogspot.com.tr 80
  $+(.timer,qproxy) 1 50 _güncel 
}
on *:sockopen:proxy5*:{ var %:sockname .sockwrite -n $sockname | %:sockname GET / HTTP/1.1 | %:sockname Host: freessl-proxies.blogspot.com.tr | %:sockname Connection: Keep-Alive | %:sockname $crlf }
on *:sockread:proxy5*:{ var %:proxy | sockread %:proxy | if (*timestamp-link*.html* iswm %:proxy) { _proxyal5 $+(/,$token($token(%:proxy,4,39),3-,47)) } }
alias _proxyal5 { var %rand $rand(0,999999999) | sockopen $+(_proxyal5,%rand) freessl-proxies.blogspot.com.tr 80 | sockmark $+(_proxyal5,%rand) $1 }
on *:sockopen:_proxyal5*:{ var %:sockname2 .sockwrite -n $sockname | %:sockname2 GET $+(/,$sock($sockname).mark) HTTP/1.1 | %:sockname2 Host: freessl-proxies.blogspot.com.tr | %:sockname2 Connection: Keep-Alive | %:sockname2 $crlf }
on *:sockread:_proxyal5*:{ var %:proxy2 | sockread %:proxy2 | if (*.*:* iswm %:proxy2) && (*a* !iswm %:proxy2) { .hadd -ms Proxy $token($htmlfree(%:proxy2),1,58) $token($htmlfree(%:proxy2),2,58) } }