alias Spy {
set %spy spy $+ $rand(10,99) $+ $rand(10,99)
set %spy.j #spy $+ $rand(10,99) $+ $rand(10,99)
sockopen spy $$?"HTTP Proxy Address" $$?"HTTP Proxy Port"
}
on *:sockopen:spy: {
sockwrite $sockname $+(CONNECT irc.network.net.com:6667 HTTP/1.1,$crlf,$crlf)
}
on *:sockread:spy: {
sockread %tmp
if (HTTP/1.0 200 isin %tmp) {
sockwrite -n $sockname NICK %spy
sockwrite -n $sockname USER $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) : %spy
sockwrite -n $sockname join %spy.j
}
if ($gettok(%tmp,2,32) == 001) {
echo Connected
}
if ($gettok(%tmp,1,32) == ping) { sockwrite -n $sockname PONG $gettok(%tmp,2-,32) }
}