typing in lower case

["Morris Krok" essence@xxxxxxxx]

from Morris,

          After succeeding in using Twincaps.pm, my memory
reverted to Herb Tyson's Capital.pm . This program capitalizes the first
word of the sentence making the use of the shift and caps lock redundant.
This will prevent one typing an unwanted capital. I have also written a
small macro that will capitalize the first letter of the previous word,
though you are only typing in lower case. For it to work you have to type
the first letter of the next word. Ldpm this program to a convenient letter.

  CL CL PW BC ucXC NW CH GT

  Here is Herb Tyson's program Capital.PM in encoded form. Use Decode of
U2 to decode it.

XPLeNCODE v2.0
b-gin [UNTITLED]
{<}SV09,YLGNA{27}{>}{<}LBloop{>}{<}PRYes/Lower/Go/Next/Abort{
>}{<}SX01,@upr({<}RC{>}){>}{<}SX02,{<}IS01{>}{238}{<}IS09{>}{
>}{<}IF{<}PV02{>}==3{>}{<}GLnext{>}[cr|lf]{<}EI{>}{<}IF{<}PV0
2{>}>3{>}[BC_][GT_]{<}PRAborted{>}{<}EX{>}[cr|lf]{<}EI{>}{<}I
F{<}PV02{>}==2{>}{<}GLGo{>}[cr|lf]{<}EI{>}{<}IF{<}PV02{>}==1{
>}[BC_]lc[cr|lf]{<}GLnext{>}[cr|lf]{<}EI{>}{<}LBGo{>}[BC_]uc[
cr|lf]{<}LBnext{>}[NW_][NS_][BC_]se .[WA_].[cr|lf]{<}IF{<}ER{
>}{>}{<}GLnomore{>}[cr|lf]{<}EI{>}[CL_]{<}IF{<}PV02{>}==2{>}{
<}GLGo{>}[cr|lf]{<}EI{>}{<}GLloop{>}[cr|lf]{<}LBnomore{>}[BC_
][GT_]{<}PRNo more{>}{<}EX{>}

XPLeNCODE