on *:sockopen:blah:{
if ($sockerr) return
sockwrite -n $sockname GET /download.asp?id=9855 HTTP/1.1
sockwrite -n $sockname Accept: */*
sockwrite -n $sockname Accept-Language: en-us
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
sockwrite -n $sockname Host: $sock($sockname).ip
sockwrite -n $sockname Connection: Close
sockwrite -n $sockname $crlf
}
on *:sockread:blah:{
if ($sockerr) return
:read
sockread %tmp
; sockread &bvar
if (!$sockbr) return
if (!%tmp) %tmp = -
; if ($bfind(&bvar,1,Content-Type:).text) { %chk = 1 }
; if (%chk) { bwrite mirc616.exe -1 &bvar }
; write temp.txt %tmp
echo -s %tmp
goto read
}
on *:sockclose:blah:echo -s * closed socket