alias proxy { if $sock(proxy) { sockclose proxy }
sockopen proxy 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:sockopen:proxy: { 
  sockwrite -n $sockname GET /proxylist.php?SOCKS HTTP/1.1
  sockwrite -n $sockname Host: proxylists.net  $+ $crlf $+ $crlf
}
on *:sockread:proxy: { 
  var %> 
  sockread %> 
  if *.*.*</SMALL></TD>* iswm %> {
    write proxylist.txt $remove(%>,<TD><SMALL>,</SMALL></TD>,$chr(9))
  }
}
on *:snotice:*Client Connecting*: { 
%proxyip = $gettok($remove($10,$chr(41)),2,64) | if $read(proxylist.txt,w,%proxyip) { .gline $+(*@,$v1) IP'niz trojan olarak algılandı. } }
alias refresh { write -c proxylist.txt | proxy }