Subversion Repositories Kolibri OS

Rev

Rev 4228 | Rev 4991 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. fn_col_option dd def_col_file
  2. fn_syntax_dir db 'info/',0
  3. def_col_file db 'default.syn',0
  4.  
  5. ;значения задаваемые по умолчанию, без ini файла
  6. ini_def_window_t equ 10
  7. ini_def_window_l equ 10
  8. ini_def_window_w equ 485
  9. ini_def_window_h equ 320
  10. ini_def_symbol_w equ 7
  11. ini_def_symbol_h equ 10
  12. ini_def_scroll_type equ 0
  13. ;описание параматров для ini файла
  14. ini_name db 't_edit.ini',0
  15. ini_sec_window db 'Window',0
  16. key_window_t db 't',0
  17. key_window_l db 'l',0
  18. key_window_w db 'w',0
  19. key_window_h db 'h',0
  20. key_symbol_w db 'symbol_w',0
  21. key_symbol_h db 'symbol_h',0
  22. key_scroll_type db 'scroll_type',0
  23. ini_sec_options db 'Options',0
  24. key_synt_file:
  25.         db 'syntax_'
  26.         .numb: db '0',0
  27. key_synt_ext:
  28.         db 'ext_'
  29.         .numb: db '0',0
  30. ini_def_synt_f db 0
  31.  
  32. align 4
  33. max_synt_auto_open equ 10
  34. synt_auto_open:
  35.         rb 64*max_synt_auto_open
  36.         db 0
  37.  
  38. system_dir_0 db '/sys/lib/'
  39. lib_name_0 db 'box_lib.obj',0
  40.  
  41. system_dir_1 db '/sys/lib/'
  42. lib_name_1 db 'msgbox.obj',0
  43.  
  44. system_dir_2 db '/sys/lib/'
  45. lib_name_2 db 'proc_lib.obj',0
  46.  
  47. system_dir_3 db '/sys/lib/'
  48. lib_name_3 db 'libimg.obj',0
  49.  
  50. system_dir_4 db '/sys/lib/'
  51. lib_name_4 db 'libini.obj',0
  52.  
  53.  
  54. ;---------------------------------------------------------------------
  55. align 4
  56. import_box_lib:
  57.         dd alib_init0 ;функция запускается макросом 1 раз при подключении бибилиотеки, потому в программе метка на нее не нужна
  58.  
  59.         edit_box_draw  dd aEdit_box_draw
  60.         edit_box_key   dd aEdit_box_key
  61.         edit_box_mouse dd aEdit_box_mouse
  62.         ;edit_box_set_text dd aEdit_box_set_text
  63.         ;version_ed     dd aVersion_ed
  64.  
  65.         scrollbar_ver_draw  dd aScrollbar_ver_draw
  66.         scrollbar_ver_mouse dd aScrollbar_ver_mouse
  67.         scrollbar_hor_draw  dd aScrollbar_hor_draw
  68.         scrollbar_hor_mouse dd aScrollbar_hor_mouse
  69.         ;version_scrollbar   dd aVersion_scrollbar
  70.  
  71.         ;dinamic_button_draw  dd aDbutton_draw
  72.         ;dinamic_button_mouse dd aDbutton_mouse
  73.         ;version_dbutton      dd aVersion_dbutton
  74.  
  75.         menu_bar_draw    dd aMenu_bar_draw
  76.         menu_bar_mouse   dd aMenu_bar_mouse
  77.         ;version_menu_bar dd aVersion_menu_bar
  78.  
  79.         tl_data_init dd sz_tl_data_init
  80.         tl_data_clear dd sz_tl_data_clear
  81.         tl_info_clear dd sz_tl_info_clear
  82.         tl_key dd sz_tl_key
  83.         tl_mouse dd sz_tl_mouse
  84.         tl_draw dd sz_tl_draw
  85.         tl_info_undo dd sz_tl_info_undo
  86.         tl_info_redo dd sz_tl_info_redo
  87.         tl_node_add dd sz_tl_node_add
  88.         tl_node_set_data dd sz_tl_node_set_data
  89.         tl_node_get_data dd sz_tl_node_get_data
  90.         tl_node_delete dd sz_tl_node_delete
  91.         tl_cur_beg dd sz_tl_cur_beg
  92.         tl_cur_next dd sz_tl_cur_next
  93.         tl_cur_perv dd sz_tl_cur_perv
  94.         ;tl_node_close_open dd sz_tl_node_close_open
  95.         tl_node_lev_inc dd sz_tl_node_lev_inc
  96.         tl_node_lev_dec dd sz_tl_node_lev_dec
  97.  
  98.         ted_but_sumb_upper dd sz_ted_but_sumb_upper
  99.         ted_but_sumb_lover dd sz_ted_but_sumb_lover
  100.         ted_but_convert_by_table dd sz_ted_but_convert_by_table
  101.         ted_can_save dd sz_ted_can_save
  102.         ted_clear dd sz_ted_clear
  103.         ted_delete dd sz_ted_delete
  104.         ted_draw dd sz_ted_draw
  105.         ted_init dd sz_ted_init
  106.         ted_init_scroll_bars dd sz_ted_init_scroll_bars
  107.         ted_init_syntax_file dd sz_ted_init_syntax_file
  108.         ted_is_select dd sz_ted_is_select
  109.         ted_key dd sz_ted_key
  110.         ted_mouse dd sz_ted_mouse
  111.         ted_open_file dd sz_ted_open_file
  112.         ted_save_file dd sz_ted_save_file
  113.         ted_text_add dd sz_ted_text_add
  114.         ted_but_select_word dd sz_ted_but_select_word
  115.         ted_but_cut dd sz_ted_but_cut
  116.         ted_but_copy dd sz_ted_but_copy
  117.         ted_but_paste dd sz_ted_but_paste
  118.         ted_but_undo dd sz_ted_but_undo
  119.         ted_but_redo dd sz_ted_but_redo
  120.         ted_but_reverse dd sz_ted_but_reverse
  121.         ted_but_find_next dd sz_ted_but_find_next
  122.         ted_text_colored dd sz_ted_text_colored
  123.         version_text_edit dd sz_ted_version
  124.  
  125.         PathShow_prepare        dd sz_PathShow_prepare
  126.         PathShow_draw           dd sz_PathShow_draw
  127.  
  128. dd 0,0
  129.         alib_init0 db 'lib_init',0
  130.  
  131.         aEdit_box_draw  db 'edit_box',0
  132.         aEdit_box_key   db 'edit_box_key',0
  133.         aEdit_box_mouse db 'edit_box_mouse',0
  134.         ;aEdit_box_set_text db 'edit_box_set_text',0
  135.         ;aVersion_ed    db 'version_ed',0
  136.  
  137.         aScrollbar_ver_draw  db 'scrollbar_v_draw',0
  138.         aScrollbar_ver_mouse db 'scrollbar_v_mouse',0
  139.         aScrollbar_hor_draw  db 'scrollbar_h_draw',0
  140.         aScrollbar_hor_mouse db 'scrollbar_h_mouse',0
  141.         ;aVersion_scrollbar   db 'version_scrollbar',0
  142.  
  143.         ;aDbutton_draw    db 'dbutton_draw',0
  144.         ;aDbutton_mouse   db 'dbutton_mouse',0
  145.         ;aVersion_dbutton  db 'version_dbutton',0
  146.  
  147.         aMenu_bar_draw    db 'menu_bar_draw',0
  148.         aMenu_bar_mouse   db 'menu_bar_mouse',0
  149.         ;aVersion_menu_bar db 'version_menu_bar',0
  150.  
  151.         sz_tl_data_init db 'tl_data_init',0
  152.         sz_tl_data_clear db 'tl_data_clear',0
  153.         sz_tl_info_clear db 'tl_info_clear',0
  154.         sz_tl_key db 'tl_key',0
  155.         sz_tl_mouse db 'tl_mouse',0
  156.         sz_tl_draw db 'tl_draw',0
  157.         sz_tl_info_undo db 'tl_info_undo',0
  158.         sz_tl_info_redo db 'tl_info_redo',0
  159.         sz_tl_node_add db 'tl_node_add',0
  160.         sz_tl_node_set_data db 'tl_node_set_data',0
  161.         sz_tl_node_get_data db 'tl_node_get_data',0
  162.         sz_tl_node_delete db 'tl_node_delete',0
  163.         sz_tl_cur_beg db 'tl_cur_beg',0
  164.         sz_tl_cur_next db 'tl_cur_next',0
  165.         sz_tl_cur_perv db 'tl_cur_perv',0
  166.         ;sz_tl_node_close_open db 'tl_node_close_open',0
  167.         sz_tl_node_lev_inc db 'tl_node_lev_inc',0
  168.         sz_tl_node_lev_dec db 'tl_node_lev_dec',0
  169.  
  170.         sz_ted_but_sumb_upper   db 'ted_but_sumb_upper',0
  171.         sz_ted_but_sumb_lover   db 'ted_but_sumb_lover',0
  172.         sz_ted_but_convert_by_table db 'ted_but_convert_by_table',0
  173.         sz_ted_can_save                 db 'ted_can_save',0
  174.         sz_ted_clear                    db 'ted_clear',0
  175.         sz_ted_delete                   db 'ted_delete',0
  176.         sz_ted_draw                             db 'ted_draw',0
  177.         sz_ted_init                             db 'ted_init',0
  178.         sz_ted_init_scroll_bars db 'ted_init_scroll_bars',0
  179.         sz_ted_init_syntax_file db 'ted_init_syntax_file',0
  180.         sz_ted_is_select                db 'ted_is_select',0
  181.         sz_ted_key                              db 'ted_key',0
  182.         sz_ted_mouse                    db 'ted_mouse',0
  183.         sz_ted_open_file                db 'ted_open_file',0
  184.         sz_ted_save_file                db 'ted_save_file',0
  185.         sz_ted_text_add                 db 'ted_text_add',0
  186.         sz_ted_but_select_word  db 'ted_but_select_word',0
  187.         sz_ted_but_cut                  db 'ted_but_cut',0
  188.         sz_ted_but_copy                 db 'ted_but_copy',0
  189.         sz_ted_but_paste                db 'ted_but_paste',0
  190.         sz_ted_but_undo                 db 'ted_but_undo',0
  191.         sz_ted_but_redo                 db 'ted_but_redo',0
  192.         sz_ted_but_reverse              db 'ted_but_reverse',0
  193.         sz_ted_but_find_next    db 'ted_but_find_next',0
  194.         sz_ted_text_colored             db 'ted_text_colored',0
  195.         sz_ted_version db 'version_text_edit',0
  196.  
  197.         sz_PathShow_prepare     db 'PathShow_prepare',0
  198.         sz_PathShow_draw        db 'PathShow_draw',0
  199.  
  200. align 4
  201. import_proclib:
  202.         OpenDialog_Init dd aOpenDialog_Init
  203.         OpenDialog_Start dd aOpenDialog_Start
  204. dd 0,0
  205.         aOpenDialog_Init db 'OpenDialog_init',0
  206.         aOpenDialog_Start db 'OpenDialog_start',0
  207.  
  208. align 4
  209. import_msgbox_lib:
  210.         mb_create dd amb_create
  211.         mb_reinit dd amb_reinit
  212.         mb_setfunctions dd amb_setfunctions
  213. dd 0,0
  214.         amb_create db 'mb_create',0
  215.         amb_reinit db 'mb_reinit',0
  216.         amb_setfunctions db 'mb_setfunctions',0
  217.  
  218. align 4
  219. import_libimg:
  220.         dd alib_init1
  221.         img_to_rgb2 dd aimg_to_rgb2
  222.         img_decode  dd aimg_decode
  223.         img_destroy dd aimg_destroy
  224. dd 0,0
  225.         alib_init1   db 'lib_init',0
  226.         aimg_to_rgb2 db 'img_to_rgb2',0
  227.         aimg_decode  db 'img_decode',0 ;автоматически определяет формат графических данных
  228.         aimg_destroy db 'img_destroy',0
  229.  
  230. align 4
  231. import_libini:
  232.         dd alib_init2
  233.         ini_get_str   dd aini_get_str
  234.         ini_get_int   dd aini_get_int
  235.         ini_get_color dd aini_get_color
  236. dd 0,0
  237.         alib_init2     db 'lib_init',0
  238.         aini_get_str   db 'ini_get_str',0
  239.         aini_get_int   db 'ini_get_int',0
  240.         aini_get_color db 'ini_get_color',0
  241.  
  242. ;---------------------------------------------------------------------
  243. align 4
  244. wScr:
  245. .x:
  246. .size_x   dw 16 ;+0
  247. .start_x  dw 50 ;+2
  248. .y:
  249. .size_y   dw 300 ; +4
  250. .start_y  dw  50 ; +6
  251. .btn_high dd  15 ; +8
  252. .type     dd ini_def_scroll_type ;+12
  253. .max_area dd 100 ;+16
  254. .cur_area dd  30 ;+20
  255. .position dd   0 ;+24
  256. .bckg_col dd   0 ;+28
  257. .frnt_col dd   0 ;+32
  258. .line_col dd   0 ;+36
  259. .redraw   dd   0 ;+40
  260. .delta    dw   0 ;+44
  261. .delta2   dw   0 ;+46
  262. .run_x:
  263. rb 2+2+2+2+4+4+4+4+4+4
  264. .all_redraw dd 0 ;+80
  265. .ar_offset  dd 1 ;+84
  266. ;---------------------------------------------------------------------
  267. align 4
  268. hScr:
  269. .x:
  270. .size_x     dw 150 ;+0
  271. .start_x    dw 0 ;+2
  272. .y:
  273. .size_y     dw 16 ;+4
  274. .start_y    dw 50 ;+6
  275. .btn_high   dd 15 ;+8
  276. .type       dd ini_def_scroll_type ;+12
  277. .max_area   dd 100 ;+16
  278. .cur_area   dd 30 ;+20
  279. .position   dd 0  ;+24
  280. .bckg_col   dd 0  ;+28
  281. .frnt_col   dd 0  ;+32
  282. .line_col   dd 0  ;+36
  283. .redraw     dd 0  ;+40
  284. .delta      dw 0  ;+44
  285. .delta2     dw 0  ;+46
  286. .run_x:
  287. rb 2+2+2+2+4+4+4+4+4+4
  288. .all_redraw dd 0 ;+80
  289. .ar_offset  dd 1 ;+84
  290. ;---------------------------------------------------------------------  
  291. align 4
  292. ws_dir_lbox: ;дочерний скроллинг для элемента ListBox
  293. .x:
  294. .size_x     dw 16 ;+0
  295. .start_x    dw 0 ;+2
  296. .y:
  297. .size_y     dw 30 ;+4
  298. .start_y    dw 70 ;+6
  299. .btn_high   dd 15 ;+8
  300. .type       dd ini_def_scroll_type ;+12
  301. .max_area   dd 100 ;+16
  302. .cur_area   dd 30 ;+20
  303. .position   dd 0  ;+24
  304. .bckg_col   dd 0  ;+28
  305. .frnt_col   dd 0  ;+32
  306. .line_col   dd 0  ;+36
  307. .redraw     dd 0  ;+40
  308. .delta      dw 0  ;+44
  309. .delta2     dw 0  ;+46
  310. .run_x:
  311. rb 2+2+2+2+4+4+4+4+4+4
  312. .all_redraw dd 0 ;+80
  313. .ar_offset  dd 1 ;+84
  314. ;---------------------------------------------------------------------
  315.  
  316. align 4
  317. menu_data_1:
  318. .type: dd 0   ;+0
  319. .x:
  320. .size_x  dw 35 ;+4
  321. .start_x dw  5 ;+6
  322. .y:
  323. .size_y  dw 15 ;+8
  324. .start_y dw  5 ;+10
  325. .text_pointer: dd menu_text_area   ;+12
  326. .pos_pointer:  dd menu_text_area.1 ;+16
  327. .text_end   dd menu_text_area.end  ;+20
  328. .mouse_pos  dd 0 ;+24
  329. .mouse_keys dd 0 ;+28
  330. .x1:
  331. .size_x1  dw 70  ;+32
  332. .start_x1 dw  5  ;+34
  333. .y1:
  334. .size_y1  dw 15  ;+36
  335. .start_y1 dw 20  ;+38
  336. .bckg_col dd 0xeeeeee ;+40
  337. .frnt_col dd 0xff ;+44
  338. .menu_col dd 0xffffff ;+48
  339. .select   dd 0 ;+52
  340. .out_select dd 0 ;+56
  341. .buf_adress dd 0 ;+60
  342. .procinfo dd procinfo ;0 ;+64
  343. .click   dd 0 ;+68
  344. .cursor  dd 0 ;+72
  345. .cursor_old dd 0 ;+76
  346. .interval   dd 16 ;+80
  347. .cursor_max  dd 0 ;+84
  348. .extended_key dd 0 ;+88
  349. .menu_sel_col dd 0x00cc00 ;+92
  350. .bckg_text_col dd 0 ;+96
  351. .frnt_text_col dd 0xffffff ;+100
  352. .mouse_keys_old dd 0 ;+104
  353. .font_height dd 8 ;+108
  354. .cursor_out  dd 0 ;+112
  355. .get_mouse_flag dd 0 ;+116
  356.  
  357. ;---------------------------------------------------------------------
  358. align 4
  359. OpenDialog_data:
  360. .type                   dd 0
  361. .procinfo               dd procinfo     ;+4
  362. .com_area_name  dd communication_area_name      ;+8
  363. .com_area               dd 0    ;+12
  364. .opendir_path           dd plugin_path ;+16
  365. .dir_default_path       dd default_dir ;+20
  366. .start_path             dd file_name ;+24 путь к диалогу открытия файлов
  367. .draw_window    dd draw_window  ;+28
  368. .status                 dd 0    ;+32
  369. .openfile_path  dd openfile_path        ;+36 путь к открываемому файлу
  370. .filename_area  dd filename_area        ;+40
  371. .filter_area    dd Filter
  372. .x:
  373. .x_size                 dw 420 ;+48 ; Window X size
  374. .x_start                dw 10 ;+50 ; Window X position
  375. .y:
  376. .y_size                 dw 320 ;+52 ; Window y size
  377. .y_start                dw 10 ;+54 ; Window Y position
  378.  
  379. default_dir db '/rd/1',0 ;директория по умолчанию
  380.  
  381. communication_area_name:
  382.         db 'FFFFFFFF_open_dialog',0
  383. open_dialog_name:
  384.         db 'opendial',0
  385. communication_area_default_path:
  386.         db '/rd/1/File managers/',0
  387.  
  388. Filter:
  389. dd Filter.end - Filter.1
  390. .1:
  391. db 'ASM',0
  392. db 'CPP',0
  393. db 'INC',0
  394. db 'INI',0
  395. db 'TXT',0
  396. db 'H',0
  397. db 'HTM',0
  398. db 'HTML',0
  399. .end:
  400. db 0
  401.  
  402. TED_PANEL_NULL  equ 0 ;нет открытой панели
  403. TED_PANEL_FIND  equ 1 ;панель поиска
  404. TED_PANEL_SYNTAX equ 2 ;панель выбора файлов подсветки
  405. TED_PANEL_WIDTH equ 150 ;ширина панели
  406.  
  407. count_of_dir_list_files equ 15 ;максимальное число файлов синтаксиса показываемых в окне элемента tree1
  408.  
  409. ;------------------------------------------------------------------------------
  410. struct TexSelect
  411.   x0 dd ?
  412.   y0 dd ?
  413.   x1 dd ?
  414.   y1 dd ?
  415. ends
  416. ;------------------------------------------------------------------------------
  417. align 4
  418. tedit0: ;структура текстового редактора
  419.         .wnd BOX 0,50,440,150 ;+ 0
  420.         .rec BOX 30,23,ini_def_symbol_w,ini_def_symbol_h ;+16
  421.         .drag_m db 0 ;+32 выделение от мыши
  422.         .drag_k db 0 ;+33 выделение от клавиатуры
  423.         .sel  TexSelect 0,0,0,0 ;+34 структура выделения
  424.         .seln TexSelect ;+50 дополнительная структура выделения
  425.         .tex      dd 0 ;+66 text memory pointer
  426.         .tex_1    dd 0 ;+70 text first symbol pointer
  427.         .tex_end  dd 0 ;+74 text end memory pointer
  428.         .cur_x    dd 0 ;+78 координата x курсора
  429.         .cur_y    dd 0 ;+82 координата y курсора
  430.         .max_chars dd maxChars ;+86 максимальное число символов в одном документе
  431.         .count_colors_text dd 1 ;+90 колличество цветов текста
  432.         .count_key_words   dd 0 ;+94 колличество ключевых слов
  433.         .color_cursor      dd 0x808080 ;+98 цвет курсора
  434.         .color_wnd_capt    dd     0x80 ;+102 цвет полей вокруг окна
  435.         .color_wnd_work    dd      0x0 ;+106 цвет фона окна
  436.         .color_wnd_bord    dd 0xd0d0d0 ;+110 цвет текста на полях
  437.         .color_select      dd 0x208080 ;+114 цвет выделения
  438.         .color_cur_text    dd 0xff0000 ;+118 цвет символа под курсором
  439.         .color_wnd_text    dd 0xffff00 ;+122 цвет текста в окне
  440.         .syntax_file       dd 0 ;+126 указатель на начало файла синтаксиса
  441.         .syntax_file_size  dd maxSyntaxFileSize ;+130 максимальный размер файла синтаксиса
  442.         .text_colors       dd 0 ;+134 указатель на массив цветов текста
  443.         .help_text_f1      dd 0 ;+138 указатель на текст справки (по нажатии F1)
  444.         .help_id           dd -1 ;+142 идентификатор для справки
  445.         .key_words_data    dd 0 ;+146 указатель на структуры ключевых слов TexColViv
  446.         .tim_ch      dd ? ;+150 количество изменений в файле
  447.         .tim_undo    dd ? ;+154 количество отмененных действий
  448.         .tim_ls      dd ? ;+158 время последнего сохранения
  449.         .tim_co      dd ? ;+162 время последней цветовой разметки
  450.         .el_focus    dd el_focus ;+166 указатель на переменную элемента в фокусе
  451.         .err_save    db 0 ;+170 ошибка сохранения файла
  452.         .panel_id    db 0 ;+171 номер открытой панели
  453.         .key_new     db 0 ;+172 символ, который будет добавлятся с клавиатуры
  454.         .symbol_new_line db 20 ;+173 символ завершения строки
  455.         .scr_w       dd wScr ;+174 вертикальный скроллинг
  456.         .scr_h       dd hScr ;+178 горизонтальный скроллинг
  457.         .arr_key_pos dd 0 ;+182 указатель на массив позиций ключевых слов
  458.         .buffer      dd buf ;+186 указатель на буфер копирования/вставки
  459.         .buffer_find dd buf_find ;+190 указатель на буфер для поиска
  460.         .cur_ins     db 1 ;+194 режим работы курсора (обычный или замена)
  461.         .mode_color  db 1 ;+195 режим выделения слов цветом (0-выкл. 1-вкл.)
  462.         .mode_invis  db 0 ;+196 режим показа непечатаемых символов
  463.         .gp_opt      db 0 ;+197 опции возвращаемые функцией ted_get_pos_by_cursor
  464.         .fun_on_key_ctrl_o dd ted_but_open_file ;+198 указатель на функцию вызываемую при нажатии Ctrl+O (открытие файла)
  465.         .fun_on_key_ctrl_f dd ted_but_find      ;+202 ... Ctrl+F (вызова/скрытия панели поиска)
  466.         .fun_on_key_ctrl_n dd ted_but_new_file  ;+206 ... Ctrl+N (создание нового документа)
  467.         .fun_on_key_ctrl_s dd 0 ;+210 ... Ctrl+S
  468.         .buffer_size       dd BUF_SIZE ;+214 размер буфера копирования/вставки
  469.         .fun_find_err      dd ted_on_find_err ;+218 указатель на функцию вызываемую если поиск закончился неудачно
  470.         .fun_init_synt_err dd 0   ;+222
  471.         .fun_draw_panel_buttons dd draw_but_toolbar  ;+226 указатель на функцию рисования панели с кнопками
  472.         .fun_draw_panel_find    dd draw_panel_find   ;+230 указатель на функцию рисования панели поиска
  473.         .fun_draw_panel_syntax  dd draw_panel_syntax ;+234 указатель на функцию рисования панели синтаксиса
  474.         .fun_save_err           dd ted_save_err_msg  ;+238 указатель на функцию вызываемую если сохранение файла закончилось неудачно
  475.         .increase_size dd 200 ;+242 число символов на которые будет увечиваться память при нехватке
  476.         .ptr_free_symb dd ?   ;+246 используется внутри элемента для ускорения вставки текста
  477. ;------------------------------------------------------------------------------
  478.  
  479. conv_tabl rb 128 ; таблица для конвертирования scan-кода в ascii-код
  480.  
  481. el_focus dd 0
  482. mouse_dd dd 0
  483. tree1 tree_list 264,count_of_dir_list_files+2, tl_key_no_edit+tl_draw_par_line+tl_list_box_mode,\
  484.     16,16, 0x8080ff,0x0000ff,0xffffff, 0,70,TED_PANEL_WIDTH-17,120, 0,0,0, el_focus,\
  485.     ws_dir_lbox,0
  486.  
  487. ;dir_list memory
  488. tree_file_struct:
  489.   dd 1
  490.   dd 0,0,count_of_dir_list_files
  491.   dd dir_mem
  492.   db 0
  493.   dd file_name ;sys_path
  494.  
  495. if lang eq ru
  496.  
  497. hed db 'Текстовый редактор 28.11.13',0 ;подпись окна
  498.  
  499. menu_text_area:
  500. db 'Файл',0
  501. .1:
  502. db 'Создать',0
  503. db 'Открыть',0
  504. db 'Сохранить',0
  505. db 'Выход',0
  506. .end:
  507. db 0
  508.  
  509. msgbox_1:
  510.   dw 0
  511.   db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
  512.   db 'Файл большой, потому открыт не весь.',13
  513.   db '  1. При его сохранении будут потеряны "не открывшиеся" символы.',13
  514.   db '  2. В документ нельзя добавлять текст, т. к. память занята.',0
  515.   db 'Я понял(а)',0 ;button1
  516.   db 0
  517. msgbox_2:
  518.   db 3,0
  519.   db 'Внимание',0
  520.   db 'Сохранить изменения в файле?',0
  521.   db 'Сохранить',0
  522.   db 'Не сохранять',0
  523.   db 'Отмена',0
  524.   db 0
  525.  
  526. msgbox_3:
  527.   db 1,0
  528.   db 'Внимание',0
  529.   db 'Ошибка при открытии файла с цветовыми настройками!',13,\
  530.      'Потому выделение слов цветом не возможно.',13,\
  531.      '  (код ошибки ='
  532.   .err: db '?'
  533.   db ')',0
  534.   db 'Закрыть',0
  535.   db 0
  536.  
  537. msgbox_4:
  538.   db 1,0
  539.   db 'Внимание',0
  540.   db 'Ошибка при открытии файла!',13,\
  541.      'Возможно имя файла введено не правильно.',13,\
  542.      '  (код ошибки ='
  543.   .err: db '?'
  544.   db ')',0
  545.   db 'Закрыть',0
  546.   db 0
  547.  
  548. msgbox_5:
  549.   db 3,0
  550.   db 'Внимание',0
  551.   db 'Сохранить изменения в файле?',0
  552.   db 'Не сохранять',0
  553.   db 'Отмена',0
  554.   db 0
  555.  
  556. msgbox_6:
  557.   db 1,0
  558.   db 'Внимание',0
  559.   db 'Ошибка при сохранении файла!',13,\
  560.      'Возможно имя файла введено не правильно.',13,\
  561.      '  (код ошибки ='
  562.   .err: db '?'
  563.   db ')',0
  564.   db 'Закрыть',0
  565.   db 0
  566. msgbox_7:
  567.   db 1,0
  568.   db 'Текст не найден',0
  569.   db 'Достигнут конец документа.',13,\
  570.      'Попробуйте перейти в начало документа',13,\
  571.      'или изменить запрос и повторить поиск.',0
  572.   db 'Закрыть',0
  573.   db 0
  574. msgbox_8:
  575.   db 3,0
  576.   db 'Внимание',0
  577.   db 'Для выхода завершите работу с файлом.',13,\
  578.      'Попробуйте сохранить изменения в файле',13,\
  579.      'или начать новый пустой.',0
  580.   db 'Отмена',0
  581.   db 0
  582. msgbox_9:
  583.   db 3,0
  584.   db 'Внимание',0
  585.   db 'Не открылся ',39,'диалог открытия файла',39,'.',13
  586.   .fdp:
  587.   rb 100
  588.   db 0
  589.   db 'Закрыть',0
  590.   db 0
  591.  
  592. txtFile db 'Файл:',0
  593. txtFindCapt db 'Поиск',0
  594. txtFindNext db 'Найти далее',0
  595. txtFormatCapt db 'Формат',0
  596. txtFormatApply db 'Применить',0
  597.  
  598. else
  599.  
  600. hed db 'Text editor 28.11.13',0
  601.  
  602. menu_text_area:
  603. db 'File',0
  604. .1:
  605. db 'New',0
  606. db 'Open',0
  607. db 'Save',0
  608. db 'Exit',0
  609. .end:
  610. db 0
  611.  
  612. msgbox_1:
  613.   dw 0
  614.   db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
  615.   db 'File is large, because not all open.',13
  616.   db '  1. If you save it will lose "not opened" characters.',13
  617.   db '  2. The document can not add text, because the memory is busy.',0
  618.   db 'Ok',0 ;button1
  619.   db 0
  620. msgbox_2:
  621.   db 3,0
  622.   db 'Warning',0
  623.   db 'Save changes to the file?',0
  624.   db 'Save',0
  625.   db 'Discard',0
  626.   db 'Cancel',0
  627.   db 0
  628.  
  629. msgbox_3:
  630.   db 1,0
  631.   db 'Warning',0
  632.   db 'Error opening the file with the color settings!',13,\
  633.      'Because color selection of words is not possible.',13,\
  634.      '  (error code ='
  635.   .err: db '?'
  636.   db ')',0
  637.   db 'Close',0
  638.   db 0
  639.  
  640. msgbox_4:
  641.   db 1,0
  642.   db 'Warning',0
  643.   db 'Error opening file!',13,\
  644.      'Maybe the file name is not entered correctly.',13,\
  645.      '  (error code ='
  646.   .err: db '?'
  647.   db ')',0
  648.   db 'Close',0
  649.   db 0
  650.  
  651. msgbox_5:
  652.   db 3,0
  653.   db 'Warning',0
  654.   db 'Save changes to the file?',0
  655.   db 'Discard',0
  656.   db 'Cancel',0
  657.   db 0
  658.  
  659. msgbox_6:
  660.   db 1,0
  661.   db 'Warning',0
  662.   db 'Error saving file!',13,\
  663.      'Maybe the file name is not entered correctly.',13,\
  664.      '  (error code ='
  665.   .err: db '?'
  666.   db ')',0
  667.   db 'Close',0
  668.   db 0
  669. msgbox_7:
  670.   db 1,0
  671.   db 'Text not found.',0
  672.   db 'Reached end of the document.',13,\
  673.      'Try to go to the beginning of the document',13,\
  674.      'or change the query and search again.',0
  675.   db 'Close',0
  676.   db 0
  677. msgbox_8:
  678.   db 3,0
  679.   db 'Warning',0
  680.   db 'To quit, quit the file.',13,\
  681.      'Try to keep changes to a file',13,\
  682.      'or start a new blank file.',0
  683.   db 'Cancel',0
  684.   db 0
  685. msgbox_9:
  686.   db 3,0
  687.   db 'Warning',0
  688.   db 'Error run ',39,'open file dialog',39,'.',13
  689.   .fdp:
  690.   rb 100
  691.   db 0
  692.   db 'Close',0
  693.   db 0
  694.  
  695. txtFile db 'File:',0
  696. txtFindCapt db 'Search',0
  697. txtFindNext db 'Find next',0
  698. txtFormatCapt db 'Format',0
  699. txtFormatApply db 'Apply',0
  700.  
  701. end if
  702.  
  703. ;функции для кнопок в сообщениях
  704. msgbox_2_funct:
  705.   dd On_SaveAndNewFile
  706.   dd On_NewFile
  707.   dd 0
  708. msgbox_5_funct:
  709.   dd ted_but_open_file.no_msg
  710.   dd 0
  711.  
  712. KM_SHIFT equ 0x00010000
  713. KM_CTRL equ 0x00020000
  714. KM_ALT equ 0x00040000
  715. KM_NUMLOCK equ 0x00080000
  716.  
  717. ; KEY CODES
  718. KEY_F1 equ 0x0000003B
  719. KEY_F2 equ 0x0000003C
  720. KEY_F3 equ 0x0000003D
  721.  
  722.