Subversion Repositories Kolibri OS

Rev

Rev 402 | Rev 404 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 402 Rev 403
1
;  09.08.2006 ¯à®¨§¢¥¤¥­  ®¯â¨¬¨§ æ¨ï à ¡®âë ª®­¯®ª DEL ¨ Backspace? 㬥­ì襭 à §¬¥à ¢ë¯®«­ï¥¬®£® ª®¤ .
1
;  09.08.2006 ¯à®¨§¢¥¤¥­  ®¯â¨¬¨§ æ¨ï à ¡®âë ª®­¯®ª DEL ¨ Backspace? 㬥­ì襭 à §¬¥à ¢ë¯®«­ï¥¬®£® ª®¤ .
2
;ä䥪⨢­®¥ ¯à®£à ¬¬¨à®¢ ­¨¥ ¢ KOLIBRI
2
;ä䥪⨢­®¥ ¯à®£à ¬¬¨à®¢ ­¨¥ ¢ KOLIBRI
3
;Ž¯â¨¬¨§¨à®¢ ­­ë© ª®¬¯®­¥­â EditBox (ˆá室­ë© ¢ à¨ ­â ®â Maxxxx32)
3
;Ž¯â¨¬¨§¨à®¢ ­­ë© ª®¬¯®­¥­â EditBox (ˆá室­ë© ¢ à¨ ­â ®â Maxxxx32)
4
;Ž¯â¨¬¨§ æ¨ï ª®¬ ­¤.
4
;Ž¯â¨¬¨§ æ¨ï ª®¬ ­¤.
5
;  - ’¥¯«®¢ €«¥ªá¥©  www.lrz.land.ru
5
;  - ’¥¯«®¢ €«¥ªá¥©  www.lrz.land.ru
6
 
6
 
7
;§ £®«®¢®ª ¯à¨«®¦¥­¨ï
7
;§ £®«®¢®ª ¯à¨«®¦¥­¨ï
8
use32		; âà ­á«ïâ®à, ¨á¯®«ì§ãî騩 32 à §à來ëå ª®¬ ­¤ë
8
use32		; âà ­á«ïâ®à, ¨á¯®«ì§ãî騩 32 à §à來ëå ª®¬ ­¤ë
9
    org 0x0		; ¡ §®¢ë©  ¤à¥á ª®¤ , ¢á¥£¤  0x0
9
    org 0x0		; ¡ §®¢ë©  ¤à¥á ª®¤ , ¢á¥£¤  0x0
10
    db 'MENUET01'	; ¨¤¥­â¨ä¨ª â®à ¨á¯®«­ï¥¬®£® ä ©«  (8 ¡ ©â)
10
    db 'MENUET01'	; ¨¤¥­â¨ä¨ª â®à ¨á¯®«­ï¥¬®£® ä ©«  (8 ¡ ©â)
11
    dd 0x1		; ¢¥àá¨ï ä®à¬ â  § £®«®¢ª  ¨á¯®«­ï¥¬®£® ä ©« 
11
    dd 0x1		; ¢¥àá¨ï ä®à¬ â  § £®«®¢ª  ¨á¯®«­ï¥¬®£® ä ©« 
12
    dd start		;  ¤à¥á, ­  ª®â®àë© á¨á⥬  ¯¥à¥¤ ñâ ã¯à ¢«¥­¨¥
12
    dd start		;  ¤à¥á, ­  ª®â®àë© á¨á⥬  ¯¥à¥¤ ñâ ã¯à ¢«¥­¨¥
13
	                ; ¯®á«¥ § £à㧪¨ ¯à¨«®¦¥­¨ï ¢ ¯ ¬ïâì
13
	                ; ¯®á«¥ § £à㧪¨ ¯à¨«®¦¥­¨ï ¢ ¯ ¬ïâì
14
    dd i_end		; à §¬¥à ¯à¨«®¦¥­¨ï
14
    dd i_end		; à §¬¥à ¯à¨«®¦¥­¨ï
15
    dd i_end and not 3	; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪  ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢­¨¬ ­  £à­¨æã 4 ¡ ©â 
15
    dd i_end and not 3	; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪  ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢­¨¬ ­  £à­¨æã 4 ¡ ©â 
16
    dd i_end and not 3	; à á¯®«®¦¨¬ ¯®§¨æ¨î á⥪  ¢ ®¡« á⨠¯ ¬ïâ¨, áࠧ㠧  ⥫®¬ ¯à®£à ¬¬ë. ‚¥à設  á⥪  ¢ ¤¨ ¯ §®­¥ ¯ ¬ïâ¨, 㪠§ ­­®¬ ¢ëè¥
16
    dd i_end and not 3	; à á¯®«®¦¨¬ ¯®§¨æ¨î á⥪  ¢ ®¡« á⨠¯ ¬ïâ¨, áࠧ㠧  ⥫®¬ ¯à®£à ¬¬ë. ‚¥à設  á⥪  ¢ ¤¨ ¯ §®­¥ ¯ ¬ïâ¨, 㪠§ ­­®¬ ¢ëè¥
17
    dd 0x0,0x0		; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
17
    dd 0x0,0x0		; 㪠§ â¥«ì ­  áâபã á ¯ à ¬¥âà ¬¨.
18
                 ;    ¥á«¨ ¯®á«¥ § ¯ã᪠ ­¥à ¢­® ­ã«î, ¯à¨«®¦¥­¨¥ ¡ë«®
18
                 ;    ¥á«¨ ¯®á«¥ § ¯ã᪠ ­¥à ¢­® ­ã«î, ¯à¨«®¦¥­¨¥ ¡ë«®
19
                 ;    § ¯ã饭® á ¯ à ¬¥âà ¬¨ ¨§ ª®¬ ­¤­®© áâப¨
19
                 ;    § ¯ã饭® á ¯ à ¬¥âà ¬¨ ¨§ ª®¬ ­¤­®© áâப¨
20
 
20
 
21
		 ;    㪠§ â¥«ì ­  áâபã, ¢ ª®â®àãî § ¯¨á ­ ¯ãâì,
21
		 ;    㪠§ â¥«ì ­  áâபã, ¢ ª®â®àãî § ¯¨á ­ ¯ãâì,
22
                 ;    ®âªã¤  § ¯ã饭® ¯à¨«®¦¥­¨¥
22
                 ;    ®âªã¤  § ¯ã饭® ¯à¨«®¦¥­¨¥
23
 
23
 
24
	include 'editbox.inc'
24
	include 'editbox.inc'
25
	use_edit_box
25
	use_edit_box
26
;Ž¡« áâì ª®¤ 
26
;Ž¡« áâì ª®¤ 
27
start:				;’®çª  ¢å®¤  ¢ ¯à®£à ¬¬ã
27
start:				;’®çª  ¢å®¤  ¢ ¯à®£à ¬¬ã
28
	mov	eax,40		;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
28
	mov	eax,40		;ãáâ ­®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
29
	mov 	ebx,0x27        ;á¨á⥬  ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 ­  á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥,­ ¦ â  ª­®¯ª , ®¯à¥¤¥«ñ­­ ï à ­¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ­ ¦ â¨¥ ­  ª­®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥­¨¥; á¡à á뢠¥âáï ¯à¨ ¯à®ç⥭¨¨) ¨ ­ ¦ â¨¥ ª« ¢¨è¨
29
	mov 	ebx,0x27        ;á¨á⥬  ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 ­  á®®¡é¥­¨¥ ® ¯¥à¥à¨á®¢ª¥,­ ¦ â  ª­®¯ª , ®¯à¥¤¥«ñ­­ ï à ­¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ­ ¦ â¨¥ ­  ª­®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥­¨¥; á¡à á뢠¥âáï ¯à¨ ¯à®ç⥭¨¨) ¨ ­ ¦ â¨¥ ª« ¢¨è¨
30
        int	0x40
30
        int	0x40
31
red_win:
31
red_win:
32
    call draw_window  		;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
32
    call draw_window  		;¯¥à¢®­ ç «ì­® ­¥®¡å®¤¨¬® ­ à¨á®¢ âì ®ª­®
33
still:				;®á­®¢­®© ®¡à ¡®â稪 
33
still:				;®á­®¢­®© ®¡à ¡®â稪 
34
     mov  eax,10 		;Ž¦¨¤ âì ᮡëâ¨ï
34
     mov  eax,10 		;Ž¦¨¤ âì ᮡëâ¨ï
35
     int  0x40      		;®¦¨¤ âì ᮡë⨥ ¢ â¥ç¥­¨¥ 2 ¬¨««¨á¥ªã­¤
35
     int  0x40      		;®¦¨¤ âì ᮡë⨥ ¢ â¥ç¥­¨¥ 2 ¬¨««¨á¥ªã­¤
36
  
36
  
37
    cmp al,0x1    ;¥á«¨ ¨§¬¥­¨«®áì ¯®«®¦¥­¨¥ ®ª­ 
37
    cmp al,0x1    ;¥á«¨ ¨§¬¥­¨«®áì ¯®«®¦¥­¨¥ ®ª­ 
38
    jz red_win
38
    jz red_win
39
    cmp al,0x2    ;¥á«¨ ­ ¦ â  ª« ¢¨è  â® ¯¥à¥©â¨
39
    cmp al,0x2    ;¥á«¨ ­ ¦ â  ª« ¢¨è  â® ¯¥à¥©â¨
40
    jz key
40
    jz key
41
    cmp al,0x3    ;¥á«¨ ­ ¦ â  ª­®¯ª  â® ¯¥à¥©â¨
41
    cmp al,0x3    ;¥á«¨ ­ ¦ â  ª­®¯ª  â® ¯¥à¥©â¨
42
    jz button
42
    jz button
43
	mouse_edit_boxes editboxes,editboxes_end
43
	mouse_edit_boxes editboxes,editboxes_end
44
	jmp still    ;¥á«¨ ­¨ç¥£® ¨§ ¯¥à¥ç¨á«¥­­®£® â® á­®¢  ¢ 横«
44
	jmp still    ;¥á«¨ ­¨ç¥£® ¨§ ¯¥à¥ç¨á«¥­­®£® â® á­®¢  ¢ 横«
45
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
45
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
46
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
46
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
47
button:
47
button:
48
mov eax,17		;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
48
mov eax,17		;¯®«ãç¨âì ¨¤¥­â¨ä¨ª â®à ­ ¦ â®© ª« ¢¨è¨
49
    int 0x40
49
    int 0x40
50
    test ah,ah		;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
50
    test ah,ah		;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ­  ®¡à ¡®â稪 ᮡë⨩ still
51
    jz  still
51
    jz  still
52
    or eax,-1		;¢ eax,-1 - 5 ,¡ ©â®¢ ã ­ á ¦¥ ⮫쪮 3  ¢ë©â¨ 
52
    or eax,-1		;¢ eax,-1 - 5 ,¡ ©â®¢ ã ­ á ¦¥ ⮫쪮 3  ¢ë©â¨ 
53
    int 0x40 		;¤ «¥¥ ¢ë¯®«­ï¥âáï ¢ë室 ¨§ ¯à®£à ¬¬ë
53
    int 0x40 		;¤ «¥¥ ¢ë¯®«­ï¥âáï ¢ë室 ¨§ ¯à®£à ¬¬ë
54
    
54
    
55
key:
55
key:
56
    mov eax,2		;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax
56
    mov eax,2		;§ £à㧨¬ §­ ç¥­¨¥ 2 ¢ ॣ¨áâ®à eax
57
    int 0x40            ;¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
57
    int 0x40            ;¯®«ã稬 ª®¤ ­ ¦ â®© ª« ¢¨è¨
58
    key_edit_boxes editboxes,editboxes_end    
58
    key_edit_boxes editboxes,editboxes_end    
59
    jmp still
59
    jmp still
60
 
60
 
61
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
61
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
62
draw_window:		;à¨á®¢ ­¨¥ ®ª­  ¯à¨«®¦¥­¨ï
62
draw_window:		;à¨á®¢ ­¨¥ ®ª­  ¯à¨«®¦¥­¨ï
63
    mov eax,12		;¢ ॣ¨áâà ¢­¥á⨠§­ ç¥­¨¥ = 12
63
    mov eax,12		;¢ ॣ¨áâà ¢­¥á⨠§­ ç¥­¨¥ = 12
64
    mov ebx,1 		;¯à¨á¢®¨âì 1
64
    mov ebx,1 		;¯à¨á¢®¨âì 1
65
    int 0x40
65
    int 0x40
66
 
66
 
67
    xor eax,eax			;®¡­ã«¨âì eax
67
    xor eax,eax			;®¡­ã«¨âì eax
68
    mov ebx,50*65536+390	;[ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [à §¬¥à ¯® ®á¨ x]
68
    mov ebx,50*65536+390	;[ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [à §¬¥à ¯® ®á¨ x]
69
    mov ecx,30*65536+200	;[ª®®à¤¨­ â  ¯® ®á¨ y]*65536 + [à §¬¥à ¯® ®á¨ y]
69
    mov ecx,30*65536+200	;[ª®®à¤¨­ â  ¯® ®á¨ y]*65536 + [à §¬¥à ¯® ®á¨ y]
70
    mov edx,0xb3AABBCC		;0xXYRRGGBB  Y =3 - ¢ë¢®¤ à ¬ª¨, ¨á¯®«ì§ãï áªà¨­
70
    mov edx,0xb3AABBCC		;0xXYRRGGBB  Y =3 - ¢ë¢®¤ à ¬ª¨, ¨á¯®«ì§ãï áªà¨­
71
    mov esi,0x805080DD		;0xXYRRGGBB - 梥⠧ £®«®¢ª 
71
    mov esi,0x805080DD		;0xXYRRGGBB - 梥⠧ £®«®¢ª 
72
    mov edi,hed			;“ª § â¥«ì ­  áâபã á § £®«®¢ª®¬
72
    mov edi,hed			;“ª § â¥«ì ­  áâபã á § £®«®¢ª®¬
73
    int 0x40			;­ à¨á®¢ âì ®ª­® ¯à¨«®¦¥­¨ï
73
    int 0x40			;­ à¨á®¢ âì ®ª­® ¯à¨«®¦¥­¨ï
74
  
74
  
75
	draw_edit_boxes editboxes,editboxes_end  ;à¨á®¢ ­¨¥ edit box'®¢
75
	draw_edit_boxes editboxes,editboxes_end  ;à¨á®¢ ­¨¥ edit box'®¢
76
 
76
 
77
    mov eax,12 			;”ã­ªæ¨ï 12 - ­ ç âì/§ ª®­ç¨âì ¯¥à¥à¨á®¢ªã ®ª­ .
77
    mov eax,12 			;”ã­ªæ¨ï 12 - ­ ç âì/§ ª®­ç¨âì ¯¥à¥à¨á®¢ªã ®ª­ .
78
    mov ebx,2			;®¤äã­ªæ¨ï 2 - § ª®­ç¨âì ¯¥à¥à¨á®¢ªã ®ª­ .
78
    mov ebx,2			;®¤äã­ªæ¨ï 2 - § ª®­ç¨âì ¯¥à¥à¨á®¢ªã ®ª­ .
79
    int 0x40
79
    int 0x40
80
    ret
80
    ret
81
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
81
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
82
;DATA ¤ ­­ë¥ 
82
;DATA ¤ ­­ë¥ 
83
editboxes:
83
editboxes:
84
edit1 edit_box 168,5,10,0xffffff,0,0,0,99,ed_buffer.2,ed_figure_only
84
edit1 edit_box 168,5,10,0xffffff,0,0,0,99,ed_buffer.2,ed_figure_only
85
edit2 edit_box1 250,5,30,0xffffff,0,0,0,308,hed,ed_focus,53
85
edit2 edit_box 250,5,30,0xffffff,0,0,0,308,hed,ed_focus,53
86
edit3 edit_box 35,5,50,0xffffff,0,0,0,9,ed_buffer.3,ed_figure_only
86
edit3 edit_box 35,5,50,0xffffff,0,0,0,9,ed_buffer.3,ed_figure_only
87
edit4 edit_box 16,5,70,0xffffff,0,0,0,1,ed_buffer.4,ed_figure_only
87
edit4 edit_box 16,5,70,0xffffff,0,0,0,1,ed_buffer.4,ed_figure_only
88
editboxes_end:
88
editboxes_end:
89
data_of_code dd 0
89
data_of_code dd 0
90
ed_buffer:
90
ed_buffer:
91
.1: rb 514;256
91
.1: rb 514;256
92
.2: rb 101
92
.2: rb 101
93
.3: rb 11
93
.3: rb 11
94
.4: rb 3
94
.4: rb 3
95
;¤¢  § ¯ á­ëå ¡ ©â  ­¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ­¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®­æ¥ ¡ãä¥à  0
95
;¤¢  § ¯ á­ëå ¡ ©â  ­¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ­¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®­æ¥ ¡ãä¥à  0
96
;text_b: db 'Š®«-¢® ᨬ¢®«®¢'
96
;text_b: db 'Š®«-¢® ᨬ¢®«®¢'
97
;buffer: dd 0
97
;buffer: dd 0
98
buffer_end:
98
buffer_end:
99
hed db   'EDITBOX optimization and retype  date 07.03.2007',0
99
hed db   'EDITBOX optimization and retype  date 07.03.2007',0
100
rb  256
100
rb  256
101
i_end1:
101
i_end1:
102
rb 1024
102
rb 1024
103
i_end:
103
i_end: