on *:NICK:{

if (away isin $newnick) || (yok isin $newnick) || (gelcek isin $newnick) || (awy isin $newnick) || (afk isin $newnick) || (yemek isin $newnick) {

deopall

}

}

alias deopall {

var %wy $chan(0)

while %wy {

if $me isop $chan(%wy) && $newnick isop $chan(%wy) {

mode $chan(%wy) -o $newnick

}

dec %wy

}

}