;------------------------------------------------------------------------------
;
; $VER: Startup.dfn 1.0 (03.03.96)
;
; Startup BED definitions file.
;
; This file is loaded at the startup of the program.
; Deel free to modify it as you like, to suit your needs.
; The default internal definitions of BED are kept in "Standard.dfn"
;
; By Marco Negri
;
;------------------------------------------------------------------------------

;------------------------------------------------------------------------------
;
;  Synopsis:
;
;   MENU <label>
;     ITEM <label> <shortcut> <command> <arguments>
;     ITEM ...
;     ITEM ...
;     BAR
;     ITEM ...
;       SUB <label> <shortcut> <command> <arguments>
;       SUB ...
;
;   MENU ...
;
;   etc.
;
;------------------------------------------------------------------------------

MENUS:

  MENU  "Soubor"
    ITEM  "NovÙ"                      "N" OpenDoc
    ITEM  "Smazat obsah"              ""  ClearFile
    BAR
    ITEM  "OtevÒÉt..."                "O" OpenFile
    ITEM  "OtevÒÉt novÙ..."           "D" OpenDoc FILEREQ
    ITEM  "VloÚit..."                 ""  InsertFile
    BAR
    ITEM  "UloÚit"                    "S" SaveFile
    ITEM  "UloÚit jako..."            "A" SaveFileAs
    ITEM  "UloÚit a skonÃit"          ""  ExecARexxString "SaveFile MODIFIED QUIET; CloseDoc;"
    BAR
    ITEM  "Tisknout..."               "P"  PrintFile
    BAR
    ITEM  "ZavÒÉt"                    ""  CloseDoc
    ITEM  "O BEDu..."                 "?"  About
    ITEM  "Konec"                     "Q"  Quit

  MENU "Okno"
    ITEM  "Vybrat..."                 ""  ExecARexxMacro WINDOW=CON:////Select.../SCREEN* BED:Rexx/SelectDoc.bed
    BAR
    ITEM  "MinimÁlnÉ"                 ""  SizeWindow 0 0
    ITEM  "MaximÁlnÉ"                 ""  SizeWindow 10000 10000
    ITEM  "NormÁlnÉ"                  ""  SetWindowSpec
    ITEM  "UspoÒÁdat"                 ""  Nop
      SUB  "vedle sebe"               ""  ExecARexxMacro BED:Rexx/OrganizeWindows.bed TILE
      SUB  "nad sebou"                ""  ExecARexxMacro BED:Rexx/OrganizeWindows.bed STACK
      SUB  "kaskÁdnÅ"                 ""  ExecARexxMacro BED:Rexx/OrganizeWindows.bed CASCADE
    BAR
    ITEM  "Zapsat umÉstÅnÉ"           ""  ExecARexxString "OPTIONS RESULTS; GetWindowSpec; SetPrefs DefaultWindow RESULT;"
    BAR
    ITEM  "Ikonifikovat"              ""  IconifyWindow TOGGLE
    ITEM  "Iconifikovat vÓe"          ""  ExecARexxMacro BED:Rexx/OrganizeWindows.bed ICONIFY
    BAR
    ITEM  "NaÃÉst pÒedvolby..."       ""  ExecARexxMacro BED:Rexx/LoadDesktop.bed
    ITEM  "UloÚit pÒedvolby jako..."  ""  ExecARexxMacro BED:Rexx/SaveDesktop.bed

  MENU  "õpravy"
    ITEM  "OznaÃit"                   "B" MarkBlk
    BAR
    ITEM  "Vyber slovo"               ""  MarkBlk WORD
    ITEM  "Vyber ÒÁdek"               "E" SelectLine
    ITEM  "Vyber vÓe"                 "T" ExecARexxString "MoveSOF; MarkBlk; MoveEOF;"
    BAR
    ITEM  "VystÒihnout"               "X" CutBlk
    ITEM  "KopÉrovat"                 "C" CopyBlk
    ITEM  "VloÚit"                    "V" PasteClip
    ITEM  "Smazat"                    ""  DeleteBlk QUIET
    ITEM  "PÒidat do clipboardu"      ""  Nop
      SUB "vystÒihnout"               ""  CutBlk APPEND
      SUB "kopÉrovat"                 "Z" CopyBlk APPEND
    BAR
    ITEM  "NaÃÉst z clipboardu..."    ""  OpenClip
    ITEM  "UloÚit clipboard jako..."  ""  SaveClip
    ITEM  "Tisknout clipboard..."     ""  PrintClip

  MENU  "Hledat"
    ITEM  "Hledat..."                 "F" OpenRequester FIND
    ITEM  "Hledat dalÓÉ"              "" Find
    ITEM  "Nahradit..."               "R" OpenRequester FINDCHANGE
    ITEM  "Nahradit dalÓÉ"            "Y" FindChange
    BAR
    ITEM  "SkoÃit na ÒÁdek..."        "L" Move
    ITEM  "SkoÃit na zÁvorku"         ""  MoveMatchBkt
    BAR
    ITEM  "Nastavit zÁloÚku"          ""  Nop
      SUB "# 1"                       ""  SetBookmark 1
      SUB "# 2"                       ""  SetBookmark 2
      SUB "# 3"                       ""  SetBookmark 3
      SUB "# 4"                       ""  SetBookmark 4
      SUB "# 5"                       ""  SetBookmark 5
      SUB "# 6"                       ""  SetBookmark 6
      SUB "# 7"                       ""  SetBookmark 7
      SUB "# 8"                       ""  SetBookmark 8
      SUB "# 9"                       ""  SetBookmark 9
      SUB "# 10"                      ""  SetBookmark 10
    ITEM  "SkoÃit na zÁloÚku"         ""  Nop
      SUB "# 1"                       ""  MoveBookmark 1
      SUB "# 2"                       ""  MoveBookmark 2
      SUB "# 3"                       ""  MoveBookmark 3
      SUB "# 4"                       ""  MoveBookmark 4
      SUB "# 5"                       ""  MoveBookmark 5
      SUB "# 6"                       ""  MoveBookmark 6
      SUB "# 7"                       ""  MoveBookmark 7
      SUB "# 8"                       ""  MoveBookmark 8
      SUB "# 9"                       ""  MoveBookmark 9
      SUB "# 10"                      ""  MoveBookmark 10

  MENU "FormÁt"
    ITEM  "FormÁtovat odstavec"       ""  FormatParagraph
    ITEM  "SkoÃit na odstavec"        ""  Nop
      SUB  "PÒedchozÉ"                ""  ExecARexxMacro BED:Rexx/PrevParagraph
      SUB  "DalÓÉ"                    ""  ExecARexxMacro BED:Rexx/NextParagraph
    ITEM  "Odstranit LF v odstavci"   ""  ExecARexxMacro BED:Rexx/Documentize.bed
    BAR
    ITEM  "Zarovnat"                  ""  Nop
      SUB  "k lev×mu okraji"          ""  LeftJustify
      SUB  "k prav×mu okraji"         ""  RightJustify
      SUB  "k obÅma okrajÊm"          ""  Justify
      SUB  "do stÒedu ÒÁdku"          ""  Center
    BAR
    ITEM  "TabulÁtory -> mezery"      ""  Conv2Spaces
    ITEM  "Mezery -> tabulÁtory"      ""  Conv2Tabs
    ITEM  "Odstranit prÁzdn× znaky"   ""  StripEOLBlanks
    BAR
    ITEM  "Odsadit blok"              ""  ExecARexxMacro BED:Rexx/IndentBlk.bed
    ITEM  "Odsadit blok zpÅt"         ""  ExecARexxMacro BED:Rexx/UnindentBlk.bed
    BAR
    ITEM  "Odsadit ÒÁdek"             ""  ShiftRight TABS
    ITEM  "Odsadit ÒÁdek zpÅt"        ""  ShiftLeft TABS

  MENU  "DoplÎky"
    ITEM  "VrÁtit zpÅt ÒÁdek"         "U" UndoLine
    ITEM  "VrÁtit smazanÙ ÒÁdek"      ""  UndeleteLine
    BAR
    ITEM  "VloÚit aktuÁlnÉ datum"     ""  ExecARexxString "Insert DATE();"
    ITEM  "VloÚit aktuÁlnÉ Ãas"       ""  ExecARexxString "Insert TIME();"
    ITEM  "VloÚit ASCII znak"         ""  SetChar
    ITEM  "VloÚit oznaÃenÉ verze"     ""  ExecARexxMacro BED:Rexx/InsertVersion.bed
    BAR
    ITEM  "Okomentovat blok"          ""  ExecARexxMacro BED:Rexx/CommentBlk.bed
    ITEM  "OÃÉslovat ÒÁdky"           ""  ExecARexxMacro BED:Rexx/NumberLines.bed
    BAR
    ITEM  "Slovo -> malÁ pÉsmena"     ""  Conv2Lower
    ITEM  "Slovo -> velkÁ pÉsmena"    ""  Conv2Upper
    ITEM  "ZmÅnit znak -> malÙ/velkÙ" ""  ToggleCharCase
    BAR
    ITEM  "ZaÓifrovat blok"           ""  EncryptBlk

  MENU  "Makro"
    ITEM  "Spustit zÁznam"            "G" RecordMacro
    ITEM  "UkonÃit zÁznam"            "H" EndMacro
    BAR
    ITEM  "PÒehrÁt zÁznam"            "M" PlayMacro 1
    ITEM  "PÒehrÁt opakovanÅ..."      "I" PlayMacro
    BAR
    ITEM  "NaÃÉst ..."                ""  OpenMacro
    ITEM  "UloÚit jako..."            ""  SaveMacro

  MENU  "PomÊcky"
    ITEM  "NovÙ Shell..."             ""  NewShell
    ITEM  "BED Shell..."              ""  ExecARexxMacro CONSOLE BED:Rexx/CmdShell.bed
    BAR
    ITEM  "Vykonat program..."        ""  ExecTool
    ITEM  "Spustit program..."        ""  RunTool
    ITEM  "Spustit dÁvku..."          ""  ExecDOSScript CONSOLE
    BAR
    ITEM  "KalkulÁtor"                ""  RunTool Calculator PUBSCREEN=Blacks_Editor
    ITEM  "Multiview"                 ""  RunTool Multiview

  MENU "ARexx"
    ITEM  "ARexx makro..."            ""  ExecARexxMacro
    ITEM  "ARexx pÒÉkaz..."           "K" ExecARexxString
    BAR
    ITEM  "BAH!"                      ""  ExecARexxMacro BED:Rexx/BAH!.bed
    ITEM  "AddChars"                  ""  ExecARexxMacro BED:Rexx/AddChars.bed
    ITEM  "CountWords"                ""  ExecARexxMacro BED:Rexx/CountWords.bed
    ITEM  "ExecBlk"                   ""  ExecARexxMacro CONSOLE BED:Rexx/ExecBlk.bed
    ITEM  "PrintBlk"                  ""  ExecARexxMacro BED:Rexx/PrintBlk.bed
    ITEM  "RemoveBlankLines"          ""  ExecARexxMacro BED:Rexx/RemoveBlankLines.bed
    ITEM  "SaveBlk"                   ""  ExecARexxMacro BED:Rexx/SaveBlk.bed
    ITEM  "SaveChangedDocs"           ""  ExecARexxMacro BED:Rexx/SaveChangedDocs.bed
    ITEM  "SetConfig"                 ""  ExecARexxMacro BED:Rexx/SetConfig.bed
    ITEM  "ShowAG"                    ""  ExecARexxMacro BED:Rexx/ShowAG.bed
    ITEM  "UnSetLocks"                ""  ExecARexxMacro BED:Rexx/UnSetLocks.bed

  MENU  "NastavenÉ"
    ITEM  "ZmÅnit"                    ""  Nop
      SUB "AutouklÁdÁnÉ"              "1" OpenRequester AUTOSAVEPREFS
      SUB "ZÁloha"                    "2" OpenRequester BACKUPPREFS
      SUB "Barvy"                     "3" OpenRequester COLORPREFS
      SUB "Obrazovka"                 "4" OpenRequester DISPLAYPREFS
      SUB "Editace"                   "5" OpenRequester EDITPREFS
      SUB "Konec ÒÁdkÊ"               "6" OpenRequester ENDOFLINEPREFS
      SUB "Fonty"                     "7" OpenRequester FONTPREFS
      SUB "Ikony"                     "8" OpenRequester ICONPREFS
      SUB "RÊzn×"                     "9" OpenRequester MISCPREFS
      SUB "TabulÁtory"                "0" OpenRequester TABPREFS
      SUB "ARexx"              	   "+" OpenRequester AREXXPREFS
      SUB "FormÁt"                    "-" OpenRequester FORMATPREFS
    BAR
    ITEM  "NaÃÉst..."                 ""  OpenPrefs
    ITEM  "UloÚit"                    ""  SaveDefPrefs
    ITEM  "UloÚit jako..."            ""  SavePrefs
    BAR
    ITEM  "NaÃÉst definice..."        ""  OpenDefinitions

  MENU "NÁpovÅda"
    ITEM  "Rychl× seznÁmenÉ"          ""  Help QuickReference
    ITEM  "Menu"                      ""  Help Standard_Menus
    ITEM  "PÒÉkazy"                   ""  ExecARexxMacro BED:Rexx/BedCmdHelp.bed
    BAR
    ITEM  "HlavnÉ nÁpovÅda"           ""  Help
#


;------------------------------------------------------------------------------
;
;  Synopsis:
;
;    <qualifier>-<qualifier>-...-<keystroke>   <command> <arguments>
;
;    Valid qualifiers are:
;    - SHIFT
;    - CTRL
;    - ALT
;    - LEFT_AMIGA
;
;    Valid keystrokes are:
;    - RETURN
;    - ENTER
;    - BACKSPACE
;    - DEL
;    - TAB
;    - ESC
;    - HELP
;    - CURSOR_LEFT
;    - CURSOR_RIGHT
;    - CURSOR_UP
;    - CURSOR_DOWN
;    - F1
;    - ...
;    - F12
;    - NP_HOME
;    - NP_END
;    - NP_PGUP
;    - NP_PGDN
;    - NP_INS
;    - NP_DEL
;    - NP_CURSORUP
;    - NP_CURSORDOWN
;    - NP_CURSORLEFT
;    - NP_CURSORRIGHT
;    - NP_SCRL
;    - NP_PRTSC
;
;------------------------------------------------------------------------------

KEYBOARD:

  RETURN            InsertLine
  ENTER             InsertLine INDENT
  BACKSPACE         BackSpace
  DEL               Delete
  TAB               InsertTab
  ESC
  HELP              Help QuickReference

  CURSOR_UP         MoveUp
  CURSOR_DOWN       MoveDown
  CURSOR_RIGHT      MoveRight
  CURSOR_LEFT       MoveLeft

  F1            OpenDoc
  F2            OpenFile
  F3            MoveMatchBkt
  F4            ExecARexxMacro CONSOLE BED:Rexx/CmdShell.bed
  F5            NewShell
  F6            ExecARexxMacro BED:Rexx/PrevParagraph.bed
  F7            ExecARexxMacro BED:Rexx/NextParagraph.bed
  F8            ExecARexxMacro BED:Rexx/IndentBlk.bed
  F9            SaveFile QUIET MODIFIED
  F10           ActivateNextDoc FRONT

  SHIFT-RETURN      InsertLine NOBREAK
  SHIFT-ENTER       InsertLine INDENT NOBREAK
  SHIFT-BACKSPACE   DeleteSOW
  SHIFT-DEL         DeleteEOW
  SHIFT-TAB         InsertTab EXPAND
  SHIFT-ESC
  SHIFT-HELP        Help

  SHIFT-CURSOR_UP       MoveUpScr
  SHIFT-CURSOR_DOWN     MoveDownScr
  SHIFT-CURSOR_RIGHT    MoveNextWord
  SHIFT-CURSOR_LEFT     MovePrevWord

  SHIFT-F1     Help
  SHIFT-F2     OpenDoc FILEREQ
  SHIFT-F3     UndoLine
  SHIFT-F4     SetWindowSpec
  SHIFT-F5     IconifyWindow TOGGLE
  SHIFT-F6     FormatParagraph
  SHIFT-F7     Justify
  SHIFT-F8     ExecARexxMacro BED:Rexx/UnindentBlk.bed
  SHIFT-F9     SaveFileAs
  SHIFT-F10    ActivatePrevDoc FRONT

  ALT-RETURN      InsertLine INDENT NOBREAK
  ALT-ENTER       InsertLine NOBREAK
  ALT-BACKSPACE   DeleteSOL
  ALT-DEL         DeleteEOL
  ALT-TAB         MovePrevTabStop
  ALT-ESC         CloseDoc
  ALT-HELP

  ALT-CURSOR_UP         MoveSOF
  ALT-CURSOR_DOWN       MoveEOF
  ALT-CURSOR_RIGHT      MoveEOL
  ALT-CURSOR_LEFT       MoveSOL

  ALT-F1        MoveBookmark 1
  ALT-F2        MoveBookmark 2
  ALT-F3        MoveBookmark 3
  ALT-F4        MoveBookmark 4
  ALT-F5        MoveBookmark 5
  ALT-F6        MoveBookmark 6
  ALT-F7        MoveBookmark 7
  ALT-F8        MoveBookmark 8
  ALT-F9        MoveBookmark 9
  ALT-F10       MoveBookmark 10

  CTRL-RETURN       InsertLine INDENT
  CTRL-ENTER        InsertLine
  CTRL-BACKSPACE    DeleteLine
  CTRL-DEL          DeleteLine
  CTRL-TAB          MoveNextTabStop
  CTRL-ESC          Quit
  CTRL-HELP

  CTRL-CURSOR_UP        ScrollView -1 RELATIVE
  CTRL-CURSOR_DOWN      ScrollView 1 RELATIVE
  CTRL-CURSOR_RIGHT     ShiftRight
  CTRL-CURSOR_LEFT      ShiftLeft

  CTRL-F1        SetBookmark 1
  CTRL-F2        SetBookmark 2
  CTRL-F3        SetBookmark 3
  CTRL-F4        SetBookmark 4
  CTRL-F5        SetBookmark 5
  CTRL-F6        SetBookmark 6
  CTRL-F7        SetBookmark 7
  CTRL-F8        SetBookmark 8
  CTRL-F9        SetBookmark 9
  CTRL-F10       SetBookmark 10

  CTRL-R      SetPrefs ReadOnly       TOGGLE
  CTRL-T      SetPrefs TabsGiveSpaces TOGGLE
  CTRL-I      SetPrefs AutoIndent     TOGGLE
  CTRL-F      SetPrefs FreeForm       TOGGLE
  CTRL-O      SetPrefs Overstrike     TOGGLE
  CTRL-W      SetPrefs WordWrap       TOGGLE
  CTRL-J      SetPrefs JumpScroll     TOGGLE
  CTRL-B      SetPrefs MakeBackups    TOGGLE
  CTRL-K      SetPrefs IBMKeypad      TOGGLE

  CTRL-Q      SetQuoteMode ON

  CTRL-1      SetPrefs TEXTCOLOR
  CTRL-2      SetPrefs BACKGROUNDCOLOR
  CTRL-3      SetPrefs SELTEXTCOLOR
  CTRL-4      SetPrefs SELBACKGROUNDCOLOR

  ALT-CTRL-CURSOR_LEFT     MoveSOW
  ALT-CTRL-CURSOR_RIGHT    MoveEOW

  ALT-CTRL-DEL             DeleteEOW
  ALT-CTRL-BACKSPACE       DeleteSOW

  NP_HOME         MoveSOF
  NP_END          MoveEOF
  NP_PGUP         ScrollView PAGEUP
  NP_PGDN         ScrollView PAGEDOWN
  NP_INS          SetPrefs OverStrike TOGGLE
  NP_DEL          Delete
  NP_CURSORUP     ScrollVert -1
  NP_CURSORDOWN   ScrollVert 1
  NP_CURSORLEFT   MoveLeft
  NP_CURSORRIGHT  MoveRight
  NP_SCRL         SetPrefs ReadOnly TOGGLE
  NP_PRTSC        PrintFile
#

;------------------------------------------------------------------------------
;
;  Synopsis:
;
;    <mouse button>   <command> <arguments>
;
;    Valid mouse buttons are:
;
;    - DOUBLELEFT
;    - DOUBLEMIDDLE
;    - LEFTRIGHT
;    - LEFTMIDDLE
;    - MIDDLERIGHT
;    - MIDDLELEFT
;
;------------------------------------------------------------------------------

MOUSE_BUTTONS:

  LEFTMIDDLE
  LEFTRIGHT               MarkBlk
  MIDDLELEFT
  MIDDLERIGHT
  DOUBLELEFT              MarkBlk
  DOUBLEMIDDLE
#