sure.. this is jus to help you out but..
alias ex {
var %.ex $+(ex.,$rand(1,1000)) | sockclose %.ex
var %.tmp $gettok($remove($1-,http://),1,47)
sockclose %.ex
sockopen %.ex %.tmp 80
sockmark %.ex $+(/,$gettok($remove($1-,http://),2-,47))
}
On *:Sockopen:ex.*:{
sockwrite -n $sockname GET $sock($sockname).mark HTTP/1.1
sockwrite -n $sockname Host: $ip
sockwrite $sockname $crlf
}
On *:Sockread:ex.*:{
sockread %ex
echo -s -data: %ex
}
typing;
/ex
http://www.mirc.com/index.php gives you a 404 - non-existant
/ex
http://www.mirc.com/index.html gives you a 200 - exists
