You don't need nohtml alias with regex:
on $*:text:/^([!@.])players$/iS:#:{
if (!%f) { inc -u4 %f | if ($sock(rsplayers)) { sockclose $v1 }
sockopen rsplayers www.RuneScape.com 80
sockmark rsplayers $iif(@ == $regml(1),msg #,notice $nick)
}
}
on *:SOCKOPEN:rsplayers: {
sockwrite -nt $sockname GET /title.ws HTTP/1.1
sockwrite -nt $sockname Host: www.runescape.com
sockwrite -nt $sockname
}
on *:SOCKREAD:rsplayers:{
if ($sockerr) { sockclose $sockname | halt }
var %sockreader | sockread %sockreader
if ($regex(%sockreader,/(\d+,\d+\s)/)) {
$sock($sockname).mark There are $regml(1) people currently online.
sockclose $sockname
}
}