proc clvl {nick uhost hand chan text} {
  set opfer [lindex [split $text] 0]
  set level [lindex [split $text] 1]
  set account [nick2hand $opfer]
  set accesslevel [access $hand $chan]
  if {$account == "" || $account == "*"} {
    set host [string trimleft [getchanhost $opfer $chan] ~]
    set handle [lindex [split $host .@] 1]
    set host *!*@$handle.*
    adduser $handle $host
    putquick "NOTICE $nick :$handle wurde hinzugefügt."
    set account $handle
  }
    set access [access $account $chan]
    switch -exact -- $level {
      "" {
        putquick "NOTICE $nick :Ungültiger Level"
      }
      "500" {
        if {$accesslevel == "600"} {
          chattr $account |-aofmgv $chan
          chattr $account |+aofm $chan
          channel set $chan owner "$account"
          putquick "NOTICE $nick :$opfer ($account) hat nun 500 Access in $chan"
        } else {
          putquick "NOTICE $nick :Du hast nicht genug Access."
        }
      }
    "400" {
      if {$accesslevel >= "500"} {
        chattr $account |-aofmgv $chan
        chattr $account |+aofm $chan
        if { [access $account $chan] == "500" } {
          channel set $chan owner "m0wlwurf`"
        }
        putquick "NOTICE $nick :$opfer ($account) hat nun 400 Access in $chan"
      } else {
        putquick "NOTICE $nick :Du hast nicht genug Access."
      }
    }
    "300" {
      if {$accesslevel >= "400"} {
        chattr $account |-aofmgv $chan
        chattr $account |+aof $chan
        if { [access $account $chan] == "500" } {
          channel set $chan owner "m0wlwurf`"
        }
        putquick "NOTICE $nick :$opfer ($account) hat nun 300 Access in $chan"
      } else {
        putquick "NOTICE $nick :Du hast nicht genug Access."
      }
    }
    "200" {
      if {$accesslevel >= "300"} {
        chattr $account |-aofmgv $chan
        chattr $account |+ao $chan
        if { [access $account $chan] == "500" } {
          channel set $chan owner "m0wlwurf`"
        }
        putquick "NOTICE $nick :$opfer ($account) hat nun 200 Access in $chan"
      } else {
        putquick "NOTICE $nick :Du hast nicht genug Access."
      }
    }
    "100" {
      if {$accesslevel >= "300"} {
        chattr $account |-aofmgv $chan
        chattr $account |+gv $chan
        if { [access $account $chan] == "500" } {
          channel set $chan owner "m0wlwurf`"
        }
        putquick "NOTICE $nick :$opfer ($account) hat nun 100 Access in $chan"
        } else {
          putquick "NOTICE $nick :Du hast nicht genug Access."
        }
      }
  }
}