<<>> <> <> <> <> <> <> <<>> OPTIONS Fast; [DEF,CTRL,(Ctrl Down | Spare3 Down)] [DEF,IfCaretAtEnd,(~1 Down WHILE CaretAtEndOfTypescript => Char)] [DEF,CtrlChar,(~1 Down WHILE Ctrl Down WHILE CaretAtEndOfTypescript => Char)] <> SELECT TRIGGER FROM [IfCaretAtEnd,ESC]; [IfCaretAtEnd,LF]; Return Down WHILE CaretAtEndOfTypescript => "\012"; [CtrlChar,A]; [CtrlChar,B]; [CtrlChar,C]; [CtrlChar,D]; <<[CtrlChar,E]; -- want expand to work at end of typescript>> [CtrlChar,F]; [CtrlChar,G]; [CtrlChar,H]; [CtrlChar,I]; [CtrlChar,J]; [CtrlChar,K]; [CtrlChar,L]; [CtrlChar,M]; [CtrlChar,N]; [CtrlChar,O]; <<[CtrlChar,P]; -- want paste to work at end of typescript>> [CtrlChar,Q]; [CtrlChar,R]; [CtrlChar,S]; [CtrlChar,T]; [CtrlChar,U]; [CtrlChar,V]; [CtrlChar,W]; [CtrlChar,X]; [CtrlChar,Y]; [CtrlChar,Z]; < BackSpace; -- see who gripes>> Help Down => "\277"; -- Meta-?, invokes completion querying in the Commander ENDCASE.