alias portt { if $sock(portt) { sockclose portt }
sockopen portt [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
on *:sockopen:portt: { 
  sockwrite -n $sockname GET /tor.shtml HTTP/1.1
  sockwrite -n $sockname Host: proxy.org  $+ $crlf $+ $crlf
}
on *:sockread:portt: { 
  var %> 
  sockread %> 
  if *.*.*</SMALL></TD>* iswm %> {
    write proxyport.txt $remove(%>,<TD><SMALL>,</SMALL></TD>,$chr(9))
  }
}