home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / text_dtp / editor / turbotext / support / ttx_emul_ed.dfn < prev    next >
Text File  |  1995-07-10  |  3KB  |  81 lines

  1.  
  2. /** $VER: TTX_Emul_Ed.dfn 2.0 (19.6.94)
  3.  **
  4.  ** This definition file contains menu, keyboard and mouse definitions to
  5.  ** emulate the AmigaDOS 2.0 ED editor.
  6.  **/
  7.  
  8.  
  9. MENUS:
  10.  
  11.   MENU "Project"
  12.     ITEM "Open..."    "ESCop" OpenFile
  13.     BAR
  14.     ITEM "Save"       "ESCsa" SaveFile
  15.     ITEM "Save As..." "ESCsa" SaveFileAs
  16.     BAR
  17.     ITEM "About"      "ESCsh" OpenRequester Info
  18.     ITEM "Quit"       "ESCq"  CloseDoc
  19.  
  20.   MENU "Movement"
  21.     ITEM "Top"               "ESCt"  MoveSOF
  22.     ITEM "Bottom"            "ESCb"  MoveEOF
  23.     BAR
  24.     ITEM "Find..."           "ESCh"  OpenRequester Find
  25.     ITEM "Backwards Find..." "ESCbf" OpenRequester Find
  26.  
  27.   MENU "Edit"
  28.     ITEM "Delete Line"   "ESCd"  DeleteLine
  29.     ITEM "Query-Replace" "ESCeq" OpenRequester FindChange
  30.     BAR
  31.     ITEM "Redisplay"     "ESCvw" UpdateView
  32.  
  33.   MENU "Prefs"
  34.     ITEM "Change..."           "" OpenRequester Prefs
  35.     BAR
  36.     ITEM "Open Prefs..."       "" OpenPrefs
  37.     ITEM "Save Prefs As..."    "" SavePrefs
  38.     ITEM "Save As Defaults"    "" SaveDefPrefs
  39.     BAR
  40.     ITEM "Open Definitions..." "" OpenDefinitions
  41. #
  42.  
  43.  
  44. KEYBOARD:
  45.  
  46.   CURSOR_UP    MoveUp
  47.   CURSOR_DOWN  MoveDown
  48.   CURSOR_RIGHT MoveRight
  49.   CURSOR_LEFT  MoveLeft
  50.  
  51.   TAB MoveNextTabStop
  52.   ESC ExecARexxMacro LockInput LockDisplay TurboText:Rexx/EdEmulation.ttx
  53.  
  54.   CTRL-A InsertLine NoBreak
  55.   CTRL-B DeleteLine
  56.   CTRL-D ExecARexxString "OPTIONS RESULTS; SetBookmark 0; GetViewInfo; PARSE VAR RESULT x n x t .; Move t+n+11; UpdateView; SetDisplayLock ON; MoveBookmark 0; GetViewInfo; PARSE VAR RESULT x x x t2 .; MoveDown t2-t1; SetDisplayLock OFF"
  57.   CTRL-E ExecARexxString "OPTIONS RESULTS; GetCursorPos; PARSE VAR RESULT line col .; GetViewInfo; PARSE VAR RESULT x num x top .; IF (line = top) & (col = 1) THEN DO; Move num+top-1; MoveEOL; END; ELSE DO; Move top 1; END"
  58.   CTRL-F ToggleCharCase
  59.   CTRL-G NOP        /* Repeat last extended command */
  60.   CTRL-I MoveNextTabStop
  61.   CTRL-O DeleteEOW
  62.   CTRL-R MovePrevWord
  63.   CTRL-T MoveNextWord
  64.   CTRL-U ExecARexxString "OPTIONS RESULTS; SetBookmark 0; GetViewInfo; PARSE VAR RESULT x x x top .; Move top-12; UpdateView; SetDisplayLock ON; MoveBookmark 0; IF top > 12 THEN MoveUp 12; ELSE MoveUp top-1; SetDisplayLock OFF"
  65.   CTRL-V UpdateView
  66.   CTRL-Y DeleteEOL
  67.   CTRL-] ExecARexxString "OPTIONS RESULTS; GetCursorPos; PARSE VAR RESULT x col1 .; MoveEOL; GetCursorPos; PARSE VAR RESULT x col2 .; IF col1=col2 THEN MoveSOL"
  68.   CTRL-[ ExecARexxString EdEmulation
  69.  
  70.   SHIFT-CURSOR_UP    MoveSOF
  71.   SHIFT-CURSOR_DOWN  MoveEOF
  72.   SHIFT-CURSOR_LEFT  MoveSOL
  73.   SHIFT-CURSOR_RIGHT MoveEOL
  74. #
  75.  
  76.  
  77. MOUSE_BUTTONS:
  78.  
  79.   DOUBLELEFT MarkBlk
  80. #
  81.