Subversion Repositories Kolibri OS

Rev

Rev 6586 | Rev 6676 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6586 Rev 6675
Line 1... Line 1...
1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2
;Basic macros for use EditBox                             ;
2
;; basic macros for EditBox ;;
3
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
4
ed_width        equ [edi]               ;è¨à¨­  ª®¬¯®­¥­â 
4
ed_width        equ [edi]       ; field width
5
ed_left         equ [edi+4]             ;¯®«®¦¥­¨¥ ¯® ®á¨ å
5
ed_left         equ [edi+4]     ; left border X
6
ed_top          equ [edi+8]             ;¯®«®¦¥­¨¥ ¯® ®á¨ ã
6
ed_top          equ [edi+8]     ; top border Y
7
ed_color        equ [edi+12]            ;梥â ä®­  ª®¬¯®­¥­â 
7
ed_color        equ [edi+12]    ; field color
8
shift_color     equ [edi+16]            ;=0x6a9480 ¤«ï ¯à¨¬¥à  ¢®§ì¥¬ ¦¥«¥­ë© 梥⠡®ªá 
8
shift_color     equ [edi+16]    ; select color
9
ed_focus_border_color   equ [edi+20]    ;梥â à ¬ª¨ ª®¬¯®­¥­â 
9
ed_focus_border_color   equ [edi+20]    ; border color active
10
ed_blur_border_color    equ [edi+24]    ;梥⠭¥  ªâ¨¢­®£® ª®¬¯®­¥­â 
10
ed_blur_border_color    equ [edi+24]    ; border color inactive
11
ed_text_color   equ [edi+28]            ;梥â ⥪áâ 
11
ed_text_color   equ [edi+28]    ; color and font (as in sysfunc 4)
12
ed_max          equ [edi+32]                    ;ª®«-¢® ᨬ¢®«®¢ ª®â®àë¥ ¬®¦­® ¬ ªá¨¬ «ì­® ¢¢¥áâ¨
12
ed_max          equ [edi+32]    ; chars max
13
ed_text         equ [edi+36]                    ;㪠§ â¥«ì ­  ¡ãä¥à
13
ed_text         equ [edi+36]    ; buffer pointer
14
ed_mouse_variable       equ [edi+40]    ; 㪠§ â¥«ì ­  ¯¥à¥¬¥­­ãî ¤«ï ¡®ªá /£à㯯ë 
14
ed_mouse_variable   equ [edi+40]    ; pointer
15
ed_flags        equ [edi+44]            ;ä« £¨
15
ed_flags        equ [edi+44]
16
bp_flags        equ [ebp+44]            ;¢ ­¥ª®â®àëå ¯à®æ¥¤ãà å edi ¨á¯®«ì§ã¥âáï, ¢§ ¬¥­ 㪠§ â¥«ì åà ­¨âìáï ¢ ebp
16
bp_flags        equ [ebp+44]
17
ed_size equ [edi+48]                    ;ª®«-¢® ᨬ¢®«®¢
17
ed_size         equ [edi+48]    ; chars currently
18
bp_size equ [ebp+48]                    ;ª®«-¢® ᨬ¢¯®«®¢, ¤«ï  ¤à¥á æ¨¨ ¨á¯«ì§ã¥âáï ebp¡ edi § ­ïâ
18
bp_size         equ [ebp+48]
19
ed_pos  equ [edi+52]                    ;¯®§¨æ¨ï ªãàá®à 
19
ed_pos          equ [edi+52]    ; carret current position
20
ed_offset       equ [edi+56]            ;ᬥ饭¨¥
20
ed_offset       equ [edi+56]
21
cl_curs_x       equ [edi+60]            ;¯à¥¤ë¤ã饥 ª®®à¤¨­ â  ªãàá®à  ¯® å
21
cl_curs_x       equ [edi+60]    ; previous cursor X
22
cl_curs_y       equ [edi+64]            ;¯à¥¤ë¤ã饥 ª®®à¤¨­ â  ªãàá®à  ¯® ã
22
cl_curs_y       equ [edi+64]    ; previous cursor Y
23
ed_shift_pos    equ [edi+68]            ;¯®«®¦¥­¨¥ ªãàá®à 
23
ed_shift_pos    equ [edi+68]    ; selection current position
24
ed_shift_pos_old equ [edi+72]           ;áâ à®¥ ¯®«®¦¥­¨¥ ªãàá®à 
24
ed_shift_pos_old    equ [edi+72]    ; selection previous position
-
 
25
ed_height       equ [edi+76]
-
 
26
ed_char_width   equ [edi+80]
25
 
27
 
26
ed_struc_size=76
28
ed_struc_size = 84
27
 
29
 
28
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
30
;;;;;;;;;;;;;;;;;;;;;;;
29
;Bit mask from editbox 
31
;; flags for EditBox ;;
30
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
32
;;;;;;;;;;;;;;;;;;;;;;;
31
ed_figure_only= 1000000000000000b   ;®¤­¨ ᨬ¢®«ë
33
ed_pass         = 1     ; password mode
32
ed_always_focus= 100000000000000b
34
ed_focus        = 2     ; active
33
ed_focus=                     10b   ;䮪ãá ¯à¨«®¦¥­¨ï
35
ed_shift        = 4     ; shift holded
34
ed_pass=                       1b   ;¯®«¥ á ¯ à®«¥¬
36
ed_shift_on     = 8     ; selection active
35
ed_shift_on=                1000b   ;¥á«¨ ­¥ ãáâ ­®¢«¥­ -§­ ç¨â ¢¯¥à¢ë¥ ­ ¦ â shift,¥á«¨ ¡ë« ãáâ ­®¢«¥­, §­ ç¨â ¬ë 㦥 çâ® - â® ¤¥« «¨ 㤥ন¢ ï shift
-
 
36
ed_shift_on_off= not (ed_shift_on)
37
ed_shift_bac    = 16    ; clear selection
37
ed_shift=                    100b   ;¢ª«îç ¥âáï ¯à¨ ­ ¦ â¨¨ ­  shift â.¥. ¥á«¨ ­ ¦¨¬ î
-
 
38
ed_shift_off= not (ed_shift)
38
ed_left_fl      = 32
39
ed_shift_bac=              10000b   ;¡¨â ¤«ï ®ç¨á⪨ ¢ë¤¥«¥­®£® shift â.¥. ¯à¨ ãáâ ­®¢ª¥ £®¢®à¨â çâ® ¥áâì ¢ë¤¥«¥­¨¥
-
 
40
ed_shift_bac_cl= not (ed_shift_bac)
39
ed_offset_fl    = 64
41
ed_shift_cl=  not (ed_shift or ed_shift_bac or ed_shift_on)
40
ed_insert       = 128
42
ed_shift_mcl= not (ed_shift)
41
ed_mouse_on     = 256
43
ed_left_fl=               100000b
42
ed_ctrl_on      = 512
44
ed_right_fl= not (ed_left_fl)
43
ed_alt_on       = 400h
45
ed_offset_fl=            1000000b
44
ed_disabled     = 800h
46
ed_offset_cl= not (ed_offset_fl)
45
ed_always_focus = 4000h
47
ed_insert=              10000000b
46
ed_figure_only  = 8000h
-
 
47
ed_mous_adn_b   = ed_mouse_on or ed_shift_on or ed_shift_bac
48
ed_insert_cl= not (ed_insert)
48
ed_shift_off    = not ed_shift
49
ed_mouse_on =          100000000b
49
ed_shift_mcl    = not ed_shift
50
ed_mous_adn_b=         100011000b
50
ed_shift_on_off = not ed_shift_on
51
ed_mouse_on_off= not (ed_mouse_on)
51
ed_shift_bac_cl = not ed_shift_bac
-
 
52
ed_shift_cl     = not (ed_shift or ed_shift_on or ed_shift_bac)
52
ed_ctrl_on =          1000000000b
53
ed_right_fl     = not ed_left_fl
53
ed_ctrl_off = not (ed_ctrl_on)
54
ed_offset_cl    = not ed_offset_fl
54
ed_alt_on =          10000000000b
55
ed_insert_cl    = not ed_insert
55
ed_alt_off = not (ed_alt_on)
56
ed_mouse_on_off = not ed_mouse_on
56
ed_disabled=        100000000000b
57
ed_ctrl_off     = not ed_ctrl_on
57
ed_height=14 ; ¢ëá®â 
58
ed_alt_off      = not ed_alt_on
Line 58... Line 59...
58
 
59
 
59
struc  edit_box width,left,top,color,shift_color,focus_border_color,\
60
struc  edit_box width,left,top,color,shift_color,focus_border_color,\
60
       blur_border_color,text_color,max,text,mouse_variable,flags,size,pos
61
       blur_border_color,text_color,max,text,mouse_variable,flags,size,pos
61
{
62
{
Line 68... Line 69...
68
.blur_border_color  dd blur_border_color
69
.blur_border_color  dd  blur_border_color
69
.text_color dd text_color
70
.text_color         dd  text_color
70
.max  dd max
71
.max    dd  max
71
.text dd text
72
.text   dd  text
72
.mouse_variable dd mouse_variable
73
.mouse_variable     dd  mouse_variable
73
.flags  dd flags+0
74
.flags  dd  flags
74
.size   dd size+0
75
.size   dd  size
75
.pos    dd pos+0
76
.pos    dd  pos
76
.offset dd 0
77
.offset dd  0
77
.cl_curs_x dd 0
78
.cl_curs_x  dd  0
78
.cl_curs_y dd 0
79
.cl_curs_y  dd  0
79
.shift     dd 0
80
.shift      dd  0
80
.shift_old dd 0
81
.shift_old  dd  0
-
 
82
.height     dd  0
-
 
83
.char_width dd  0
81
}
84
}
Line 82... Line 85...
82
 
85
 
83
macro edit_boxes_set_sys_color start,end,color_table
86
macro edit_boxes_set_sys_color start,end,color_table
84
{
87
{