Subversion Repositories Kolibri OS

Rev

Rev 1468 | Rev 1592 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

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