home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / fish / prog_demos / turbotext / support / ttx_wordstar.dfn < prev   
Text File  |  1991-01-24  |  3KB  |  105 lines
  1.  
  2. /** $VER: TTX_WordStar.dfn Demo 1.0 (9.1.91)
  3.  **
  4.  ** This definition file contains keyboard definitions to emulate the WordStar
  5.  ** text editor.
  6.  **
  7.  ** Written by Martin Taillefer
  8.  **/
  9.  
  10.  
  11. KEYBOARD:
  12.  
  13.   CURSOR_UP    MoveUp
  14.   CURSOR_DOWN  MoveDown
  15.   CURSOR_RIGHT MoveRight
  16.   CURSOR_LEFT  MoveLeft
  17.   F2           SaveFile
  18.   F3           OpenFile
  19.  
  20.   CTRL-A            MovePrevWord
  21.   CTRL-C            MoveDownScr
  22.   CTRL-D            MoveRight
  23.   CTRL-E            MoveUp
  24.   CTRL-F            MoveNextWord
  25.   CTRL-G            Delete
  26.   CTRL-I            Insert "    "
  27.   CTRL-K            SetMeta2
  28.   CTRL-L            Find
  29.   CTRL-N            InsertLine
  30.   CTRL-O            NOP
  31.   CTRL-P            NOP
  32.   CTRL-Q            SetMeta
  33.   CTRL-R            MoveUpScr
  34.   CTRL-S            MoveLeft
  35.   CTRL-T            DeleteEOW
  36.   CTRL-U            NOP        /* Abort operation */
  37.   CTRL-V            SetPrefs Overstrike Toggle
  38.   CTRL-W            ExecARexxString "OPTIONS RESULTS; GetViewInfo; PARSE VAR RESULT x x x top .; GetCursorPos; PARSE VAR RESULT line .; ScrollView line-top+2"
  39.   CTRL-X            MoveDown
  40.   CTRL-Y            DeleteLine
  41.   CTRL-Z            ExecARexxString "OPTIONS RESULTS; GetViewInfo; PARSE VAR RESULT x x x top .; GetCursorPos; PARSE VAR RESULT line .; ScrollView line-top"
  42.   CTRL-CURSOR_LEFT  MovePrevWord
  43.   CTRL-CURSOR_RIGHT MoveNextWord
  44.  
  45.   META-A   OpenRequester FindChange
  46.   META-B   NOP        /* Move to start of block */
  47.   META-C   MoveEOF
  48.   META-D   MoveEOL
  49.   META-E   ExecARexxString "OPTIONS RESULTS; GetViewInfo; PARSE VAR RESULT x x x top .; Move top"
  50.   META-F   OpenRequester Find
  51.   META-I   SetPrefs AutoIndent Toggle
  52.   META-K   NOP        /* Move to end of block */
  53.   META-L   UndoLine
  54.   META-P   MoveAutomark
  55.   META-R   MoveSOF
  56.   META-S   MoveSOL
  57.   META-T   SetPrefs TabsGiveSpaces Toggle
  58.   META-X   ExecARexxString "OPTIONS RESULTS; GetViewInfo; PARSE VAR RESULT x num x top .; Move num+top-1"
  59.   META-Y   DeleteEOL
  60.   META-0   MoveBookmark 1
  61.   META-1   MoveBookmark 2
  62.   META-2   MoveBookmark 3
  63.   META-3   MoveBookmark 4
  64.   META-[   MoveMatchBkt
  65.   META-]   MoveMatchBkt
  66.   META-DEL DeleteSOL
  67.  
  68.   META2-B MarkBlk
  69.   META2-C CopyBlk
  70.   META2-D CloseDoc
  71.   META2-I ShiftRight
  72.   META2-H NOP           /* Hide/display block */
  73.   META2-K NOP           /* Mark block end */
  74.   META2-P ExecARexxMacro PrintBlk
  75.   META2-Q CloseDoc Quiet
  76.   META2-R ExecARexxString "OPTIONS RESULTS; RequestFile PROMPT '*"Select File to Insert*"'; IF RC=0 THEN DO; 'OpenClip' RESULT; IF RC = 0 THEN PasteClip; END"
  77.   META2-S SaveFile
  78.   META2-U ShiftLeft
  79.   META2-V CutBlk        /* Move block */
  80.   META2-W ExecARexxMacro SaveBlk
  81.   META2-Y DeleteBlk
  82.   META2-0 SetBookmark 1
  83.   META2-1 SetBookmark 2
  84.   META2-2 SetBookmark 3
  85.   META2-3 SetBookmark 4
  86.  
  87.   SHIFT-NP_NUML     SetMode Toggle
  88.   MODE-NP_INS       SetPrefs Overstrike Toggle
  89.   MODE-NP_END       MoveEOL
  90.   MODE-NP_DOWN      MoveDown
  91.   MODE-NP_PGDN      MoveDownScr
  92.   MODE-NP_LEFT      MoveLeft
  93.   MODE-NUM_PAD-5    NOP
  94.   MODE-NP_RIGHT     MoveRight
  95.   MODE-NP_HOME      MoveSOL
  96.   MODE-NP_UP        MoveUp
  97.   MODE-NP_PGUP      MoveUpScr
  98.   MODE-NP_NUML      SetMode OFF
  99.   MODE-NP_DEL       Delete
  100.   MODE-CTRL-NP_HOME ExecARexxString "OPTIONS RESULTS; GetViewInfo; PARSE VAR RESULT x x x top .; Move top"
  101.   MODE-CTRL-NP_END  ExecARexxString "OPTIONS RESULTS; GetViewInfo; PARSE VAR RESULT x num x top .; Move num+top-1"
  102.   MODE-CTRL-NP_PGUP MoveSOF
  103.   MODE-CTRL-NP_PGDN MoveEOF
  104. #
  105.