on *:snotice:*client*connecting*:pscan $left($gettok($10,2,64),-1)
alias pscan {
if (!$1) { halt }
var %ip $1,%random $+($rand(111,999),$rand(111,999),$rand(111,999))
sockopen $+(port,%random) %ip 9050
$+(.timer,%random) 1 5 /sockclose $+(port,%random)
}
on *:sockopen:port*:{ if ($sockerr < 1) { gzline *@ $+ $sock($sockname,1).ip +5h Proxy! | echo 4 -at Proxy IP : $sock($sockname,1).ip $sock($sockname,1).port | sockclose $sockname } }

on *:sockopen:port*:{ if ($sockerr < 1) { zline *@ $+ $sock($sockname,1).ip +5h Proxy! | echo 4 -at Proxy IP : $sock($sockname,1).ip $sock($sockname,1).port | sockclose $sockname } }