home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / text_dtp / editor / turbotext / support / ttx_emul_memacs.dfn < prev    next >
Text File  |  1995-07-10  |  7KB  |  204 lines
  1.  
  2. /** $VER: TTX_Emul_MEMACS.dfn 2.0 (19.6.94)
  3.  **
  4.  ** This definition file contains menu, keyboard and mouse definitions to
  5.  ** emulate the AmigaDOS MEMACS editor.
  6.  **/
  7.  
  8.  
  9. MENUS:
  10.  
  11.   MENU "Project"
  12.     ITEM "Rename"       "^X F" ExecARexxString "OPTIONS RESULTS; RequestStr PROMPT '*"New file name*"'; IF RC=0 THEN 'SetFilePath' RESULT; ELSE SetFilePath ''"
  13.     ITEM "Read-file"    "^X^R" OpenFile
  14.     ITEM "Visit-file"   "^X^V" OpenDoc FileReq
  15.     ITEM "Insert-file"  "^X^I" InsertFile
  16.     ITEM "Save-file"    "^X^S" SaveFile
  17.     ITEM "Save-as-file" "^X^W" SaveFileAs
  18.     ITEM "Save-mod"     "^X^M" ExecARexxMacro LockInput LockDisplay TurboText:Rexx/SaveChangedDocs.ttx
  19.     ITEM "Save-exit"    "^X^F" ExecARexxMacro LockInput LockDisplay TurboText:Rexx/SaveChangedDocs.ttx QUIT
  20.     ITEM "New-Cli"      "^-"   ExecTool "NewShell CON:0/50//130/AmigaShell/SCREEN%s/CLOSE"
  21.     ITEM "Cli-command"  "^X!"  ExecTool
  22.     ITEM "Quit"         "^C"   CloseDoc
  23.     ITEM "About ..."    ""     OpenRequester Info
  24.  
  25.   MENU "Edit"
  26.     ITEM "Kill-region"    "^W"    CutBlk
  27.     ITEM "Yank"           "^Y"    PasteClip
  28.     ITEM "Set-mark"       "^@"    MarkBlk
  29.     ITEM "Copy-region"    "ESCw"  CopyBlk
  30.     ITEM "Upper-region"   "^X^U"  Conv2Upper
  31.     ITEM "Lower-region"   "^X^L"  Conv2Lower
  32.     ITEM "List-buffers"   "^X^B"  ExecARexxMacro Console TurboText:Rexx/SelectDoc.ttx
  33.     ITEM "Select-buffer"  "^Xb"   ExecARexxMacro Console TurboText:Rexx/SelectDoc.ttx
  34.     ITEM "Insert-buffer"  "ESC^Y" NOP
  35.     ITEM "Kill-buffer"    "^Xk"   ClearFile
  36.     ITEM "Justify-buffer" "^XJ"   NOP
  37.     ITEM "Redisplay"      "^L"    UpdateView All
  38.     ITEM "Quote-char"     "^Q"    SetQuoteMode On
  39.     ITEM "Indent"         "^J"    InsertLine Indent
  40.     ITEM "Transpose"      "^T"    SwapChars
  41.     ITEM "Cancel"         "^G"    NOP
  42.  
  43.   MENU "Window"
  44.     ITEM "One-window"    "^X1"   SplitView OFF
  45.     ITEM "Split-window"  "^X2"   SplitView ON
  46.     ITEM "Next-window"   "^Xn"   SwitchView
  47.     ITEM "Prev-window"   "^Xp"   SwitchView
  48.     ITEM "Expand-window" "^Xz"   SizeView 1
  49.     ITEM "Shrink-window" "^X^Z"  SizeView -1
  50.     ITEM "Next-w-page *" "ESC^V" ExecARexxString LockDisplay "SwitchView;MoveDownScr;SwitchView"
  51.     ITEM "Prev-w-page *" "^Xv"   ExecARexxString LockDisplay "SwitchView;MoveDownScr;SwitchView"
  52.  
  53.   MENU "Move"
  54.     ITEM "Top-of-buffer" "ESC<"  MoveSOF
  55.     ITEM "End-of-buffer" "ESC>"  MoveEOF
  56.     ITEM "Top-of-window" "ESC,"  MoveUpScr
  57.     ITEM "End-of-window" "ESC."  MoveDownScr
  58.     ITEM "Goto-line"     "^X^G"  Move
  59.     ITEM "Swap-dot&mark" "^X^X"  NOP
  60.     ITEM "Next-page"     "^V"    MoveDownScr
  61.     ITEM "Prev-page"     "ESCv"  MoveUpScr
  62.     ITEM "Next-word"     "ESCf"  MoveNextWord
  63.     ITEM "Previous-word" "ESCb"  MovePrevWord
  64.     ITEM "Scroll-up"     "^Z"    MoveDown
  65.     ITEM "Scroll-down"   "ESCz"  MoveUp
  66.  
  67.   MENU "Line"
  68.     ITEM "Open-line"     "^O"   ExecARexxString "InsertLine;MoveLeft"
  69.     ITEM "Kill-line"     "^X^D" DeleteLine
  70.     ITEM "Kill-to-eol"   "^K"   DeleteEOL
  71.     ITEM "Start-of-line" "^A"   MoveSOL
  72.     ITEM "End-of-line"   "^E"   MoveEOL
  73.     ITEM "Next-line"     "^N"   MoveDown
  74.     ITEM "Previous-line" "^P"   MoveUp
  75.     ITEM "Line-to-top"   "ESC!" ScrollView 1
  76.     ITEM "Delete-blanks" "^X^O" ExecARexxString "OPTIONS RESULTS; DO FOREVER; GetLine; IF LENGTH(RESULT)>1 THEN LEAVE; DeleteLine; END"
  77.     ITEM "Show-Line#"    "^X="  NOP
  78.  
  79.   MENU "Word"
  80.     ITEM "delete-forw"  "ESCd" DeleteEOW
  81.     ITEM "delete-back"  "ESCh" DeleteSOW
  82.     ITEM "Upper-word"   "ESCu" Conv2Upper
  83.     ITEM "Lower-word"   "ESCl" Conv2Lower
  84.     ITEM "Cap-word"     "ESCc" NOP
  85.     ITEM "Switch-case"  "ESC^" NOP
  86.  
  87.   MENU "Search"
  88.     ITEM "Search-forward"   "^S"    OpenRequester Find
  89.     ITEM "Search-backward"  "^R"    OpenRequester Find
  90.     ITEM "Search-replace"   "ESCr"  OpenRequester FindChange
  91.     ITEM "Query-s-r"        "ESCq"  OpenRequester FindChange
  92.     ITEM "Fence-match"      "ESC^F" MoveMatchBkt
  93.  
  94.   MENU "Extras"
  95.     ITEM "Set-arg"       "^U"   NOP
  96.     ITEM "Set"           "ESCs" OpenRequester Prefs
  97.     ITEM "Start-macro"   "^X("  RecordMacro
  98.     ITEM "Stop-macro"    "^X)"  EndMacro
  99.     ITEM "Execute-macro" "^Xe"  PlayMacro 1
  100.     ITEM "Set-key"       "^X^K" NOP
  101.     ITEM "Reset-keys"    "ESCk" NOP
  102.     ITEM "Execute-file"  "ESCe" ExecARexxMacro LockDisplay LockInput TurboText:Rexx/ExecBlk.ttx
  103.     ITEM "Execute-line"  "^[^[" NOP
  104.  
  105.   MENU "Prefs"
  106.     ITEM "Change..."           ""  OpenRequester Prefs
  107.     BAR
  108.     ITEM "Open Prefs..."       ""  OpenPrefs
  109.     ITEM "Save Prefs As..."    ""  SavePrefs
  110.     ITEM "Save As Defaults"    ""  SaveDefPrefs
  111.     BAR
  112.     ITEM "Open Definitions..." ""  OpenDefinitions
  113. #
  114.  
  115.  
  116. KEYBOARD:
  117.  
  118.   CURSOR_UP              MoveUp
  119.   CURSOR_DOWN            MoveDown
  120.   CURSOR_RIGHT           MoveRight
  121.   CURSOR_LEFT            MoveLeft
  122.  
  123.   CTRL-X                 SetMeta
  124.   ESC                    SetMeta2
  125.  
  126.   META-F                 ExecARexxString "OPTIONS RESULTS; RequestStr PROMPT '*"New file name*"'; IF RC=0 THEN 'SetFilePath' RESULT; ELSE SetFilePath ''"
  127.   META-CTRL-R            OpenFile
  128.   META-CTRL-V            OpenDoc FileReq
  129.   META-CTRL-I            InsertFile
  130.   META-CTRL-S            SaveFile
  131.   META-CTRL-W            SaveFileAs
  132.   META-CTRL-M            ExecARexxMacro LockInput LockDisplay TurboText:Rexx/SaveChangedDocs.ttx
  133.   META-CTRL-F            ExecARexxMacro LockInput LockDisplay TurboText:Rexx/SaveChangedDocs.ttx QUIT
  134.   CTRL--                 ExecTool "NewShell CON:0/50//130/AmigaShell/SCREEN%s/CLOSE"
  135.   META-SHIFT-!           ExecTool
  136.   CTRL-C                 CloseDoc
  137.  
  138.   CTRL-W       CutBlk
  139.   CTRL-Y       PasteClip
  140.   CTRL-SHIFT-@ MarkBlk
  141.   META2-.      MarkBlk
  142.   META2-W      CopyBlk
  143.   META-CTRL-U  Conv2Upper
  144.   META-CTRL-L  Conv2Lower
  145.   META-CTRL-B  ExecARexxMacro Console TurboText:Rexx/SelectDoc.ttx
  146.   META-B       ExecARexxMacro Console TurboText:Rexx/SelectDoc.ttx
  147.   META-K       ClearFile
  148.   CTRL-L       UpdateView All
  149.   CTRL-Q       SetQuoteMode On
  150.   CTRL-J       InsertLine Indent
  151.   CTRL-T       SwapChars
  152.  
  153.   META-1       SplitView OFF
  154.   META-2       SplitView ON
  155.   META-N       SwitchView
  156.   META-P       SwitchView
  157.   META-Z       SizeView 1
  158.   META-CTRL-Z  SizeView -1
  159.   META2-CTRL-V ExecARexxString LockDisplay "SwitchView;MoveUpScr;SwitchView"
  160.   META-V       ExecARexxString LockDisplay "SwitchView;MoveUpScr;SwitchView"
  161.  
  162.   META2-SHIFT-, MoveSOF
  163.   META2-SHIFT-. MoveEOF
  164.   META2-,       MoveUpScr
  165.   META2-.       MoveDownScr
  166.   META-CTRL-G   Move
  167.   CTRL-V        MoveDownScr
  168.   META2-V       MoveUpScr
  169.   META2-F       MoveNextWord
  170.   META2-B       MovePrevWord
  171.   CTRL-Z        MoveDown
  172.   META2-Z       MoveUp
  173.  
  174.   CTRL-O        ExecARexxString "InsertLine;MoveLeft"
  175.   META-CTRL-D   DeleteLine
  176.   CTRL-K        DeleteEOL
  177.   CTRL-A        MoveSOL
  178.   CTRL-E        MoveEOL
  179.   CTRL-N        MoveDown
  180.   CTRL-P        MoveUp
  181.   CTRL-F    MoveRight
  182.   CTRL-B    MoveLeft
  183.   META2-SHIFT-! ScrollView 1
  184.  
  185.   META2-D   DeleteEOW
  186.   META2-H   DeleteSOW
  187.   META2-DEL DeleteSOW
  188.   META2-U   Conv2Upper
  189.   META2-L   Conv2Lower
  190.  
  191.   CTRL-S       OpenRequester Find
  192.   CTRL-R       OpenRequester Find
  193.   META2-R      OpenRequester FindChange
  194.   META2-Q      OpenRequester FindChange
  195.   META2-CTRL-F MoveMatchBkt
  196.  
  197.   META2-S       OpenRequester Prefs
  198.   META-SHIFT-<  RecordMacro
  199.   META-SHIFT->  EndMacro
  200.   META-E        PlayMacro 1
  201.  
  202.   CTRL-D Delete
  203. #
  204.