Imrac commented on a Page, Sentence ender/capitalization - Sep 20, 2008

#sent.comp on
on *:INPUT:*:{ if (/* !iswm $1-) && ($active != Status Window) { msg $active $regsubex($regsubex($1-,/^((?:\x03\d{0,2}(?:,\d{0,2})?|\x02|\x1f|\x22)*(?:[a-z]))/, $upper(\t)), /([^.?!])$/, \t $+ $chr(46)) | halt } }
#sent.comp end

menu channel,status,query {
  Sentance Completer
  .$iif($group(#sent.comp).status  == on, Disable, Enable) : $iif($group(#sent.comp).status  == on, .disable #sent.comp, .enable #sent.comp)
}

My version of it, handles colors, punctuation at the end, updated menu

Respond