proc delop_pub {nick uhost hand chan text} {
    global globflags chanflags
    if {![matchattr [nick2hand $nick] $globflags]} {
        putserv "PRIVMSG $chan :Error! You don't have access to this script ${nick}!"
        return
    }

    set target [lindex [split $text] 0]
    set handle [nick2hand $target]

    if {![validuser $handle]} {
        putserv "PRIVMSG $chan :Error! $target doesn't exist in my database"
        return
    }

    if {![matchattr $handle |$chanflags $chan]} {
        putserv "PRIVMSG $chan :Error! $target is not OP on $chan"
        return
    }

    set hasop 0
    foreach other [channels] {
        if {[matchattr $handle |$chanflags $other]} {
            set hasop 1
        }
    }

    set hasmaster [matchattr $handle $globflags]
    if {$hasmaster && $hasop} {
        chattr $target |-o $chan
        return
    }

    if {!$hasmaster && !$hasop} {
        deluser $target
        return
    }
}