Subversion Repositories Kolibri OS

Rev

Rev 1343 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1338 IgorA 1
;---  фрээ√х яЁюуЁрьь√  ----------------------------------------------
2
fn_col_option dd def_col_file
3
fn_syntax_dir db 'info/',0
4
def_col_file db 'default.syn',0
5
 
6
system_dir0 db '/sys/lib/'
7
boxlib_name db 'box_lib.obj',0
8
 
9
system_dir1 db '/sys/lib/'
10
msgbox_name db 'msgbox.obj',0
11
 
12
fn_icon_tl_sys db 'tl_sys_16.bmp',0
13
fn_icon_tl_nod db 'tl_nod_16.bmp',0
14
;---------------------------------------------------------------------
15
fileinfo:
16
  dd 5
17
  dd 0
18
  dd 0
19
  dd 0
20
  dd file_info
21
string:
22
  db 0
23
  dd file_name
24
 
25
;plugin dd 0
26
 
27
;---------------------------------------------------------------------
28
align 4
29
myimport:
30
edit_box_draw  dd aEdit_box_draw
31
edit_box_key   dd aEdit_box_key
32
edit_box_mouse dd aEdit_box_mouse
33
version_ed     dd aVersion_ed
34
 
35
check_box_draw	dd aCheck_box_draw
36
check_box_mouse dd aCheck_box_mouse
37
version_ch	dd aVersion_ch
38
 
39
option_box_draw  dd aOption_box_draw
40
option_box_mouse dd aOption_box_mouse
41
version_op	 dd aVersion_op
42
 
43
scrollbar_ver_draw  dd aScrollbar_ver_draw
44
scrollbar_ver_mouse dd aScrollbar_ver_mouse
45
scrollbar_hor_draw  dd aScrollbar_hor_draw
46
scrollbar_hor_mouse dd aScrollbar_hor_mouse
47
version_scrollbar   dd aVersion_scrollbar
48
 
49
dinamic_button_draw  dd aDbutton_draw
50
dinamic_button_mouse dd aDbutton_mouse
51
version_dbutton      dd aVersion_dbutton
52
 
53
menu_bar_draw	 dd aMenu_bar_draw
54
menu_bar_mouse	 dd aMenu_bar_mouse
55
version_menu_bar dd aVersion_menu_bar
56
 
57
  tl_data_init dd sz_tl_data_init
58
  tl_data_clear dd sz_tl_data_clear
59
  tl_info_clear dd sz_tl_info_clear
60
  tl_key dd sz_tl_key
61
  tl_mouse dd sz_tl_mouse
62
  tl_draw dd sz_tl_draw
63
  tl_info_undo dd sz_tl_info_undo
64
  tl_info_redo dd sz_tl_info_redo
65
  tl_node_add dd sz_tl_node_add
66
  tl_node_set_data dd sz_tl_node_set_data
67
  tl_node_get_data dd sz_tl_node_get_data
68
  tl_node_delete dd sz_tl_node_delete
69
  tl_cur_beg dd sz_tl_cur_beg
70
  tl_cur_next dd sz_tl_cur_next
71
  tl_cur_perv dd sz_tl_cur_perv
72
  tl_node_close_open dd sz_tl_node_close_open
73
  tl_node_lev_inc dd sz_tl_node_lev_inc
74
  tl_node_lev_dec dd sz_tl_node_lev_dec
75
dd 0,0
76
 
77
aEdit_box_draw	db 'edit_box',0
78
aEdit_box_key	db 'edit_box_key',0
79
aEdit_box_mouse db 'edit_box_mouse',0
80
aVersion_ed	db 'version_ed',0
81
 
82
aCheck_box_draw  db 'check_box_draw',0
83
aCheck_box_mouse db 'check_box_mouse',0
84
aVersion_ch	 db 'version_ch',0
85
 
86
aOption_box_draw  db 'option_box_draw',0
87
aOption_box_mouse db 'option_box_mouse',0
88
aVersion_op	  db 'version_op',0
89
 
90
aScrollbar_ver_draw  db 'scrollbar_v_draw',0
91
aScrollbar_ver_mouse db 'scrollbar_v_mouse',0
92
aScrollbar_hor_draw  db 'scrollbar_h_draw',0
93
aScrollbar_hor_mouse db 'scrollbar_h_mouse',0
94
aVersion_scrollbar   db 'version_scrollbar',0
95
 
96
aDbutton_draw	  db 'dbutton_draw',0
97
aDbutton_mouse	  db 'dbutton_mouse',0
98
aVersion_dbutton  db 'version_dbutton',0
99
 
100
aMenu_bar_draw	  db 'menu_bar_draw',0
101
aMenu_bar_mouse   db 'menu_bar_mouse',0
102
aVersion_menu_bar db 'version_menu_bar',0
103
 
104
  sz_tl_data_init db 'tl_data_init',0
105
  sz_tl_data_clear db 'tl_data_clear',0
106
  sz_tl_info_clear db 'tl_info_clear',0
107
  sz_tl_key db 'tl_key',0
108
  sz_tl_mouse db 'tl_mouse',0
109
  sz_tl_draw db 'tl_draw',0
110
  sz_tl_info_undo db 'tl_info_undo',0
111
  sz_tl_info_redo db 'tl_info_redo',0
112
  sz_tl_node_add db 'tl_node_add',0
113
  sz_tl_node_set_data db 'tl_node_set_data',0
114
  sz_tl_node_get_data db 'tl_node_get_data',0
115
  sz_tl_node_delete db 'tl_node_delete',0
116
  sz_tl_cur_beg db 'tl_cur_beg',0
117
  sz_tl_cur_next db 'tl_cur_next',0
118
  sz_tl_cur_perv db 'tl_cur_perv',0
119
  sz_tl_node_close_open db 'tl_node_close_open',0
120
  sz_tl_node_lev_inc db 'tl_node_lev_inc',0
121
  sz_tl_node_lev_dec db 'tl_node_lev_dec',0
122
;--------------------------------------------------
123
align 4
124
msgbox_lib_import:
125
  mb_create dd amb_create
126
  mb_reinit dd amb_reinit
127
  mb_setfunctions dd amb_setfunctions
128
  dd 0,0
129
  amb_create db 'mb_create',0
130
  amb_reinit db 'mb_reinit',0
131
  amb_setfunctions db 'mb_setfunctions',0
132
;---------------------------------------------------------------------
133
align 4
134
wScr:
135
.x:
136
.size_x     dw 16 ;+0
137
.start_x    dw 50 ;+2
138
.y:
139
.size_y     dw 300 ;+4
140
.start_y    dw 50 ;+6
141
.btn_high   dd 15 ;+8
142
.type	    dd 1  ;+12
143
.max_area   dd 100  ;+16
144
.cur_area   dd 30  ;+20
145
.position   dd 0  ;+24
146
.bckg_col   dd 0xeeeeee ;+28
147
.frnt_col   dd 0xbbddff ;+32
148
.line_col   dd 0  ;+36
149
.redraw     dd 0  ;+40
150
.delta	    dw 0  ;+44
151
.delta2     dw 0  ;+46
152
.run_x:
153
.r_size_x   dw 0  ;+48
154
.r_start_x  dw 0  ;+50
155
.run_y:
156
.r_size_y   dw 0 ;+52
157
.r_start_y  dw 0 ;+54
158
.m_pos	    dd 0 ;+56
159
.m_pos_2    dd 0 ;+60
160
.m_keys     dd 0 ;+64
161
.run_size   dd 0 ;+68
162
.position2  dd 0 ;+72
163
.work_size  dd 0 ;+76
164
.all_redraw dd 0 ;+80
165
.ar_offset  dd 1 ;+84
166
;---------------------------------------------------------------------
167
align 4
168
hScr:
169
.x:
170
.size_x     dw 150 ;+0
171
.start_x    dw 0 ;+2
172
.y:
173
.size_y     dw 16 ;+4
174
.start_y    dw 50 ;+6
175
.btn_high   dd 15 ;+8
176
.type	    dd 1  ;+12
177
.max_area   dd 100 ;+16
178
.cur_area   dd 30  ;+20
179
.position   dd 0  ;+24
180
.bckg_col   dd 0xeeeeee ;+28
181
.frnt_col   dd 0xbbddff ;+32
182
.line_col   dd 0  ;+36
183
.redraw     dd 0  ;+40
184
.delta	    dw 0  ;+44
185
.delta2     dw 0  ;+46
186
.run_x:
187
.r_size_x   dw 0  ;+48
188
.r_start_x  dw 0  ;+50
189
.run_y:
190
.r_size_y   dw 0 ;+52
191
.r_start_y  dw 0 ;+54
192
.m_pos	    dd 0 ;+56
193
.m_pos_2    dd 0 ;+60
194
.m_keys     dd 0 ;+64
195
.run_size   dd 0 ;+68
196
.position2  dd 0 ;+72
197
.work_size  dd 0 ;+76
198
.all_redraw dd 0 ;+80
199
.ar_offset  dd 1 ;+84
200
;---------------------------------------------------------------------
201
align 4
202
ws_dir_lbox: ;фюўхЁэшщ ёъЁюыышэу фы  ¤ыхьхэЄр ListBox
203
.x:
204
.size_x     dw 16 ;+0
205
.start_x    dw 0 ;+2
206
.y:
207
.size_y     dw 30 ;+4
208
.start_y    dw 70 ;+6
209
.btn_high   dd 15 ;+8
210
.type	    dd 1  ;+12
211
.max_area   dd 100  ;+16
212
.cur_area   dd 30  ;+20
213
.position   dd 0  ;+24
214
.bckg_col   dd 0xeeeeee ;+28
215
.frnt_col   dd 0xbbddff ;+32
216
.line_col   dd 0  ;+36
217
.redraw     dd 0  ;+40
218
.delta	    dw 0  ;+44
219
.delta2     dw 0  ;+46
220
.run_x:
221
.r_size_x   dw 0  ;+48
222
.r_start_x  dw 0  ;+50
223
.run_y:
224
.r_size_y   dw 0 ;+52
225
.r_start_y  dw 0 ;+54
226
.m_pos	    dd 0 ;+56
227
.m_pos_2    dd 0 ;+60
228
.m_keys     dd 0 ;+64
229
.run_size   dd 0 ;+68
230
.position2  dd 0 ;+72
231
.work_size  dd 0 ;+76
232
.all_redraw dd 0 ;+80
233
.ar_offset  dd 1 ;+84;---------------------------------------------------------------------
234
 
235
align 4
236
menu_data_1:
237
.type:			dd 0   ;+0
238
.x:
239
.size_x 		dw 35  ;+4
240
.start_x		dw 5   ;+6
241
.y:
242
.size_y 		dw 15	;+8
243
.start_y		dw 5  ;+10
244
.text_pointer:	dd menu_text_area  ;0 ;+12
245
.pos_pointer:	dd menu_text_area.1 ;0 ;+16
246
.text_end		dd menu_text_area.end ;0 ;+20
247
.mouse_pos		dd 0  ;+24
248
.mouse_keys		dd 0  ;+28
249
.x1:
250
.size_x1		dw 70  ;+32
251
.start_x1		dw 5   ;+34
252
.y1:
253
.size_y1		dw 15	;+36
254
.start_y1		dw 20  ;+38
255
.bckg_col	dd 0xeeeeee ;+40
256
.frnt_col	dd 0xff ;+44
257
.menu_col	dd 0xffffff ;+48
258
.select 	dd 0 ;+52
259
.out_select	dd 0 ;+56
260
.buf_adress		dd 0 ;+60
261
.procinfo		dd procinfo ;0 ;+64
262
.click			dd 0 ;+68
263
.cursor 		dd 0 ;+72
264
.cursor_old		dd 0 ;+76
265
.interval		dd 16 ;+80
266
.cursor_max		dd 0 ;+84
267
.extended_key	dd 0 ;+88
268
.menu_sel_col	dd 0x00cc00 ;+92
269
.bckg_text_col	dd 0 ; +96
270
.frnt_text_col	dd 0xffffff ;+100
271
.mouse_keys_old dd 0 ;+104
272
.font_height	dd 8 ;+108
273
.cursor_out		dd 0 ;+112
274
.get_mouse_flag dd 0 ;+116
275
;-------------------------
276
 
277
TE_PANEL_NULL equ 0
278
TE_PANEL_FIND equ 1
279
TE_PANEL_SYNTAX equ 2
280
TE_PANEL_WIDTH equ 150 ;°шЁшэр ярэхыш
281
 
282
count_of_dir_list_files equ 15
283
 
284
el_focus dd 0
285
mouse_dd dd 0
286
tree1 tree_list 264,count_of_dir_list_files+2, tl_key_no_edit+tl_draw_par_line+tl_list_box_mode,\
287
    16,16, 0x8080ff,0x0000ff,0xffffff, 0,70,TE_PANEL_WIDTH-17,120, 0,0,0, el_focus,\
288
    ws_dir_lbox,0
289
 
290
;dir_list memory
291
tree_file_struct:
292
  dd 1
293
  dd 0,0,count_of_dir_list_files
294
  dd dir_mem
295
  db 0
296
  dd file_name ;sys_path
297
 
298
dir_mem rb 32+304*count_of_dir_list_files
299
 
300
 
301
menu_text_area:
302
db 'Файл',0
303
.1:
304
db 'Создать',0
305
db 'Открыть',0
306
db 'Сохранить',0
307
db 'Выход',0
308
.end:
309
db 0
310
 
311
;--------
312
msgbox_1:
313
  dw 0
314
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
315
  db 'Файл большой, потому открыт не весь.',13
316
  db '  1. При его сохранении будут потеряны "не открывшиеся" символы.',13
317
  db '  2. В документ нельзя добавлять текст, т. к. память занята.',0
318
  db 'Я понял(а)',0 ;button1
319
  db 0
320
msgbox_2:
321
  db 3,0
322
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
323
  db 'Сохранить изменения в файле?',0
324
  db 'Сохранить',0
325
  db 'Не сохранять',0
326
  db 'Отмена',0
327
  db 0
328
msgbox_2_funct:
329
  dd On_SaveAndNewFile
330
  dd On_NewFile
331
  dd 0
332
 
333
msgbox_3:
334
  db 1,0
335
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
336
  db 'Ошибка при открытии файла с цветовыми настройками!',13,\
337
     'Потому выделение слов цветом не возможно.',13,\
338
     '  (код ошибки='
339
  .err: db '?'
340
  db ')',0
341
  db 'Закрыть',0
342
  db 0
343
 
344
msgbox_4:
345
  db 1,0
346
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
347
  db 'Ошибка при открытии файла!',13,\
348
     'Возможно имя файла введено не правильно.',13,\
349
     '  (код ошибки='
350
  .err: db '?'
351
  db ')',0
352
  db 'Закрыть',0
353
  db 0
354
 
355
msgbox_5:
356
  db 3,0
357
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
358
  db 'Сохранить изменения в файле?',0
359
  db 'Не сохранять',0
360
  db 'Отмена',0
361
  db 0
362
msgbox_5_funct:
363
;  dd but_SaveFile
364
  dd On_OpenFile
365
  dd 0
366
 
367
msgbox_6:
368
  db 1,0
369
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
370
  db 'Ошибка при сохранении файла!',13,\
371
     'Возможно имя файла введено не правильно.',13,\
372
     '  (код ошибки='
373
  .err: db '?'
374
  db ')',0
375
  db 'Закрыть',0
376
  db 0
377
msgbox_7:
378
  db 1,0
379
  db 'Текст не найден',0 ;+2 = +MB_TEXT_OFFSET
380
  db 'Достигнут конец документа.',13,\
381
     'Попробуйте перейти в начало документа',13,\
382
     'или изменить запрос и повторить поиск.',0
383
  db 'Закрыть',0
384
  db 0
385
msgbox_8:
386
  db 3,0
387
  db 'Внимание',0 ;+2 = +MB_TEXT_OFFSET
388
  db 'Для выхода завершите работу с файлом.',13,\
389
     'Попробуйте сохранить изменения в файле',13,\
390
     'или начать новый пустой.',0
391
  db 'Отмена',0
392
  db 0
393
 
394
txtFindCapt db 'Поиск',0
395
txtFindNext db 'Найти далее',0
396
txtFormatCapt db 'Формат',0
397
txtFormatApply db 'Применить',0
398
;------
399
align 4
400
EvChar db 0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0
401
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
402
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
403
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
404
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
405
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
406
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
407
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0
408
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
409
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
410
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
411
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
412
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
413
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
414
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
415
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
416
 
417
EvUpper db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
418
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
419
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
420
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
421
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
422
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
423
    db 0,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79
424
    db 80,81,82,83,84,85,86,87,88,89,90,0,0,0,0,0
425
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
426
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
427
    db 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143
428
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
429
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
430
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
431
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
432
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
433
EvLover db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
434
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
435
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
436
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
437
    db 0,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111
438
    db 112,113,114,115,116,117,118,119,120,121,122,0,0,0,0,0
439
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
440
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
441
    db 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175
442
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
443
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
444
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
445
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
446
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
447
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
448
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
449
conv_table dd 0
450
 
451
 
452
KM_SHIFT equ 0x00010000
453
KM_CTRL equ 0x00020000
454
KM_ALT equ 0x00040000
455
KM_NUMLOCK equ 0x00080000
456
 
457
; KEY CODES
458
KEY_F1 equ 0x0000003B
459
KEY_F2 equ 0x0000003C
460
KEY_F3 equ 0x0000003D
461