on *:TEXT:.d:#: {
if ($nick($chan,$nick,oh)) {
mode $chan $+(-,$iif($nick isop $chan,o,h)) $nick
$iif($nick !isvoice $chan,mode $chan +v $nick)
}
}