home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
pascal
/
tpw
/
utils
/
tpwalt.tem
< prev
Wrap
Text File
|
1991-05-20
|
3KB
|
193 lines
/* File: TPWALT.TEM
*
* This file is a TEMC script which defines the default commands and key
* bindings of the TPW builtin editor when operating in the Alternate
* Command mode.
*/
/* Helper Macros
****************************************************************************
*/
MACRO MacPageUp
FixScreenPos;
PageUp;
FixCursorPos;
END;
MACRO MacPageDown
FixScreenPos;
PageDown;
FixCursorPos;
END;
MACRO MacBreakLine
LiteralChar(13);
CursorCharLeft;
END;
MACRO MacScrollDown
ScrollScreenDown;
FixCursorPos;
END;
MACRO MacDeleteLine
DeleteLine;
LeftOfLine;
END;
MACRO MacScrollUp
ScrollScreenUp;
FixCursorPos;
END;
MACRO MacGoto0
MoveToMark(0);
CenterFixScreenPos;
END;
MACRO MacGoto1
MoveToMark(1);
CenterFixScreenPos;
END;
MACRO MacGoto2
MoveToMark(2);
CenterFixScreenPos;
END;
MACRO MacGoto3
MoveToMark(3);
CenterFixScreenPos;
END;
MACRO MacGoto4
MoveToMark(4);
CenterFixScreenPos;
END;
MACRO MacGoto5
MoveToMark(5);
CenterFixScreenPos;
END;
MACRO MacGoto6
MoveToMark(6);
CenterFixScreenPos;
END;
MACRO MacGoto7
MoveToMark(7);
CenterFixScreenPos;
END;
MACRO MacGoto8
MoveToMark(8);
CenterFixScreenPos;
END;
MACRO MacGoto9
MoveToMark(9);
CenterFixScreenPos;
END;
/* Key Bindings
****************************************************************************
*/
/* Control
*/
ctrl-A : WordLeft;
ctrl-C : MacPageDown;
ctrl-D : CursorSwitchedRight;
ctrl-E : CursorUp;
ctrl-F : WordRight;
ctrl-G : DeleteChar;
ctrl-H : BackspaceDelete;
ctrl-I : SmartTab;
ctrl-L : RepeatSearch;
ctrl-N : MacBreakLine;
ctrl-P : QuoteChar;
ctrl-R : MacPageUp;
ctrl-S : CursorSwitchedLeft;
ctrl-T : DeleteWord;
ctrl-V : ToggleInsert;
ctrl-W : MacScrollDown;
ctrl-X : CursorDown;
ctrl-Y : MacDeleteLine;
ctrl-Z : MacScrollUp;
/* Control-K
*/
ctrl-K+^B : ShiftOn;
ctrl-K+^C : ClipPaste;
ctrl-K+^H : ShiftOff;
ctrl-K+^I : IndentBlock;
ctrl-K+^K : ShiftOffWithCopy;
ctrl-K+^R : ReadBlock;
ctrl-K+^S : SaveFile;
ctrl-K+^U : OutdentBlock;
ctrl-K+^V : ShiftOffWithCut;
ctrl-K+^W : WriteBlock;
ctrl-K+^Y : ClipClear;
ctrl-K+0 : SetMark(0);
ctrl-K+1 : SetMark(1);
ctrl-K+2 : SetMark(2);
ctrl-K+3 : SetMark(3);
ctrl-K+4 : SetMark(4);
ctrl-K+5 : SetMark(5);
ctrl-K+6 : SetMark(6);
ctrl-K+7 : SetMark(7);
ctrl-K+8 : SetMark(8);
ctrl-K+9 : SetMark(9);
/* Control-Q
*/
ctrl-Q+^A : Replace;
ctrl-Q+^C : EndCursor;
ctrl-Q+^D : RightOfLine;
ctrl-Q+^E : TopOfScreen;
ctrl-Q+^F : GetFindString;
ctrl-Q+^R : HomeCursor;
ctrl-Q+^S : LeftOfLine;
ctrl-Q+^W : ShowLastError;
ctrl-Q+^X : BottomOfScreen;
ctrl-Q+^Y : DeleteToEol;
ctrl-Q+0 : MacGoto0;
ctrl-Q+1 : MacGoto1;
ctrl-Q+2 : MacGoto2;
ctrl-Q+3 : MacGoto3;
ctrl-Q+4 : MacGoto4;
ctrl-Q+5 : MacGoto5;
ctrl-Q+6 : MacGoto6;
ctrl-Q+7 : MacGoto7;
ctrl-Q+8 : MacGoto8;
ctrl-Q+9 : MacGoto9;
ctrl-Q+^[ : MatchPairForward;
ctrl-Q+^] : MatchPairBackward;
/* Control-O
*/
ctrl-O+^F : ToggleOptimalFillMode;
ctrl-O+^I : ToggleAutoIndent;
ctrl-O+^O : CompilerOptions;
ctrl-O+^R : ToggleCursorThroughTabMode;
ctrl-O+^T : ToggleTabbingMode;
ctrl-O+^U : ToggleAutoOutdent;
/* End of Standard Bindings
****************************************************************************
*/