Subversion Repositories Kolibri OS

Rev

Rev 4228 | Rev 4991 | 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_sumb_upper dd sz_ted_but_sumb_upper
99
	ted_but_sumb_lover dd sz_ted_but_sumb_lover
4308 IgorA 100
	ted_but_convert_by_table dd sz_ted_but_convert_by_table
1467 IgorA 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
4308 IgorA 112
	ted_save_file dd sz_ted_save_file
1467 IgorA 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
2102 IgorA 123
	version_text_edit dd sz_ted_version
1457 IgorA 124
 
4308 IgorA 125
	PathShow_prepare	dd sz_PathShow_prepare
126
	PathShow_draw		dd sz_PathShow_draw
127
 
1338 IgorA 128
dd 0,0
2632 IgorA 129
	alib_init0 db 'lib_init',0
1338 IgorA 130
 
1467 IgorA 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
3244 IgorA 134
	;aEdit_box_set_text db 'edit_box_set_text',0
1467 IgorA 135
	;aVersion_ed    db 'version_ed',0
1338 IgorA 136
 
1467 IgorA 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
1338 IgorA 142
 
1467 IgorA 143
	;aDbutton_draw    db 'dbutton_draw',0
144
	;aDbutton_mouse   db 'dbutton_mouse',0
145
	;aVersion_dbutton  db 'version_dbutton',0
1338 IgorA 146
 
1467 IgorA 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
1338 IgorA 150
 
1467 IgorA 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
2817 IgorA 166
	;sz_tl_node_close_open db 'tl_node_close_open',0
1467 IgorA 167
	sz_tl_node_lev_inc db 'tl_node_lev_inc',0
168
	sz_tl_node_lev_dec db 'tl_node_lev_dec',0
1457 IgorA 169
 
1467 IgorA 170
	sz_ted_but_sumb_upper	db 'ted_but_sumb_upper',0
171
	sz_ted_but_sumb_lover	db 'ted_but_sumb_lover',0
4308 IgorA 172
	sz_ted_but_convert_by_table db 'ted_but_convert_by_table',0
1467 IgorA 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
4308 IgorA 184
	sz_ted_save_file		db 'ted_save_file',0
1467 IgorA 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
2102 IgorA 195
	sz_ted_version db 'version_text_edit',0
1592 IgorA 196
 
4308 IgorA 197
	sz_PathShow_prepare	db 'PathShow_prepare',0
198
	sz_PathShow_draw	db 'PathShow_draw',0
199
 
1338 IgorA 200
align 4
2632 IgorA 201
import_proclib:
1592 IgorA 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
2632 IgorA 209
import_msgbox_lib:
1467 IgorA 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
2632 IgorA 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
 
2817 IgorA 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
 
1592 IgorA 242
;---------------------------------------------------------------------
1338 IgorA 243
align 4
244
wScr:
245
.x:
1343 IgorA 246
.size_x   dw 16 ;+0
247
.start_x  dw 50 ;+2
1338 IgorA 248
.y:
1343 IgorA 249
.size_y   dw 300 ; +4
250
.start_y  dw  50 ; +6
251
.btn_high dd  15 ; +8
2817 IgorA 252
.type	  dd ini_def_scroll_type ;+12
1343 IgorA 253
.max_area dd 100 ;+16
254
.cur_area dd  30 ;+20
255
.position dd   0 ;+24
2632 IgorA 256
.bckg_col dd   0 ;+28
257
.frnt_col dd   0 ;+32
1343 IgorA 258
.line_col dd   0 ;+36
259
.redraw   dd   0 ;+40
1467 IgorA 260
.delta	  dw   0 ;+44
1343 IgorA 261
.delta2   dw   0 ;+46
1338 IgorA 262
.run_x:
3244 IgorA 263
rb 2+2+2+2+4+4+4+4+4+4
1338 IgorA 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
2817 IgorA 276
.type	    dd ini_def_scroll_type ;+12
1338 IgorA 277
.max_area   dd 100 ;+16
2632 IgorA 278
.cur_area   dd 30 ;+20
1338 IgorA 279
.position   dd 0  ;+24
2632 IgorA 280
.bckg_col   dd 0  ;+28
281
.frnt_col   dd 0  ;+32
1338 IgorA 282
.line_col   dd 0  ;+36
283
.redraw     dd 0  ;+40
284
.delta	    dw 0  ;+44
285
.delta2     dw 0  ;+46
286
.run_x:
3244 IgorA 287
rb 2+2+2+2+4+4+4+4+4+4
1338 IgorA 288
.all_redraw dd 0 ;+80
289
.ar_offset  dd 1 ;+84
290
;---------------------------------------------------------------------
291
align 4
1467 IgorA 292
ws_dir_lbox: ;дочерний скроллинг для элемента ListBox
1338 IgorA 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
2817 IgorA 300
.type	    dd ini_def_scroll_type ;+12
2632 IgorA 301
.max_area   dd 100 ;+16
302
.cur_area   dd 30 ;+20
1338 IgorA 303
.position   dd 0  ;+24
2632 IgorA 304
.bckg_col   dd 0  ;+28
305
.frnt_col   dd 0  ;+32
1338 IgorA 306
.line_col   dd 0  ;+36
307
.redraw     dd 0  ;+40
308
.delta	    dw 0  ;+44
309
.delta2     dw 0  ;+46
310
.run_x:
3244 IgorA 311
rb 2+2+2+2+4+4+4+4+4+4
1338 IgorA 312
.all_redraw dd 0 ;+80
1343 IgorA 313
.ar_offset  dd 1 ;+84
314
;---------------------------------------------------------------------
1338 IgorA 315
 
316
align 4
317
menu_data_1:
1343 IgorA 318
.type: dd 0   ;+0
1338 IgorA 319
.x:
1343 IgorA 320
.size_x  dw 35 ;+4
321
.start_x dw  5 ;+6
1338 IgorA 322
.y:
1343 IgorA 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
1338 IgorA 330
.x1:
1343 IgorA 331
.size_x1  dw 70  ;+32
332
.start_x1 dw  5  ;+34
1338 IgorA 333
.y1:
1343 IgorA 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
1467 IgorA 343
.click	 dd 0 ;+68
1343 IgorA 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
1338 IgorA 352
.mouse_keys_old dd 0 ;+104
1343 IgorA 353
.font_height dd 8 ;+108
354
.cursor_out  dd 0 ;+112
1338 IgorA 355
.get_mouse_flag dd 0 ;+116
356
 
1467 IgorA 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
1592 IgorA 364
.opendir_path		dd plugin_path ;+16
365
.dir_default_path	dd default_dir ;+20
1467 IgorA 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
1592 IgorA 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
1467 IgorA 378
 
1592 IgorA 379
default_dir db '/rd/1',0 ;директория по умолчанию
380
 
1467 IgorA 381
communication_area_name:
382
	db 'FFFFFFFF_open_dialog',0
383
open_dialog_name:
384
	db 'opendial',0
385
communication_area_default_path:
1468 IgorA 386
	db '/rd/1/File managers/',0
1467 IgorA 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 ;панель поиска
1457 IgorA 404
TED_PANEL_SYNTAX equ 2 ;панель выбора файлов подсветки
405
TED_PANEL_WIDTH  equ 150 ;ширина панели
1338 IgorA 406
 
1467 IgorA 407
count_of_dir_list_files equ 15 ;максимальное число файлов синтаксиса показываемых в окне элемента tree1
1338 IgorA 408
 
1449 IgorA 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
2817 IgorA 420
	.rec BOX 30,23,ini_def_symbol_w,ini_def_symbol_h ;+16
1456 IgorA 421
	.drag_m db 0 ;+32 выделение от мыши
422
	.drag_k db 0 ;+33 выделение от клавиатуры
423
	.sel  TexSelect 0,0,0,0 ;+34 структура выделения
424
	.seln TexSelect ;+50 дополнительная структура выделения
1467 IgorA 425
	.tex	  dd 0 ;+66 text memory pointer
426
	.tex_1	  dd 0 ;+70 text first symbol pointer
1457 IgorA 427
	.tex_end  dd 0 ;+74 text end memory pointer
1467 IgorA 428
	.cur_x	  dd 0 ;+78 координата x курсора
429
	.cur_y	  dd 0 ;+82 координата y курсора
1457 IgorA 430
	.max_chars dd maxChars ;+86 максимальное число символов в одном документе
1456 IgorA 431
	.count_colors_text dd 1 ;+90 колличество цветов текста
432
	.count_key_words   dd 0 ;+94 колличество ключевых слов
1467 IgorA 433
	.color_cursor	   dd 0x808080 ;+98 цвет курсора
434
	.color_wnd_capt    dd	  0x80 ;+102 цвет полей вокруг окна
435
	.color_wnd_work    dd	   0x0 ;+106 цвет фона окна
1457 IgorA 436
	.color_wnd_bord    dd 0xd0d0d0 ;+110 цвет текста на полях
1467 IgorA 437
	.color_select	   dd 0x208080 ;+114 цвет выделения
1457 IgorA 438
	.color_cur_text    dd 0xff0000 ;+118 цвет символа под курсором
439
	.color_wnd_text    dd 0xffff00 ;+122 цвет текста в окне
1467 IgorA 440
	.syntax_file	   dd 0 ;+126 указатель на начало файла синтаксиса
1457 IgorA 441
	.syntax_file_size  dd maxSyntaxFileSize ;+130 максимальный размер файла синтаксиса
1467 IgorA 442
	.text_colors	   dd 0 ;+134 указатель на массив цветов текста
443
	.help_text_f1	   dd 0 ;+138 указатель на текст справки (по нажатии F1)
444
	.help_id	   dd -1 ;+142 идентификатор для справки
1457 IgorA 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 номер открытой панели
1456 IgorA 453
	.key_new     db 0 ;+172 символ, который будет добавлятся с клавиатуры
454
	.symbol_new_line db 20 ;+173 символ завершения строки
1467 IgorA 455
	.scr_w	     dd wScr ;+174 вертикальный скроллинг
456
	.scr_h	     dd hScr ;+178 горизонтальный скроллинг
1457 IgorA 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 (открытие файла)
1467 IgorA 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 (создание нового документа)
1457 IgorA 467
	.fun_on_key_ctrl_s dd 0 ;+210 ... Ctrl+S
1467 IgorA 468
	.buffer_size	   dd BUF_SIZE ;+214 размер буфера копирования/вставки
469
	.fun_find_err	   dd ted_on_find_err ;+218 указатель на функцию вызываемую если поиск закончился неудачно
2707 IgorA 470
	.fun_init_synt_err dd 0   ;+222
1457 IgorA 471
	.fun_draw_panel_buttons dd draw_but_toolbar  ;+226 указатель на функцию рисования панели с кнопками
1467 IgorA 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 указатель на функцию вызываемую если сохранение файла закончилось неудачно
1464 IgorA 475
	.increase_size dd 200 ;+242 число символов на которые будет увечиваться память при нехватке
476
	.ptr_free_symb dd ?   ;+246 используется внутри элемента для ускорения вставки текста
1449 IgorA 477
;------------------------------------------------------------------------------
478
 
1456 IgorA 479
conv_tabl rb 128 ; таблица для конвертирования scan-кода в ascii-код
480
 
1338 IgorA 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,\
1457 IgorA 484
    16,16, 0x8080ff,0x0000ff,0xffffff, 0,70,TED_PANEL_WIDTH-17,120, 0,0,0, el_focus,\
1338 IgorA 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
 
1343 IgorA 495
if lang eq ru
496
 
4308 IgorA 497
hed db 'Текстовый редактор 28.11.13',0 ;подпись окна
2817 IgorA 498
 
1338 IgorA 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
1467 IgorA 519
  db 'Внимание',0
1338 IgorA 520
  db 'Сохранить изменения в файле?',0
521
  db 'Сохранить',0
522
  db 'Не сохранять',0
523
  db 'Отмена',0
524
  db 0
525
 
526
msgbox_3:
527
  db 1,0
1467 IgorA 528
  db 'Внимание',0
1338 IgorA 529
  db 'Ошибка при открытии файла с цветовыми настройками!',13,\
530
     'Потому выделение слов цветом не возможно.',13,\
1343 IgorA 531
     '  (код ошибки ='
1338 IgorA 532
  .err: db '?'
533
  db ')',0
534
  db 'Закрыть',0
535
  db 0
536
 
537
msgbox_4:
538
  db 1,0
1467 IgorA 539
  db 'Внимание',0
1338 IgorA 540
  db 'Ошибка при открытии файла!',13,\
541
     'Возможно имя файла введено не правильно.',13,\
1343 IgorA 542
     '  (код ошибки ='
1338 IgorA 543
  .err: db '?'
544
  db ')',0
545
  db 'Закрыть',0
546
  db 0
547
 
548
msgbox_5:
549
  db 3,0
1467 IgorA 550
  db 'Внимание',0
1338 IgorA 551
  db 'Сохранить изменения в файле?',0
552
  db 'Не сохранять',0
553
  db 'Отмена',0
554
  db 0
555
 
556
msgbox_6:
557
  db 1,0
1467 IgorA 558
  db 'Внимание',0
1338 IgorA 559
  db 'Ошибка при сохранении файла!',13,\
560
     'Возможно имя файла введено не правильно.',13,\
1343 IgorA 561
     '  (код ошибки ='
1338 IgorA 562
  .err: db '?'
563
  db ')',0
564
  db 'Закрыть',0
565
  db 0
566
msgbox_7:
567
  db 1,0
1467 IgorA 568
  db 'Текст не найден',0
1338 IgorA 569
  db 'Достигнут конец документа.',13,\
570
     'Попробуйте перейти в начало документа',13,\
571
     'или изменить запрос и повторить поиск.',0
572
  db 'Закрыть',0
573
  db 0
574
msgbox_8:
575
  db 3,0
1467 IgorA 576
  db 'Внимание',0
1338 IgorA 577
  db 'Для выхода завершите работу с файлом.',13,\
578
     'Попробуйте сохранить изменения в файле',13,\
579
     'или начать новый пустой.',0
580
  db 'Отмена',0
581
  db 0
1467 IgorA 582
msgbox_9:
583
  db 3,0
584
  db 'Внимание',0
1468 IgorA 585
  db 'Не открылся ',39,'диалог открытия файла',39,'.',13
586
  .fdp:
587
  rb 100
588
  db 0
1467 IgorA 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
 
4308 IgorA 600
hed db 'Text editor 28.11.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
1343 IgorA 694
 
1467 IgorA 695
txtFile db 'File:',0
1343 IgorA 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
1338 IgorA 702
 
3366 IgorA 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
 
1338 IgorA 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