; AMOEBA initialization file
;
; predefined functions:
; CallSection
; DefineProcedure

[**init]
CallSection("**application")
CallSection("**menu")
CallSection("**keyboard")
CallSection("**mouse")
CallSection("**command prompt")
CallSection("**bars")
CallSection("**picture")

;---------------------------------------------------------------
; ADK APPLICATION configuration
;---------------------------------------------------------------
[**application]
; define procedures needed for application loading
DefineProcedure("ApplicationDirs", "S", "APPLOAD_apps_dirs", "")
DefineProcedure("LoadApplication", "S", "APPLOAD_load_apps", "")

;---------------------------------------------------------------
; MENU configuration
;---------------------------------------------------------------
[**menu]
; define procedures needed for menu creation
DefineProcedure("InitMenu", "", "MENU_MenuInit", "")
DefineProcedure("CreateMenu", "S", "MENU_CreateMenu", "")
DefineProcedure("CreatePopupMenu", "S", "MENU_CreatePopupMenu", "")
DefineProcedure("AddMenuItem", "SS", "MENU_AddMenuItem", "")
DefineProcedure("AddMenuItemEx", "SSI", "MENU_AddMenuItemEx", "")
DefineProcedure("AddMenuBreak", "", "MENU_AddMenuBreak", "")
DefineProcedure("AddMenuBreakEx", "I", "MENU_AddMenuBreakEx", "")
DefineProcedure("AddMenu", "SS", "MENU_AddMenu", "")
DefineProcedure("EndMenu", "", "MENU_EndMenu", "")
DefineProcedure("MainMenu", "S", "MENU_MainMenu", "")

; initialize menu data (free old menus)
InitMenu()

; create main (application) menu
CallSection("*menu-main")
CallSection("*menu-popup")

; commands not listed in menu: HEAPMIN, HISTORY, INSERT, LAYER, POPUP, SELECT

[*menu-main]
CallSection("*file")
CallSection("*edit")
CallSection("*filter")
CallSection("*draw")
CallSection("*view")
CallSection("*tools")
CallSection("*configuration")
CallSection("*help")

CreateMenu("**menu")
AddMenu("*file", "&Soubor")
AddMenu("*edit", "&Editace")
AddMenu("*filter", "&Filtry")
AddMenu("*draw", "&Kreslen�")
AddMenu("*tools", "&N�stroje")
AddMenu("*configuration", "Nas&taven�")
AddMenu("*view", "&Pohled")
AddMenu("*help", "&N�pov�da")
EndMenu()
MainMenu("**menu")

[*menu-popup]
; create popup menu
CreatePopupMenu("popup1")
AddMenuItem("Koncov� bod", "'_endp\r")
AddMenuItem("Prost�edn� bod", "'_midp\r")
AddMenuItem("St�ed", "'_cenp\r")
AddMenuItem("Bod vlo�en�", "'_insp\r")
AddMenuBreak()
AddMenuItem("Pr�se��k", "'_intp\r")
AddMenuItem("Nejbli���", "'_neap\r")
AddMenuItem("Kolm�", "'_perp\r")
AddMenuItem("Te�na", "'_tanp\r")
AddMenuBreak()
AddMenuItem(".X", "'_.x\r")
AddMenuItem(".Y", "'_.y\r")
AddMenuItem("Prodlou�en�", "'_contin\r")
AddMenuBreak()
AddMenuItem("Zarovnej", "'_align\r")
EndMenu()

[*file]
CreatePopupMenu("*file-advanced")
AddMenuItem("Na��st blok...", "\z_rblock\r")
AddMenuItem("Ulo�it blok...", "\z_wblock\r")
AddMenuItem("Ulo�it v�echny bloky", "\z_wblocks\r")
AddMenuItem("Ulo�it jako bitmapu/metafile", "\z_foto\r")
AddMenuBreak()
AddMenuItem("Vy�istit datab�zi", "\z_purge\r")
EndMenu()

CreatePopupMenu("*file")
AddMenuItemEx("Nov�", "\z_new\r", 1)
AddMenuItemEx("Otev��t...", "\z_open\r", 1)
AddMenuItemEx("Ulo�it", "\z_save\r", 1)
AddMenuItemEx("Ulo�it jako...", "\z_saveas\r", 1)
AddMenuItemEx("Aktualizovat", "\z_update\r", 2)
AddMenuItemEx("Ulo�it kopii jako....", "\z_saveas\r", 2)
AddMenuBreak()
AddMenu("*file-advanced", "Dal�� volby...")
AddMenuBreak()
AddMenuItem("Nastaven� tisku...", "\z_printsetup\r")
AddMenuItem("Tisk", "\z_print\r")
AddMenuBreakEx(1)
AddMenuItemEx("MRU", "", 1)	; this is special menu entry for Most Recently Used Files
AddMenuBreak()
AddMenuItemEx("Konec", "\z_quit\r", 1)
AddMenuItemEx("Konec && N�vrat do dokumentu", "\z_quit\r", 2)
EndMenu()

[*edit]
CreatePopupMenu("*edit")
AddMenuItem("Krok zp�t", "\z_u\r")
AddMenuItem("Zp�t", "\z_undo\r")
AddMenuItem("Opakovat krok", "\z_r\r")
AddMenuBreak()
AddMenuItem("Editovat", "\z_edit\r")
AddMenuItem("Editovat text", "\z_tedit\r")
AddMenuItem("Editovat atribut", "\z_attredit\r")
AddMenuItem("Editovat vlastnosti", "\z_propsd\r")
AddMenuItem("Editovat atributy insertu", "\z_insattrd\r")
AddMenuBreak()
AddMenuItem("Rozbalit","\z_explode\r")
AddMenuBreak()
AddMenuItem("Kop�ruj", "\z_copy\r")
AddMenuItem("Pole", "\z_array\r")
AddMenuItem("Posun", "\z_move\r")
AddMenuItem("Oto�", "\z_rotate\r")
AddMenuItem("Zrcadli", "\z_mirror\r")
AddMenuItem("M���tko", "\z_scale\r")
AddMenuItem("Prot�hnout", "\z_stretch\r")
AddMenuBreak()
AddMenuItem("Vyjmout", "\z_ccut\r")
AddMenuItem("Kop�rovat", "\z_ccopy\r")
AddMenuItem("Vlozit", "\z_cpaste\r")
AddMenuItem("Smazat", "\z_erase\r")
AddMenuItem("Rozd�l", "\z_break\r")
AddMenuItem("O�e�", "\z_trim\r")
AddMenuItem("Zaobli", "\z_fillet\r")
AddMenuItem("Zkos", "\z_chamfer\r")
EndMenu()

[*filter]
CreatePopupMenu("*filter")
AddMenuItem("Koncov� bod", "'_endp\r")
AddMenuItem("Prost�edn� bod", "'_midp\r")
AddMenuItem("St�ed", "'_cenp\r")
AddMenuItem("Bod vlo�en�", "'_insp\r")
AddMenuItem("V�echny body", "'_allp\r")
AddMenuBreak()
AddMenuItem("Pr�se��k", "'_intp\r")
AddMenuItem("Nejbli���", "'_neap\r")
AddMenuItem("Kolm�", "'_perp\r")
AddMenuItem("Te�na", "'_tanp\r")
AddMenuBreak()
AddMenuItem(".X", "'_.x\r")
AddMenuItem(".Y", "'_.y\r")
AddMenuItem("Prodlou�en�", "'_contin\r")
AddMenuBreak()
AddMenuItem("Zarovnej", "'_align\r")
EndMenu()

[*draw]
CreatePopupMenu("*draw")
AddMenuItem("Oblouk", "\z_arc\r")
AddMenuItem("Atribut", "\z_attr\r")
AddMenuItem("Kru�nice", "\z_circle\r")
AddMenuItem("�se�ka", "\z_line\r")
AddMenuItem("Polygon", "\z_solid\r")
AddMenuItem("Text", "\z_text\r")
AddMenuItem("�raf", "\z_hatch\r")
AddMenuBreak()
AddMenuItem("Line�rn� k�ta", "\z_dimlin\r")
AddMenuItem("K�ta polom�ru", "\z_dimrad\r")
AddMenuItem("K�ta pr�m�ru", "\z_dimdia\r")
AddMenuItem("Obloukov� k�ta", "\z_dimarc\r")
AddMenuItem("�hlov� k�ta", "\z_dimang\r")
AddMenuItem("K�tov�n� od", "\z_dimgroup\r")
AddMenuItem("P�vtext", "\z_dimhome\r")
AddMenuBreak()
AddMenuItem("Blok", "\z_block\r")
AddMenuItem("Insert", "\z_insertd\r")
AddMenuBreak()
AddMenuItem("Odruky", "\z_sketch\r")
EndMenu()

[*view]
CreatePopupMenu("*view")
AddMenuItem("Zoom", "'_zoom\r")
AddMenuItem("Zv�t�it", "'_zoom\r2\r")
AddMenuItem("Zmen�it", "'_zoom\r0.5\r")
AddMenuItem("Pan", "'_pan\r")
AddMenuItem("Historie", "'_history\r")
AddMenuBreak()
AddMenuItem("Obnov", "'_regen\r")
EndMenu()

[*tools]
CreatePopupMenu("*tools-app")
AddMenuItem("Na�ti", "\z_load\r")
AddMenuItem("Ukon�i", "\z_unload\r")
AddMenuItem("Aplikace", "\z_apps\r")
EndMenu()

CreatePopupMenu("*tools")
AddMenuItem("M��ka", "\z_grid\r")
AddMenuItem("Orto", "\z_ortho\r")
AddMenuItem("Barva", "\z_color\r")
AddMenuItem("Typ ��ry", "\z_linetype\r")
AddMenuItem("Styl textu", "\z_textstyle\r")
AddMenuItem("Styl k�t", "\z_dimstyle\r")
AddMenuItem("Styl �rafu", "\z_hatchstyle\r")
AddMenuItem("&Hladina", "\z_layerd\r")
AddMenuBreak()
AddMenuItem("Exportovat atributy", "\z_attext\r")
AddMenuBreak()
AddMenuItem("Vypsat", "\z_list\r")
AddMenuItem("Vzd�lenost", "\z_dist\r")
AddMenuItem("Identifikovat bod", "\z_id\r")
AddMenuBreak()
AddMenu("*tools-app", "&Aplikace")
EndMenu()

[*configuration]
CreatePopupMenu("*configuration")
AddMenuItem("Barva pozad�", "\z_bkcolor\r")
AddMenuItem("Vypisov�n� p��kaz�", "\z_cmdecho\r")
AddMenuItem("P��kazy", "\z_commands\r")
AddMenuItem("Jednotky", "\z_units\r")
AddMenuItem("Kurzor", "\z_seldelta\r")
AddMenuItem("Prom�nn�", "\z_setvar\r")
AddMenuItem("Toolbary", "\z_toolbars\r")
EndMenu()

[*help]
CreatePopupMenu("*help")
AddMenuItem("&Obsah", "\z_help\r\r")
AddMenuItem("&Vyhledat v n�pov�d�...", "\z_help\r_search for\r")
AddMenuItem("&Pou�it� n�pov�dy", "\z_help\r_on help\r")
AddMenuBreak()
AddMenuItem("O &aplikaci...", "\z_about\r")
EndMenu()

;---------------------------------------------------------------
; KEYBOARD configuration
;---------------------------------------------------------------
[**keyboard]
DefineProcedure("InitKeyboard", "", "KEYBOARD_KeyboardInit", "")
DefineProcedure("AddVkHotKey", "SSS", "KEYBOARD_AddVkHotKey", "")
DefineProcedure("AddHotKey", "SSS", "KEYBOARD_AddHotKey", "")

InitKeyboard()

; virtual keys
AddVkHotKey("CANCEL", "c", "\z")	; must have control modifier!
AddVkHotKey("ESCAPE", "", "\c")
AddVkHotKey("F1", "", "\z_help\r")
AddVkHotKey("F2", "", "'_history\r")
AddVkHotKey("F7", "", "'_gridsh\r")
AddVkHotKey("F8", "", "'_ortho\r")
AddVkHotKey("F9", "", "'_grid\r\r")
AddVkHotKey("DELETE", "s", "\z_ccut\r")
AddVkHotKey("INSERT", "s", "\z_cpaste\r")
AddVkHotKey("INSERT", "c", "\z_ccopy\r")
AddVkHotKey("DELETE", "", "\z_erase\r")

; "normal" keys
AddHotKey("x", "a", "\z_quit\r")
AddHotKey("c", "c", "\z_ccopy\r")
AddHotKey("x", "c", "\z_ccut\r")
AddHotKey("v", "c", "\z_cpaste\r")

;---------------------------------------------------------------
; MOUSE configuration
;---------------------------------------------------------------
[**mouse]
DefineProcedure("InitMouse", "", "MOUSE_MouseInit", "")
DefineProcedure("AddMouseEnterButton", "SS", "MOUSE_AddMouseEnterButton", "")
DefineProcedure("AddMouseSelectButton", "SS", "MOUSE_AddMouseSelectButton", "")
DefineProcedure("AddMouseTentativeButton", "SS", "MOUSE_AddMouseTentativeButton", "")
DefineProcedure("AddMouseButton", "SSS", "MOUSE_AddMouseButton", "")

InitMouse()

AddMouseEnterButton("RBUTTON", "")
AddMouseSelectButton("LBUTTON", "")
;AddMouseTentativeButton("MBUTTON", "")
AddMouseButton("RBUTTON", "", "\r")
AddMouseButton("LBUTTON", "a", "\z_help\r")
AddMouseButton("RBUTTON", "s", "'_popup\rpopup1\r")

;---------------------------------------------------------------
; Command prompt configuration
;---------------------------------------------------------------
[**command prompt]
; define procedures needed for menu creation
DefineProcedure("CommandWindowLines", "I", "TIO_CommandWindowLines", "")
DefineProcedure("BufferSize", "I", "HISTORY2_SetBufferSize", "")

CommandWindowLines(4)
BufferSize(5000)

;---------------------------------------------------------------
; BARS configuration
;---------------------------------------------------------------
[**bars]
DefineProcedure("InitBars", "", "BARS_InitBars", "")
DefineProcedure("CreateBar", "SSIIS", "BARS_CreateBar", "")
DefineProcedure("EndBar", "", "BARS_EndBar", "")
DefineProcedure("AddBarButton", "ISS", "BARS_AddBarButton", "")
DefineProcedure("AddBarButtonEx", "ISSI", "BARS_AddBarButtonEx", "")
DefineProcedure("AddBarSeparator", "", "BARS_AddBarSeparator", "")
DefineProcedure("AddBarItem", "SSSS", "BARS_AddBarItem", "")

; destroy ald button, set image size
InitBars()

CallSection("*bars-16x15")
;CallSection("*bars-32x32")

; **note**: Toolbars with AddBarItem requires at least one button, otherwise the height is wrong
CreateBar("Status", "ICON16.BMP", 16, 15, "TB")
AddBarButton(39, "\z_layerd\r", "hladina")
AddBarItem("ENTITIES.DLL", "LAYERLST_Create", "Aktu�ln� hladina", "150")
AddBarSeparator()
AddBarButton(52, "'_linetype\r_dialog\r", "typ ��ry")
AddBarItem("ENTITIES.DLL", "LTYPELST_Create", "Aktu�ln� typ ��ry", "150")
AddBarSeparator()
AddBarButton(53, "'_color\r_dialog\r", "barva")
AddBarItem("ENTITIES.DLL", "COLORLST_Create", "Barva", "100")
EndBar()

;---------------------------------------------------------------
; BARS 16x15 pixels
;---------------------------------------------------------------
[*bars-16x15]
CreateBar("Soubor", "ICON16.BMP", 16, 15, "A")
AddBarButton(0, "\z_new\r", "nov�")
AddBarButton(1, "\z_open\r", "otev��t")
AddBarButton(2, "\z_save\r", "ulo�it")
AddBarButton(3, "\z_print\r", "tisk")
AddBarSeparator()
AddBarButton(73, "\z_ccut\r", "vyjmout")
AddBarButton(74, "\z_ccopy\r", "kop�rovat")
AddBarButton(75, "\z_cpaste\r", "vlo�it")
AddBarSeparator()
AddBarButton(6, "\z_rblock\r", "na��st blok")
AddBarButton(7, "\z_wblock\r", "ulo�it blok")
AddBarSeparator()
AddBarButton(4, "\z_foto\r", "foto")
AddBarSeparator()
AddBarButton(5, "\z_purge\r", "�isti")
EndBar()

CreateBar("Kreslen�", "ICON16.BMP", 16, 15, "A")
AddBarButton(8, "\z_block\r", "blok")
AddBarButton(9, "\z_insert\r", "insert")
AddBarSeparator()
AddBarButton(11, "\z_text\r", "text")
AddBarSeparator()
AddBarButton(12, "\z_attr\r", "atribut")
AddBarSeparator()
AddBarButton(13, "\z_line\r", "�se�ka")
AddBarButton(14, "\z_arc\r", "oblouk")
AddBarButton(15, "\z_circle\r", "kru�nice")
AddBarButton(16, "\z_solid\r", "polygon")
AddBarButton(71, "\z_hatch\r", "�raf")
AddBarSeparator()
AddBarButton(78, "\z_sketch\r", "od ruky")
AddBarSeparator()
AddBarButton(17, "\z_dimlin\r", "line�rn� k�ta")
AddBarButton(67, "\z_dimrad\r", "polom�rov� k�ta")
AddBarButton(68, "\z_dimdia\r", "pr�m�rov� k�ta")
AddBarButton(69, "\z_dimarc\r", "obloukov� k�ta")
AddBarButton(70, "\z_dimang\r", "�hlov� k�ta")
AddBarButton(18, "\z_dimgroup\r", "pokra�ov�n� k�t")
AddBarButton(79, "\z_dimhome\r", "p�vodn� pozice textu")
EndBar()

CreateBar("Zobrazen�", "ICON16.BMP", 16, 15, "A")
AddBarButton(19, "'_zoom\r", "zoom")
AddBarButton(20, "'_zoom\r2\r", "zv�t�it")
AddBarButton(21, "'_zoom\r0.5\r", "zmen�it")
AddBarButton(22, "'_zoom\r_extents\r", "zobrazit v�e")
AddBarButton(65, "'_zoom\r_previous\r", "p�edchoz� velikost")
AddBarSeparator()
AddBarButton(23, "'_pan\r", "pan")
AddBarButton(24, "'_regen\r", "obnov")
EndBar()

CreateBar("N�stroje", "ICON16.BMP", 16, 15, "A")
AddBarButton(33, "\z_erase\r", "sma�")
AddBarSeparator()
AddBarButton(25, "\z_u\r", "krok zp�t")
AddBarButton(26, "\z_r\r", "opakovat krok")
AddBarSeparator()
AddBarButton(50, "'_gridsh\r", "M��ka Ano/Ne")
AddBarButton(66, "'_grid\r\r", "P�ichytit do m��ky Ano/Ne")
AddBarButton(51, "'_ortho\r", "Orto Ano/Ne")
EndBar()

CreateBar("Modifikace", "ICON16.BMP", 16, 15, "A")
AddBarButton(27, "\z_copy\r", "kop�ruj")
AddBarButton(48, "\z_array\r", "pole")
AddBarButton(28, "\z_move\r", "posun")
AddBarButton(29, "\z_rotate\r", "oto�")
AddBarButton(30, "\z_mirror\r", "zrcadli")
AddBarButton(31, "\z_scale\r", "m���tko")
AddBarButton(81, "\z_stretch\r", "prot�hni")
AddBarSeparator()
AddBarButton(49, "\z_break\r", "rozd�lit")
AddBarButton(34, "\z_trim\r", "zkr�tit")
AddBarButton(80, "\z_extend\r", "prodlu�")
AddBarButton(35, "\z_fillet\r", "zaoblit")
AddBarButton(36, "\z_chamfer\r", "zkosit")
AddBarSeparator()
AddBarButton(10, "\z_explode\r", "rozbalit")
AddBarButton(32, "\z_propsd\r", "vlastnosti")
EndBar()

CreateBar("Editace", "ICON16.BMP", 16, 15, "A")
AddBarButton(37, "\z_textstyle\r", "styl textu")
AddBarButton(38, "\z_dimstyle\r", "styl k�t")
AddBarButton(72, "\z_hatchstyle\r", "styl �rafu")
AddBarSeparator()
AddBarButton(40, "\z_edit\r", "editovat")
AddBarButton(41, "\z_tedit\r", "editovat text")
AddBarButton(42, "\z_attredit\r", "editovat atribut")
AddBarButton(43, "\z_insattrd\r", "editovat atributy insertu")
EndBar()

CreateBar("Informace", "ICON16.BMP", 16, 15, "A")
AddBarButton(44, "'_list\r", "v�pis")
AddBarButton(45, "'_id\r", "identifikace bodu")
AddBarButton(46, "'_dist\r", "vzd�lenost")
AddBarSeparator()
AddBarButton(47, "'_help\r", "n�pov�da")
EndBar()

CreateBar("Filtry", "ICON16.BMP", 16, 15, "A")
AddBarButton(77, "'_sticky\r", "lep")
AddBarSeparator()
AddBarButton(54, "'_endp\r", "koncov� bod")
AddBarButton(55, "'_midp\r", "prost�edn� bod")
AddBarButton(56, "'_intp\r", "pr�se��k")
AddBarButton(57, "'_cenp\r", "st�ed")
AddBarButton(58, "'_perp\r", "kolm�")
AddBarButton(59, "'_tanp\r", "te�na")
AddBarButton(60, "'_insp\r", "bod vlo�en�")
AddBarButton(61, "'_neap\r", "nejbli��� bod")
AddBarButton(64, "'_align\r", "zarovnej")
AddBarSeparator()
AddBarButton(62, "'.x\r", ".X")
AddBarButton(63, "'.y\r", ".Y")
AddBarButton(76, "'_contin\r", "prodlou�en�")
EndBar()

;---------------------------------------------------------------
; BARS 32x32 pixels
;---------------------------------------------------------------
[*bars-32x32]
CreateBar("Soubor", "ICON32.BMP", 32, 32, "A")
AddBarButton(0, "\z_new\r", "nov�")
AddBarButton(1, "\z_open\r", "otev��t")
AddBarButton(2, "\z_save\r", "ulo�it")
AddBarButton(3, "\z_print\r", "tisk")
AddBarSeparator()
AddBarButton(73, "\z_ccut\r", "vyjmout")
AddBarButton(74, "\z_ccopy\r", "kop�rovat")
AddBarButton(75, "\z_cpaste\r", "vlo�it")
AddBarSeparator()
AddBarButton(6, "\z_rblock\r", "na��st blok")
AddBarButton(7, "\z_wblock\r", "ulo�it blok")
AddBarSeparator()
AddBarButton(4, "\z_foto\r", "foto")
AddBarSeparator()
AddBarButton(5, "\z_purge\r", "�isti")
EndBar()

CreateBar("Kreslen�", "ICON32.BMP", 32, 32, "A")
AddBarButton(8, "\z_block\r", "blok")
AddBarButton(9, "\z_insert\r", "insert")
AddBarSeparator()
AddBarButton(11, "\z_text\r", "text")
AddBarSeparator()
AddBarButton(12, "\z_attr\r", "atribut")
AddBarSeparator()
AddBarButton(13, "\z_line\r", "�se�ka")
AddBarButton(14, "\z_arc\r", "oblouk")
AddBarButton(15, "\z_circle\r", "kru�nice")
AddBarButton(16, "\z_solid\r", "polygon")
AddBarButton(71, "\z_hatch\r", "�raf")
AddBarSeparator()
AddBarButton(78, "\z_sketch\r", "od ruky")
AddBarSeparator()
AddBarButton(17, "\z_dimlin\r", "line�rn� k�ta")
AddBarButton(67, "\z_dimrad\r", "polom�rov� k�ta")
AddBarButton(68, "\z_dimdia\r", "pr�m�rov� k�ta")
AddBarButton(69, "\z_dimarc\r", "obloukov� k�ta")
AddBarButton(70, "\z_dimang\r", "�hlov� k�ta")
AddBarButton(18, "\z_dimgroup\r", "pokra�ov�n� k�t")
AddBarButton(79, "\z_dimhome\r", "p�vodn� pozice textu")
EndBar()

CreateBar("Zobrazen�", "ICON32.BMP", 32, 32, "A")
AddBarButton(19, "'_zoom\r", "zoom")
AddBarButton(20, "'_zoom\r2\r", "zv�t�it")
AddBarButton(21, "'_zoom\r0.5\r", "zmen�it")
AddBarButton(22, "'_zoom\r_extents\r", "zobrazit v�e")
AddBarButton(65, "'_zoom\r_previous\r", "p�edchoz� velikost")
AddBarSeparator()
AddBarButton(23, "'_pan\r", "pan")
AddBarButton(24, "'_regen\r", "obnov")
EndBar()

CreateBar("N�stroje", "ICON32.BMP", 32, 32, "A")
AddBarButton(33, "\z_erase\r", "sma�")
AddBarSeparator()
AddBarButton(25, "\z_u\r", "krok zp�t")
AddBarButton(26, "\z_r\r", "opakovat krok")
AddBarSeparator()
AddBarButton(50, "'_gridsh\r", "M��ka Ano/Ne")
AddBarButton(66, "'_grid\r\r", "P�ichytit do m��ky Ano/Ne")
AddBarButton(51, "'_ortho\r", "Orto Ano/Ne")
EndBar()

CreateBar("Modifikace", "ICON32.BMP", 32, 32, "A")
AddBarButton(27, "\z_copy\r", "kop�ruj")
AddBarButton(48, "\z_array\r", "pole")
AddBarButton(28, "\z_move\r", "posun")
AddBarButton(29, "\z_rotate\r", "oto�")
AddBarButton(30, "\z_mirror\r", "zrcadli")
AddBarButton(31, "\z_scale\r", "m���tko")
AddBarButton(81, "\z_stretch\r", "prot�hni")
AddBarSeparator()
AddBarButton(49, "\z_break\r", "rozd�lit")
AddBarButton(34, "\z_trim\r", "zkr�tit")
AddBarButton(80, "\z_extend\r", "prodlu�")
AddBarButton(35, "\z_fillet\r", "zaoblit")
AddBarButton(36, "\z_chamfer\r", "zkosit")
AddBarSeparator()
AddBarButton(10, "\z_explode\r", "rozbalit")
AddBarButton(32, "\z_propsd\r", "vlastnosti")
EndBar()

CreateBar("Editace", "ICON32.BMP", 32, 32, "A")
AddBarButton(37, "\z_textstyle\r", "styl textu")
AddBarButton(38, "\z_dimstyle\r", "styl k�t")
AddBarButton(72, "\z_hatchstyle\r", "styl �rafu")
AddBarSeparator()
AddBarButton(40, "\z_edit\r", "editovat")
AddBarButton(41, "\z_tedit\r", "editovat text")
AddBarButton(42, "\z_attredit\r", "editovat atribut")
AddBarButton(43, "\z_insattrd\r", "editovat atributy insertu")
EndBar()

CreateBar("Informace", "ICON32.BMP", 32, 32, "A")
AddBarButton(44, "'_list\r", "v�pis")
AddBarButton(45, "'_id\r", "identifikace bodu")
AddBarButton(46, "'_dist\r", "vzd�lenost")
AddBarSeparator()
AddBarButton(47, "'_help\r", "n�pov�da")
EndBar()

CreateBar("Filtry", "ICON32.BMP", 32, 32, "A")
AddBarButton(77, "'_sticky\r", "lep")
AddBarSeparator()
AddBarButton(54, "'_endp\r", "koncov� bod")
AddBarButton(55, "'_midp\r", "prost�edn� bod")
AddBarButton(56, "'_intp\r", "pr�se��k")
AddBarButton(57, "'_cenp\r", "st�ed")
AddBarButton(58, "'_perp\r", "kolm�")
AddBarButton(59, "'_tanp\r", "te�na")
AddBarButton(60, "'_insp\r", "bod vlo�en�")
AddBarButton(61, "'_neap\r", "nejbli��� bod")
AddBarButton(64, "'_align\r", "zarovnej")
AddBarSeparator()
AddBarButton(62, "'.x\r", ".X")
AddBarButton(63, "'.y\r", ".Y")
AddBarButton(76, "'_contin\r", "prodlou�en�")
EndBar()

;---------------------------------------------------------------
; PICTURE configuration
;---------------------------------------------------------------
[**picture]
; define procedure needed for picture initialization
DefineProcedure("PictureRegisterExtension", "SS", "PICTURE_set_extensions", "picture.dll")
; and use the procedure
PictureRegisterExtension("PICBMP","BMP DIB")
PictureRegisterExtension("PICJPEG","JPEG JFIF JPE JPG")
PictureRegisterExtension("PICPCX","PCX")
PictureRegisterExtension("PICPNG","PNG")
PictureRegisterExtension("PICTIFF","TIF TIFF")
