Subversion Repositories Kolibri OS

Rev

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