home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 March / Chip_1998-03_cd.bin / tema / jpcad / CONFIG.IN_ / CONFIG.IN
Text File  |  1998-01-21  |  23KB  |  661 lines
  1. ; AMOEBA initialization file
  2. ;
  3. ; predefined functions:
  4. ; CallSection
  5. ; DefineProcedure
  6.  
  7. [**init]
  8. CallSection("**application")
  9. CallSection("**menu")
  10. CallSection("**keyboard")
  11. CallSection("**mouse")
  12. CallSection("**command prompt")
  13. CallSection("**bars")
  14. CallSection("**picture")
  15.  
  16. ;---------------------------------------------------------------
  17. ; ADK APPLICATION configuration
  18. ;---------------------------------------------------------------
  19. [**application]
  20. ; define procedures needed for application loading
  21. DefineProcedure("ApplicationDirs", "S", "APPLOAD_apps_dirs", "")
  22. DefineProcedure("LoadApplication", "S", "APPLOAD_load_apps", "")
  23.  
  24. ; sem umφst∞te aplikace, kterΘ chcete naΦφst do JPCADu
  25. ; p°φklad:
  26. ; LoadApplication("c:\testy\test1.exe")
  27.  
  28. ;odkomentujte nßsledujφcφ °ßdku, pokud chcete pou₧φvat aplikaci
  29. ;LDSCRIPT pro spouÜt∞nφ maker v JPCADu
  30. ; LoadApplication("macro\ldscript.exe")
  31.  
  32. ;---------------------------------------------------------------
  33. ; MENU configuration
  34. ;---------------------------------------------------------------
  35. [**menu]
  36. ; define procedures needed for menu creation
  37. DefineProcedure("InitMenu", "", "MENU_MenuInit", "")
  38. DefineProcedure("CreateMenu", "S", "MENU_CreateMenu", "")
  39. DefineProcedure("CreatePopupMenu", "S", "MENU_CreatePopupMenu", "")
  40. DefineProcedure("AddMenuItem", "SS", "MENU_AddMenuItem", "")
  41. DefineProcedure("AddMenuItemEx", "SSI", "MENU_AddMenuItemEx", "")
  42. DefineProcedure("AddMenuBreak", "", "MENU_AddMenuBreak", "")
  43. DefineProcedure("AddMenuBreakEx", "I", "MENU_AddMenuBreakEx", "")
  44. DefineProcedure("AddMenu", "SS", "MENU_AddMenu", "")
  45. DefineProcedure("EndMenu", "", "MENU_EndMenu", "")
  46. DefineProcedure("MainMenu", "S", "MENU_MainMenu", "")
  47.  
  48. ; initialize menu data (free old menus)
  49. InitMenu()
  50.  
  51. ; create main (application) menu
  52. CallSection("*menu-main")
  53. CallSection("*menu-popup")
  54.  
  55. [*menu-main]
  56. CallSection("*file")
  57. CallSection("*edit")
  58. CallSection("*draw")
  59. CallSection("*transform")
  60. CallSection("*view")
  61. CallSection("*tools")
  62. CallSection("*help")
  63.  
  64. CreateMenu("**menu")
  65. AddMenu("*file", "&Soubor")
  66. AddMenu("*edit", "&Editace")
  67. AddMenu("*draw", "&Kreslenφ")
  68. AddMenu("*transform", "&Modifikace")
  69. AddMenu("*tools", "&Nßstroje")
  70. AddMenu("*view", "&Pohled")
  71. AddMenu("*help", "Nßpo&v∞da")
  72. EndMenu()
  73. MainMenu("**menu")
  74.  
  75. [*menu-popup]
  76. ; create popup menu
  77. CreatePopupMenu("popup1")
  78. AddMenuItem("&Koncov² bod", "'_endp\r")
  79. AddMenuItem("&Prost°ednφ bod", "'_midp\r")
  80. AddMenuItem("&St°ed", "'_cenp\r")
  81. AddMenuItem("Bod &vlo₧enφ", "'_insp\r")
  82. AddMenuBreak()
  83. AddMenuItem("P&r∙seΦφk", "'_intp\r")
  84. AddMenuItem("&Nejbli₧Üφ", "'_neap\r")
  85. AddMenuItem("Ko&lm²", "'_perp\r")
  86. AddMenuItem("&TeΦna", "'_tanp\r")
  87. AddMenuBreak()
  88. AddMenuItem(".&X", "'_.x\r")
  89. AddMenuItem(".&Y", "'_.y\r")
  90. AddMenuBreak()
  91. AddMenuItem("Pro&dlou₧enφ", "'_contin\r")
  92. AddMenuItem("R&ovnob∞₧ka", "'_parf\r")
  93. AddMenuItem("Zob&ecn∞n² pr∙seΦφk","'_gintp\r")
  94. AddMenuItem("&Zarovnej", "'_align\r")
  95. AddMenuBreak()
  96. AddMenuItem("&Lep","'_sticky\r")
  97. EndMenu()
  98.  
  99. [*file]
  100. CreatePopupMenu("*file-advanced")
  101. AddMenuItem("&NaΦφst blok...", "\z_rblock\r")
  102. AddMenuItem("&Ulo₧it blok...", "\z_wblock\r")
  103. AddMenuItem("Ulo₧it &vÜechny bloky", "\z_wblocks\r")
  104. AddMenuItem("Ulo₧it jako &bitmapu/metafile", "\z_foto\r")
  105. EndMenu()
  106.  
  107. CreatePopupMenu("*file-database")
  108. AddMenuItem("&VyΦistit databßzi", "\z_purge\r")
  109. EndMenu()
  110.  
  111. CreatePopupMenu("*file")
  112. AddMenuItemEx("&Nov²\tCtrl+N", "\z_new\r", 1)
  113. AddMenuItemEx("&Otev°φt...\tCtrl+O", "\z_open\r", 1)
  114. AddMenuItemEx("&Ulo₧it\tCtrl+S", "\z_save\r", 1)
  115. AddMenuItemEx("Ulo₧it &jako...", "\z_saveas\r", 1)
  116. AddMenuItemEx("&Aktualizovat", "\z_update\r", 2)
  117. AddMenuItemEx("Ulo₧it &kopii jako....", "\z_saveas\r", 2)
  118. AddMenuBreak()
  119. AddMenu("*file-advanced", "&Import/Export...")
  120. AddMenu("*file-database","&V²kres...")
  121. AddMenuBreak()
  122. AddMenuItem("Nasta&venφ tisku...", "\z_printsetup\r")
  123. AddMenuItem("&Tisk\tCtrl+P", "\z_print\r")
  124. AddMenuBreakEx(1)
  125. AddMenuItemEx("MRU", "", 1)    ; this is special menu entry for Most Recently Used Files
  126. AddMenuBreak()
  127. AddMenuItemEx("&Konec\tAlt+X", "\z_quit\r", 1)
  128. AddMenuItemEx("&Konec && Nßvrat do dokumentu", "\z_quit\r", 2)
  129. EndMenu()
  130.  
  131. [*edit]
  132. CreatePopupMenu("*edit")
  133. AddMenuItem("Krok &zp∞t\tCtrl+Z", "\z_u\r")
  134. AddMenuItem("&Opakovat krok\tCtrl+Y", "\z_r\r")
  135. AddMenuItem("Z&p∞t\tCtrl+Y", "\z_undo\r")
  136. AddMenuBreak()
  137. AddMenuItem("&Vyjmout\tCtrl+X", "\z_ccut\r")
  138. AddMenuItem("&Kopφrovat\tCtrl+C", "\z_ccopy\r")
  139. AddMenuItem("&Vlo₧it\tCtrl+V", "\z_cpaste\r")
  140. AddMenuBreak()
  141. AddMenuItem("&Smazat", "\z_erase\r")
  142. EndMenu()
  143.  
  144. [*transform]
  145. CreatePopupMenu("*transform")
  146. AddMenuItem("&Kopφruj", "\z_copy\r")
  147. AddMenuItem("&Posun", "\z_move\r")
  148. AddMenuItem("&OtoΦ", "\z_rotate\r")
  149. AddMenuItem("Zr&cadli", "\z_mirror\r")
  150. AddMenuItem("&M∞°φtko", "\z_scale\r")
  151. AddMenuItem("Po&le", "\z_array\r")
  152. AddMenuItem("Protß&hnout", "\z_stretch\r")
  153. AddMenuBreak()
  154. AddMenuItem("&Editovat", "\z_edit\r")
  155. AddMenuItem("Editovat &text", "\z_tedit\r")
  156. AddMenuItem("Editovat &atribut", "\z_attredit\r")
  157. AddMenuItem("Editovat atributy &bloku", "\z_insattrd\r")
  158. AddMenuItem("&Vlastnosti", "\z_propsd\r")
  159. AddMenuBreak()
  160. AddMenuItem("&Rozd∞l", "\z_break\r")
  161. AddMenuItem("&O°e₧", "\z_trim\r")
  162. AddMenuItem("&Zaobli", "\z_fillet\r")
  163. AddMenuItem("Zko&s", "\z_chamfer\r")
  164. AddMenuItem("O&ffset","\z_offset\r")
  165. EndMenu()
  166.  
  167.  
  168. [*draw]
  169. CreatePopupMenu("*dimension")
  170. AddMenuItem("&Lineßrnφ k≤tovßnφ", "\z_dimlin\r")
  171. AddMenuItem("K≤tovßnφ &polom∞ru", "\z_dimrad\r")
  172. AddMenuItem("K≤tovßnφ p&r∙m∞ru", "\z_dimdia\r")
  173. AddMenuItem("K≤tovßnφ &oblouku", "\z_dimarc\r")
  174. AddMenuItem("k≤tovßnφ ·&hlu", "\z_dimang\r")
  175. AddMenuItem("&NßvaznΘ k≤tovßnφ", "\z_dimgroup\r")
  176. AddMenuItem("P∙vodnφ umφst∞nφ &textu", "\z_dimhome\r")
  177. EndMenu()
  178.  
  179. CreatePopupMenu("*draw")
  180. AddMenuItem("&Oblouk", "\z_arc\r")
  181. AddMenuItem("&Atribut", "\z_attr\r")
  182. AddMenuItem("&Kru₧nice", "\z_circle\r")
  183. AddMenuItem("┌&seΦka", "\z_line\r")
  184. AddMenuItem("&Polygon", "\z_solid\r")
  185. AddMenuItem("&Text", "\z_text\r")
  186. AddMenuItem("èra&f", "\z_hatch\r")
  187. AddMenu("*dimension","K≤tovßnφ")
  188. AddMenuBreak()
  189. AddMenuItem("&Definovat blok", "\z_block\r")
  190. AddMenuItem("&Vlo₧it blok", "\z_insertd\r")
  191. AddMenuItem("&Skupina","\z_group\r")
  192. AddMenuItem("&Rozbalit","\z_explode\r")
  193. AddMenuBreak()
  194. AddMenuItem("Kreslenφ o&d ruky", "\z_sketch\r")
  195. EndMenu()
  196.  
  197.  
  198. [*view]
  199. CreatePopupMenu("*view")
  200. AddMenuItem("&Zoom", "'_zoom\r")
  201. AddMenuItem("Z&v∞tÜit\tCtrl++", "'_zoom\r2\r")
  202. AddMenuItem("Z&menÜit\tCtrl+-", "'_zoom\r0.5\r")
  203. AddMenuItem("&Posunutφ zobrazenφ", "'_pan\r")
  204. AddMenuItem("&Historie\tF2", "'_history\r")
  205. AddMenuBreak()
  206. AddMenuItem("&Obnov\tF5", "'_regen\r")
  207. EndMenu()
  208.  
  209. [*tools]
  210. CreatePopupMenu("*configuration")
  211. AddMenuItem("&Barva pozadφ", "\z_bkcolor\r")
  212. AddMenuItem("&Jednotky", "\z_units\r")
  213. AddMenuItem("&Kurzor", "\z_seldelta\r")
  214. AddMenuItem("Nastavenφ p&rom∞nn²ch", "\z_setvard\r")
  215. AddMenuItem("&NßstrojovΘ liÜty", "\z_toolbars\r")
  216. EndMenu()
  217.  
  218. CreatePopupMenu("*filter")
  219. AddMenuItem("&Koncov² bod", "'_endp\r")
  220. AddMenuItem("&Prost°ednφ bod", "'_midp\r")
  221. AddMenuItem("&St°ed", "'_cenp\r")
  222. AddMenuItem("&Bod vlo₧enφ", "'_insp\r")
  223. AddMenuItem("&VÜechny body", "'_allp\r")
  224. AddMenuBreak()
  225. AddMenuItem("P&r∙seΦφk", "'_intp\r")
  226. AddMenuItem("&Nejbli₧Üφ", "'_neap\r")
  227. AddMenuItem("&Kolm²", "'_perp\r")
  228. AddMenuItem("&TeΦna", "'_tanp\r")
  229. AddMenuBreak()
  230. AddMenuItem(".&X", "'_.x\r")
  231. AddMenuItem(".&Y", "'_.y\r")
  232. AddMenuBreak()
  233. AddMenuItem("Pro&dlou₧enφ", "'_contin\r")
  234. AddMenuItem("R&ovnob∞₧ka", "'_parf\r")
  235. AddMenuItem("Zob&ecn∞n² pr∙seΦφk","'_gintp\r")
  236. AddMenuItem("&Zarovnej", "'_align\r")
  237. AddMenuBreak()
  238. AddMenuItem("&Lep","'_sticky\r")
  239. EndMenu()
  240.  
  241. CreatePopupMenu("*tools-app")
  242. AddMenuItem("&NaΦti", "\z_load\r")
  243. AddMenuItem("&UkonΦi", "\z_unload\r")
  244. AddMenuItem("&Aplikace", "\z_apps\r")
  245. EndMenu()
  246.  
  247. CreatePopupMenu("*tools")
  248. AddMenu("*configuration","&Nastavenφ")
  249. AddMenuBreak()
  250. AddMenu("*filter", "&Filtry")
  251. AddMenuItem("&M°φ₧ka\tF9", "\z_grid\r")
  252. AddMenuItem("&Orto\tF8", "\z_ortho\r")
  253. AddMenuItem("&Barva", "\z_color\r_dialog\r")
  254. AddMenuItem("T&yp Φßry", "\z_linetype\r_dialog\r")
  255. AddMenuItem("Styl &textu", "\z_textstyle\r")
  256. AddMenuItem("Styl &k≤t", "\z_dimstyle\r")
  257. AddMenuItem("Styl Üra&fu", "\z_hatchstyle\r")
  258. AddMenuItem("&Hladina", "\z_layerd\r")
  259. AddMenuBreak()
  260. AddMenuItem("E&xportovat atributy", "\z_attext\r")
  261. AddMenuBreak()
  262. AddMenuItem("&Vypsat", "\z_list\r")
  263. AddMenuItem("V&zdßlenost", "\z_dist\r")
  264. AddMenuItem("I&dentifikovat bod", "\z_id\r")
  265. AddMenuBreak()
  266. AddMenu("*tools-app", "&Aplikace")
  267. EndMenu()
  268.  
  269. [*help]
  270. CreatePopupMenu("*help")
  271. AddMenuItem("&Obsah\tF1", "'_help\r\r")
  272. AddMenuItem("&Vyhledat v nßpov∞d∞...\tShift+F1", "'_help\r_search for\r")
  273. AddMenuItem("&Pr∙vodce", "'_help\rTUTORIAL.HLP\r")
  274. AddMenuBreak()
  275. AddMenuItem("&Pou₧itφ nßpov∞dy", "'_help\r_on help\r")
  276. AddMenuItem("&Tip dne","'_tips\r")
  277. AddMenuBreak()
  278. AddMenuItem("O &aplikaci...", "'_about\r")
  279. EndMenu()
  280.  
  281. ;---------------------------------------------------------------
  282. ; KEYBOARD configuration
  283. ;---------------------------------------------------------------
  284. [**keyboard]
  285. DefineProcedure("InitKeyboard", "", "KEYBOARD_KeyboardInit", "")
  286. DefineProcedure("AddVkHotKey", "SSS", "KEYBOARD_AddVkHotKey", "")
  287. DefineProcedure("AddHotKey", "SSS", "KEYBOARD_AddHotKey", "")
  288.  
  289. InitKeyboard()
  290.  
  291. ; virtual keys
  292. AddVkHotKey("CANCEL", "c", "\z")    ; must have control modifier!
  293. AddVkHotKey("ESCAPE", "", "\c")
  294. AddVkHotKey("F1", "", "'_help\r\r")
  295. AddVkHotKey("F1", "s", "'_help\r\_search for\r")
  296. AddVkHotKey("F2", "", "'_history\r")
  297. AddVkHotKey("F5", "", "'_regen\r")
  298. AddVkHotKey("F7", "", "'_gridsh\r")
  299. AddVkHotKey("F8", "", "'_ortho\r")
  300. AddVkHotKey("F9", "", "'_grid\r\r")
  301. AddVkHotKey("BACK", "a", "\z_u\r")
  302. AddVkHotKey("ADD", "c", "'_zoom\r2\r")
  303. AddVkHotKey("SUBTRACT", "c", "'_zoom\r0.5\r")
  304.  
  305. ;cut, copy & paste
  306. AddVkHotKey("DELETE", "s", "\z_ccut\r")
  307. AddVkHotKey("INSERT", "s", "\z_cpaste\r")
  308. AddVkHotKey("INSERT", "c", "\z_ccopy\r")
  309. ; "normal" keys
  310. ; copy, cut & paste
  311. AddHotKey("c", "c", "\z_ccopy\r")
  312. AddHotKey("x", "c", "\z_ccut\r")
  313. AddHotKey("v", "c", "\z_cpaste\r")
  314.  
  315. ;pokud chcete pou₧φvat klßvesovΘ zkratky pro vklßdßnφ textu do editboxu na p°φkazovΘ
  316. ;°ßdce, vyma₧te v²Üe uvedenΘ p°φsluÜnΘ t°i klßvesovΘ zkratky pro copy, cut & paste,
  317. ;kterΘ jste zvyklφ pou₧φvat
  318. ;V souΦasnΘm nastavenφ se klßvesovΘ zkratky pro kopφrovßnφ, vyst°i₧enφ a vlo₧enφ
  319. ;(copy, cut & paste) pou₧φvajφ POUZE pro v²kres.
  320. ;Do p°φkazovΘ °ßdky m∙₧ete vlo₧it text ze schrßnky pokud v textovΘm polφΦku stisknete
  321. ;pravΘ tlaΦφtko myÜi - objevφ se kontextovΘ menu s p°φkazy (Pozor - nefunguje na Win32s)
  322.  
  323.  
  324. ; "normal" keys
  325. ;other actions
  326. AddHotKey("x", "a", "\z_quit\r")
  327. AddHotKey("n", "c", "\z_new\r")
  328. AddHotKey("o", "c", "\z_open\r")
  329. AddHotKey("s", "c", "\z_save\r")
  330. AddHotKey("p", "c", "\z_print\r")
  331. AddHotKey("z", "c", "\z_u\r")
  332. AddHotKey("y", "c", "\z_r\r")
  333.  
  334. ;---------------------------------------------------------------
  335. ; MOUSE configuration
  336. ;---------------------------------------------------------------
  337. [**mouse]
  338. DefineProcedure("InitMouse", "", "MOUSE_MouseInit", "")
  339. DefineProcedure("AddMouseEnterButton", "SS", "MOUSE_AddMouseEnterButton", "")
  340. DefineProcedure("AddMouseSelectButton", "SS", "MOUSE_AddMouseSelectButton", "")
  341. DefineProcedure("AddMouseButton", "SSS", "MOUSE_AddMouseButton", "")
  342.  
  343. InitMouse()
  344.  
  345. AddMouseEnterButton("RBUTTON", "")
  346. AddMouseSelectButton("LBUTTON", "")
  347. AddMouseButton("LBUTTON", "a", "'_help\r")
  348. AddMouseButton("RBUTTON", "s", "'_popup\rpopup1\r")
  349.  
  350. ;---------------------------------------------------------------
  351. ; Command prompt configuration
  352. ;---------------------------------------------------------------
  353. [**command prompt]
  354. ; define procedures needed for menu creation
  355. DefineProcedure("CommandWindowLines", "I", "TIO_CommandWindowLines", "")
  356. DefineProcedure("BufferSize", "I", "HISTORY2_SetBufferSize", "")
  357.  
  358. CommandWindowLines(4)
  359. BufferSize(5000)
  360.  
  361. ;---------------------------------------------------------------
  362. ; BARS configuration
  363. ;---------------------------------------------------------------
  364. [**bars]
  365. DefineProcedure("InitBars", "", "BARS_InitBars", "")
  366. DefineProcedure("CreateBar", "SSIIS", "BARS_CreateBar", "")
  367. DefineProcedure("EndBar", "", "BARS_EndBar", "")
  368. DefineProcedure("AddBarButton", "ISS", "BARS_AddBarButton", "")
  369. DefineProcedure("AddBarButtonEx", "ISSI", "BARS_AddBarButtonEx", "")
  370. DefineProcedure("AddBarSeparator", "", "BARS_AddBarSeparator", "")
  371. DefineProcedure("AddBarItem", "SSSS", "BARS_AddBarItem", "")
  372.  
  373. ; destroy ald button, set image size
  374. InitBars()
  375.  
  376. CallSection("*bars-16x15")
  377. ;CallSection("*bars-32x32")
  378.  
  379. ; **note**: Toolbars with AddBarItem requires at least one button, otherwise the height is wrong
  380. CreateBar("Status", "ICON16.BMP", 16, 15, "TB")
  381. AddBarButton(39, "\z_layerd\r", "hladina")
  382. AddBarItem("ENTITIES.DLL", "LAYERLST_Create", "Aktußlnφ hladina", "150")
  383. AddBarSeparator()
  384. AddBarButton(52, "'_linetype\r_dialog\r", "typ Φßry")
  385. AddBarItem("ENTITIES.DLL", "LTYPELST_Create", "Aktußlnφ typ Φßry", "150")
  386. AddBarSeparator()
  387. AddBarButton(53, "'_color\r_dialog\r", "barva")
  388. AddBarItem("ENTITIES.DLL", "COLORLST_Create", "Barva", "100")
  389. EndBar()
  390.  
  391. ;---------------------------------------------------------------
  392. ; BARS 16x15 pixels
  393. ;---------------------------------------------------------------
  394. [*bars-16x15]
  395. CreateBar("Soubor", "ICON16.BMP", 16, 15, "A")
  396. AddBarButton(0, "\z_new\r", "nov²")
  397. AddBarButton(1, "\z_open\r", "otev°φt")
  398. AddBarButton(2, "\z_save\r", "ulo₧it")
  399. AddBarButton(3, "\z_print\r", "tisk")
  400. AddBarSeparator()
  401. AddBarButton(73, "\z_ccut\r", "vyjmout")
  402. AddBarButton(74, "\z_ccopy\r", "kopφrovat")
  403. AddBarButton(75, "\z_cpaste\r", "vlo₧it")
  404. AddBarSeparator()
  405. AddBarButton(6, "\z_rblock\r", "naΦφst blok")
  406. AddBarButton(7, "\z_wblock\r", "ulo₧it blok")
  407. AddBarSeparator()
  408. AddBarButton(4, "\z_foto\r", "foto")
  409. AddBarSeparator()
  410. AddBarButton(5, "\z_purge\r", "Φisti")
  411. EndBar()
  412.  
  413. CreateBar("Kreslenφ", "ICON16.BMP", 16, 15, "A")
  414. AddBarButton(8, "\z_block\r", "definice bloku")
  415. AddBarButton(9, "\z_insert\r", "vlo₧enφ bloku")
  416. AddBarButton(85, "\z_group\r", "skupina")
  417. AddBarSeparator()
  418. AddBarButton(11, "\z_text\r", "text")
  419. AddBarSeparator()
  420. AddBarButton(12, "\z_attr\r", "atribut")
  421. AddBarSeparator()
  422. AddBarButton(13, "\z_line\r", "·seΦka")
  423. AddBarButton(14, "\z_arc\r", "oblouk")
  424. AddBarButton(15, "\z_circle\r", "kru₧nice")
  425. AddBarButton(16, "\z_solid\r", "polygon")
  426. AddBarButton(71, "\z_hatch\r", "Üraf")
  427. AddBarSeparator()
  428. AddBarButton(78, "\z_sketch\r", "od ruky")
  429. AddBarSeparator()
  430. AddBarButton(17, "\z_dimlin\r", "lineßrnφ k≤tovßnφ")
  431. AddBarButton(67, "\z_dimrad\r", "k≤tovßnφ polom∞ru")
  432. AddBarButton(68, "\z_dimdia\r", "k≤tovßnφ pr∙m∞ru")
  433. AddBarButton(69, "\z_dimarc\r", "k≤tovßnφ oblouku")
  434. AddBarButton(70, "\z_dimang\r", "k≤tovßnφ ·hl∙")
  435. AddBarButton(18, "\z_dimgroup\r", "nßvaznΘ k≤tovßnφ")
  436. AddBarButton(79, "\z_dimhome\r", "p∙vodnφ pozice textu")
  437. EndBar()
  438.  
  439. CreateBar("Zobrazenφ", "ICON16.BMP", 16, 15, "A")
  440. AddBarButton(19, "'_zoom\r", "zoom")
  441. AddBarButton(20, "'_zoom\r2\r", "zv∞tÜit")
  442. AddBarButton(21, "'_zoom\r0.5\r", "zmenÜit")
  443. AddBarButton(22, "'_zoom\r_extents\r", "zobrazit vÜe")
  444. AddBarButton(65, "'_zoom\r_previous\r", "p°edchozφ velikost")
  445. AddBarSeparator()
  446. AddBarButton(23, "'_pan\r", "posunutφ zobrazenφ")
  447. AddBarButton(24, "'_regen\r", "obnov")
  448. EndBar()
  449.  
  450. CreateBar("Nßstroje", "ICON16.BMP", 16, 15, "A")
  451. AddBarButton(33, "\z_erase\r", "sma₧")
  452. AddBarSeparator()
  453. AddBarButton(25, "\z_u\r", "krok zp∞t")
  454. AddBarButton(26, "\z_r\r", "opakovat krok")
  455. AddBarSeparator()
  456. AddBarButton(50, "'_gridsh\r", "M°φ₧ka Ano/Ne")
  457. AddBarButton(66, "'_grid\r\r", "P°ichytit do m°φ₧ky Ano/Ne")
  458. AddBarButton(51, "'_ortho\r", "Orto Ano/Ne")
  459. EndBar()
  460.  
  461. CreateBar("Modifikace", "ICON16.BMP", 16, 15, "A")
  462. AddBarButton(27, "\z_copy\r", "kopφruj")
  463. AddBarButton(48, "\z_array\r", "pole")
  464. AddBarButton(28, "\z_move\r", "posun")
  465. AddBarButton(29, "\z_rotate\r", "otoΦ")
  466. AddBarButton(30, "\z_mirror\r", "zrcadli")
  467. AddBarButton(31, "\z_scale\r", "m∞°φtko")
  468. AddBarButton(81, "\z_stretch\r", "protßhni")
  469. AddBarSeparator()
  470. AddBarButton(49, "\z_break\r", "rozd∞l")
  471. AddBarButton(34, "\z_trim\r", "o°e₧")
  472. AddBarButton(80, "\z_extend\r", "prodlu₧")
  473. AddBarButton(35, "\z_fillet\r", "zaobli")
  474. AddBarButton(36, "\z_chamfer\r", "zkos")
  475. AddBarButton(84, "\z_offset\r", "ekvidistanta")
  476. AddBarSeparator()
  477. AddBarButton(10, "\z_explode\r", "rozbal")
  478. AddBarButton(32, "\z_propsd\r", "vlastnosti")
  479. EndBar()
  480.  
  481. CreateBar("Editace", "ICON16.BMP", 16, 15, "A")
  482. AddBarButton(37, "\z_textstyle\r", "styl textu")
  483. AddBarButton(38, "\z_dimstyle\r", "styl k≤t")
  484. AddBarButton(72, "\z_hatchstyle\r", "styl Ürafu")
  485. AddBarSeparator()
  486. AddBarButton(40, "\z_edit\r", "editovat")
  487. AddBarButton(41, "\z_tedit\r", "editovat text")
  488. AddBarButton(42, "\z_attredit\r", "editovat atribut")
  489. AddBarButton(43, "\z_insattrd\r", "editovat atributy bloku")
  490. EndBar()
  491.  
  492. CreateBar("Informace", "ICON16.BMP", 16, 15, "A")
  493. AddBarButton(44, "'_list\r", "v²pis")
  494. AddBarButton(45, "'_id\r", "identifikace bodu")
  495. AddBarButton(46, "'_dist\r", "vzdßlenost")
  496. AddBarSeparator()
  497. AddBarButton(47, "'_help\r", "nßpov∞da")
  498. EndBar()
  499.  
  500. CreateBar("Filtry", "ICON16.BMP", 16, 15, "A")
  501. AddBarButton(77, "'_sticky\r", "lep")
  502. AddBarSeparator()
  503. AddBarButton(54, "'_endp\r", "koncov² bod")
  504. AddBarButton(55, "'_midp\r", "prost°ednφ bod")
  505. AddBarButton(56, "'_intp\r", "pr∙seΦφk")
  506. AddBarButton(57, "'_cenp\r", "st°ed")
  507. AddBarButton(58, "'_perp\r", "kolm²")
  508. AddBarButton(59, "'_tanp\r", "teΦna")
  509. AddBarButton(60, "'_insp\r", "bod vlo₧enφ")
  510. AddBarButton(61, "'_neap\r", "nejbli₧Üφ bod")
  511. AddBarButton(82, "'_parf\r", "rovnob∞₧ka")
  512. AddBarButton(64, "'_align\r", "zarovnej")
  513. AddBarSeparator()
  514. AddBarButton(62, "'.x\r", ".X")
  515. AddBarButton(63, "'.y\r", ".Y")
  516. AddBarButton(76, "'_contin\r", "prodlou₧enφ")
  517. AddBarButton(83, "'_gintp\r", "zobecn∞n² pr∙seΦφk")
  518. EndBar()
  519.  
  520. ;---------------------------------------------------------------
  521. ; BARS 32x32 pixels
  522. ;---------------------------------------------------------------
  523. [*bars-32x32]
  524. CreateBar("Soubor", "ICON32.BMP", 32, 32, "A")
  525. AddBarButton(0, "\z_new\r", "nov²")
  526. AddBarButton(1, "\z_open\r", "otev°φt")
  527. AddBarButton(2, "\z_save\r", "ulo₧it")
  528. AddBarButton(3, "\z_print\r", "tisk")
  529. AddBarSeparator()
  530. AddBarButton(73, "\z_ccut\r", "vyjmout")
  531. AddBarButton(74, "\z_ccopy\r", "kopφrovat")
  532. AddBarButton(75, "\z_cpaste\r", "vlo₧it")
  533. AddBarSeparator()
  534. AddBarButton(6, "\z_rblock\r", "naΦφst blok")
  535. AddBarButton(7, "\z_wblock\r", "ulo₧it blok")
  536. AddBarSeparator()
  537. AddBarButton(4, "\z_foto\r", "foto")
  538. AddBarSeparator()
  539. AddBarButton(5, "\z_purge\r", "Φisti")
  540. EndBar()
  541.  
  542. CreateBar("Kreslenφ", "ICON32.BMP", 32, 32, "A")
  543. AddBarButton(8, "\z_block\r", "definice bloku")
  544. AddBarButton(9, "\z_insert\r", "vlo₧enφ bloku")
  545. AddBarButton(85, "\z_group\r", "skupina")
  546. AddBarSeparator()
  547. AddBarButton(11, "\z_text\r", "text")
  548. AddBarSeparator()
  549. AddBarButton(12, "\z_attr\r", "atribut")
  550. AddBarSeparator()
  551. AddBarButton(13, "\z_line\r", "·seΦka")
  552. AddBarButton(14, "\z_arc\r", "oblouk")
  553. AddBarButton(15, "\z_circle\r", "kru₧nice")
  554. AddBarButton(16, "\z_solid\r", "polygon")
  555. AddBarButton(71, "\z_hatch\r", "Üraf")
  556. AddBarSeparator()
  557. AddBarButton(78, "\z_sketch\r", "od ruky")
  558. AddBarSeparator()
  559. AddBarButton(17, "\z_dimlin\r", "lineßrnφ k≤tovßnφ")
  560. AddBarButton(67, "\z_dimrad\r", "k≤tovßnφ polom∞ru")
  561. AddBarButton(68, "\z_dimdia\r", "k≤tovßnφ pr∙m∞ru")
  562. AddBarButton(69, "\z_dimarc\r", "k≤tovßnφ oblouku")
  563. AddBarButton(70, "\z_dimang\r", "k≤tovßnφ ·hl∙")
  564. AddBarButton(18, "\z_dimgroup\r", "nßvaznΘ k≤tovßnφ")
  565. AddBarButton(79, "\z_dimhome\r", "p∙vodnφ pozice textu")
  566. EndBar()
  567.  
  568. CreateBar("Zobrazenφ", "ICON32.BMP", 32, 32, "A")
  569. AddBarButton(19, "'_zoom\r", "zoom")
  570. AddBarButton(20, "'_zoom\r2\r", "zv∞tÜit")
  571. AddBarButton(21, "'_zoom\r0.5\r", "zmenÜit")
  572. AddBarButton(22, "'_zoom\r_extents\r", "zobrazit vÜe")
  573. AddBarButton(65, "'_zoom\r_previous\r", "p°edchozφ velikost")
  574. AddBarSeparator()
  575. AddBarButton(23, "'_pan\r", "posunutφ zobrazenφ")
  576. AddBarButton(24, "'_regen\r", "obnov")
  577. EndBar()
  578.  
  579. CreateBar("Nßstroje", "ICON32.BMP", 32, 32, "A")
  580. AddBarButton(33, "\z_erase\r", "sma₧")
  581. AddBarSeparator()
  582. AddBarButton(25, "\z_u\r", "krok zp∞t")
  583. AddBarButton(26, "\z_r\r", "opakovat krok")
  584. AddBarSeparator()
  585. AddBarButton(50, "'_gridsh\r", "M°φ₧ka Ano/Ne")
  586. AddBarButton(66, "'_grid\r\r", "P°ichytit do m°φ₧ky Ano/Ne")
  587. AddBarButton(51, "'_ortho\r", "Orto Ano/Ne")
  588. EndBar()
  589.  
  590. CreateBar("Modifikace", "ICON32.BMP", 32, 32, "A")
  591. AddBarButton(27, "\z_copy\r", "kopφruj")
  592. AddBarButton(48, "\z_array\r", "pole")
  593. AddBarButton(28, "\z_move\r", "posun")
  594. AddBarButton(29, "\z_rotate\r", "otoΦ")
  595. AddBarButton(30, "\z_mirror\r", "zrcadli")
  596. AddBarButton(31, "\z_scale\r", "m∞°φtko")
  597. AddBarButton(81, "\z_stretch\r", "protßhni")
  598. AddBarSeparator()
  599. AddBarButton(49, "\z_break\r", "rozd∞lit")
  600. AddBarButton(34, "\z_trim\r", "zkrßtit")
  601. AddBarButton(80, "\z_extend\r", "prodlu₧")
  602. AddBarButton(35, "\z_fillet\r", "zaoblit")
  603. AddBarButton(36, "\z_chamfer\r", "zkosit")
  604. AddBarButton(84, "\z_offset\r", "ekvidistanta")
  605. AddBarSeparator()
  606. AddBarButton(10, "\z_explode\r", "rozbalit")
  607. AddBarButton(32, "\z_propsd\r", "vlastnosti")
  608. EndBar()
  609.  
  610. CreateBar("Editace", "ICON32.BMP", 32, 32, "A")
  611. AddBarButton(37, "\z_textstyle\r", "styl textu")
  612. AddBarButton(38, "\z_dimstyle\r", "styl k≤t")
  613. AddBarButton(72, "\z_hatchstyle\r", "styl Ürafu")
  614. AddBarSeparator()
  615. AddBarButton(40, "\z_edit\r", "editovat")
  616. AddBarButton(41, "\z_tedit\r", "editovat text")
  617. AddBarButton(42, "\z_attredit\r", "editovat atribut")
  618. AddBarButton(43, "\z_insattrd\r", "editovat atributy bloku")
  619. EndBar()
  620.  
  621. CreateBar("Informace", "ICON32.BMP", 32, 32, "A")
  622. AddBarButton(44, "'_list\r", "v²pis")
  623. AddBarButton(45, "'_id\r", "identifikace bodu")
  624. AddBarButton(46, "'_dist\r", "vzdßlenost")
  625. AddBarSeparator()
  626. AddBarButton(47, "'_help\r", "nßpov∞da")
  627. EndBar()
  628.  
  629. CreateBar("Filtry", "ICON32.BMP", 32, 32, "A")
  630. AddBarButton(77, "'_sticky\r", "lep")
  631. AddBarSeparator()
  632. AddBarButton(54, "'_endp\r", "koncov² bod")
  633. AddBarButton(55, "'_midp\r", "prost°ednφ bod")
  634. AddBarButton(56, "'_intp\r", "pr∙seΦφk")
  635. AddBarButton(57, "'_cenp\r", "st°ed")
  636. AddBarButton(58, "'_perp\r", "kolm²")
  637. AddBarButton(59, "'_tanp\r", "teΦna")
  638. AddBarButton(60, "'_insp\r", "bod vlo₧enφ")
  639. AddBarButton(61, "'_neap\r", "nejbli₧Üφ bod")
  640. AddBarButton(82, "'_parf\r", "rovnob∞₧ka")
  641. AddBarButton(64, "'_align\r", "zarovnej")
  642. AddBarSeparator()
  643. AddBarButton(62, "'.x\r", ".X")
  644. AddBarButton(63, "'.y\r", ".Y")
  645. AddBarButton(76, "'_contin\r", "prodlou₧enφ")
  646. AddBarButton(83, "'_gintp\r", "zobecn∞n² pr∙seΦφk")
  647. EndBar()
  648.  
  649. ;---------------------------------------------------------------
  650. ; PICTURE configuration
  651. ;---------------------------------------------------------------
  652. [**picture]
  653. ; define procedure needed for picture initialization
  654. DefineProcedure("PictureRegisterExtension", "SS", "PICTURE_set_extensions", "picture.dll")
  655. ; and use the procedure
  656. PictureRegisterExtension("PICBMP","BMP DIB")
  657. PictureRegisterExtension("PICJPEG","JPEG JFIF JPE JPG")
  658. PictureRegisterExtension("PICPCX","PCX")
  659. PictureRegisterExtension("PICPNG","PNG")
  660. PictureRegisterExtension("PICTIFF","TIF TIFF")
  661.