Another script:
Code:
on *:text:.rizon:#:{ sockclose rizon. $+ $chan | sockopen rizon. $+ $chan rizon.net 80 }
on *:sockopen:rizon.*:{
sockwrite -n $sockname GET /vbulletin/index.php HTTP/1.1
sockwrite -n $sockname Host: rizon.net $+ $crlf $+ $crlf
}
on *:sockread:rizon.*:{
if ($sockerr) {
echo -a Error.
halt
}
else {
var %temptext
sockread %temptext
if (%temptext == $null) %temptext = -
if (*<a href="online.php*">Currently Active Users</a>: * $chr(40) $+ * members and * guests $+ $chr(41) $+ * iswm %temptext) {
msg $gettok($sockname,2,46) $remove($htmlfree(%temptext),$chr(9))
}
if (*member.php?*u=* iswm %temptext) {
if (*newest* !iswm %temptext) {
msg $gettok($sockname,2,46) Online: $remove($htmlfree(%temptext),$chr(9))
}
}
}
}
alias -l htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}
When someone types .rizon in a channel, it will tell you how many users there are online at the forums, and who those users are
Again, thanks wild, for helping me fixing some stuff ><