home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / text_dtp / editor / turbotext / support / ttx_emul_qedit.dfn < prev    next >
Text File  |  1995-07-10  |  9KB  |  291 lines
  1.  
  2. /** $VER: TTX_Emul_QEdit.dfn 2.0 (29.6.94)
  3.  **
  4.  ** This definition file contains menu and keyboard definitions to roughly
  5.  ** emulate the MS-DOS QEdit editor. The emulation is not exact because there
  6.  ** are various things that QEdit and TurboText do differently, the most
  7.  ** obvious of which are block commands, window operations, and macros.
  8.  **
  9.  ** Written by Chris Bailey
  10.  ** Modified by Martin Taillefer
  11.  **/
  12.  
  13.  
  14. MENUS:
  15.  
  16.   MENU "File"
  17.     ITEM "Load"         "" OpenFile
  18.     ITEM "File"         "" ExecARexxString "SaveFile; CloseDoc"
  19.     ITEM "Save"         "" SaveFile
  20.     ITEM "Quit File"    "" CloseDoc
  21.     ITEM "Next"         "" ActivateNextDoc
  22.     ITEM "Prev"         "" ActivatePrevDoc
  23.     ITEM "Read"         "" OpenFile
  24.     ITEM "Change Name"  "" SaveFileAs
  25.     ITEM "Write Block"  "" SaveClip NoBackup
  26.     ITEM "OS Shell"     "" ExecTool "NewShell CON:0/50//130/AmigaShell/SCREEN%s/CLOSE"
  27.     ITEM "*Global File" "" NOP
  28.  
  29.   MENU "Window"
  30.     ITEM "Close"  "" CloseDoc
  31.     ITEM "Grow"   "" SizeWindow 40 40
  32.     ITEM "Split"  "" SplitView Toggle
  33.     ITEM "Next"   "" ActivateNextDoc
  34.     ITEM "One"    "" ActivateLastDoc
  35.     ITEM "Prev"   "" ActivatePrevDoc
  36.     ITEM "Shrink" "" SizeWindow -40 -40
  37.     ITEM "*Zoom"  "" NOP
  38.  
  39.   MENU "Block"
  40.     ITEM "Mark Block Begin" "" MarkBlk
  41.     ITEM "Mark Block End"   "" CopyBlk
  42.     ITEM "Copy Block"       "" PasteClip
  43.     ITEM "Move Block"       "" PasteClip
  44.     ITEM "Delete Block"     "" DeleteBlk
  45.     ITEM "Unmark"           "" MarkBlk
  46.     ITEM "Mark Line"        "" ExecARexxString "OPTIONS RESULTS;GetPrefs FreeForm;f=RESULT;SetPrefs FreeForm OFF;MoveSOL;MarkBlk;MoveEOL;MoveRight;SetPrefs FreeForm f"
  47.  
  48.   MENU "Search"
  49.     ITEM "Find"    "" OpenRequester Find
  50.     ITEM "Replace" "" OpenRequester FindChange
  51.     ITEM "Again"   "" Find
  52.  
  53.   MENU "Print"
  54.     ITEM "Print All"        "" PrintFile
  55.     ITEM "Print Block"      "" PrintClip
  56.     ITEM "*Send Formfeed"   "" NOP
  57.     ITEM "*Set Left Margin" "" NOP
  58.     ITEM "*Set Pagesize"    "" NOP
  59.  
  60.   MENU "Macro"
  61.     ITEM "Macro Record"   "" RecordMacro
  62.     ITEM "Read Macro"     "" OpenMacro
  63.     ITEM "Write Macro"    "" SaveMacro
  64.     BAR
  65.     ITEM "Stop Recording" "" EndMacro
  66.  
  67.   MENU "Editing"
  68.     ITEM "Add Line"              "" InsertLine NoBreak
  69.     ITEM "Delete Line"           "" DeleteLine
  70.     ITEM "Delete to End Of Line" "" DeleteEOL
  71.     ITEM "Insert Line"           "" ExecARexxString "MoveSOL; InsertLine; MoveUp"
  72.     ITEM "Join Line"             "" ExecARexxString "MoveEOL; Delete"
  73.     ITEM "Split Line"            "" InsertLine
  74.     ITEM "Undelete Line"         "" UndeleteLine
  75.  
  76.   MENU "Other"
  77.     ITEM "Set Autoindent"     "" SetPrefs AutoIndent Toggle
  78.     ITEM "Set Insert"         "" SetPrefs Overstrike Toggle
  79.     ITEM "Set Wordwrap"       "" SetPrefs WordWrap Toggle
  80.     ITEM "Set Ptabwidth"      "" OpenRequester TabPrefs
  81.     ITEM "Set Ctabwidth"      "" OpenRequester TabPrefs
  82.     ITEM "Set Right Margin"   "" OpenRequester EditPrefs
  83.     ITEM "Set Backups"        "" OpenRequester BackupPrefs
  84.  
  85.   MENU "Quit"
  86.     ITEM "Quit all files" "" CloseDoc
  87.     ITEM "Exit all files" "" CloseDoc
  88.  
  89.   MENU "Prefs"
  90.     ITEM "Change..."           ""  OpenRequester Prefs
  91.     BAR
  92.     ITEM "Open Prefs..."       ""  OpenPrefs
  93.     ITEM "Save Prefs As..."    ""  SavePrefs
  94.     ITEM "Save As Defaults"    ""  SaveDefPrefs
  95.     BAR
  96.     ITEM "Open Definitions..." ""  OpenDefinitions
  97. #
  98.  
  99.  
  100. KEYBOARD:
  101.  
  102.   /*
  103.    * Normal function keys
  104.    */
  105.  
  106.   F1            Help
  107.   F2            InsertLine
  108.   F3            SaveFile
  109.   F4            ExecARexxString LockDisplay "OPTIONS RESULTS; MoveSOL; GetLine; 'Insert TEXT' RESULT; InsertLine"
  110.   F5            MoveUpScr
  111.   F6            DeleteEOL
  112.   F7            MarkBlk
  113.   F8            MarkBlk
  114.   F9            ExecTool "NewShell CON:0/50//130/AmigaShell/SCREEN%s/CLOSE"
  115.   F10           CloseDoc
  116.  
  117.   /*
  118.    * Shifted function keys
  119.    */
  120.  
  121.   SHIFT-F1      ExecARexxString "MoveSOL; Insert TEXT '  '; MoveEOL"
  122.   SHIFT-F2      NOP
  123.   SHIFT-F3      NOP
  124.   SHIFT-F4      NOP
  125.   SHIFT-F5      CenterView
  126.   SHIFT-F6      NOP
  127.   SHIFT-F7      ShiftLeft
  128.   SHIFT-F8      ShiftRight
  129.   SHIFT-F9      NOP
  130.   SHIFT-F10     CloseDoc
  131.  
  132.   /*
  133.    * Alted function keys
  134.    */
  135.  
  136.   ALT-F1        ExecARexxString "txt = Time(); Insert txt; DO i = 1 TO 8; MoveLeft; Delete; END"
  137.   ALT-F2        InsertLine
  138.   ALT-F3        MoveMatchBkt
  139.   ALT-F4        NOP
  140.   ALT-F5        MoveLeft 80
  141.   ALT-F6        MoveRight 80
  142.   ALT-F7        NOP
  143.   ALT-F8        NOP
  144.   ALT-F9        ExecTool "NewShell CON:0/50//130/AmigaShell/SCREEN%s/CLOSE"
  145.   ALT-F10       ExecARexxString "SaveFile; CloseDoc"
  146.  
  147.   CURSOR_UP     MoveUp
  148.   CURSOR_DOWN   MoveDown
  149.   CURSOR_RIGHT  MoveRight
  150.   CURSOR_LEFT   MoveLeft
  151.  
  152.   CTRL-CURSOR_RIGHT  MoveNextWord
  153.   CTRL-CURSOR_LEFT   MovePrevWord
  154.  
  155.   SHIFT-CURSOR_UP    MoveUpScr
  156.   SHIFT-CURSOR_DOWN  MoveDownScr
  157.   SHIFT-CURSOR_RIGHT MoveNextWord
  158.   SHIFT-CURSOR_LEFT  MovePrevWord
  159.   SHIFT-BACKSPACE    DeleteSOW
  160.   SHIFT-DEL          DeleteEOW
  161.  
  162.   ALT-CURSOR_UP      MoveSOF
  163.   ALT-CURSOR_DOWN    MoveEOF
  164.   ALT-CURSOR_RIGHT   MoveEOL
  165.   ALT-CURSOR_LEFT    MoveSOL
  166.   ALT-BACKSPACE      DeleteSOL
  167.   ALT-DEL            DeleteEOL
  168.  
  169.   CTRL-DEL           DeleteLine
  170.   CTRL-BACKSPACE     DeleteSOW
  171.  
  172.   /* This should really be a reverse tab */
  173.   SHIFT-TAB          MovePrevTabStop
  174.  
  175. /*
  176.  *  The numeric keypad is used for the home and cursor keys. The layout is:
  177.  *
  178.  *            +-----------------------------------------------+
  179.  *            | 7 - Home   |    8 - Up      |   9 - Page Up   |
  180.  *            +------------+----------------+-----------------+
  181.  *            | 4 - Left   |    5 - Dead    |   6 - Right     |
  182.  *            +------------+----------------+-----------------+
  183.  *            | 1 - End    |    2 - Down    |   3 - Page Down |
  184.  *            +------------+----------------+-----------------+
  185.  */
  186.  
  187.   NUM_PAD-0       SetPrefs Overstrike OFF
  188.   NUM_PAD-1       MoveEOL
  189.   NUM_PAD-2       MoveDown
  190.   NUM_PAD-3       MoveDownScr
  191.   NUM_PAD-4       MoveLeft
  192.   NUM_PAD-5       NOP
  193.   NUM_PAD-6       MoveRight
  194.   NUM_PAD-7       MoveSOL
  195.   NUM_PAD-8       MoveUp
  196.   NUM_PAD-9       MoveUpScr
  197.   NUM_PAD-.       SetPrefs Overstrike ON
  198.  
  199.   CTRL-NUM_PAD-1  SaveFile
  200.   CTRL-NUM_PAD-3  MoveEOF
  201.   CTRL-NUM_PAD-7  MoveUpScr
  202.   CTRL-NUM_PAD-9  MoveSOF
  203.  
  204.   ALT-A    MarkBlk
  205.   ALT-B    FormatParagraph
  206.   ALT-C    CopyBlk
  207.   ALT-D    DeleteLine
  208.   ALT-E    OpenFile
  209.   ALT-F    NOP
  210.   ALT-G    DeleteBlk
  211.   ALT-H    OpenDoc NAME TurboText:Support/TTX_Help.txt
  212.   ALT-I    ExecARexxString "MoveSOL; Insert TEXT '  '; MoveEOL"
  213.   ALT-J    ExecARexxString "MoveEOL; Delete"
  214.   ALT-K    NOP
  215.   ALT-L    ExecARexxString "OPTIONS RESULTS;GetPrefs FreeForm;f=RESULT;SetPrefs FreeForm OFF;MoveSOL;MarkBlk;MoveEOL;MoveRight;SetPrefs FreeForm f"
  216.   ALT-M    NOP             /* Move block */
  217.   ALT-N    ActivateNextDoc
  218.   ALT-O    SaveFileAs
  219.   ALT-P    PrintFile
  220.   ALT-Q    CloseDoc
  221.   ALT-R    OpenClip
  222.   ALT-S    InsertLine
  223.   ALT-T    ExecARexxString "Insert Time()"
  224.   ALT-U    MarkBlk
  225.   ALT-V    NOP
  226.   ALT-W    SaveClip NoBackup
  227.   ALT-X    CloseDoc
  228.   ALT-Y    ExecARexxString "Insert Date()"
  229.   ALT-Z    NOP
  230.  
  231.   CTRL-A   MovePrevWord
  232.   CTRL-B   NOP             /* Get & Store Screenbuff */
  233.   CTRL-C   MoveDownScr
  234.   CTRL-D   MoveRight
  235.   CTRL-E   MoveUp
  236.   CTRL-F   MoveNextWord
  237.   CTRL-G   Delete 1
  238.   CTRL-H   ExecARexxString "MoveLeft; Delete"
  239.   CTRL-I   NOP
  240.   CTRL-J   Move
  241.   CTRL-K   SetMeta
  242.   CTRL-L   Find
  243.   CTRL-M   RecordMacro
  244.   CTRL-N   InsertLine
  245.   CTRL-O   NOP             /* 3rd meta for window cmds */
  246.   CTRL-P   NOP
  247.   CTRL-Q   SetMeta2
  248.   CTRL-R   MoveUpScr
  249.   CTRL-S   MoveLeft
  250.   CTRL-T   DeleteEOW
  251.   CTRL-U   UndeleteLine
  252.   CTRL-V   SetPrefs Overstrike Toggle
  253.   CTRL-W   MoveUpScr
  254.   CTRL-X   MoveDown
  255.   CTRL-Y   DeleteLine
  256.   CTRL-Z   MoveDownScr
  257.  
  258.   META-B   MarkBlk
  259.   META-C   CopyBlk
  260.   META-D   CloseDoc
  261.   META-E   OpenFile
  262.   META-F   SaveFileAs
  263.   META-H   MarkBlk
  264.   META-K   MarkBlk
  265.   META-N   ActivateNextDoc
  266.   META-P   ActivatePrevDoc
  267.   META-Q   CloseDoc
  268.   META-R   OpenClip
  269.   META-S   SaveFile
  270.   META-T   NOP
  271.   META-V   NOP /* Move block */
  272.   META-W   SaveClip
  273.   META-X   SaveFile
  274.   META-Y   DeleteBlk
  275.  
  276.   META2-A  OpenRequester FindChange
  277.   META2-B  MoveSOF         /* Actually go to start of block */
  278.   META2-C  MoveEOF
  279.   META2-D  MoveEOL
  280.   META2-E  NOP
  281.   META2-F  OpenRequester Find
  282.   META2-I  SetPrefs AutoIndent Toggle
  283.   META2-K  MoveEOF         /* Actually go to end of block */
  284.   META2-L  UndeleteLine
  285.   META2-P  NOP             /* Prev position ??             */
  286.   META2-R  MoveSOF
  287.   META2-S  NOP
  288.   META2-X  NOP
  289.   META2-Y  DeleteEOL
  290. #
  291.