on *:TEXT:!clear:#: {
if ($nick(#,$nick,~&) || ($me(#,$me,~&) {
msg /clear
msg $chan the chat has ben cleared by ( $nick ) }
else { 
describe $chan Sorry $nick but you cant use this command ! only owner can use it ! }
}

Can be too ;)
}