Code:
on *:input:*:{
if (!$istok(/ $comchar,$left($1,1),32)) && (!$ctrlenter) {
 if ($regsubex($replacecs($1-,É,E,Ê,E),/^ +| +$/g,) != $null) {
   msg $qt($active) $v1
   halt
  }
 }
}

#mircscripting @ irc.swiftirc.net == the best mIRC help channel