Subversion Repositories Kolibri OS

Rev

Rev 1338 | Rev 1449 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1338 Rev 1343
Line 28... Line 28...
28 
align 4
 28 
align 4
29 
myimport:
 29 
myimport:
30 
edit_box_draw  dd aEdit_box_draw
 30 
edit_box_draw  dd aEdit_box_draw
31 
edit_box_key   dd aEdit_box_key
 31 
edit_box_key   dd aEdit_box_key
32 
edit_box_mouse dd aEdit_box_mouse
 32 
edit_box_mouse dd aEdit_box_mouse
33 
version_ed     dd aVersion_ed
 33 
;version_ed     dd aVersion_ed
Line 34... Line 34...
34 
 
 34 
 
35 
check_box_draw	dd aCheck_box_draw
 35 
;check_box_draw	dd aCheck_box_draw
36 
check_box_mouse dd aCheck_box_mouse
 36 
;check_box_mouse dd aCheck_box_mouse
37 
version_ch	dd aVersion_ch
 37 
;version_ch	dd aVersion_ch
38 
 
 38 
 
39 
option_box_draw  dd aOption_box_draw
 39 
;option_box_draw  dd aOption_box_draw
40 
option_box_mouse dd aOption_box_mouse
 40 
;option_box_mouse dd aOption_box_mouse
Line 41... Line 41...
41 
version_op	 dd aVersion_op
 41 
;version_op	 dd aVersion_op
42 
 
 42 
 
43 
scrollbar_ver_draw  dd aScrollbar_ver_draw
 43 
scrollbar_ver_draw  dd aScrollbar_ver_draw
44 
scrollbar_ver_mouse dd aScrollbar_ver_mouse
 44 
scrollbar_ver_mouse dd aScrollbar_ver_mouse
45 
scrollbar_hor_draw  dd aScrollbar_hor_draw
 45 
scrollbar_hor_draw  dd aScrollbar_hor_draw
Line 46... Line 46...
46 
scrollbar_hor_mouse dd aScrollbar_hor_mouse
 46 
scrollbar_hor_mouse dd aScrollbar_hor_mouse
47 
version_scrollbar   dd aVersion_scrollbar
 47 
;version_scrollbar   dd aVersion_scrollbar
48 
 
 48 
 
Line 49... Line 49...
49 
dinamic_button_draw  dd aDbutton_draw
 49 
;dinamic_button_draw  dd aDbutton_draw
50 
dinamic_button_mouse dd aDbutton_mouse
 50 
;dinamic_button_mouse dd aDbutton_mouse
51 
version_dbutton      dd aVersion_dbutton
 51 
;version_dbutton      dd aVersion_dbutton
Line 52... Line 52...
52 
 
 52 
 
53 
menu_bar_draw	 dd aMenu_bar_draw
 53 
menu_bar_draw	 dd aMenu_bar_draw
54 
menu_bar_mouse	 dd aMenu_bar_mouse
 54 
menu_bar_mouse	 dd aMenu_bar_mouse
55 
version_menu_bar dd aVersion_menu_bar
 55 
;version_menu_bar dd aVersion_menu_bar
Line 75... Line 75...
75 
dd 0,0
 75 
dd 0,0
Line 76... Line 76...
76 
 
 76 
 
77 
aEdit_box_draw	db 'edit_box',0
 77 
aEdit_box_draw	db 'edit_box',0
78 
aEdit_box_key	db 'edit_box_key',0
 78 
aEdit_box_key	db 'edit_box_key',0
79 
aEdit_box_mouse db 'edit_box_mouse',0
 79 
aEdit_box_mouse db 'edit_box_mouse',0
Line 80... Line 80...
80 
aVersion_ed	db 'version_ed',0
 80 
;aVersion_ed	db 'version_ed',0
81 
 
 81 
 
82 
aCheck_box_draw  db 'check_box_draw',0
 82 
;aCheck_box_draw  db 'check_box_draw',0
83 
aCheck_box_mouse db 'check_box_mouse',0
 83 
;aCheck_box_mouse db 'check_box_mouse',0
84 
aVersion_ch	 db 'version_ch',0
 84 
;aVersion_ch	 db 'version_ch',0
85 
 
 85 
 
86 
aOption_box_draw  db 'option_box_draw',0
 86 
;aOption_box_draw  db 'option_box_draw',0
Line 87... Line 87...
87 
aOption_box_mouse db 'option_box_mouse',0
 87 
;aOption_box_mouse db 'option_box_mouse',0
88 
aVersion_op	  db 'version_op',0
 88 
;aVersion_op	  db 'version_op',0
89 
 
 89 
 
90 
aScrollbar_ver_draw  db 'scrollbar_v_draw',0
 90 
aScrollbar_ver_draw  db 'scrollbar_v_draw',0
91 
aScrollbar_ver_mouse db 'scrollbar_v_mouse',0
 91 
aScrollbar_ver_mouse db 'scrollbar_v_mouse',0
Line 92... Line 92...
92 
aScrollbar_hor_draw  db 'scrollbar_h_draw',0
 92 
aScrollbar_hor_draw  db 'scrollbar_h_draw',0
93 
aScrollbar_hor_mouse db 'scrollbar_h_mouse',0
 93 
aScrollbar_hor_mouse db 'scrollbar_h_mouse',0
94 
aVersion_scrollbar   db 'version_scrollbar',0
 94 
;aVersion_scrollbar   db 'version_scrollbar',0
Line 95... Line 95...
95 
 
 95 
 
96 
aDbutton_draw	  db 'dbutton_draw',0
 96 
;aDbutton_draw	  db 'dbutton_draw',0
97 
aDbutton_mouse	  db 'dbutton_mouse',0
 97 
;aDbutton_mouse	  db 'dbutton_mouse',0
Line 98... Line 98...
98 
aVersion_dbutton  db 'version_dbutton',0
 98 
;aVersion_dbutton  db 'version_dbutton',0
99 
 
 99 
 
100 
aMenu_bar_draw	  db 'menu_bar_draw',0
 100 
aMenu_bar_draw	  db 'menu_bar_draw',0
101 
aMenu_bar_mouse   db 'menu_bar_mouse',0
 101 
aMenu_bar_mouse   db 'menu_bar_mouse',0
Line 131... Line 131...
131 
  amb_setfunctions db 'mb_setfunctions',0
 131 
  amb_setfunctions db 'mb_setfunctions',0
132 
;---------------------------------------------------------------------
132 
;---------------------------------------------------------------------
133 
align 4
 133 
align 4
134 
wScr:
 134 
wScr:
135 
.x:
 135 
.x:
136 
.size_x     dw 16 ;+0
 136 
.size_x   dw 16 ;+0
137 
.start_x    dw 50 ;+2
 137 
.start_x  dw 50 ;+2
138 
.y:
 138 
.y:
139 
.size_y     dw 300 ;+4
 139 
.size_y   dw 300 ; +4
140 
.start_y    dw 50 ;+6
 140 
.start_y  dw  50 ; +6
141 
.btn_high   dd 15 ;+8
 141 
.btn_high dd  15 ; +8
142 
.type	    dd 1  ;+12
 142 
.type     dd   1 ;+12
143 
.max_area   dd 100  ;+16
 143 
.max_area dd 100 ;+16
144 
.cur_area   dd 30  ;+20
 144 
.cur_area dd  30 ;+20
145 
.position   dd 0  ;+24
 145 
.position dd   0 ;+24
146 
.bckg_col   dd 0xeeeeee ;+28
 146 
.bckg_col dd 0xeeeeee ;+28
147 
.frnt_col   dd 0xbbddff ;+32
 147 
.frnt_col dd 0xbbddff ;+32
148 
.line_col   dd 0  ;+36
 148 
.line_col dd   0 ;+36
149 
.redraw     dd 0  ;+40
 149 
.redraw   dd   0 ;+40
150 
.delta	    dw 0  ;+44
 150 
.delta    dw   0 ;+44
151 
.delta2     dw 0  ;+46
 151 
.delta2   dw   0 ;+46
152 
.run_x:
 152 
.run_x:
153 
.r_size_x   dw 0  ;+48
 153 
.r_size_x  dw 0 ;+48
154 
.r_start_x  dw 0  ;+50
 154 
.r_start_x dw 0 ;+50
155 
.run_y:
 155 
.run_y:
156 
.r_size_y   dw 0 ;+52
 156 
.r_size_y   dw 0 ;+52
157 
.r_start_y  dw 0 ;+54
 157 
.r_start_y  dw 0 ;+54
158 
.m_pos	    dd 0 ;+56
 158 
.m_pos      dd 0 ;+56
159 
.m_pos_2    dd 0 ;+60
 159 
.m_pos_2    dd 0 ;+60
160 
.m_keys     dd 0 ;+64
 160 
.m_keys     dd 0 ;+64
161 
.run_size   dd 0 ;+68
 161 
.run_size   dd 0 ;+68
162 
.position2  dd 0 ;+72
 162 
.position2  dd 0 ;+72
163 
.work_size  dd 0 ;+76
 163 
.work_size  dd 0 ;+76
Line 228... Line 228...
228 
.m_keys     dd 0 ;+64
 228 
.m_keys     dd 0 ;+64
229 
.run_size   dd 0 ;+68
 229 
.run_size   dd 0 ;+68
230 
.position2  dd 0 ;+72
 230 
.position2  dd 0 ;+72
231 
.work_size  dd 0 ;+76
 231 
.work_size  dd 0 ;+76
232 
.all_redraw dd 0 ;+80
 232 
.all_redraw dd 0 ;+80
- 
 
 233 
.ar_offset  dd 1 ;+84
233 
.ar_offset  dd 1 ;+84;---------------------------------------------------------------------
 234 
;---------------------------------------------------------------------
Line 234... Line 235...
234 
 
 235 
 
235 
align 4
 236 
align 4
236 
menu_data_1:
 237 
menu_data_1:
237 
.type:			dd 0   ;+0
 238 
.type: dd 0   ;+0
238 
.x:
 239 
.x:
239 
.size_x 		dw 35  ;+4
 240 
.size_x  dw 35 ;+4
240 
.start_x		dw 5   ;+6
 241 
.start_x dw  5 ;+6
241 
.y:
 242 
.y:
242 
.size_y 		dw 15	;+8
 243 
.size_y  dw 15 ;+8
243 
.start_y		dw 5  ;+10
 244 
.start_y dw  5 ;+10
244 
.text_pointer:	dd menu_text_area  ;0 ;+12
 245 
.text_pointer: dd menu_text_area   ;+12
245 
.pos_pointer:	dd menu_text_area.1 ;0 ;+16
 246 
.pos_pointer:  dd menu_text_area.1 ;+16
246 
.text_end		dd menu_text_area.end ;0 ;+20
 247 
.text_end   dd menu_text_area.end  ;+20
247 
.mouse_pos		dd 0  ;+24
 248 
.mouse_pos  dd 0 ;+24
248 
.mouse_keys		dd 0  ;+28
 249 
.mouse_keys dd 0 ;+28
249 
.x1:
 250 
.x1:
250 
.size_x1		dw 70  ;+32
 251 
.size_x1  dw 70  ;+32
251 
.start_x1		dw 5   ;+34
 252 
.start_x1 dw  5  ;+34
252 
.y1:
 253 
.y1:
253 
.size_y1		dw 15	;+36
 254 
.size_y1  dw 15  ;+36
254 
.start_y1		dw 20  ;+38
 255 
.start_y1 dw 20  ;+38
255 
.bckg_col	dd 0xeeeeee ;+40
 256 
.bckg_col dd 0xeeeeee ;+40
256 
.frnt_col	dd 0xff ;+44
 257 
.frnt_col dd 0xff ;+44
257 
.menu_col	dd 0xffffff ;+48
 258 
.menu_col dd 0xffffff ;+48
258 
.select 	dd 0 ;+52
 259 
.select   dd 0 ;+52
259 
.out_select	dd 0 ;+56
 260 
.out_select dd 0 ;+56
260 
.buf_adress		dd 0 ;+60
 261 
.buf_adress dd 0 ;+60
261 
.procinfo		dd procinfo ;0 ;+64
 262 
.procinfo dd procinfo ;0 ;+64
262 
.click			dd 0 ;+68
 263 
.click   dd 0 ;+68
263 
.cursor 		dd 0 ;+72
 264 
.cursor  dd 0 ;+72
264 
.cursor_old		dd 0 ;+76
 265 
.cursor_old dd 0 ;+76
265 
.interval		dd 16 ;+80
 266 
.interval   dd 16 ;+80
266 
.cursor_max		dd 0 ;+84
 267 
.cursor_max  dd 0 ;+84
267 
.extended_key	dd 0 ;+88
 268 
.extended_key dd 0 ;+88
268 
.menu_sel_col	dd 0x00cc00 ;+92
 269 
.menu_sel_col dd 0x00cc00 ;+92
269 
.bckg_text_col	dd 0 ; +96
 270 
.bckg_text_col dd 0 ;+96
270 
.frnt_text_col	dd 0xffffff ;+100
 271 
.frnt_text_col dd 0xffffff ;+100
271 
.mouse_keys_old dd 0 ;+104
 272 
.mouse_keys_old dd 0 ;+104
272 
.font_height	dd 8 ;+108
 273 
.font_height dd 8 ;+108
273 
.cursor_out		dd 0 ;+112
 274 
.cursor_out  dd 0 ;+112
274 
.get_mouse_flag dd 0 ;+116
 275 
.get_mouse_flag dd 0 ;+116
Line 275... Line 276...
275 
;-------------------------
 276 
;-------------------------
276 
 
 277 
 
Line 296... Line 297...
296 
  dd file_name ;sys_path
 297 
  dd file_name ;sys_path
Line 297... Line 298...
297 
 
 298 
 
Line -... Line 299...
- 
 
 299 
dir_mem rb 32+304*count_of_dir_list_files
- 
 
 300 
 
298 
dir_mem rb 32+304*count_of_dir_list_files
 301 
 
299 
 
 302 
if lang eq ru
300 
 
 303 
 
301 
menu_text_area:
 304 
menu_text_area:
302 
db '” ©«',0
 305 
db '” ©«',0
Line 333... Line 336...
333 
msgbox_3:
 336 
msgbox_3:
334 
  db 1,0
 337 
  db 1,0
335 
  db '‚­¨¬ ­¨¥',0 ;+2 = +MB_TEXT_OFFSET
 338 
  db '‚­¨¬ ­¨¥',0 ;+2 = +MB_TEXT_OFFSET
336 
  db 'Žè¨¡ª  ¯à¨ ®âªàë⨨ ä ©«  á 梥⮢묨 ­ áâனª ¬¨!',13,\
 339 
  db 'Žè¨¡ª  ¯à¨ ®âªàë⨨ ä ©«  á 梥⮢묨 ­ áâனª ¬¨!',13,\
337 
     '®â®¬ã ¢ë¤¥«¥­¨¥ á«®¢ 梥⮬ ­¥ ¢®§¬®¦­®.',13,\
 340 
     '®â®¬ã ¢ë¤¥«¥­¨¥ á«®¢ 梥⮬ ­¥ ¢®§¬®¦­®.',13,\
338 
     '  (ª®¤ ®è¨¡ª¨='
 341 
     '  (ª®¤ ®è¨¡ª¨ ='
339 
  .err: db '?'
 342 
  .err: db '?'
340 
  db ')',0
 343 
  db ')',0
341 
  db '‡ ªàëâì',0
 344 
  db '‡ ªàëâì',0
342 
  db 0
 345 
  db 0
Line 343... Line 346...
343 
 
 346 
 
344 
msgbox_4:
 347 
msgbox_4:
345 
  db 1,0
 348 
  db 1,0
346 
  db '‚­¨¬ ­¨¥',0 ;+2 = +MB_TEXT_OFFSET
 349 
  db '‚­¨¬ ­¨¥',0 ;+2 = +MB_TEXT_OFFSET
347 
  db 'Žè¨¡ª  ¯à¨ ®âªàë⨨ ä ©« !',13,\
 350 
  db 'Žè¨¡ª  ¯à¨ ®âªàë⨨ ä ©« !',13,\
348 
     '‚®§¬®¦­® ¨¬ï ä ©«  ¢¢¥¤¥­® ­¥ ¯à ¢¨«ì­®.',13,\
 351 
     '‚®§¬®¦­® ¨¬ï ä ©«  ¢¢¥¤¥­® ­¥ ¯à ¢¨«ì­®.',13,\
349 
     '  (ª®¤ ®è¨¡ª¨='
 352 
     '  (ª®¤ ®è¨¡ª¨ ='
350 
  .err: db '?'
 353 
  .err: db '?'
351 
  db ')',0
 354 
  db ')',0
352 
  db '‡ ªàëâì',0
 355 
  db '‡ ªàëâì',0
Line 367... Line 370...
367 
msgbox_6:
 370 
msgbox_6:
368 
  db 1,0
 371 
  db 1,0
369 
  db '‚­¨¬ ­¨¥',0 ;+2 = +MB_TEXT_OFFSET
 372 
  db '‚­¨¬ ­¨¥',0 ;+2 = +MB_TEXT_OFFSET
370 
  db 'Žè¨¡ª  ¯à¨ á®åà ­¥­¨¨ ä ©« !',13,\
 373 
  db 'Žè¨¡ª  ¯à¨ á®åà ­¥­¨¨ ä ©« !',13,\
371 
     '‚®§¬®¦­® ¨¬ï ä ©«  ¢¢¥¤¥­® ­¥ ¯à ¢¨«ì­®.',13,\
 374 
     '‚®§¬®¦­® ¨¬ï ä ©«  ¢¢¥¤¥­® ­¥ ¯à ¢¨«ì­®.',13,\
372 
     '  (ª®¤ ®è¨¡ª¨='
 375 
     '  (ª®¤ ®è¨¡ª¨ ='
373 
  .err: db '?'
 376 
  .err: db '?'
374 
  db ')',0
 377 
  db ')',0
375 
  db '‡ ªàëâì',0
 378 
  db '‡ ªàëâì',0
376 
  db 0
 379 
  db 0
377 
msgbox_7:
 380 
msgbox_7:
Line 393... Line 396...
393 
 
 396 
 
394 
txtFindCapt db '®¨áª',0
 397 
txtFindCapt db '®¨áª',0
395 
txtFindNext db ' ©â¨ ¤ «¥¥',0
 398 
txtFindNext db ' ©â¨ ¤ «¥¥',0
396 
txtFormatCapt db '”®à¬ â',0
 399 
txtFormatCapt db '”®à¬ â',0
- 
 
 400 
txtFormatApply db 'à¨¬¥­¨âì',0
- 
 
 401 
txtRow db '‘âப ',0
- 
 
 402 
txtCol db '‡­ ª',0
- 
 
 403 
txtOtm db 'Žâ¬¥­ë',0
- 
 
 404 
txtBuf db 'ãä¥à: '
- 
 
 405 
buf db BUF_SIZE dup(0) ;buf âñåãäà ïîñëå txtBuf
- 
 
 406 
 
- 
 
 407 
else
- 
 
 408 
 
- 
 
 409 
menu_text_area:
- 
 
 410 
db 'File',0
- 
 
 411 
.1:
- 
 
 412 
db 'New',0
- 
 
 413 
db 'Open',0
- 
 
 414 
db 'Save',0
- 
 
 415 
db 'Exit',0
- 
 
 416 
.end:
- 
 
 417 
db 0
- 
 
 418 
 
- 
 
 419 
;--------
- 
 
 420 
msgbox_1:
- 
 
 421 
  dw 0
- 
 
 422 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 423 
  db 'File is large, because not all open.',13
- 
 
 424 
  db '  1. If you save it will lose "not opened" characters.',13
- 
 
 425 
  db '  2. The document can not add text, because the memory is busy.',0
- 
 
 426 
  db 'Ok',0 ;button1
- 
 
 427 
  db 0
- 
 
 428 
msgbox_2:
- 
 
 429 
  db 3,0
- 
 
 430 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 431 
  db 'Save changes to the file?',0
- 
 
 432 
  db 'Save',0
- 
 
 433 
  db 'Discard',0
- 
 
 434 
  db 'Cancel',0
- 
 
 435 
  db 0
- 
 
 436 
msgbox_2_funct:
- 
 
 437 
  dd On_SaveAndNewFile
- 
 
 438 
  dd On_NewFile
- 
 
 439 
  dd 0
- 
 
 440 
 
- 
 
 441 
msgbox_3:
- 
 
 442 
  db 1,0
- 
 
 443 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 444 
  db 'Error opening the file with the color settings!',13,\
- 
 
 445 
     'Because color selection of words is not possible.',13,\
- 
 
 446 
     '  (error code ='
- 
 
 447 
  .err: db '?'
- 
 
 448 
  db ')',0
- 
 
 449 
  db 'Close',0
- 
 
 450 
  db 0
- 
 
 451 
 
- 
 
 452 
msgbox_4:
- 
 
 453 
  db 1,0
- 
 
 454 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 455 
  db 'Error opening file!',13,\
- 
 
 456 
     'Maybe the file name is not entered correctly.',13,\
- 
 
 457 
     '  (error code ='
- 
 
 458 
  .err: db '?'
- 
 
 459 
  db ')',0
- 
 
 460 
  db 'Close',0
- 
 
 461 
  db 0
- 
 
 462 
 
- 
 
 463 
msgbox_5:
- 
 
 464 
  db 3,0
- 
 
 465 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 466 
  db 'Save changes to the file?',0
- 
 
 467 
  db 'Discard',0
- 
 
 468 
  db 'Cancel',0
- 
 
 469 
  db 0
- 
 
 470 
msgbox_5_funct:
- 
 
 471 
;  dd but_SaveFile
- 
 
 472 
  dd On_OpenFile
- 
 
 473 
  dd 0
- 
 
 474 
 
- 
 
 475 
msgbox_6:
- 
 
 476 
  db 1,0
- 
 
 477 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 478 
  db 'Error saving file!',13,\
- 
 
 479 
     'Maybe the file name is not entered correctly.',13,\
- 
 
 480 
     '  (error code ='
- 
 
 481 
  .err: db '?'
- 
 
 482 
  db ')',0
- 
 
 483 
  db 'Close',0
- 
 
 484 
  db 0
- 
 
 485 
msgbox_7:
- 
 
 486 
  db 1,0
- 
 
 487 
  db 'Text not found.',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 488 
  db 'Reached end of the document.',13,\
- 
 
 489 
     'Try to go to the beginning of the document',13,\
- 
 
 490 
     'or change the query and search again.',0
- 
 
 491 
  db 'Close',0
- 
 
 492 
  db 0
- 
 
 493 
msgbox_8:
- 
 
 494 
  db 3,0
- 
 
 495 
  db 'Warning',0 ;+2 = +MB_TEXT_OFFSET
- 
 
 496 
  db 'To quit, quit the file.',13,\
- 
 
 497 
     'Try to keep changes to a file',13,\
- 
 
 498 
     'or start a new blank file.',0
- 
 
 499 
  db 'Cancel',0
- 
 
 500 
  db 0
- 
 
 501 
 
- 
 
 502 
txtFindCapt db 'Search',0
- 
 
 503 
txtFindNext db 'Find next',0
- 
 
 504 
txtFormatCapt db 'Format',0
- 
 
 505 
txtFormatApply db 'Apply',0
- 
 
 506 
txtRow db 'Rows',0
- 
 
 507 
txtCol db 'Cols',0
- 
 
 508 
txtOtm db 'Undo',0
- 
 
 509 
txtBuf db 'Buffer: '
- 
 
 510 
buf db BUF_SIZE dup(0) ;buf always after txtBuf
- 
 
 511 
 
397 
txtFormatApply db 'à¨¬¥­¨âì',0
 512 
end if
398 
;------
 513 
;------
399 
align 4
 514 
align 4
400 
EvChar db 0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0
 515 
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
 516 
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0