home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / tpwinst / utils.pak / TPWALT.TEM < prev   
Text File  |  1991-05-21  |  3KB  |  193 lines
  1. /* File: TPWALT.TEM
  2.  *
  3.  * This file is a TEMC script which defines the default commands and key
  4.  * bindings of the TPW builtin editor when operating in the Alternate
  5.  * Command mode.
  6.  */
  7.  
  8.  
  9. /* Helper Macros
  10.  ****************************************************************************
  11.  */
  12.  
  13. MACRO    MacPageUp
  14.         FixScreenPos;
  15.         PageUp;
  16.         FixCursorPos;
  17. END;
  18.  
  19. MACRO    MacPageDown
  20.         FixScreenPos;
  21.         PageDown;
  22.         FixCursorPos;
  23. END;
  24.  
  25. MACRO    MacBreakLine
  26.         LiteralChar(13);
  27.         CursorCharLeft;
  28. END;
  29.  
  30. MACRO    MacScrollDown
  31.         ScrollScreenDown;
  32.         FixCursorPos;
  33. END;
  34.  
  35. MACRO    MacDeleteLine
  36.         DeleteLine;
  37.         LeftOfLine;
  38. END;
  39.  
  40. MACRO    MacScrollUp
  41.         ScrollScreenUp;
  42.         FixCursorPos;
  43. END;
  44.  
  45. MACRO    MacGoto0
  46.         MoveToMark(0);
  47.         CenterFixScreenPos;
  48. END;
  49.  
  50. MACRO    MacGoto1
  51.         MoveToMark(1);
  52.         CenterFixScreenPos;
  53. END;
  54.  
  55. MACRO    MacGoto2
  56.         MoveToMark(2);
  57.         CenterFixScreenPos;
  58. END;
  59.  
  60. MACRO    MacGoto3
  61.         MoveToMark(3);
  62.         CenterFixScreenPos;
  63. END;
  64.  
  65. MACRO    MacGoto4
  66.         MoveToMark(4);
  67.         CenterFixScreenPos;
  68. END;
  69.  
  70. MACRO    MacGoto5
  71.         MoveToMark(5);
  72.         CenterFixScreenPos;
  73. END;
  74.  
  75. MACRO    MacGoto6
  76.         MoveToMark(6);
  77.         CenterFixScreenPos;
  78. END;
  79.  
  80. MACRO    MacGoto7
  81.         MoveToMark(7);
  82.         CenterFixScreenPos;
  83. END;
  84.  
  85. MACRO    MacGoto8
  86.         MoveToMark(8);
  87.         CenterFixScreenPos;
  88. END;
  89.  
  90. MACRO    MacGoto9
  91.         MoveToMark(9);
  92.         CenterFixScreenPos;
  93. END;
  94.  
  95.  
  96.  
  97. /* Key Bindings
  98.  ****************************************************************************
  99.  */
  100.  
  101.  
  102. /* Control
  103.  */
  104.  
  105. ctrl-A         : WordLeft;
  106. ctrl-C         : MacPageDown;
  107. ctrl-D         : CursorSwitchedRight;
  108. ctrl-E         : CursorUp;
  109. ctrl-F         : WordRight;
  110. ctrl-G         : DeleteChar;
  111. ctrl-H         : BackspaceDelete;
  112. ctrl-I         : SmartTab;
  113. ctrl-L         : RepeatSearch;
  114. ctrl-N         : MacBreakLine;
  115. ctrl-P         : QuoteChar;
  116. ctrl-R         : MacPageUp;
  117. ctrl-S         : CursorSwitchedLeft;
  118. ctrl-T         : DeleteWord;
  119. ctrl-V         : ToggleInsert;
  120. ctrl-W         : MacScrollDown;
  121. ctrl-X         : CursorDown;
  122. ctrl-Y         : MacDeleteLine;
  123. ctrl-Z         : MacScrollUp;
  124.  
  125.  
  126. /* Control-K
  127.  */
  128.  
  129. ctrl-K+^B     : ShiftOn;
  130. ctrl-K+^C     : ClipPaste;
  131. ctrl-K+^H     : ShiftOff;
  132. ctrl-K+^I     : IndentBlock;
  133. ctrl-K+^K     : ShiftOffWithCopy;
  134. ctrl-K+^R     : ReadBlock;
  135. ctrl-K+^S     : SaveFile;
  136. ctrl-K+^U     : OutdentBlock;
  137. ctrl-K+^V     : ShiftOffWithCut;
  138. ctrl-K+^W     : WriteBlock;
  139. ctrl-K+^Y     : ClipClear;
  140. ctrl-K+0     : SetMark(0);
  141. ctrl-K+1     : SetMark(1);
  142. ctrl-K+2     : SetMark(2);
  143. ctrl-K+3     : SetMark(3);
  144. ctrl-K+4     : SetMark(4);
  145. ctrl-K+5     : SetMark(5);
  146. ctrl-K+6     : SetMark(6);
  147. ctrl-K+7     : SetMark(7);
  148. ctrl-K+8     : SetMark(8);
  149. ctrl-K+9     : SetMark(9);
  150.  
  151.  
  152. /* Control-Q
  153.  */
  154.  
  155. ctrl-Q+^A     : Replace;
  156. ctrl-Q+^C     : EndCursor;
  157. ctrl-Q+^D     : RightOfLine;
  158. ctrl-Q+^E     : TopOfScreen;
  159. ctrl-Q+^F     : GetFindString;
  160. ctrl-Q+^R     : HomeCursor;
  161. ctrl-Q+^S     : LeftOfLine;
  162. ctrl-Q+^W     : ShowLastError;
  163. ctrl-Q+^X     : BottomOfScreen;
  164. ctrl-Q+^Y     : DeleteToEol;
  165. ctrl-Q+0     : MacGoto0;
  166. ctrl-Q+1     : MacGoto1;
  167. ctrl-Q+2     : MacGoto2;
  168. ctrl-Q+3     : MacGoto3;
  169. ctrl-Q+4     : MacGoto4;
  170. ctrl-Q+5     : MacGoto5;
  171. ctrl-Q+6     : MacGoto6;
  172. ctrl-Q+7     : MacGoto7;
  173. ctrl-Q+8     : MacGoto8;
  174. ctrl-Q+9     : MacGoto9;
  175. ctrl-Q+^[     : MatchPairForward;
  176. ctrl-Q+^]     : MatchPairBackward;
  177.  
  178.  
  179. /* Control-O
  180.  */
  181.  
  182. ctrl-O+^F     : ToggleOptimalFillMode;
  183. ctrl-O+^I     : ToggleAutoIndent;
  184. ctrl-O+^O     : CompilerOptions;
  185. ctrl-O+^R     : ToggleCursorThroughTabMode;
  186. ctrl-O+^T     : ToggleTabbingMode;
  187. ctrl-O+^U     : ToggleAutoOutdent;
  188.  
  189.  
  190. /* End of Standard Bindings
  191.  ****************************************************************************
  192.  */
  193.