forked from KolibriOS/kolibrios
rewrite editbox, modify mouse function, modify key function
git-svn-id: svn://kolibrios.org@461 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Alexey Teplov (
parent
0be85b335e
commit
dd4bac7d4f
@ -1,3 +1,4 @@
|
|||||||
|
; <Lrz> 04.04.2007 ˆá¯à ¢«¥® ã¯à ¢«¥¨¥ ¬ë誮©, ¯à¨ 㤠«¥¨¨ ¯®á«¥¤¥£® ᨬ¢®« ¢ ¡ãä¥à¥ ¯¨è¥âìáï 0 (ᯠᨡ® Mario79)
|
||||||
; <Lrz> 04.04.2007 Œ®¤¥à¨§¨à®¢ « á¨á⥬㠢뤥«¥¨ï, áãé¥á⢥® ¯¥à¥¤¥« ® ã¯à ¢«¥¨¥ ¨ ®¡à ¡®âª , ¤®¡ ¢«¥® ¡«®ª¨à®¢ ¨ï ®¡à ¡®âª¨ ¤àã£¨å ¡®ªá®¢, ¢® ¢à¥¬ï ¢ë¤¥«¥¨ï ¬ë誮© ⥪áâ , ¤«ï í⮣® ¢ ⥪áâ ¯à®£à ¬¬ë ¥®¡å®¤¨¬® ¤®¡ ¢¨âì ¨¤¥â¨ä¨ª â®à ¡®ªá â.¥. dd 0x0 ¨ ¢ ¥£® ¡ã¤¥â ¯®¬¥é âìáï 㪠⥫ì editbox
|
; <Lrz> 04.04.2007 Œ®¤¥à¨§¨à®¢ « á¨á⥬㠢뤥«¥¨ï, áãé¥á⢥® ¯¥à¥¤¥« ® ã¯à ¢«¥¨¥ ¨ ®¡à ¡®âª , ¤®¡ ¢«¥® ¡«®ª¨à®¢ ¨ï ®¡à ¡®âª¨ ¤àã£¨å ¡®ªá®¢, ¢® ¢à¥¬ï ¢ë¤¥«¥¨ï ¬ë誮© ⥪áâ , ¤«ï í⮣® ¢ ⥪áâ ¯à®£à ¬¬ë ¥®¡å®¤¨¬® ¤®¡ ¢¨âì ¨¤¥â¨ä¨ª â®à ¡®ªá â.¥. dd 0x0 ¨ ¢ ¥£® ¡ã¤¥â ¯®¬¥é âìáï 㪠⥫ì editbox
|
||||||
; <Lrz> 30.03.2007 <20>¥à¥¤¥« « ¯à®æ¥¤ãà㠢뤥«¥¨ï, ⥯¥àì ⥪á⠢뤥«ï¥âáï ⮫쪮 ⮫쪮 ¬ë誮©
|
; <Lrz> 30.03.2007 <20>¥à¥¤¥« « ¯à®æ¥¤ãà㠢뤥«¥¨ï, ⥯¥àì ⥪á⠢뤥«ï¥âáï ⮫쪮 ⮫쪮 ¬ë誮©
|
||||||
; <Lrz> 09.03.2007 „®¯¨á « ã¯à ¢«¥¨¥ mouse + shift ¢ë¤¥«¥¨¥ ¨ ¯¥à¥¬¥é¥¨¥
|
; <Lrz> 09.03.2007 „®¯¨á « ã¯à ¢«¥¨¥ mouse + shift ¢ë¤¥«¥¨¥ ¨ ¯¥à¥¬¥é¥¨¥
|
||||||
@ -55,6 +56,9 @@
|
|||||||
; ªâ¨¢ë¬.
|
; ªâ¨¢ë¬.
|
||||||
; …᫨ 饫箪 ¬ëè¨ ¡ë« ¯à®©§¢¥¤¥ § ¯à¥¤¥« ¬¨ edit box
|
; …᫨ 饫箪 ¬ëè¨ ¡ë« ¯à®©§¢¥¤¥ § ¯à¥¤¥« ¬¨ edit box
|
||||||
; 䮪ãá â¥àï¥âáï.
|
; 䮪ãá â¥àï¥âáï.
|
||||||
|
;;;;;;;;;;;;;;;;;;
|
||||||
|
include 'editbox.mac' ;¬ ªà®á ª®â®àë© ¤®«¦¥ ®¡«¥£ç¨âì ¦¨§ì :) á¯¥æ¨ «ì® ¤«ï editbox
|
||||||
|
;;;;;;;;;;;;;;;;;;
|
||||||
macro use_edit_box
|
macro use_edit_box
|
||||||
{
|
{
|
||||||
edit_box:
|
edit_box:
|
||||||
@ -62,19 +66,20 @@ ed_width equ [edi] ;
|
|||||||
ed_left equ [edi+4] ;¯®«®¦¥¨¥ ¯® ®á¨ å
|
ed_left equ [edi+4] ;¯®«®¦¥¨¥ ¯® ®á¨ å
|
||||||
ed_top equ [edi+8] ;¯®«®¦¥¨¥ ¯® ®á¨ ã
|
ed_top equ [edi+8] ;¯®«®¦¥¨¥ ¯® ®á¨ ã
|
||||||
ed_color equ [edi+12] ;梥â ä® ª®¬¯®¥â
|
ed_color equ [edi+12] ;梥â ä® ª®¬¯®¥â
|
||||||
ed_focus_border_color equ [edi+16] ;梥â à ¬ª¨ ª®¬¯®¥â
|
shift_color equ [edi+16] ;=0x6a9480
|
||||||
ed_blur_border_color equ [edi+20] ;梥⠥ ªâ¨¢®£® ª®¬¯®¥â
|
ed_focus_border_color equ [edi+20] ;梥â à ¬ª¨ ª®¬¯®¥â
|
||||||
ed_text_color equ [edi+24] ;梥â ⥪áâ
|
ed_blur_border_color equ [edi+24] ;梥⠥ ªâ¨¢®£® ª®¬¯®¥â
|
||||||
ed_max equ [edi+28] ;ª®«-¢® ᨬ¢®«®¢ ª®â®àë¥ ¬®¦® ¬ ªá¨¬ «ì® ¢¢¥áâ¨
|
ed_text_color equ [edi+28] ;梥â ⥪áâ
|
||||||
ed_text equ [edi+32] ;㪠§ â¥«ì ¡ãä¥à
|
ed_max equ [edi+32] ;ª®«-¢® ᨬ¢®«®¢ ª®â®àë¥ ¬®¦® ¬ ªá¨¬ «ì® ¢¢¥áâ¨
|
||||||
ed_flags equ [edi+36] ;ä« £¨
|
ed_text equ [edi+36] ;㪠§ â¥«ì ¡ãä¥à
|
||||||
ed_size equ [edi+38] ;ª®«-¢® ᨬ¢®«®¢
|
ed_flags equ [edi+40] ;ä« £¨
|
||||||
ed_pos equ [edi+42] ;¯®§¨æ¨ï ªãàá®à
|
ed_size equ [edi+42] ;ª®«-¢® ᨬ¢®«®¢
|
||||||
ed_offset equ [edi+46] ;ᬥ饨¥
|
ed_pos equ [edi+46] ;¯®§¨æ¨ï ªãàá®à
|
||||||
cl_curs_x equ [edi+50] ;¯à¥¤ë¤ã饥 ª®®à¤¨ â ªãàá®à ¯® å
|
ed_offset equ [edi+50] ;ᬥ饨¥
|
||||||
cl_curs_y equ [edi+54] ;¯à¥¤ë¤ã饥 ª®®à¤¨ â ªãàá®à ¯® ã
|
cl_curs_x equ [edi+54] ;¯à¥¤ë¤ã饥 ª®®à¤¨ â ªãàá®à ¯® å
|
||||||
ed_shift_pos equ [edi+58] ;¯®«®¦¥¨¥ ªãàá®à
|
cl_curs_y equ [edi+58] ;¯à¥¤ë¤ã饥 ª®®à¤¨ â ªãàá®à ¯® ã
|
||||||
ed_shift_pos_old equ [edi+62] ;áâ ஥ ¯®«®¦¥¨¥ ªãàá®à
|
ed_shift_pos equ [edi+62] ;¯®«®¦¥¨¥ ªãàá®à
|
||||||
|
ed_shift_pos_old equ [edi+66] ;áâ ஥ ¯®«®¦¥¨¥ ªãàá®à
|
||||||
;==========================================================
|
;==========================================================
|
||||||
;=== ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ =================================
|
;=== ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ =================================
|
||||||
;==========================================================
|
;==========================================================
|
||||||
@ -97,8 +102,9 @@ pusha
|
|||||||
call .draw_cursor
|
call .draw_cursor
|
||||||
@@:
|
@@:
|
||||||
call .draw_text
|
call .draw_text
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
|
;debug_func
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ¢ë¤¥«¥®© ç á⨠-----------------
|
;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ¢ë¤¥«¥®© ç á⨠-----------------
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
@ -109,8 +115,6 @@ ret
|
|||||||
mov ebx,dword ed_shift_pos
|
mov ebx,dword ed_shift_pos
|
||||||
call .sh_cl_
|
call .sh_cl_
|
||||||
@@: ret
|
@@: ret
|
||||||
|
|
||||||
|
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ⥪áâ --------------------------
|
;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ⥪áâ --------------------------
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
@ -299,12 +303,10 @@ pusha
|
|||||||
.chk_d: mov ed_offset,ebx
|
.chk_d: mov ed_offset,ebx
|
||||||
call .draw_bg
|
call .draw_bg
|
||||||
and word ed_flags,ed_offset_cl
|
and word ed_flags,ed_offset_cl
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
@@:
|
@@:
|
||||||
or word ed_flags,ed_offset_fl
|
or word ed_flags,ed_offset_fl
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
;==========================================================
|
;==========================================================
|
||||||
;=== ®¡à ¡®âª ª« ¢¨ âãàë =================================
|
;=== ®¡à ¡®âª ª« ¢¨ âãàë =================================
|
||||||
;==========================================================
|
;==========================================================
|
||||||
@ -381,8 +383,7 @@ pusha
|
|||||||
cmp ebx,edx
|
cmp ebx,edx
|
||||||
jl @f ; ¥á«¨ ¬¥ìè¥ ¨«¨ à ¢®
|
jl @f ; ¥á«¨ ¬¥ìè¥ ¨«¨ à ¢®
|
||||||
.no_figure:
|
.no_figure:
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
.insert: test word ed_flags,ed_insert ;not word ed_insert
|
.insert: test word ed_flags,ed_insert ;not word ed_insert
|
||||||
je .insert_1
|
je .insert_1
|
||||||
and word ed_flags,ed_insert_cl
|
and word ed_flags,ed_insert_cl
|
||||||
@ -391,7 +392,7 @@ pusha
|
|||||||
or word ed_flags,ed_insert
|
or word ed_flags,ed_insert
|
||||||
jmp .no_figure
|
jmp .no_figure
|
||||||
.ins_v:
|
.ins_v:
|
||||||
dec dword [ebp+38];ed_size ;processing is insert
|
dec dword [ebp+42];ed_size ;processing is insert
|
||||||
sub esi,ecx
|
sub esi,ecx
|
||||||
add esi,ebx
|
add esi,ebx
|
||||||
mov edi,esi
|
mov edi,esi
|
||||||
@ -414,7 +415,7 @@ popa
|
|||||||
cmp ecx,ebx ;…᫨ ã á ¯®§¨æ¨ï ªãàá®à = ⥪ã饬ã à §¬¥àã ¯¥ç â ëå ᨬ¢®«®¢ â.¥. ªãàá®à á⮨⠢ ª®æ¥
|
cmp ecx,ebx ;…᫨ ã á ¯®§¨æ¨ï ªãàá®à = ⥪ã饬ã à §¬¥àã ¯¥ç â ëå ᨬ¢®«®¢ â.¥. ªãàá®à á⮨⠢ ª®æ¥
|
||||||
je .In_k
|
je .In_k
|
||||||
|
|
||||||
test word [ebp+36],ed_insert ;IF insert is enable â.ª. edi ¨§¬¥¥ ¤à¥á㥬 ç¥à¥§ ebp
|
test word [ebp+40],ed_insert ;IF insert is enable â.ª. edi ¨§¬¥¥ ¤à¥á㥬 ç¥à¥§ ebp
|
||||||
jne .ins_v
|
jne .ins_v
|
||||||
;clear
|
;clear
|
||||||
pusha
|
pusha
|
||||||
@ -450,8 +451,7 @@ popa
|
|||||||
jg .bac_del
|
jg .bac_del
|
||||||
test word ed_flags,ed_shift_on
|
test word ed_flags,ed_shift_on
|
||||||
jne .del_bac
|
jne .del_bac
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
.bac_del:
|
.bac_del:
|
||||||
call .del_char
|
call .del_char
|
||||||
jmp .draw_all
|
jmp .draw_all
|
||||||
@ -459,15 +459,15 @@ popa
|
|||||||
;--- ¦ â ª« ¢¨è backspace ---
|
;--- ¦ â ª« ¢¨è backspace ---
|
||||||
.backspace:
|
.backspace:
|
||||||
; ¯à®¢¥à塞, ªãàá®à ã «¥¢®£® ªà ï ?
|
; ¯à®¢¥à塞, ªãàá®à ã «¥¢®£® ªà ï ?
|
||||||
mov edx,ed_size
|
|
||||||
mov ecx,ed_pos
|
mov ecx,ed_pos
|
||||||
test ecx,ecx
|
test ecx,ecx
|
||||||
jnz .del_bac
|
jnz .del_bac
|
||||||
test word ed_flags,ed_shift_on
|
test word ed_flags,ed_shift_on
|
||||||
jne .bac_del
|
jne .bac_del
|
||||||
popa
|
|
||||||
ret
|
edit_ex
|
||||||
.del_bac:
|
.del_bac:
|
||||||
|
mov edx,ed_size
|
||||||
cmp edx,ecx ;if ed_pos=ed_size
|
cmp edx,ecx ;if ed_pos=ed_size
|
||||||
je @f
|
je @f
|
||||||
dec ecx
|
dec ecx
|
||||||
@ -475,7 +475,6 @@ popa
|
|||||||
@@: test word ed_flags,ed_shift_on
|
@@: test word ed_flags,ed_shift_on
|
||||||
jne .bac_del
|
jne .bac_del
|
||||||
dec dword ed_pos
|
dec dword ed_pos
|
||||||
|
|
||||||
.draw_all:
|
.draw_all:
|
||||||
push .shift;.draw_cursor_text;eax
|
push .shift;.draw_cursor_text;eax
|
||||||
|
|
||||||
@ -678,9 +677,7 @@ popa
|
|||||||
jmp .draw_cursor_text
|
jmp .draw_cursor_text
|
||||||
@@:
|
@@:
|
||||||
and word ed_flags,ed_shift_off
|
and word ed_flags,ed_shift_off
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
|
|
||||||
;¯à®¢¥àª á®áâ®ï¨ï shift ¡ë« «¨ ® ¦ â à ìè¥?
|
;¯à®¢¥àª á®áâ®ï¨ï shift ¡ë« «¨ ® ¦ â à ìè¥?
|
||||||
.sh_enable:
|
.sh_enable:
|
||||||
test word ed_flags,ed_shift
|
test word ed_flags,ed_shift
|
||||||
@ -754,12 +751,13 @@ popa
|
|||||||
pusha
|
pusha
|
||||||
mov eax,ed_size
|
mov eax,ed_size
|
||||||
mov ebx,ed_text
|
mov ebx,ed_text
|
||||||
|
test eax,eax
|
||||||
add eax,ebx
|
add eax,ebx
|
||||||
|
jne @f
|
||||||
inc eax
|
inc eax
|
||||||
xor ebx,ebx
|
@@: xor ebx,ebx
|
||||||
mov [eax],bl
|
mov [eax],bl
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
;- 㤠«¥¨¥ ᨬ¢®«
|
;- 㤠«¥¨¥ ᨬ¢®«
|
||||||
;‚å®¤ë¥ ¤ ë¥ edx=ed_size;ecx=ed_pos
|
;‚å®¤ë¥ ¤ ë¥ edx=ed_size;ecx=ed_pos
|
||||||
.del_char:
|
.del_char:
|
||||||
@ -876,37 +874,21 @@ popa
|
|||||||
;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;
|
||||||
.check_shift:
|
.check_shift:
|
||||||
pusha ;á®åà ¨¬ ¢á¥ ॣ¨áâàë
|
pusha ;á®åà ¨¬ ¢á¥ ॣ¨áâàë
|
||||||
xor ecx,ecx
|
mcall 66,3,1
|
||||||
inc ecx
|
|
||||||
mov eax,66
|
|
||||||
mov ebx,3
|
|
||||||
int 0x40
|
|
||||||
test al,0x03
|
test al,0x03
|
||||||
je @f
|
je @f
|
||||||
or word ed_flags,ed_shift ;ãáâ ®¢¨¬ ä« £
|
or word ed_flags,ed_shift ;ãáâ ®¢¨¬ ä« £
|
||||||
@@: popa ;¢®ááâ ®¢¨¬ ॣ¨áâàë
|
@@:edit_ex
|
||||||
ret
|
|
||||||
|
|
||||||
;==========================================================
|
;==========================================================
|
||||||
;=== ®¡à ¡®âª ¬ëè¨ =======================================
|
;=== ®¡à ¡®âª ¬ëè¨ =======================================
|
||||||
;==========================================================
|
;==========================================================
|
||||||
.mouse:
|
.mouse:
|
||||||
pusha
|
pusha
|
||||||
mov eax,dword [mouse_flag]
|
;debug
|
||||||
test eax,eax
|
|
||||||
jz @f
|
|
||||||
cmp eax,edi
|
|
||||||
je @f
|
|
||||||
|
|
||||||
popa
|
|
||||||
ret
|
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯®«ãç ¥¬ á®áâ®ï¨¥ ª®¯®ª ¬ëè¨ -----------------------
|
;--- ¯®«ãç ¥¬ á®áâ®ï¨¥ ª®¯®ª ¬ëè¨ -----------------------
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
@@:
|
mcall 37,2
|
||||||
mov eax,37
|
|
||||||
mov ebx,2
|
|
||||||
int 0x40
|
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯à®¢¥à塞 á®áâ®ï¨¥ ----------------------------------
|
;--- ¯à®¢¥à塞 á®áâ®ï¨¥ ----------------------------------
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
@ -915,40 +897,25 @@ pusha
|
|||||||
and word ed_flags,ed_mouse_on_off
|
and word ed_flags,ed_mouse_on_off
|
||||||
xor ebx,ebx
|
xor ebx,ebx
|
||||||
mov dword [mouse_flag],ebx
|
mov dword [mouse_flag],ebx
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
;----------------------------------------------------------
|
|
||||||
;--- Ž¡à ¡®âª .mouse_wigwag
|
|
||||||
;----------------------------------------------------------
|
|
||||||
.mouse_wigwag:
|
|
||||||
shr eax,16
|
|
||||||
or word ed_flags,ed_shift_on+ed_shift
|
|
||||||
|
|
||||||
mov ecx,structure_of_potock
|
|
||||||
mov ebx,dword [ecx+34]
|
|
||||||
add ebx,ed_left
|
|
||||||
add ebx,5
|
|
||||||
cmp eax,ebx
|
|
||||||
jl .left
|
|
||||||
add ebx,ed_width
|
|
||||||
cmp eax,ebx
|
|
||||||
jg .right
|
|
||||||
jmp ._mvpos
|
|
||||||
|
|
||||||
.mouse_left_button:
|
.mouse_left_button:
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
|
;--- ¡«®ª¨à®¢ª ®â 䮪ãá¨à®¢ª¨ ¢ ¤àã£¨å ¡®ªá å ¯à¨ ¯®¯ ¤ ¨¨ ¨å ªãàá®à
|
||||||
|
;----------------------------------------------------------
|
||||||
|
mov eax,dword [mouse_flag]
|
||||||
|
test eax,eax
|
||||||
|
jz @f
|
||||||
|
cmp eax,edi
|
||||||
|
je @f
|
||||||
|
jmp ._blur
|
||||||
|
;----------------------------------------------------------
|
||||||
;--- ¬®¤¨ä¨æ¨à㥬 ª®®à¤¨ âë, â.¥. ¤®¡ ¢«ï¥¬ ª®®à¤¨ âë ®ª .
|
;--- ¬®¤¨ä¨æ¨à㥬 ª®®à¤¨ âë, â.¥. ¤®¡ ¢«ï¥¬ ª®®à¤¨ âë ®ª .
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
mov eax,9
|
@@: mcall 9,structure_of_potock,-1
|
||||||
mov ebx,structure_of_potock
|
|
||||||
or ecx,-1
|
|
||||||
int 0x40
|
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯®«ãç ¥¬ ª®®à¤¨ âë ¬ëè¨ ®â®á¨â¥«ì® 0 â.¥ ¢á¥© ®¡« á⨠íªà
|
;--- ¯®«ãç ¥¬ ª®®à¤¨ âë ¬ëè¨ ®â®á¨â¥«ì® 0 â.¥ ¢á¥© ®¡« á⨠íªà
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
mov eax,37
|
mcall 37,0
|
||||||
xor ebx,ebx
|
|
||||||
int 0x40
|
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- € ¥ 㤥ন¢ ¥¬ «¨ ¬ë ª« ¢¨èã ¬ë誨, ¯¥à¥¬¥é ï ªãàá®à, ¢® ¢á¥ à §ë¥ áâ®à®ë?
|
;--- € ¥ 㤥ন¢ ¥¬ «¨ ¬ë ª« ¢¨èã ¬ë誨, ¯¥à¥¬¥é ï ªãàá®à, ¢® ¢á¥ à §ë¥ áâ®à®ë?
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
@ -1014,8 +981,10 @@ pusha
|
|||||||
jne @f
|
jne @f
|
||||||
|
|
||||||
mov dword ed_shift_pos,eax
|
mov dword ed_shift_pos,eax
|
||||||
or word ed_flags,ed_mous_adn_b;ed_mouse_on
|
or word ed_flags,ed_mouse_on
|
||||||
mov dword ed_pos,eax
|
mov dword ed_pos,eax
|
||||||
|
mov dword [mouse_flag],edi ;ãáâ ®¢¨¬ ¨¤¥â¨ä¨ª â®à
|
||||||
|
bts word ed_flags,1 ;ãáâ ®¢ª 䮪ãá
|
||||||
jmp .m_sh
|
jmp .m_sh
|
||||||
@@:
|
@@:
|
||||||
cmp eax,dword ed_shift_pos ;¥á«¨ ¯®§¨æ¨¨ ¥ ¨§¬¥¨«¨áì
|
cmp eax,dword ed_shift_pos ;¥á«¨ ¯®§¨æ¨¨ ¥ ¨§¬¥¨«¨áì
|
||||||
@ -1025,14 +994,11 @@ pusha
|
|||||||
mov ebx,dword ed_shift_pos
|
mov ebx,dword ed_shift_pos
|
||||||
call .sh_cl_
|
call .sh_cl_
|
||||||
or word ed_flags,ed_mous_adn_b ;ãáâ ®¢¨¬ ¡¨â çâ® ¬ë ¢ë¤¥«¨«¨ +shift_on +
|
or word ed_flags,ed_mous_adn_b ;ãáâ ®¢¨¬ ¡¨â çâ® ¬ë ¢ë¤¥«¨«¨ +shift_on +
|
||||||
mov dword [mouse_flag],edi
|
|
||||||
.m_sh: call .draw_text
|
.m_sh: call .draw_text
|
||||||
call .draw_cursor
|
call .draw_cursor
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯à®æ¥¤ãà ãáâ ®¢ª¨ 䮪ãá ---------------------------
|
;--- ¯à®æ¥¤ãà ãáâ ®¢ª¨ 䮪ãá ---------------------------
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
bts word ed_flags,1
|
|
||||||
jc .mouse_ex
|
|
||||||
jmp .drc
|
jmp .drc
|
||||||
._blur:
|
._blur:
|
||||||
test word ed_flags,ed_always_focus
|
test word ed_flags,ed_always_focus
|
||||||
@ -1045,8 +1011,7 @@ pusha
|
|||||||
.drc: call .draw_border
|
.drc: call .draw_border
|
||||||
.mouse_ex:
|
.mouse_ex:
|
||||||
|
|
||||||
popa
|
edit_ex
|
||||||
ret
|
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
;--- ¯à®æ¥¤ãà à §¬ë¢ ¨ï 䮪ãá --------------------------
|
;--- ¯à®æ¥¤ãà à §¬ë¢ ¨ï 䮪ãá --------------------------
|
||||||
;----------------------------------------------------------
|
;----------------------------------------------------------
|
||||||
@ -1058,8 +1023,105 @@ ret
|
|||||||
;call .draw_border
|
;call .draw_border
|
||||||
;call .clear_cursor
|
;call .clear_cursor
|
||||||
;@@:
|
;@@:
|
||||||
|
;edit_ex
|
||||||
|
|
||||||
|
;----------------------------------------------------------
|
||||||
|
;--- Ž¡à ¡®âª .mouse_wigwag
|
||||||
|
;----------------------------------------------------------
|
||||||
|
.mouse_wigwag:
|
||||||
|
shr eax,16
|
||||||
|
or word ed_flags,ed_shift_bac
|
||||||
|
;;;;;;;;;;;;;;;;;;
|
||||||
|
;;¯à®æ¥¤ãà ®¡à ¡®âª¨ ¯®«®¦¥¨ï ¢ë¤¥«¥®£® ⥪áâ , ª®£¤ ¯à®¨á室¨â ¢ë室 § ¯à¥¤¥«ë editbox
|
||||||
|
;;;;;;;;;;;;;;;;;;
|
||||||
|
mov ecx,structure_of_potock
|
||||||
|
mov ebx,dword [ecx+34]
|
||||||
|
add ebx,ed_left
|
||||||
|
add ebx,5
|
||||||
|
|
||||||
|
cmp eax,ebx
|
||||||
|
jb .mleft
|
||||||
|
|
||||||
|
add ebx,ed_width
|
||||||
|
cmp eax,ebx
|
||||||
|
ja .mright
|
||||||
|
|
||||||
|
sub ebx,ed_width
|
||||||
|
|
||||||
|
xor edx,edx
|
||||||
|
sub eax,ebx ; ¢ëç⨬ ¨§ ª®®à¤¨ â ¬ë誨 ¯® ®á¨ å ª®®à¤¨ âë ¤® editbox ¯® ®á¨ å
|
||||||
|
mov ebx,6
|
||||||
|
div ebx
|
||||||
|
;;;;;;;;;;;;;;;;;;
|
||||||
|
;;¯à®æ¥¤ãà ®¡à ¡®âª¨ ¯®«®¦¥¨ï ¢ë¤¥«¥®£® ⥪áâ , ¢ ¯à¥¤¥« å ®¡« á⨠editbox
|
||||||
|
;;;;;;;;;;;;;;;;;;
|
||||||
|
;<3B>®«ã稫¨ ª®®à¤¨ âë ¢ eax ¬ë誨, â.¥. ªã¤ ® ¯¥à¥¬¥á⨫ áì
|
||||||
|
;<3B>¨á®¢ ¨¥ § ªà è¥ëå ¯àאַ㣮«ì¨ª®¢ ¨ ®ç¨á⪠¨å
|
||||||
|
add eax,ed_offset ;¤®¡ ¢¨¬ ᬥ饨¥
|
||||||
|
cmp eax,dword ed_size ;¥á«¨ ¢ë諨 § ¯à¥¤¥«ë, â® ¨ç¥£® ¥ ¤¥« âì
|
||||||
|
ja .mwigvag
|
||||||
|
.mdraw:
|
||||||
|
mov dword ed_pos,eax ;á®åà ¨¬ ®¢®¥ § 票¥
|
||||||
|
;<3B>¨á®¢ ¨¥ § ªà è¥ëå ¯àאַ㣮«ì¨ª®¢ ¨ ®ç¨á⪠¨å
|
||||||
|
mov ecx,dword ed_shift_pos
|
||||||
|
mov ebx,dword ed_shift_pos_old
|
||||||
|
mov dword ed_shift_pos_old,eax ;¢¥á¥¬ ®¢®¥ § 票¥ áâ ன ¯®§¨æ¨¨ ªãàá®à
|
||||||
|
;¯à®¢¥àª ¨ à¨á®¢ ¨¥ § ªà è¥ëå ®¡« á⥩
|
||||||
|
cmp ecx,ebx ;¢ëïá塞 ªã¤ ¡ë«® ¤¢¨¦¥¨¥ ®¤¨ è £ § ¤
|
||||||
|
je .m1_shem ;¤¢¨¦¥¨ï ¥ ¡ë«® à ¥¥
|
||||||
|
jb .msmaller ;¤¢¨¦¥¨¥ ¡ë«® ->
|
||||||
|
cmp ebx,eax ;¤¢¨¦¥¨¥ ¡ë«® ¤® í⮣® <- ¨ âãâ ¬ë ¯à®¢¥à塞 ᥩç á ªã¤ ¤¢¨¦¥¨¥ ¯à®¨á室¨â
|
||||||
|
ja .m1_shem ;¥á«¨ ¡ë«® ¤¢¨¦¥¨¥ <- ⮠㦮 § ªà á¨âì ®¡« áâì
|
||||||
|
je .mwigvag ;¥á«¨ ¨§¬¥¥¨ï ¥ ¡ë«®, â® ¨ç¥£® ¥ ¤¥« âì
|
||||||
|
mov ebp,ed_color ;âãâ 㦮 ®ç¨áâ¨âì ®¡« áâì c ed_pos ed_shift_pos_old
|
||||||
|
;¢å®¤ë¥ ¯ à ¬¥âàë ebp=color ebx=ed_shift_pos
|
||||||
|
call .sh_cl_
|
||||||
|
jmp .mwigvag
|
||||||
|
.msmaller:
|
||||||
|
cmp ebx,eax
|
||||||
|
jb .m1_shem
|
||||||
|
mov ebp,ed_color
|
||||||
|
;¢å®¤ë¥ ¯ à ¬¥âàë ebp=color ebx=ed_shift_pos
|
||||||
|
call .sh_cl_
|
||||||
|
jmp .mwigvag
|
||||||
|
;alike =
|
||||||
|
.m1_shem:
|
||||||
|
mov ebp,shift_color
|
||||||
|
;¢å®¤ë¥ ¯ à ¬¥âàë ebp=color ebx=ed_shift_pos
|
||||||
|
mov ebx,ecx
|
||||||
|
call .sh_cl_
|
||||||
|
jmp .mwigvag
|
||||||
|
.mwigvag:
|
||||||
|
and word ed_flags,ed_shift_mcl
|
||||||
|
jmp .draw_cursor_text
|
||||||
; popa
|
; popa
|
||||||
; ret
|
; ret
|
||||||
|
.mleft:
|
||||||
|
mov eax,ed_pos
|
||||||
|
test eax,eax
|
||||||
|
jz .mwigvag
|
||||||
|
dec eax
|
||||||
|
call .check_offset
|
||||||
|
push eax
|
||||||
|
mov ebx,ed_shift_pos
|
||||||
|
mov ebp,shift_color
|
||||||
|
call .sh_cl_
|
||||||
|
pop eax
|
||||||
|
jmp .mdraw
|
||||||
|
.mright:
|
||||||
|
mov eax,ed_pos
|
||||||
|
mov ebx,ed_size
|
||||||
|
cmp eax,ebx
|
||||||
|
jae .mwigvag
|
||||||
|
inc eax
|
||||||
|
call .check_offset
|
||||||
|
mov ebx,ed_shift_pos
|
||||||
|
mov ebp,shift_color
|
||||||
|
push eax
|
||||||
|
call .sh_cl_
|
||||||
|
pop eax
|
||||||
|
jmp .mdraw
|
||||||
|
|
||||||
}
|
}
|
||||||
ed_figure_only= 1000000000000000b ;®¤¨ ᨬ¢®«ë
|
ed_figure_only= 1000000000000000b ;®¤¨ ᨬ¢®«ë
|
||||||
ed_always_focus= 100000000000000b
|
ed_always_focus= 100000000000000b
|
||||||
@ -1071,6 +1133,7 @@ ed_shift_off= 1111111111111011b
|
|||||||
ed_shift_bac= 10000b ;¡¨â ¤«ï ®ç¨á⪨ ¢ë¤¥«¥®£® shift â.¥. ¯à¨ ãáâ ®¢ª¥ £®¢®à¨â çâ® ¥áâì ¢ë¤¥«¥¨¥
|
ed_shift_bac= 10000b ;¡¨â ¤«ï ®ç¨á⪨ ¢ë¤¥«¥®£® shift â.¥. ¯à¨ ãáâ ®¢ª¥ £®¢®à¨â çâ® ¥áâì ¢ë¤¥«¥¨¥
|
||||||
ed_shift_bac_cl=1111111111101111b ;®ç¨á⪠¯à¨ 㤠«¥¨¨ ¢ë¤¥«¥¨ï
|
ed_shift_bac_cl=1111111111101111b ;®ç¨á⪠¯à¨ 㤠«¥¨¨ ¢ë¤¥«¥¨ï
|
||||||
ed_shift_cl= 1111111111100011b
|
ed_shift_cl= 1111111111100011b
|
||||||
|
ed_shift_mcl= 1111111111110011b
|
||||||
ed_left_fl= 100000b
|
ed_left_fl= 100000b
|
||||||
ed_right_fl= 1111111111011111b
|
ed_right_fl= 1111111111011111b
|
||||||
ed_offset_fl= 1000000b
|
ed_offset_fl= 1000000b
|
||||||
@ -1081,7 +1144,6 @@ ed_mouse_on = 100000000b
|
|||||||
ed_mous_adn_b= 100011000b
|
ed_mous_adn_b= 100011000b
|
||||||
ed_mouse_on_off=1111111011111111b
|
ed_mouse_on_off=1111111011111111b
|
||||||
ed_height=14 ; ¢ëá®â
|
ed_height=14 ; ¢ëá®â
|
||||||
shift_color=0x6a9480
|
|
||||||
macro draw_edit_boxes start,end
|
macro draw_edit_boxes start,end
|
||||||
{
|
{
|
||||||
mov edi,start
|
mov edi,start
|
||||||
@ -1111,14 +1173,15 @@ macro key_edit_boxes start,end
|
|||||||
add edi,ed_struc_size
|
add edi,ed_struc_size
|
||||||
loop @b
|
loop @b
|
||||||
}
|
}
|
||||||
ed_struc_size=66
|
ed_struc_size=70
|
||||||
struc edit_box width,left,top,color,focus_border_color,\
|
struc edit_box width,left,top,color,shift_color,focus_border_color,\
|
||||||
blur_border_color,text_color,max,text,flags,size
|
blur_border_color,text_color,max,text,flags,size,pos
|
||||||
{
|
{
|
||||||
.width dd width
|
.width dd width
|
||||||
.left dd left
|
.left dd left
|
||||||
.top dd top
|
.top dd top
|
||||||
.color dd color
|
.color dd color
|
||||||
|
.shift_color dd shift_color
|
||||||
.focus_border_color dd focus_border_color
|
.focus_border_color dd focus_border_color
|
||||||
.blur_border_color dd blur_border_color
|
.blur_border_color dd blur_border_color
|
||||||
.text_color dd text_color
|
.text_color dd text_color
|
||||||
@ -1126,7 +1189,7 @@ struc edit_box width,left,top,color,focus_border_color,\
|
|||||||
.text dd text
|
.text dd text
|
||||||
.flags dw flags+0
|
.flags dw flags+0
|
||||||
.size dd size+0
|
.size dd size+0
|
||||||
.pos dd 0
|
.pos dd pos+0
|
||||||
.offset dd 0
|
.offset dd 0
|
||||||
.cl_curs_x dd 0
|
.cl_curs_x dd 0
|
||||||
.cl_curs_y dd 0
|
.cl_curs_y dd 0
|
||||||
|
|||||||
@ -3,7 +3,6 @@
|
|||||||
;Ž¯â¨¬¨§¨à®¢ ë© ª®¬¯®¥â EditBox (ˆáå®¤ë© ¢ ਠ⠮â Maxxxx32)
|
;Ž¯â¨¬¨§¨à®¢ ë© ª®¬¯®¥â EditBox (ˆáå®¤ë© ¢ ਠ⠮â Maxxxx32)
|
||||||
;Ž¯â¨¬¨§ æ¨ï ª®¬ ¤.
|
;Ž¯â¨¬¨§ æ¨ï ª®¬ ¤.
|
||||||
;<Lrz> - ’¥¯«®¢ €«¥ªá¥© www.lrz.land.ru
|
;<Lrz> - ’¥¯«®¢ €«¥ªá¥© www.lrz.land.ru
|
||||||
|
|
||||||
;§ £®«®¢®ª ¯à¨«®¦¥¨ï
|
;§ £®«®¢®ª ¯à¨«®¦¥¨ï
|
||||||
use32 ; âà á«ïâ®à, ¨á¯®«ì§ãî騩 32 à §àï¤ëå ª®¬ ¤ë
|
use32 ; âà á«ïâ®à, ¨á¯®«ì§ãî騩 32 à §àï¤ëå ª®¬ ¤ë
|
||||||
org 0x0 ; ¡ §®¢ë© ¤à¥á ª®¤ , ¢á¥£¤ 0x0
|
org 0x0 ; ¡ §®¢ë© ¤à¥á ª®¤ , ¢á¥£¤ 0x0
|
||||||
@ -15,24 +14,17 @@ use32 ;
|
|||||||
dd i_end and not 3 ; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪ ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢¨¬ £à¨æã 4 ¡ ©â
|
dd i_end and not 3 ; Ž¡ê¥¬ ¨á¯®«ì§ã¥¬®© ¯ ¬ïâ¨, ¤«ï á⥪ ®â¢¥¤¥¬ 0å100 ¡ ©â ¨ ¢ë஢¨¬ £à¨æã 4 ¡ ©â
|
||||||
dd i_end and not 3 ; à ᯮ«®¦¨¬ ¯®§¨æ¨î á⥪ ¢ ®¡« á⨠¯ ¬ïâ¨, áà §ã § ⥫®¬ ¯à®£à ¬¬ë. ‚¥àè¨ á⥪ ¢ ¤¨ ¯ §®¥ ¯ ¬ïâ¨, 㪠§ ®¬ ¢ëè¥
|
dd i_end and not 3 ; à ᯮ«®¦¨¬ ¯®§¨æ¨î á⥪ ¢ ®¡« á⨠¯ ¬ïâ¨, áà §ã § ⥫®¬ ¯à®£à ¬¬ë. ‚¥àè¨ á⥪ ¢ ¤¨ ¯ §®¥ ¯ ¬ïâ¨, 㪠§ ®¬ ¢ëè¥
|
||||||
dd 0x0,0x0 ; 㪠§ ⥫ì áâபã á ¯ à ¬¥âà ¬¨.
|
dd 0x0,0x0 ; 㪠§ ⥫ì áâபã á ¯ à ¬¥âà ¬¨.
|
||||||
; ¥á«¨ ¯®á«¥ § ¯ã᪠¥à ¢® ã«î, ¯à¨«®¦¥¨¥ ¡ë«®
|
include 'macros.inc'
|
||||||
; § ¯ã饮 á ¯ à ¬¥âà ¬¨ ¨§ ª®¬ ¤®© áâப¨
|
|
||||||
|
|
||||||
; 㪠§ ⥫ì áâபã, ¢ ª®â®àãî § ¯¨á ¯ãâì,
|
|
||||||
; ®âªã¤ § ¯ã饮 ¯à¨«®¦¥¨¥
|
|
||||||
|
|
||||||
include 'editbox.inc'
|
include 'editbox.inc'
|
||||||
use_edit_box
|
use_edit_box
|
||||||
;Ž¡« áâì ª®¤
|
;Ž¡« áâì ª®¤
|
||||||
start: ;’®çª ¢å®¤ ¢ ¯à®£à ¬¬ã
|
start: ;’®çª ¢å®¤ ¢ ¯à®£à ¬¬ã
|
||||||
mov eax,40 ;ãáâ ®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
|
mcall 40,0x27 ;ãáâ ®¢¨âì ¬ áªã ¤«ï ®¦¨¤ ¥¬ëå ᮡë⨩
|
||||||
mov ebx,0x27 ;á¨á⥬ ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 á®®¡é¥¨¥ ® ¯¥à¥à¨á®¢ª¥, ¦ â ª®¯ª , ®¯à¥¤¥«ñ ï à ¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ¦ ⨥ ª®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥¨¥; á¡à áë¢ ¥âáï ¯à¨ ¯à®ç⥨¨) ¨ ¦ ⨥ ª« ¢¨è¨
|
;á¨á⥬ ¡ã¤¥â ॠ£¨à®¢ âì ⮫쪮 á®®¡é¥¨¥ ® ¯¥à¥à¨á®¢ª¥, ¦ â ª®¯ª , ®¯à¥¤¥«ñ ï à ¥¥, ᮡë⨥ ®â ¬ëè¨ (çâ®-â® á«ã稫®áì - ¦ ⨥ ª®¯ªã ¬ëè¨ ¨«¨ ¯¥à¥¬¥é¥¨¥; á¡à áë¢ ¥âáï ¯à¨ ¯à®ç⥨¨) ¨ ¦ ⨥ ª« ¢¨è¨
|
||||||
int 0x40
|
|
||||||
red_win:
|
red_win:
|
||||||
call draw_window ;¯¥à¢® ç «ì® ¥®¡å®¤¨¬® à¨á®¢ âì ®ª®
|
call draw_window ;¯¥à¢® ç «ì® ¥®¡å®¤¨¬® à¨á®¢ âì ®ª®
|
||||||
still: ;®á®¢®© ®¡à ¡®â稪
|
still: ;®á®¢®© ®¡à ¡®â稪
|
||||||
mov eax,10 ;Ž¦¨¤ âì ᮡëâ¨ï
|
mcall 10 ;Ž¦¨¤ âì ᮡëâ¨ï ¢ â¥ç¥¨¥ 2 ¬¨««¨á¥ªã¤
|
||||||
int 0x40 ;®¦¨¤ âì ᮡë⨥ ¢ â¥ç¥¨¥ 2 ¬¨««¨á¥ªã¤
|
|
||||||
|
|
||||||
cmp al,0x1 ;¥á«¨ ¨§¬¥¨«®áì ¯®«®¦¥¨¥ ®ª
|
cmp al,0x1 ;¥á«¨ ¨§¬¥¨«®áì ¯®«®¦¥¨¥ ®ª
|
||||||
jz red_win
|
jz red_win
|
||||||
@ -45,48 +37,34 @@ still: ;
|
|||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
button:
|
button:
|
||||||
mov eax,17 ;¯®«ãç¨âì ¨¤¥â¨ä¨ª â®à ¦ ⮩ ª« ¢¨è¨
|
mcall 17 ;¯®«ãç¨âì ¨¤¥â¨ä¨ª â®à ¦ ⮩ ª« ¢¨è¨
|
||||||
int 0x40
|
|
||||||
test ah,ah ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ®¡à ¡®â稪 ᮡë⨩ still
|
test ah,ah ;¥á«¨ ¢ ah 0, â® ¯¥à¥©â¨ ®¡à ¡®â稪 ᮡë⨩ still
|
||||||
jz still
|
jz still
|
||||||
or eax,-1 ;¢ eax,-1 - 5 ,¡ ©â®¢ ã á ¦¥ ⮫쪮 3 ¢ë©â¨
|
mcall -1
|
||||||
int 0x40 ;¤ «¥¥ ¢ë¯®«ï¥âáï ¢ë室 ¨§ ¯à®£à ¬¬ë
|
|
||||||
|
|
||||||
key:
|
key:
|
||||||
mov eax,2 ;§ £à㧨¬ § 票¥ 2 ¢ ॣ¨áâ®à eax
|
mcall 2 ;§ £à㧨¬ § 票¥ 2 ¢ ॣ¨áâ®à eax ¨ ¯®«ã稬 ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||||||
int 0x40 ;¯®«ã稬 ª®¤ ¦ ⮩ ª« ¢¨è¨
|
|
||||||
key_edit_boxes editboxes,editboxes_end
|
key_edit_boxes editboxes,editboxes_end
|
||||||
jmp still
|
jmp still
|
||||||
|
|
||||||
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
|
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
|
||||||
draw_window: ;à¨á®¢ ¨¥ ®ª ¯à¨«®¦¥¨ï
|
draw_window: ;à¨á®¢ ¨¥ ®ª ¯à¨«®¦¥¨ï
|
||||||
mov eax,12 ;¢ ॣ¨áâà ¢¥á⨠§ 票¥ = 12
|
mcall 12,1
|
||||||
mov ebx,1 ;¯à¨á¢®¨âì 1
|
mcall 0,(50*65536+390),(30*65536+200),0xb3AABBCC,0x805080DD,hed
|
||||||
int 0x40
|
|
||||||
|
|
||||||
xor eax,eax ;®¡ã«¨âì eax
|
|
||||||
mov ebx,50*65536+390 ;[ª®®à¤¨ â ¯® ®á¨ x]*65536 + [à §¬¥à ¯® ®á¨ x]
|
|
||||||
mov ecx,30*65536+200 ;[ª®®à¤¨ â ¯® ®á¨ y]*65536 + [à §¬¥à ¯® ®á¨ y]
|
|
||||||
mov edx,0xb3AABBCC ;0xXYRRGGBB Y =3 - ¢ë¢®¤ à ¬ª¨, ¨á¯®«ì§ãï áªà¨
|
|
||||||
mov esi,0x805080DD ;0xXYRRGGBB - 梥⠧ £®«®¢ª
|
|
||||||
mov edi,hed ;“ª § ⥫ì áâபã á § £®«®¢ª®¬
|
|
||||||
int 0x40 ; à¨á®¢ âì ®ª® ¯à¨«®¦¥¨ï
|
|
||||||
|
|
||||||
draw_edit_boxes editboxes,editboxes_end ;à¨á®¢ ¨¥ edit box'®¢
|
draw_edit_boxes editboxes,editboxes_end ;à¨á®¢ ¨¥ edit box'®¢
|
||||||
|
mcall 12,2
|
||||||
mov eax,12 ;”ãªæ¨ï 12 - ç âì/§ ª®ç¨âì ¯¥à¥à¨á®¢ªã ®ª .
|
|
||||||
mov ebx,2 ;<3B>®¤äãªæ¨ï 2 - § ª®ç¨âì ¯¥à¥à¨á®¢ªã ®ª .
|
|
||||||
int 0x40
|
|
||||||
ret
|
ret
|
||||||
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
|
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
|
||||||
;DATA ¤ ë¥
|
;DATA ¤ ë¥
|
||||||
editboxes:
|
editboxes:
|
||||||
edit1 edit_box 168,5,10,0xffffff,0,0,0,99,ed_buffer.2,ed_figure_only
|
edit1 edit_box 168,5,10,0xffffff,0x6a9480,0,0,0,99,ed_buffer.2,ed_figure_only
|
||||||
edit2 edit_box 250,5,30,0xffffff,0,0xAABBCC,0,308,hed,ed_focus,53
|
edit2 edit_box 250,5,30,0xffffff,0x6a9480,0,0xAABBCC,0,308,hed,ed_focus,53,53
|
||||||
edit3 edit_box 35,5,50,0xffffff,0,0,0,9,ed_buffer.3,ed_figure_only
|
edit3 edit_box 35,5,50,0xffffff,0x6a9480,0,0,0,9,ed_buffer.3,ed_figure_only
|
||||||
edit4 edit_box 16,5,70,0xffffff,0,0,0,1,ed_buffer.4,ed_figure_only
|
edit4 edit_box 16,5,70,0xffffff,0x6a9480,0,0,0,1,ed_buffer.4,ed_figure_only
|
||||||
editboxes_end:
|
editboxes_end:
|
||||||
data_of_code dd 0
|
data_of_code dd 0
|
||||||
|
mouse_flag dd 0x0
|
||||||
|
hed db 'EDITBOX optimization and retype <Lrz> date 13.04.2007',0
|
||||||
|
rb 256
|
||||||
ed_buffer:
|
ed_buffer:
|
||||||
;.1: rb 514;256
|
;.1: rb 514;256
|
||||||
.2: rb 101
|
.2: rb 101
|
||||||
@ -94,9 +72,6 @@ ed_buffer:
|
|||||||
.4: rb 3
|
.4: rb 3
|
||||||
;¤¢ § ¯ áëå ¡ ©â ¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®æ¥ ¡ãä¥à 0
|
;¤¢ § ¯ áëå ¡ ©â ¥®¡å®¤¨¬ë ¤«ï ⮣® çâ® ¡ë ¥ ¯¥¯¥à¥¯¨á âì á«¥¤ãî騥© ¡ ©âë, ¢ ª®æ¥ ¡ãä¥à 0
|
||||||
buffer_end:
|
buffer_end:
|
||||||
hed db 'EDITBOX optimization and retype <Lrz> date 04.04.2007',0
|
|
||||||
rb 256
|
|
||||||
mouse_flag: dd 0x0
|
|
||||||
structure_of_potock:
|
structure_of_potock:
|
||||||
rb 1024 ;1 ª¡ ¤«ï ¯®«ãç¥¨ï ®¡é¥© áâàãªâãàë
|
rb 1024 ;1 ª¡ ¤«ï ¯®«ãç¥¨ï ®¡é¥© áâàãªâãàë
|
||||||
rb 1024
|
rb 1024
|
||||||
|
|||||||
52
programs/develop/examples/editbox/trunk/editbox.mac
Normal file
52
programs/develop/examples/editbox/trunk/editbox.mac
Normal file
@ -0,0 +1,52 @@
|
|||||||
|
; Œ ªà®á ¢ë室
|
||||||
|
macro edit_ex
|
||||||
|
{
|
||||||
|
popa
|
||||||
|
ret
|
||||||
|
}
|
||||||
|
macro debug
|
||||||
|
{
|
||||||
|
;----------- ®â« ¤ª
|
||||||
|
pushad
|
||||||
|
; mov dword [ed_buffer.2],0
|
||||||
|
; mov eax,edi
|
||||||
|
mov eax,dword [ed_buffer.2]
|
||||||
|
mov edi,ed_buffer.3
|
||||||
|
call .str
|
||||||
|
;à¨á®¢ ¨¥ ä®
|
||||||
|
mov eax,13
|
||||||
|
mov ebx,178*65536+70
|
||||||
|
mov ecx,28*65536+10
|
||||||
|
xor edx,edx
|
||||||
|
int 0x40
|
||||||
|
;¢ë¢®¤ § 票ï íªà
|
||||||
|
mov eax,4
|
||||||
|
mov ebx,180*65536+30
|
||||||
|
mov ecx,0x10DDBBCC
|
||||||
|
mov edx,ed_buffer.3
|
||||||
|
mov esi,8
|
||||||
|
int 0x40
|
||||||
|
popad
|
||||||
|
;----------- ®â« ¤ª
|
||||||
|
}
|
||||||
|
macro debug_func
|
||||||
|
{
|
||||||
|
.str:
|
||||||
|
mov ecx,0x0a ;§ ¤ ¥âáï á¨á⥬ áç¨á«¥¨ï ¨§¬¥ïîâáï ॣ¨áâàë ebx,eax,ecx,edx ¢å®¤ë¥ ¯ à ¬¥âàë eax - ç¨á«®
|
||||||
|
;¯à¥à¥¢®¤ ç¨á« ¢ ASCII áâப㠢§®¤ë¥ ¤ ë¥ ecx=á¨á⥬ áç¨á«¥ï edi ¤à¥á ªã¤ § ¯¨áë¢ âì, ¡ã¤¥¬ áâபã, ¯à¨ç¥¬ ª®¥æ ¯¥à¥¬¥®©
|
||||||
|
cmp eax,ecx ;áà ¢¨âì ¥á«¨ ¢ eax ¬¥ìè¥ ç¥¬ ¢ ecx â® ¯¥à¥©â¨ @@-1 â.¥. pop eax
|
||||||
|
jb @f
|
||||||
|
xor edx,edx ;®ç¨áâ¨âì edx
|
||||||
|
div ecx ;à §¤¥«¨âì - ®áâ ⮪ ¢ edx
|
||||||
|
push edx ;¯®«®¦¨âì ¢ á⥪
|
||||||
|
;dec edi ;ᬥ饨¥ ¥®¡å®¤¨¬®¥ ¤«ï § ¯¨á¨ á ª®æ áâப¨
|
||||||
|
call .str;¯¥à¥©â¨ á ¬ã ᥡï â.¥. ¢ë§¢ âì á ¬ã á¥¡ï ¨ â ª ¤® ⮣® ¬®¬¥â ¯®ª ¢ eax ¥ á⠥⠬¥ìè¥ ç¥¬ ¢ ecx
|
||||||
|
pop eax
|
||||||
|
@@: ;cmp al,10 ;¯à®¢¥à¨âì ¥ ¬¥ìè¥ «¨ § 票¥ ¢ al 祬 10 (¤«ï á¨á⥬ë áç¨á«¥ï 10 ¤ ï ª®¬ ¤ - «¨è ï))
|
||||||
|
;sbb al,$69 ;- ç¥áâ® ¤ ï ¨áâàãªæ¨ï ¬¥ï § áâ ¢«ï¥â § ¤ã¬ âìáï â.¥. ï ¥ § î ª ª íâ® à ¡®â ¥â
|
||||||
|
;das ;¯®á«¥ ¤ ®© ª®¬ ¤ë ª ª ¡ë ¯à®¨á室¨â 㬥ì襨¥ al 66h (¢ ª¨£¥ ¯¨á ® ¤à㣮¥)
|
||||||
|
or al,0x30 ;¤ ï ª®¬ ¤ ª®à®ç¥ 祬 ¤¢¥ ¢ëè¥
|
||||||
|
stosb ;§ ¯¨á âì í«¥¬¥â ¨§ ॣ¨áâà al ¢ ï祪㠯 ¬ï⨠es:edi
|
||||||
|
|
||||||
|
ret ;¢¥àãâìáï ç¥ì ¨â¥à¥áë© å®¤ â.ª. ¯®ª ¢ á⥪¥ åà ¨âìáï ª®«-¢® ¢ë§®¢®¢ â® á⮫쪮 à § ¬ë ¨ ¡ã¤¥¬ ¢ë§ë¢ âìáï
|
||||||
|
}
|
||||||
269
programs/develop/examples/editbox/trunk/macros.inc
Normal file
269
programs/develop/examples/editbox/trunk/macros.inc
Normal file
@ -0,0 +1,269 @@
|
|||||||
|
; new application structure
|
||||||
|
macro meos_app_start
|
||||||
|
{
|
||||||
|
use32
|
||||||
|
org 0x0
|
||||||
|
|
||||||
|
db 'MENUET01'
|
||||||
|
dd 0x01
|
||||||
|
dd __start
|
||||||
|
dd __end
|
||||||
|
dd __memory
|
||||||
|
dd __stack
|
||||||
|
|
||||||
|
if used __params & ~defined __params
|
||||||
|
dd __params
|
||||||
|
else
|
||||||
|
dd 0x0
|
||||||
|
end if
|
||||||
|
|
||||||
|
dd 0x0
|
||||||
|
}
|
||||||
|
MEOS_APP_START fix meos_app_start
|
||||||
|
|
||||||
|
macro code
|
||||||
|
{
|
||||||
|
__start:
|
||||||
|
}
|
||||||
|
CODE fix code
|
||||||
|
|
||||||
|
macro data
|
||||||
|
{
|
||||||
|
__data:
|
||||||
|
}
|
||||||
|
DATA fix data
|
||||||
|
|
||||||
|
macro udata
|
||||||
|
{
|
||||||
|
if used __params & ~defined __params
|
||||||
|
__params:
|
||||||
|
db 0
|
||||||
|
__end:
|
||||||
|
rb 255
|
||||||
|
else
|
||||||
|
__end:
|
||||||
|
end if
|
||||||
|
__udata:
|
||||||
|
}
|
||||||
|
UDATA fix udata
|
||||||
|
|
||||||
|
macro meos_app_end
|
||||||
|
{
|
||||||
|
align 32
|
||||||
|
rb 2048
|
||||||
|
__stack:
|
||||||
|
__memory:
|
||||||
|
}
|
||||||
|
MEOS_APP_END fix meos_app_end
|
||||||
|
|
||||||
|
|
||||||
|
; macro for defining multiline text data
|
||||||
|
struc mstr [sstring]
|
||||||
|
{
|
||||||
|
forward
|
||||||
|
local ssize
|
||||||
|
virtual at 0
|
||||||
|
db sstring
|
||||||
|
ssize = $
|
||||||
|
end virtual
|
||||||
|
dd ssize
|
||||||
|
db sstring
|
||||||
|
common
|
||||||
|
dd -1
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
; strings
|
||||||
|
macro sz name,[data] { ; from MFAR [mike.dld]
|
||||||
|
common
|
||||||
|
if used name
|
||||||
|
label name
|
||||||
|
end if
|
||||||
|
forward
|
||||||
|
if used name
|
||||||
|
db data
|
||||||
|
end if
|
||||||
|
common
|
||||||
|
if used name
|
||||||
|
.size = $-name
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
macro lsz name,[lng,data] { ; from MFAR [mike.dld]
|
||||||
|
common
|
||||||
|
if used name
|
||||||
|
label name
|
||||||
|
end if
|
||||||
|
forward
|
||||||
|
if (used name)&(lang eq lng)
|
||||||
|
db data
|
||||||
|
end if
|
||||||
|
common
|
||||||
|
if used name
|
||||||
|
.size = $-name
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; easy system call macro
|
||||||
|
macro mpack dest, hsrc, lsrc
|
||||||
|
{
|
||||||
|
if (hsrc eqtype 0) & (lsrc eqtype 0)
|
||||||
|
mov dest, (hsrc) shl 16 + lsrc
|
||||||
|
else
|
||||||
|
if (hsrc eqtype 0) & (~lsrc eqtype 0)
|
||||||
|
mov dest, (hsrc) shl 16
|
||||||
|
add dest, lsrc
|
||||||
|
else
|
||||||
|
mov dest, hsrc
|
||||||
|
shl dest, 16
|
||||||
|
add dest, lsrc
|
||||||
|
end if
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
macro __mov reg,a,b { ; mike.dld
|
||||||
|
if (~a eq)&(~b eq)
|
||||||
|
mpack reg,a,b
|
||||||
|
else if (~a eq)&(b eq)
|
||||||
|
mov reg,a
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
macro mcall a,b,c,d,e,f { ; mike.dld
|
||||||
|
__mov eax,a
|
||||||
|
__mov ebx,b
|
||||||
|
__mov ecx,c
|
||||||
|
__mov edx,d
|
||||||
|
__mov esi,e
|
||||||
|
__mov edi,f
|
||||||
|
int 0x40
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
; optimize the code for size
|
||||||
|
__regs fix <eax,ebx,ecx,edx,esi,edi,ebp,esp>
|
||||||
|
|
||||||
|
macro add arg1,arg2
|
||||||
|
{
|
||||||
|
if (arg2 eqtype 0)
|
||||||
|
if (arg2) = 1
|
||||||
|
inc arg1
|
||||||
|
else
|
||||||
|
add arg1,arg2
|
||||||
|
end if
|
||||||
|
else
|
||||||
|
add arg1,arg2
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
macro sub arg1,arg2
|
||||||
|
{
|
||||||
|
if (arg2 eqtype 0)
|
||||||
|
if (arg2) = 1
|
||||||
|
dec arg1
|
||||||
|
else
|
||||||
|
sub arg1,arg2
|
||||||
|
end if
|
||||||
|
else
|
||||||
|
sub arg1,arg2
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
macro mov arg1,arg2
|
||||||
|
{
|
||||||
|
if (arg1 in __regs) & ((arg2 eqtype 0) | (arg2 eqtype '0'))
|
||||||
|
if (arg2) = 0
|
||||||
|
xor arg1,arg1
|
||||||
|
else if (arg2) = 1
|
||||||
|
xor arg1,arg1
|
||||||
|
inc arg1
|
||||||
|
else if (arg2) = -1
|
||||||
|
or arg1,-1
|
||||||
|
else if (arg2) > -128 & (arg2) < 128
|
||||||
|
push arg2
|
||||||
|
pop arg1
|
||||||
|
else
|
||||||
|
mov arg1,arg2
|
||||||
|
end if
|
||||||
|
else
|
||||||
|
mov arg1,arg2
|
||||||
|
end if
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
macro struct name
|
||||||
|
{
|
||||||
|
virtual at 0
|
||||||
|
name name
|
||||||
|
sizeof.#name = $ - name
|
||||||
|
end virtual
|
||||||
|
}
|
||||||
|
|
||||||
|
; structures used in MeOS
|
||||||
|
struc process_information
|
||||||
|
{
|
||||||
|
.cpu_usage dd ? ; +0
|
||||||
|
.window_stack_position dw ? ; +4
|
||||||
|
.window_stack_value dw ? ; +6
|
||||||
|
.not_used1 dw ? ; +8
|
||||||
|
.process_name rb 12 ; +10
|
||||||
|
.memory_start dd ? ; +22
|
||||||
|
.used_memory dd ? ; +26
|
||||||
|
.PID dd ? ; +30
|
||||||
|
.x_start dd ? ; +34
|
||||||
|
.y_start dd ? ; +38
|
||||||
|
.x_size dd ? ; +42
|
||||||
|
.y_size dd ? ; +46
|
||||||
|
.slot_state dw ? ; +50
|
||||||
|
dw ? ; +52 - reserved
|
||||||
|
.client_left dd ? ; +54
|
||||||
|
.client_top dd ? ; +58
|
||||||
|
.client_width dd ? ; +62
|
||||||
|
.client_height dd ? ; +66
|
||||||
|
.wnd_state db ? ; +70
|
||||||
|
rb (1024-71)
|
||||||
|
}
|
||||||
|
;struct process_information
|
||||||
|
|
||||||
|
struc system_colors
|
||||||
|
{
|
||||||
|
.frame dd ?
|
||||||
|
.grab dd ?
|
||||||
|
.grab_button dd ?
|
||||||
|
.grab_button_text dd ?
|
||||||
|
.grab_text dd ?
|
||||||
|
.work dd ?
|
||||||
|
.work_button dd ?
|
||||||
|
.work_button_text dd ?
|
||||||
|
.work_text dd ?
|
||||||
|
.work_graph dd ?
|
||||||
|
}
|
||||||
|
;struct system_colors
|
||||||
|
|
||||||
|
|
||||||
|
; constants
|
||||||
|
|
||||||
|
; events
|
||||||
|
EV_IDLE = 0
|
||||||
|
EV_TIMER = 0
|
||||||
|
EV_REDRAW = 1
|
||||||
|
EV_KEY = 2
|
||||||
|
EV_BUTTON = 3
|
||||||
|
EV_EXIT = 4
|
||||||
|
EV_BACKGROUND = 5
|
||||||
|
EV_MOUSE = 6
|
||||||
|
EV_IPC = 7
|
||||||
|
EV_STACK = 8
|
||||||
|
|
||||||
|
; event mask bits for function 40
|
||||||
|
EVM_REDRAW = 1b
|
||||||
|
EVM_KEY = 10b
|
||||||
|
EVM_BUTTON = 100b
|
||||||
|
EVM_EXIT = 1000b
|
||||||
|
EVM_BACKGROUND = 10000b
|
||||||
|
EVM_MOUSE = 100000b
|
||||||
|
EVM_IPC = 1000000b
|
||||||
|
EVM_STACK = 10000000b
|
||||||
Loading…
Reference in New Issue
Block a user