[TheVoidz]

;==[irc chatter nicklist vb forum upload script begin]=====================
/getnicks { var %x = 1
write -c nicks.php <? $chr(36) $+ ircnicks = "
while (%x <= $nick(#channel,0)) {
if ($nick(#channel,%x) isop #channel) {
write -a nicks.php <font color="#FF0000">@ $+ $nick(#channel,%x) $+ </font> $+ , }
elseif ($nick(#channel,%x) ishop #channel) {
write -a nicks.php <font color="#FF0000"> $+ $chr(37) $+ $nick(#channel,%x) $+ </font> $+ , }
elseif ($nick(#channel,%x) isvoice #channel) {
write -a nicks.php <font color="#00FF00"> $+ $chr(43) $+ $nick(#channel,%x) $+ </font> $+ , }
else { write -a nicks.php $nick(#channel,%x) $+ , }
inc %x
}
set %lastnick $read(nicks.php,$lines(nicks.php))
write -d $+ $lines(nicks.php) nicks.php
set %lastnickchars $calc($len(%lastnick) - 1)
set %nocommanick $left(%lastnick,%lastnickchars)
write -a nicks.php %nocommanick
write -a nicks.php " $+ $chr(59)
set %totalnicks $calc($lines(nicks.php) - 2)
if (%record.users == $null) { set %record.users $nick(#channel,0) }
else {
if ($nick(#channel,0) > %record.users) {
set %record.users $nick(#channel,0)
}
}
write -a nicks.php $chr(36) $+ mostnicks = $chr(34) $+ %record.users $+ $chr(34) $+ $chr(59)
write -a nicks.php $chr(36) $+ totalnicks = $chr(34) $+ %totalnicks $chr(34) $+ $chr(59) ?>
/ftp.upload -dfl ftp.yourserver.com ftplogin ftppassword /path/to/forum/nicks.php c:\path\to\mirc\nicks.php
}
;==[irc chatter nicklist vb forum upload script end]=====================

Replace this with your other mIRC Aliases

Will work assuming your forum default text color is black.