Mine

on *:TEXT:*:#Log1x:{
  if ($1 == %trigger $+ aop) {
    if ($ulevel >= 4) {
      if ($2 == $null) { msg $chan %left Addop %mid Incorrect syntax. %trigger $+ aop <add/list> [nick] | halt }
      if ($2 == add) && ($3) {
        hadd -m users $address($2,1) 1
hsave users users.db
        mode $chan +o $2
      }
elseif ($2 == remove) && ($3) {
hdel -m users $address($2,1)
hsave users users.db
mode $chan -ov $2
}
}
elseif ($2 == list) {
var %x 1
while (%x <= $hget(0).data) {
set %list1 $hget(%x).data
notice $nick List %list1
}
  }
  elseif ($1 == %trigger $+ vop) {
    if ($ulevel >= 4) {
      if ($2 == $null) { msg $chan %left Add Voice %mid Incorrect syntax. %trigger $+ vop <add/remove/list> [nick] | halt }
      if ($2 == add) && ($3) {
        hadd -m users $address($2,1) 1
hsave users users.db
        mode $chan +v $2
      }
elseif ($2 == remove) && ($3) {
        hdel -m users $address($2,1)
hsave users users.db
mode $chan -ov $2
}
}
elseif ($2 == list) {
var %x 1
while (%x <= $hget(0).data) {
set %list1 $hget(%x).data
notice $nick List %list1
}
  }
  }
}

on *:JOIN:#Log1x:{
  if ($readini(auto.ini,OP,$address($nick,2))) { 
    mode $chan +o $nick 
  }
  if ($readini(auto.ini,VOICE,$address($nick,2))) { 
    mode $chan +v $nick 
  } 
}