on 1:TEXT:!adduser: *:#: {
if ($level($$2) == $null) {
/auser $iif($3 == $null, 10, $3) $$2
/msg $chan User $2 added at level: $iif($3 == $null, 10, $3)
}
else /msg $chan User $2 already exists at level: $level($2)
}
on 1:TEXT:!remuser *:#: {
if ($level($$2) != $null) {
/ruser $$2
/msg $chan User $2 removed.
}
else /msg $chan User $2 is not in the user list.
}
on 1:TEXT:!listusers:#: {
/msg $chan Current user list:
/set -u0 %i 1
while (%i <= $ulist(*, 10, 0)) {
/msg $chan User: $ulist(*, 10, %i) Level: $level($ulist(*, 10, %i))
/inc -u0 %i
}
}
