home *** CD-ROM | disk | FTP | other *** search
/ Bila Vrana / BILA_VRANA.iso / 028A / AUROR.ZIP / MEKBD.AML < prev    next >
Text File  |  1996-07-17  |  23KB  |  573 lines
  1. //--------------------------------------------------------------------
  2. // The Aurora Editor v3.0, Copyright (C) 1993-1996 nuText Systems
  3. //
  4. // KBD.AML
  5. // Multi-Edit Keyboard definitions (included by Main.aml)
  6. //
  7. // If you have made any changes, save this file and select Recompile
  8. // the Editor from the Set menu. Exit and re-enter the editor for
  9. // your changes to take effect.
  10. //--------------------------------------------------------------------
  11.  
  12. //--------------------------------------------------------------------
  13. // Edit and File Manager windows
  14. //--------------------------------------------------------------------
  15.  
  16. object edit_fmgr
  17.  
  18.   // Controls
  19.   function  '≡'                                // close window
  20.     close
  21.   end
  22.  
  23.   // Menu activation
  24.   key  <esc>           gotobar                 // to last menu bar item (me)
  25.   key  <f10>           gotobar                 // to last menu bar item (me)
  26.   key  <alt f10>       gotomenu                // goto last pull-down menu
  27.   key  <alt f>         gotomenu "file"         // to file menu (me)
  28.   key  <alt w>         gotomenu "window"       // to window menu (me)
  29.   key  <alt b>         gotomenu "block"        // to block menu (me)
  30.   key  <alt s>         gotomenu "search"       // to search menu (me)
  31.   key  <alt o>         gotomenu "fold"         // to fold menu
  32.   key  <alt e>         gotomenu "edit"         // to edit menu (me)
  33.   key  <alt c>         gotomenu "clip"         // to clipboard menu
  34.   key  <alt p>         gotomenu "print"        // to print menu
  35.   key  <alt t>         gotomenu "set"          // to set menu
  36.   key  <alt m>         gotomenu "macro"        // to macro menu (me)
  37.   key  <alt h>         gotomenu "help"         // to help menu (me)
  38.   key  <f1>            gotomenu "help"         // to help menu (me)
  39.  
  40.   // Scroll
  41.   key  <pgdn>          pagedown                // scroll down (me)
  42.   key  <pgup>          pageup                  // scroll up (me)
  43.   key  <ctrl pgup>     row (getviewtop)        // to page top (me)
  44.   key  <ctrl pgdn>     row (getviewbot)        // to page bottom (me)
  45.   key  <ctrl home>     row 1                   // to file top (me)
  46.   key  <ctrl end>      row (getlines)          // to file bottom (me)
  47.   key  <center>        adjustrow               // center cursor
  48.   key  <ctrl f9>       adjustrow 1             // scroll to page top
  49.   key  <ctrl f10>      adjustrow (getviewrows) // scroll to page bottom
  50.   key  <ctrl up>       rollrow -1              // scroll up one line (me)
  51.   key  <ctrl down>     rollrow  1              // scroll down one line (me)
  52.   key  <ctrl ->        lastpos                 // to last cursor position
  53.  
  54.   // File
  55.   key  <ctrl n>        opennew                 // new edit window
  56.   key  <f3>            askopen                 // open prompt (me)
  57.   key  <alt z>         openlast                // open last window
  58.   key  <alt ->         filelist                // file list
  59.   key  <alt q>         close                   // close window
  60.   key  <alt x>         closeall                // close all windows
  61.   key  <shift f1>      quickref 'qw'           // quick function reference
  62.   key  <ctrl q><f2>    quickref 'fw'           // function reference
  63.  
  64.   // Window
  65.   key  <ctrl f6>       winlist                 // window list (me)
  66.   key  <alt f6>        maximize                // maximize window (me)
  67.   key  <alt up>        maximize                // maximize window (me)
  68.   key  <alt down>      minimize                // minimize window (me)
  69.   key  <f6>            nextwindow              // next window (me)
  70.   key  <alt right>     nextwindow              // next window (me)
  71.   key  <shift f6>      prevwindow              // prev window (me)
  72.   key  <alt left>      prevwindow              // prev window (me)
  73.   key  <shift f3>      tile 'v'                // tile vertical
  74.   key  <shift f4>      tile 'h'                // tile horizontal
  75.   key  <ctrl k><q>     close                   // close window
  76.  
  77.   // Search
  78.   key  <ctrl f>        askscan                 // file scan prompt (me)
  79.   key  <ctrl e>        gotomark 't'            // find top of block (me)
  80.   key  <ctrl c>        gotomark 'b'            // find bot of block (me)
  81.   key  <ctrl 6>        cyclebook               // cycle through bookmarks
  82.  
  83.   // Print
  84.   key  <ctrl p>        print                   // print
  85.  
  86.   // Set
  87.   key  <ctrl f1>       togglemode              // toggle video mode
  88.   key  <ctrl k><f2>    recompile               // recompile the editor
  89.  
  90.   // Macro
  91.   key  <ctrl v>        askeval                 // macro command prompt
  92.   key  <alt f9>        askrun                  // Dos command prompt
  93.   key  <alt f8>        askruncap               // Dos capture prompt
  94.   key  <f9>            shell                   // exit to Dos
  95.   key  <shift f12>     pickmacro               // macro picklist
  96.   key  <ctrl f12>      runmacro2 "maclist"     // macro menu
  97.  
  98.   // undefined or unnamed keys
  99.   key <otherkey> (keycode)
  100.     say (geteventname (keycode)) + " not defined"
  101.   end
  102.  
  103.  
  104. //--------------------------------------------------------------------
  105. // Prompts and Edit windows
  106. //--------------------------------------------------------------------
  107.  
  108. object prompt
  109.  
  110.   // Controls
  111.   function  '≡'        close                   // close window
  112.   end
  113.  
  114.   function  '*'        enter                   // simulate <enter>
  115.   end                                          //  (2-line box only)
  116.  
  117.   // Cursor
  118.   key  <left>          left                    // move cursor left (me)
  119.   key  <right>         right                   // move cursor right (me)
  120.   key  <home>          col 1                   // to column one (me)
  121.   key  <end>           col  getlinelen + 1     // to end of line (me)
  122.  
  123.   // Cursor + CUA-marking
  124.   key  <shift left>    left
  125.                        smark
  126.   key  <shift right>   right
  127.                        smark
  128.   key  <shift home>    col 1
  129.                        smark
  130.   key  <shift end>     col getlinelen + 1
  131.                        smark
  132.  
  133.   // Editing
  134.   key  <ins>           setting 'I' TOGGLE      // toggle insert mode
  135.   key  <del>           delchar                 // delete character (me)
  136.   key  <backspace>     backsp                  // delete left character (me)
  137.  
  138.   key  <ctrl del>                              // erase to end of line (me)
  139.     if shiftkey? then
  140.       delchar MAX_COL
  141.     end
  142.   end
  143.  
  144.   key  <alt =>         asciilist               // display ascii chart
  145.  
  146.   // Block
  147.   key  <ctrl f7>       markstream              // mark stream (me)
  148.   key  <shift f7>      markcolumn              // mark column (me)
  149.   key  <alt 1>         markword                // mark word
  150.   key  <alt 2>         markeol                 // mark to end of line
  151.   key  <alt u>         destroymark             // unmark
  152.  
  153.   // copy block to prompt (me)
  154.   key  <f8>
  155.                        instext (getmarktext)
  156.                        col  getlinelen + 1
  157.  
  158.   // paste from clipboard to prompt (me)
  159.   key  <greyenter>
  160.                        oldmark = usemark _ClipName
  161.                        instext (getmarktext)
  162.                        usemark oldmark
  163.                        col  getlinelen + 1
  164.  
  165.   // copy from prompt to clipboard (me)
  166.   key  <grey+>         copy
  167.   key  <ctrl ins>      copy
  168.  
  169.   // Prompt history
  170.   key  <up>            prevhist                // retrieve prev prompt
  171.   key  <down>          nexthist                // retrieve next prompt
  172.   key  <pgup>          askhistory              // history popup menu
  173.   key  <pgdn>          askhistory              // history popup menu
  174.  
  175.   // Exit
  176.   key  <esc>           close                   // quit prompt
  177.   key  <alt q>         close                   // quit prompt
  178.  
  179.   // non-function keys
  180.   key  <char> (character)                      // typeable keys
  181.     write character
  182.   end
  183.  
  184.   // filename completion
  185.   key  <ctrl tab>      askcomplete             // filename completion
  186.   key  <tab>           askcomplete             // filename completion
  187.  
  188.  
  189. //--------------------------------------------------------------------
  190. // Edit w