(mode moves
  {{{  moving
  {{{  same as edit
  ( keybind backward-character ( $esc "l "e ) )
  ( keybind backward-word ( $esc "l "w ) )
  ( keybind beginning-of-line ( $esc "s "l ) )
  ( keybind forward-character ( $esc "r "i ) )
  ( keybind forward-word ( $esc "r "w ) )
  ( keybind end-of-line ( $esc "e "l ) )
  ( keybind previous-line- ( $esc "u "p ) )
  ( keybind previous-page- ( $esc "p "u ) )
  ( keybind mtool-top ( $esc "s "f ) )
  ( keybind beginning-of-fold ( $esc "s "F ) )
  ( keybind next-line- ( $esc "d "n ) )
  ( keybind next-page- ( $esc "p "d ) )
  ( keybind mtool-bot ( $esc "b "o ) )
  ( keybind end-of-fold ( $esc "b "O ) )
  ( keybind goto-matching-fence ( $esc "] ) )
  ( keybind incremental-search-forward- ( $esc "i "s ) )
  }}}
  ( keybind go-local-line ( $esc "g "o ) )
  ( keybind go-start-mark ( $esc $esc ) )
  ( keybind set-start-mark ( ". ) )
  ( keybind change-position ( "-  ) )
  }}}
  {{{  editing
  ( keybind delete-mark-region ($esc "d "l) )
  ( keybind space-in-region ( $space  ) )
  ( keybind tab-var-region ( "+ ) )
  }}}
  {{{  folding
  {{{  same as edit
  ( keybind open-fold                            ($esc "o "p)           )
  ( keybind close-fold                           ($esc "c "l)           )
  }}}
  ( keybind fold-mark-region ( $esc "c "r ) )
  }}}
  {{{  linehandling
  ( keybind copy-mark-region ( $esc "c "o ) )
  ( keybind kill-mark-region ( $esc "p "i ) )
  ( keybind move-mark-region ( $esc "m "o ) )
  ( keybind copy-kill-mark-region ( $esc "c "p ) )
  ( keybind unkill-unfolded-at-position ( $esc "p "p ) )
  }}}
  {{{  helps
  ( keybind describe-fold ( $esc "f "? ) )
  ( keybind help- ( $esc "h "e ) )
  ( keybind describe-bindings- ( $esc "h "b ) )
  }}}
  {{{  area
  ( keybind menu-start- ( "@ ) )
  ( keybind menu-again ( "? ) )
  ( keybind menu-previous ( "< ) )
  ( keybind menu-previous-page ( "{ ) )
  ( keybind menu-next ( "> ) )
  ( keybind menu-next-page ( "} ) )
  ( keybind menu-end ( "$ ) )
  ( keybind call-make- ( "m ) )
  ( keybind call-make-error- ( "e ) )
  }}}
  {{{  vi-based commands
  ( keybind backward-character ( "h ) )
  ( keybind backward-word ( "b ) )
  ( keybind forward-character ( "l ) )
  ( keybind forward-word ( "w ) )
  ( keybind previous-line- ( "k ) )
  ( keybind next-line- ( "j ) )
  ( keybind open-fold ( "v "o ) )
  ( keybind close-fold ( "v "c ) )
  ( keybind incremental-search-forward- ( "/ ) )
  ( keybind go-local-line ( ": ) )
  ( keybind delete-mark-region ( "d "d ) )
  ( keybind unkill-unfolded-at-position ( "P ) )
  ( keybind switch-to-edit-mode-overwrite ( "o ) )
  ( keybind switch-to-edit-mode-insert ( "i ) )
  ( keybind save-and-exit-origami ( "Z "Z ) )
  }}}
  {{{  pseudo-function
  ( keybind open-fold ( $EF3 ) )
  ( keybind close-fold ( $EF4 ) )
  ( keybind incremental-search-forward- ( $EF2 "f ) )
  ( keybind go-local-line ( $EF2 "g ) )
  ( keybind go-start-mark ( $EF2 $EF2 ) )
  ( keybind help- ( $EF2 "h ) )
  ( keybind file-menu- ( $EF1 ) )
  }}}
  {{{  arguments
  ( keybind set-argument-0 ( $esc "0 ) )
  ( keybind set-argument-1 ( $esc "1 ) )
  ( keybind set-argument-2 ( $esc "2 ) )
  ( keybind set-argument-3 ( $esc "3 ) )
  ( keybind set-argument-4 ( $esc "4 ) )
  ( keybind set-argument-5 ( $esc "5 ) )
  ( keybind set-argument-6 ( $esc "6 ) )
  ( keybind set-argument-7 ( $esc "7 ) )
  ( keybind set-argument-8 ( $esc "8 ) )
  ( keybind set-argument-9 ( $esc "9 ) )
  }}}
  @if-using ( control )
     {{{  some control keys (wordstar like?)
     ( keybind backward-character ( C-S ) )
     ( keybind backward-word ( C-A ) )
     ( keybind forward-character ( C-D ) )
     ( keybind forward-word ( C-F ) )
     ( keybind end-of-line ( C-Q C-D ) )
     ( keybind previous-line- ( C-E ) )
     ( keybind beginning-of-line ( C-Q C-S ) )
     ( keybind mtool-top ( C-Q C-E ) )
     ( keybind mtool-bot ( C-Q C-X ) )
     ( keybind next-line- ( C-X ) )
     ( keybind end-of-fold ( C-Q "c ) )
     ( keybind open-fold (C-W) )
     ( keybind close-fold (C-R) )
     ( keybind incremental-search-forward- ( C-Q "f ) )
     ( keybind go-local-line ( C-Q "g ) )
     ( keybind help- ( C-Q "h ) )
     ( keybind describe-bindings- ( C-Q "? ) )
     ( keybind kill-mark-region ( C-K ) )
     ( keybind copy-kill-mark-region ( C-Q C-K ) )
     ( keybind unkill-unfolded-at-position ( C-P ) )
     ( keybind delete-mark-region ( C-L ) )
     ( keybind copy-mark-region ( C-O ) )
     ( keybind move-mark-region ( C-Q C-O ) )
     }}}
  @fi
  @if-using ( sun SUN PC mgr hpterm xterm vt100 ATARI )
     {{{  delete-maps
     @if-using not(ATARI)
        ( terminal
           ( @if-using ( sun ) sun @fi
             @if-using ( SUN ) SUN @fi
             @if-using ( PC ) PC @fi
             @if-using ( xterm ) xterm @fi
             @if-using ( vt100 ) vt100 @fi
             @if-using ( mgr ) mgr @fi
             @if-using ( hpterm ) hpterm @fi
           )
     @fi
     @if-using not(ATARI) ) @fi
     }}}
  @fi
  @if-using ( sun SUN PC mgr hpterm xterm vt100 ATARI )
     {{{  backspace-maps
     @if-using not(ATARI)
        ( terminal
           ( @if-using ( sun ) sun @fi
             @if-using ( SUN ) SUN @fi
             @if-using ( PC ) PC @fi
             @if-using ( xterm ) xterm @fi
             @if-using ( vt100 ) vt100 @fi
             @if-using ( mgr ) mgr @fi
             @if-using ( hpterm ) hpterm @fi
             @if-using ( ATARI ) ATARI @fi
           )
     @fi
        ( keybind tab-out-region ( $backspace ) )
     @if-using not(ATARI) ) @fi
     }}}
  @fi
  @if-using ( sun SUN mgr xterm vt100 ATARI )
     {{{  fx-maps
     @if-using not(ATARI)
        ( terminal
           ( @if-using ( sun ) sun @fi
             @if-using ( SUN ) SUN @fi
             @if-using ( xterm ) xterm @fi
             @if-using ( vt100 ) vt100 @fi
             @if-using ( mgr ) mgr @fi
           )
     @fi
        ( keybind open-fold ( $f3 ) )
        ( keybind close-fold ( $f4 ) )
        ( keybind incremental-search-forward- ( $f2 "f ) )
        ( keybind go-local-line ( $f2 "g ) )
        ( keybind go-start-mark ( $f2 $f2 ) )
        ( keybind help- ( $f2 "h ) )
        ( keybind file-menu- ( $f1 ) )
     @if-using not(ATARI) ) @fi
     }}}
  @fi
  @if-using ( sun mgr hpterm xterm vt100 )
     {{{  cursor-maps
     ( terminal
        ( @if-using ( sun ) sun @fi
          @if-using ( xterm ) xterm @fi
          @if-using ( vt100 ) vt100 @fi
          @if-using ( mgr ) mgr @fi
          @if-using ( hpterm ) hpterm @fi
        )
        ( keybind backward-character ( $left ) )
        ( keybind forward-character ( $right) )
        ( keybind next-line- ( $down ) )
        ( keybind previous-line- ( $up ) )
     )
     }}}
  @fi
  @if-using ( sun SUN PC mgr xterm vt100 ATARI )
     {{{  tab-maps
     @if-using not(ATARI)
        ( terminal
           ( @if-using ( sun ) sun @fi
             @if-using ( SUN ) SUN @fi
             @if-using ( PC ) PC @fi
             @if-using ( xterm ) xterm @fi
             @if-using ( vt100 ) vt100 @fi
             @if-using ( mgr ) mgr @fi
           )
     @fi
       ( keybind tab-in-region ( $tab  ) )
     @if-using not(ATARI) ) @fi
     }}}
  @fi
  @if-using ( SUN ATARI )
     {{{  SUN-terminal R-keys
     @if-using ( SUN ) ( terminal ( SUN ) @fi
     {{{  moving
     ( keybind backward-character ( $R10 ) )
     ( keybind backward-word ( $R13 $R10 ) )
     ( keybind beginning-of-line ( $R7 ) )
     ( keybind forward-character ( $R12 ) )
     ( keybind forward-word ( $R13 $R12 ) )
     ( keybind end-of-line ( $R9 ) )
     ( keybind previous-line- ( $R8 ) )
     ( keybind previous-page- ( $R13 $R1 ) )
     ( keybind mtool-top ( $R13 $R8 ) )
     ( keybind beginning-of-fold ( $R1 ) )
     ( keybind next-line- ( $R14 ) )
     ( keybind next-page- ( $R13 $R3 ) )
     ( keybind mtool-bot ( $R13 $R14 ) )
     ( keybind end-of-fold ( $R3 ) )
     ( keybind incremental-search-forward- ( $R13 "f ) )
     ( keybind go-local-line ( $R13 "g ) )
     ( keybind go-start-mark ( $R13 $R13 ) )
     ( keybind backward-character ( $left ) )
     ( keybind backward-word ( $R13 $left ) )
     ( keybind forward-character ( $right ) )
     ( keybind forward-word ( $R13 $right ) )
     ( keybind previous-line- ( $up ) )
     ( keybind mtool-top ( $R13 $up ) )
     ( keybind next-line- ( $down ) )
     ( keybind mtool-bot ( $R13 $down ) )
     }}}
     {{{  editing
     ( keybind delete-mark-region ( $R13 $R9 ) )
     }}}
     {{{  folding
     ( keybind open-fold ( $R4 ) )
     ( keybind close-fold ( $R6 ) )
     ( keybind fold-mark-region ( $R15 ) )
     }}}
     {{{  linehandling
     ( keybind copy-mark-region ( $R13 $R5 ) )
     ( keybind kill-mark-region ( $R2 ) )
     ( keybind move-mark-region ( $R13 $R2 ) )
     ( keybind copy-kill-mark-region ( $R5 ) )
     ( keybind unkill-unfolded-at-position ( $R11 ) )
     }}}
     {{{  helps
     ( keybind help- ( $R13 "h ) )
     ( keybind describe-bindings- ( $R13 "? ) )
     }}}
     {{{  area
     }}}
     {{{  vi-based commands
     }}}
     {{{  advanced commands
     ( keybind set-argument-0 ( $R13 "0 ) )
     ( keybind set-argument-1 ( $R13 "1 ) )
     ( keybind set-argument-2 ( $R13 "2 ) )
     ( keybind set-argument-3 ( $R13 "3 ) )
     ( keybind set-argument-4 ( $R13 "4 ) )
     ( keybind set-argument-5 ( $R13 "5 ) )
     ( keybind set-argument-6 ( $R13 "6 ) )
     ( keybind set-argument-7 ( $R13 "7 ) )
     ( keybind set-argument-8 ( $R13 "8 ) )
     ( keybind set-argument-9 ( $R13 "9 ) )
     }}}
     @if-using ( SUN ) ) @fi
     }}}
  @fi
  @if-using ( PC )
     {{{  pc-terminal
     ( terminal ( PC )
        {{{  moving
        ( keybind backward-character ( $dos-left ) )
        ( keybind backward-word ( $dos-ins $dos-left ) )
        ( keybind forward-character ( $dos-right ) )
        ( keybind forward-word ( $dos-ins $dos-right ) )
        ( keybind previous-line- ( $dos-up ) )
        ( keybind mtool-top ( $dos-ins $dos-up ) )
        ( keybind next-line- ( $dos-down ) )
        ( keybind mtool-bot ( $dos-ins $dos-down ) )
        ( keybind incremental-search-forward- ( $dos-ins "f ) )
        ( keybind go-local-line ( $dos-ins "g ) )
        ( keybind go-start-mark ( $dos-ins $dos-ins ) )
        }}}
        {{{  editing
        ( keybind delete-mark-region ( $dos-ins $dos-end ) )
        }}}
        {{{  folding
        ( keybind open-fold                       ($dos-home)            )
        ( keybind close-fold                      ($dos-prev-page)       )
        ( keybind fold-mark-region                ($dos-next-page)       )
        }}}
        {{{  linehandling
        }}}
        {{{  helps
          ( keybind help- ( $dos-ins "h ) )
          ( keybind describe-bindings- ( $dos-ins "? ) )
        }}}
        {{{  area
        }}}
        {{{  vi-based commands
        }}}
     )
     }}}
  @fi
)
