on 1:TEXT:-slotstatus:#: {
  .msg $chan 4,1|0 Currently in $chan(0) Channels, and $calc(20-$chan(0)) available. 4|
}
}

on *:TEXT:-auser *:#: { 
if ($ulevel >= 5) {
  /auser $2-
}
else {
  notice $nick Sorry $nick $+ , you do not have enough access for this command.
}
}