| 1,57 → 1,3 |
|---|
| macro use_key_no_process up,down,esc,enter,tab,numl,capsl,scrolll,pgup,pgdown |
| { |
| if up eq |
| else |
| cmp ah,178 |
| jz edit_box.editbox_exit |
| end if |
| if down eq |
| else |
| cmp ah,177 |
| jz edit_box.editbox_exit |
| end if |
| if esc eq |
| else |
| cmp ah,27 ;ESC - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if enter eq |
| else |
| cmp ah,13 ;ENTER - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if tab eq |
| else |
| cmp ah,9 ;TAB - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if numl eq |
| else |
| cmp ah,4 ;Num Lock - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if capsl eq |
| else |
| cmp ah,2 ;Caps Lock - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if scrolll eq |
| else |
| cmp ah,1 ;Scroll Lock - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if pgup eq |
| else |
| cmp ah,184 ;Page Up - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| if pgdown eq |
| else |
| cmp ah,183 ;Page Dwon - ª« ¢¨è )) |
| jz edit_box.editbox_exit |
| end if |
| } |
| |
| SCAN_LWIN_RELEASE = 0xDB |
| SCAN_RWIN_RELEASE = 0xDC |
| |
| 58,49 → 4,49 |
|---|
| align 16 |
| edit_box: |
| .draw: |
| pushad |
| mov edi,[esp+36] |
| and dword ed_text_color,17FFFFFFh |
| mov ecx,ed_text_color |
| mov ebx,ecx |
| shr ecx,28 |
| shl ebx,4 |
| shr ebx,28 |
| inc ebx |
| mov eax,6 |
| jecxz @f |
| mov al, 8 |
| pushad |
| mov edi,[esp+36] |
| and dword ed_text_color,17FFFFFFh |
| mov ecx,ed_text_color |
| mov ebx,ecx |
| shr ecx,28 |
| shl ebx,4 |
| shr ebx,28 |
| inc ebx |
| mov eax,6 |
| jecxz @f |
| mov al, 8 |
| @@: |
| mul bl |
| mov ed_char_width,eax |
| mov al, 9 |
| jecxz @f |
| mov al, 16 |
| mul bl |
| mov ed_char_width,eax |
| mov al, 9 |
| jecxz @f |
| mov al, 16 |
| @@: |
| mul bl |
| add eax,4 |
| mov ed_height,eax |
| call .draw_border |
| mul bl |
| add eax,4 |
| mov ed_height,eax |
| call .draw_border |
| .draw_bg_cursor_text: |
| ;test word ed_flags,ed_focus ; for unfocused controls => |
| ;jz .sjip_offset ; do not recalculate offset (big OS behaviour) |
| call .check_offset |
| ;.sjip_offset: |
| call .draw_bg |
| test word ed_flags,ed_focus ; for unfocused controls => |
| jz .draw_cursor_text ; do not draw selection(named shift) |
| call .draw_shift |
| ;test word ed_flags,ed_focus ; for unfocused controls => |
| ;jz .skip_offset ; do not recalculate offset |
| call .check_offset |
| ;.skip_offset: |
| call .draw_bg |
| test word ed_flags,ed_focus ; do not draw selection(named shift) |
| jz .draw_cursor_text ; |
| call .draw_shift |
| .draw_cursor_text: |
| call .draw_text |
| test word ed_flags,ed_focus ; and dosn`t draw cursor |
| jz .editbox_exit |
| call .draw_cursor |
| call .draw_text |
| test word ed_flags,ed_focus ; and dosn`t draw cursor |
| jz .editbox_exit |
| call .draw_cursor |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;¡é¨© ¢ë室 ¨§ editbox ¤«ï ¢á¥å äãªæ¨© ¨ ¯®áâ ®¡à ¡®â稪®¢;; |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| .editbox_exit: |
| popad |
| ret 4 |
| popad |
| ret 4 |
| |
| ;========================================================== |
| ;=== ®¡à ¡®âª ª« ¢¨ âãàë ================================= |
| 107,287 → 53,294 |
|---|
| ;========================================================== |
| align 16 |
| edit_box_key: |
| pushad |
| mov edi,[esp+36] |
| test word ed_flags,ed_focus ; ¥á«¨ ¥ ¢ 䮪ãá¥, ¢ë室¨¬ |
| jz edit_box.editbox_exit |
| test word ed_flags,ed_mouse_on or ed_disabled |
| jnz edit_box.editbox_exit |
| pushad |
| mov edi,[esp+36] |
| test word ed_flags,ed_focus ; ¥á«¨ ¥ ¢ 䮪ãá¥, ¢ë室¨¬ |
| jz edit_box.editbox_exit |
| test word ed_flags,ed_mouse_on or ed_disabled |
| jnz edit_box.editbox_exit |
| ;-------------------------------------- |
| ; this code for Win-keys, works with |
| ; kernel SVN r.3356 or later |
| push eax |
| push ebx |
| mcall SF_KEYBOARD,SSF_GET_CONTROL_KEYS |
| test ax,0x200 ; LWin |
| jnz .win_key_pressed |
| test ax,0x400 ; RWin |
| jz @f |
| .win_key_pressed: |
| pop ebx |
| pop eax |
| jmp edit_box.editbox_exit |
| |
| @@: pop ebx |
| pop eax |
| mcall SF_KEYBOARD,SSF_GET_CONTROL_KEYS |
| test ah,$06 ; LWin ($02) & RWin ($04) |
| jnz edit_box.editbox_exit |
| ;-------------------------------------- |
| ;஢¥àª ¦ â shift ? |
| call edit_box_key.check_shift_ctrl_alt |
| test al,$03 |
| je @f |
| or word ed_flags,ed_shift ;ãáâ ®¢¨¬ ä« £ Shift |
| @@: |
| and word ed_flags,ed_ctrl_off ; ®ç¨á⨬ ä« £ Ctrl |
| test al,$0C |
| je @f |
| or word ed_flags,ed_ctrl_on ;ãáâ ®¢¨¬ ä« £ Ctrl |
| @@: |
| and word ed_flags,ed_alt_off ; ®ç¨á⨬ ä« £ Alt |
| test al,$30 |
| je @f |
| or word ed_flags,ed_alt_on ;ãáâ ®¢¨¬ ä« £ Alt |
| @@: |
| ;---------------------------------------------------------- |
| ;--- ¯à®¢¥à塞, çâ® ¦ â® -------------------------------- |
| ;---------------------------------------------------------- |
| cmp ah,8 |
| jz edit_box_key.backspace |
| cmp ah,0xb6 |
| jz edit_box_key.delete |
| cmp ah,176 |
| jz edit_box_key.left |
| cmp ah,179 |
| jz edit_box_key.right |
| cmp ah,180 |
| jz edit_box_key.home |
| cmp ah,181 |
| jz edit_box_key.end |
| cmp ah,185 ;insert |
| jz edit_box_key.insert |
| |
| mov eax,[esp+28] |
| ; get scancode in ah |
| ror eax,8 |
| ror eax,8 |
| ; check for ctrl+ combinations |
| test word ed_flags,ed_ctrl_on |
| jz @f |
| cmp ah,45 ; Ctrl + X |
| je edit_box_key.ctrl_x |
| cmp ah,46 ; Ctrl + C |
| je edit_box_key.ctrl_c |
| cmp ah,47 ; Ctrl + V |
| je edit_box_key.ctrl_v |
| cmp ah,30 ; Ctrl + A |
| je edit_box_key.ctrl_a |
| test word ed_flags,ed_ctrl_on |
| jz @f |
| cmp ah,SCAN_CODE_X ; Ctrl + X |
| je edit_box_key.ctrl_x |
| cmp ah,SCAN_CODE_C ; Ctrl + C |
| je edit_box_key.ctrl_c |
| cmp ah,SCAN_CODE_V ; Ctrl + V |
| je edit_box_key.ctrl_v |
| cmp ah,SCAN_CODE_A ; Ctrl + A |
| je edit_box_key.ctrl_a |
| jmp edit_box.editbox_exit |
| @@: |
| cmp ah,SCAN_LWIN_RELEASE |
| jz edit_box.editbox_exit |
| cmp ah,SCAN_RWIN_RELEASE |
| jz edit_box.editbox_exit |
| ; restore ascii code |
| rol eax,8 |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ; £«ãèª ®¡à ¡®âªã ª« ¢¨è ¢¢¥àå ¨ ¢¨§ â.¥. ¯à¨ ®¡ à㦥¨¨ |
| ;íâ¨å ª®¤®¢ ¯à®¨á室¨â ¢ë室 ¨§ ®¡à ¡®â稪 |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| use_key_no_process up,down,esc,enter,tab,numl,capsl,scrolll,pgup,pgdown |
| ;--- ¦ â ¤àã£ ï ª« ¢¨è --- |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;஢¥àª ãáâ ®¢«¥ «¨ ä« £ ¯à¨ ª®â®à®¬ 㦮 ¢ë¢®¤¨âì |
| ;⮫쪮 æ¨äàë ¢ 㦮¬ ¡®ªá¥ |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| test word ed_flags,ed_figure_only ; ⮫쪮 æ¨äàë? |
| jz @f |
| cmp ah,'0' |
| jb edit_box.editbox_exit |
| cmp ah,'9' |
| ja edit_box.editbox_exit |
| cmp ah,SCAN_CODE_SPACE |
| ja @F |
| cmp al,ASCII_KEY_BACK |
| jz edit_box_key.backspace |
| cmp ah,SCAN_CODE_ESCAPE |
| jz edit_box.editbox_exit |
| cmp ah,SCAN_CODE_TAB |
| jz edit_box.editbox_exit |
| cmp ah,SCAN_CODE_RETURN |
| jz edit_box.editbox_exit |
| jmp .printable_character |
| @@: |
| cmp ah,SCAN_CODE_DELETE |
| ja edit_box.editbox_exit |
| cmp ah,SCAN_CODE_HOME |
| jb edit_box.editbox_exit |
| cmp ax,SCAN_CODE_CLEAR shl 8 + ASCII_KEY_CLEAR ; not operate numpad unlocked 5 |
| jz edit_box.editbox_exit |
| ;here best place to filter up,down,pgup,pgdown |
| cmp al,ASCII_KEY_LEFT |
| jb .printable_character |
| and eax,$F |
| mov ebx,.unlock_numpad_filtration |
| jmp dword[ebx+eax*4] |
| .unlock_numpad_filtration \ |
| dd edit_box_key.left, \ ; LEFT |
| edit_box.editbox_exit,\ ; DOWN |
| edit_box.editbox_exit,\ ; UP |
| edit_box_key.right, \ ; RIGHT |
| edit_box_key.home, \ ; HOME |
| edit_box_key.end, \ ; END |
| edit_box_key.delete, \ ; DELETE |
| edit_box.editbox_exit,\ ; PGDN |
| edit_box.editbox_exit,\ ; PGUP |
| edit_box_key.insert ; INSERT |
| |
| .printable_character: |
| test word ed_flags,ed_figure_only ; ⮫쪮 æ¨äàë? |
| jz @f |
| cmp al,'0' |
| jb edit_box.editbox_exit |
| cmp al,'9' |
| ja edit_box.editbox_exit |
| @@: |
| ; restore ascii code |
| rol eax,8 |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;¯à®¢¥àª shift, ¡ë« «¨ ¦ â |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| test word ed_flags,ed_shift_on |
| je @f |
| test word ed_flags,ed_shift_on |
| je @f |
| ; edx = ed_size, ecx = ed_pos |
| push eax |
| mov edx,ed_size |
| mov ecx, ed_pos |
| pusha |
| push eax |
| mov edx,ed_size |
| mov ecx, ed_pos |
| pusha |
| ; clear input area |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| mov ebp,ed_size |
| call edit_box_key.clear_bg |
| popa |
| call edit_box_key.del_char |
| mov ebx,ed_size |
| sub bx,ed_shift_pos |
| mov ed_size,ebx |
| pop eax |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| mov ebp,ed_size |
| call edit_box_key.clear_bg |
| popa |
| call edit_box_key.del_char |
| mov ebx,ed_size |
| sub bx,ed_shift_pos |
| mov ed_size,ebx |
| pop eax |
| @@: |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ; ¯à®¢¥à塞, 室¨âáï «¨ ªãàá®à ¢ ª®æ¥ + ¤ «ì¥©è ï ®¡à ¡®âª |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| mov ecx,ed_size |
| mov edx, ed_max |
| test word ed_flags,ed_insert |
| jne @f |
| cmp ecx,edx |
| jae edit_box.editbox_exit |
| @@: mov ebx, ed_pos |
| cmp ebx,edx |
| jnl edit_box.editbox_exit |
| mov ecx,ed_size |
| push edi eax |
| mov ebp,edi |
| mov esi,ed_text |
| add esi,ecx |
| mov edi,esi |
| cmp ecx,ebx |
| je edit_box_key.In_k |
| test dword bp_flags,ed_insert |
| jne edit_box_key.ins_v |
| pusha |
| mov edi,ebp |
| mov ebp,ed_size |
| call edit_box_key.clear_bg |
| popa |
| sub ecx,ebx |
| inc edi |
| std |
| inc ecx |
| mov ecx,ed_size |
| mov edx, ed_max |
| test word ed_flags,ed_insert |
| jne @f |
| cmp ecx,edx |
| jae edit_box.editbox_exit |
| @@: mov ebx, ed_pos |
| cmp ebx,edx |
| jnl edit_box.editbox_exit |
| mov ecx,ed_size |
| push edi eax |
| mov ebp,edi |
| mov esi,ed_text |
| add esi,ecx |
| mov edi,esi |
| cmp ecx,ebx |
| je edit_box_key.In_k |
| test dword bp_flags,ed_insert |
| jne edit_box_key.ins_v |
| pusha |
| mov edi,ebp |
| mov ebp,ed_size |
| call edit_box_key.clear_bg |
| popa |
| sub ecx,ebx |
| inc edi |
| std |
| inc ecx |
| @@: |
| lodsb |
| stosb |
| loop @b |
| lodsb |
| stosb |
| loop @b |
| edit_box_key.In_k: |
| cld |
| pop eax |
| mov al,ah |
| stosb |
| pop edi |
| inc dword ed_size |
| inc dword ed_pos |
| call edit_box_key.draw_all2 |
| jmp edit_box_key.shift |
| cld |
| pop eax |
| mov al,ah |
| stosb |
| pop edi |
| inc dword ed_size |
| inc dword ed_pos |
| call edit_box_key.draw_all2 |
| jmp edit_box_key.shift |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;¡à ¡®âª ª« ¢¨è insert,delete,backspace,home,end,left,right |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| edit_box_key.insert: |
| test word ed_flags,ed_insert |
| je @f |
| and word ed_flags,ed_insert_cl |
| jmp edit_box.editbox_exit |
| xor word ed_flags,ed_insert |
| jmp edit_box.editbox_exit |
| |
| @@: or word ed_flags,ed_insert |
| jmp edit_box.editbox_exit |
| |
| edit_box_key.ins_v: |
| dec dword bp_size |
| sub esi,ecx |
| add esi,ebx |
| mov edi,esi |
| pusha |
| mov edi,ebp |
| mov ebp,ed_pos |
| call edit_box_key.clear_bg |
| popa |
| jmp edit_box_key.In_k |
| dec dword bp_size |
| sub esi,ecx |
| add esi,ebx |
| mov edi,esi |
| pusha |
| mov edi,ebp |
| mov ebp,ed_pos |
| call edit_box_key.clear_bg |
| popa |
| jmp edit_box_key.In_k |
| |
| edit_box_key.delete: |
| mov edx,ed_size |
| mov ecx,ed_pos |
| cmp edx,ecx |
| jg edit_box_key.bac_del |
| test word ed_flags,ed_shift_on |
| jne edit_box_key.del_bac |
| popad |
| ret 4 |
| mov edx,ed_size |
| mov ecx,ed_pos |
| cmp edx,ecx |
| jg edit_box_key.bac_del |
| test word ed_flags,ed_shift_on |
| jne edit_box_key.del_bac |
| popad |
| ret 4 |
| |
| edit_box_key.bac_del: |
| call edit_box_key.del_char |
| jmp edit_box_key.draw_all |
| call edit_box_key.del_char |
| jmp edit_box_key.draw_all |
| |
| edit_box_key.backspace: |
| test word ed_flags,ed_shift_on |
| jne edit_box_key.delete |
| mov ecx,ed_pos |
| test ecx,ecx |
| jnz edit_box_key.del_bac |
| popad |
| ret 4 |
| test word ed_flags,ed_shift_on |
| jne edit_box_key.delete |
| mov ecx,ed_pos |
| test ecx,ecx |
| jnz edit_box_key.del_bac |
| popad |
| ret 4 |
| |
| edit_box_key.del_bac: |
| mov edx,ed_size |
| cmp edx,ecx ;if ed_pos=ed_size |
| je @f |
| dec ecx |
| call edit_box_key.del_char |
| @@: test word ed_flags,ed_shift_on |
| jne edit_box_key.bac_del |
| dec dword ed_pos |
| mov edx,ed_size |
| cmp edx,ecx ;if ed_pos=ed_size |
| je @f |
| dec ecx |
| call edit_box_key.del_char |
| @@: test word ed_flags,ed_shift_on |
| jne edit_box_key.bac_del |
| dec dword ed_pos |
| edit_box_key.draw_all: |
| push edit_box_key.shift |
| test word ed_flags,ed_shift_on |
| je @f |
| movzx eax, word ed_shift_pos |
| mov ebx,ed_size |
| sub ebx,eax |
| mov ed_size,ebx |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| call edit_box.check_offset |
| and word ed_flags,ed_shift_cl |
| jmp edit_box.draw_bg |
| push edit_box_key.shift |
| test word ed_flags,ed_shift_on |
| je @f |
| movzx eax, word ed_shift_pos |
| mov ebx,ed_size |
| sub ebx,eax |
| mov ed_size,ebx |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| call edit_box.check_offset |
| and word ed_flags,ed_shift_cl |
| jmp edit_box.draw_bg |
| |
| @@: dec dword ed_size |
| @@: dec dword ed_size |
| edit_box_key.draw_all2: |
| and word ed_flags,ed_shift_cl |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| call edit_box.check_offset |
| mov ebp,ed_size |
| jmp edit_box_key.clear_bg |
| and word ed_flags,ed_shift_cl |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| call edit_box.check_offset |
| mov ebp,ed_size |
| jmp edit_box_key.clear_bg |
| |
| ;--- ¦ â ª« ¢¨è left --- |
| edit_box_key.left: |
| mov ebx,ed_pos |
| test ebx,ebx |
| jz edit_box_key.sh_st_of |
| or word ed_flags,ed_left_fl |
| call edit_box_key.sh_first_sh |
| dec dword ed_pos |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_enable |
| jmp edit_box.draw_cursor_text |
| mov ebx,ed_pos |
| test ebx,ebx |
| jz edit_box_key.sh_st_of |
| or word ed_flags,ed_left_fl |
| call edit_box_key.sh_first_sh |
| dec dword ed_pos |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_enable |
| jmp edit_box.draw_cursor_text |
| |
| ;--- ¦ â ª« ¢¨è right --- |
| edit_box_key.right: |
| mov ebx,ed_pos |
| cmp ebx,ed_size |
| je edit_box_key.sh_st_of |
| and word ed_flags,ed_right_fl |
| call edit_box_key.sh_first_sh |
| inc dword ed_pos |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_enable |
| jmp edit_box.draw_cursor_text |
| mov ebx,ed_pos |
| cmp ebx,ed_size |
| je edit_box_key.sh_st_of |
| and word ed_flags,ed_right_fl |
| call edit_box_key.sh_first_sh |
| inc dword ed_pos |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_enable |
| jmp edit_box.draw_cursor_text |
| |
| edit_box_key.home: |
| mov ebx,ed_pos |
| test ebx,ebx |
| jz edit_box_key.sh_st_of |
| call edit_box_key.sh_first_sh |
| xor eax,eax |
| mov ed_pos,eax |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_home_end |
| jmp edit_box.draw_cursor_text |
| mov ebx,ed_pos |
| test ebx,ebx |
| jz edit_box_key.sh_st_of |
| call edit_box_key.sh_first_sh |
| xor eax,eax |
| mov ed_pos,eax |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_home_end |
| jmp edit_box.draw_cursor_text |
| |
| ;--- ¦ â ª« ¢¨è end --- |
| edit_box_key.end: |
| mov ebx,ed_pos |
| cmp ebx,ed_size |
| je edit_box_key.sh_st_of |
| call edit_box_key.sh_first_sh |
| mov eax,ed_size |
| mov ed_pos,eax |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_home_end |
| jmp edit_box.draw_cursor_text |
| mov ebx,ed_pos |
| cmp ebx,ed_size |
| je edit_box_key.sh_st_of |
| call edit_box_key.sh_first_sh |
| mov eax,ed_size |
| mov ed_pos,eax |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| call edit_box_key.sh_home_end |
| jmp edit_box.draw_cursor_text |
| ;---------------------------------------- |
| StrInsert: |
| ; SizeOf(TmpBuf) >= StrLen(Src) + StrLen(Dst) + 1 |
| 397,58 → 350,58 |
|---|
| DstMax equ [esp + 4] ; - maximum Dst length(exclude terminating null) |
| SrcCount equ [esp - 4] |
| DstCount equ [esp - 8] |
| TmpBuf equ [esp - 12] ; - temporary buffer |
| mov edi, Src |
| mov ecx, -1 |
| xor eax, eax |
| repne scasb |
| mov eax, -2 |
| sub eax, ecx |
| mov SrcCount, eax |
| mov edi, Dst |
| add edi, Pos |
| mov ecx, -1 |
| xor eax, eax |
| repne scasb |
| mov eax, -2 |
| sub eax, ecx |
| inc eax |
| mov DstCount, eax |
| mov ecx, eax |
| add ecx, SrcCount |
| add ecx, Pos |
| mcall SF_SYS_MISC,SSF_MEM_ALLOC |
| mov TmpBuf, eax |
| mov esi, Dst |
| mov edi, TmpBuf |
| mov ecx, Pos |
| mov edx, ecx |
| rep movsb |
| mov esi, Src |
| mov edi, TmpBuf |
| add edi, Pos |
| mov ecx, SrcCount |
| add edx, ecx |
| rep movsb |
| mov esi, Pos |
| add esi, Dst |
| mov ecx, DstCount |
| add edx, ecx |
| rep movsb |
| mov esi, TmpBuf |
| mov edi, Dst |
| TmpBuf equ [esp - 12] ; - temporary buffer |
| mov edi, Src |
| mov ecx, -1 |
| xor eax, eax |
| repne scasb |
| mov eax, -2 |
| sub eax, ecx |
| mov SrcCount, eax |
| mov edi, Dst |
| add edi, Pos |
| mov ecx, -1 |
| xor eax, eax |
| repne scasb |
| mov eax, -2 |
| sub eax, ecx |
| inc eax |
| mov DstCount, eax |
| mov ecx, eax |
| add ecx, SrcCount |
| add ecx, Pos |
| mcall SF_SYS_MISC,SSF_MEM_ALLOC |
| mov TmpBuf, eax |
| mov esi, Dst |
| mov edi, TmpBuf |
| mov ecx, Pos |
| mov edx, ecx |
| rep movsb |
| mov esi, Src |
| mov edi, TmpBuf |
| add edi, Pos |
| mov ecx, SrcCount |
| add edx, ecx |
| rep movsb |
| mov esi, Pos |
| add esi, Dst |
| mov ecx, DstCount |
| add edx, ecx |
| rep movsb |
| mov esi, TmpBuf |
| mov edi, Dst |
| ; ecx = MIN(edx, DstSize) |
| cmp edx, DstMax |
| sbb ecx, ecx |
| and edx, ecx |
| not ecx |
| and ecx, DstMax |
| add ecx, edx |
| mov eax, ecx ; return total length |
| rep movsb |
| mov ecx, TmpBuf |
| mcall SF_SYS_MISC,SSF_MEM_FREE |
| ret 16 |
| cmp edx, DstMax |
| sbb ecx, ecx |
| and edx, ecx |
| not ecx |
| and ecx, DstMax |
| add ecx, edx |
| mov eax, ecx ; return total length |
| rep movsb |
| mov ecx, TmpBuf |
| mcall SF_SYS_MISC,SSF_MEM_FREE |
| ret 16 |
| restore Dst |
| restore Src |
| restore Pos |
| 458,122 → 411,122 |
|---|
| restore DstCount |
| ;---------------------------------------- |
| edit_box_key.ctrl_x: |
| test word ed_flags,ed_shift_on |
| jz edit_box.editbox_exit |
| push dword 'X' ; this value need below to determine which action is used |
| jmp edit_box_key.ctrl_c.pushed |
| test word ed_flags,ed_shift_on |
| jz edit_box.editbox_exit |
| push dword 'X' ; this value need below to determine which action is used |
| jmp edit_box_key.ctrl_c.pushed |
| |
| edit_box_key.ctrl_c: |
| test word ed_flags,ed_shift_on |
| jz edit_box.editbox_exit |
| push dword 'C' ; this value need below to determine which action is used |
| test word ed_flags,ed_shift_on |
| jz edit_box.editbox_exit |
| push dword 'C' ; this value need below to determine which action is used |
| .pushed: |
| ; add memory area |
| mov ecx,ed_size |
| add ecx,3*4 |
| mcall SF_SYS_MISC,SSF_MEM_ALLOC |
| mov ecx,ed_size |
| add ecx,3*4 |
| mcall SF_SYS_MISC,SSF_MEM_ALLOC |
| ; building the clipboard slot header |
| xor ecx,ecx |
| mov [eax+4],ecx ; type 'text' |
| inc ecx |
| mov [eax+8],ecx ; cp866 text encoding |
| mov ecx,ed_pos |
| movzx ebx,word ed_shift_pos |
| sub ecx,ebx |
| xor ecx,ecx |
| mov [eax+4],ecx ; type 'text' |
| inc ecx |
| mov [eax+8],ecx ; cp866 text encoding |
| mov ecx,ed_pos |
| movzx ebx,word ed_shift_pos |
| sub ecx,ebx |
| .abs: ; make ecx = abs(ecx) |
| neg ecx |
| jl .abs |
| add ecx,3*4 |
| mov [eax],ecx |
| sub ecx,3*4 |
| mov edx,ed_pos |
| movzx ebx,word ed_shift_pos |
| cmp edx,ebx |
| jle @f |
| mov edx,ebx |
| add ecx,3*4 |
| mov [eax],ecx |
| sub ecx,3*4 |
| mov edx,ed_pos |
| movzx ebx,word ed_shift_pos |
| cmp edx,ebx |
| jle @f |
| mov edx,ebx |
| @@: |
| ; copy data |
| mov esi,ed_text |
| add esi,edx |
| push edi |
| mov edi,eax |
| add edi,3*4 |
| cld |
| rep movsb |
| pop edi |
| mov esi,ed_text |
| add esi,edx |
| push edi |
| mov edi,eax |
| add edi,3*4 |
| cld |
| rep movsb |
| pop edi |
| ; put slot to the kernel clipboard |
| mov edx,eax |
| mov ecx,[edx] |
| push eax |
| mcall SF_CLIPBOARD,SSF_WRITE_CB |
| pop ecx |
| mov edx,eax |
| mov ecx,[edx] |
| push eax |
| mcall SF_CLIPBOARD,SSF_WRITE_CB |
| pop ecx |
| ; remove unnecessary memory area |
| mcall SF_SYS_MISC,SSF_MEM_FREE |
| mcall SF_SYS_MISC,SSF_MEM_FREE |
| .exit: |
| pop eax ; determine current action (ctrl+X or ctrl+C) |
| cmp eax, 'X' |
| je edit_box_key.delete |
| jmp edit_box.editbox_exit |
| pop eax ; determine current action (ctrl+X or ctrl+C) |
| cmp eax, 'X' |
| je edit_box_key.delete |
| jmp edit_box.editbox_exit |
| |
| edit_box_key.ctrl_v: |
| mcall SF_CLIPBOARD,SSF_GET_SLOT_COUNT |
| mcall SF_CLIPBOARD,SSF_GET_SLOT_COUNT |
| ; no slots of clipboard ? |
| test eax,eax |
| jz .exit |
| test eax,eax |
| jz .exit |
| ; main list area not found ? |
| inc eax |
| test eax,eax |
| jz .exit |
| sub eax,2 |
| mov ecx,eax |
| mcall SF_CLIPBOARD,SSF_READ_CB |
| inc eax |
| test eax,eax |
| jz .exit |
| sub eax,2 |
| mov ecx,eax |
| mcall SF_CLIPBOARD,SSF_READ_CB |
| ; main list area not found ? |
| inc eax |
| test eax,eax |
| jz .exit |
| inc eax |
| test eax,eax |
| jz .exit |
| ; error ? |
| sub eax,2 |
| test eax,eax |
| jz .exit |
| inc eax |
| sub eax,2 |
| test eax,eax |
| jz .exit |
| inc eax |
| ; check contents of container |
| mov ebx,[eax+4] |
| mov ebx,[eax+4] |
| ; check for text |
| test ebx,ebx |
| jnz .no_valid_text |
| mov ebx,[eax+8] |
| test ebx,ebx |
| jnz .no_valid_text |
| mov ebx,[eax+8] |
| ; check for cp866 |
| cmp bl,1 |
| jnz .no_valid_text |
| cmp bl,1 |
| jnz .no_valid_text |
| ; if something selected then need to delete it |
| test word ed_flags,ed_shift_on |
| jz .selected_done |
| push eax; dummy parameter ; need to |
| push dword .selected_done ; correctly return |
| pushad ; from edit_box_key.delete |
| jmp edit_box_key.delete |
| test word ed_flags,ed_shift_on |
| jz .selected_done |
| push eax; dummy parameter ; need to |
| push dword .selected_done ; correctly return |
| pushad ; from edit_box_key.delete |
| jmp edit_box_key.delete |
| .selected_done: |
| mov ecx,[eax] |
| sub ecx,3*4 |
| push ecx |
| mov ecx,[eax] |
| sub ecx,3*4 |
| push ecx |
| ; in ecx size of string to insert |
| add ecx,ed_size |
| mov edx,ed_max |
| cmp ecx,edx |
| jb @f |
| mov ecx,edx |
| add ecx,ed_size |
| mov edx,ed_max |
| cmp ecx,edx |
| jb @f |
| mov ecx,edx |
| @@: |
| mov esi,eax |
| add esi,3*4 |
| push eax edi |
| mov esi,eax |
| add esi,3*4 |
| push eax edi |
| ;---------------------------------------; |
| mov ed_size,ecx |
| mov ed_size,ecx |
| |
| push dword ed_text ; Dst |
| push esi ; Src |
| push dword ed_pos ; Pos in Dst |
| push dword ed_max ; DstMax |
| call StrInsert |
| push dword ed_text ; Dst |
| push esi ; Src |
| push dword ed_pos ; Pos in Dst |
| push dword ed_max ; DstMax |
| call StrInsert |
| ;---------------------------------------; |
| ; mov edi,ed_text |
| ; cld |
| 589,29 → 542,29 |
|---|
| ; stosb |
| ; dec ecx |
| ; jnz @b |
| pop edi eax |
| ;move cursor to the end of the inserted string |
| pop ecx |
| add ecx,ed_pos |
| cmp ecx,ed_max |
| jbe @f |
| mov ecx,ed_max |
| pop edi eax |
| ;move cursor to the end of the inserted string |
| pop ecx |
| add ecx,ed_pos |
| cmp ecx,ed_max |
| jbe @f |
| mov ecx,ed_max |
| @@: |
| mov ed_pos, ecx |
| .no_valid_text: |
| ; remove unnecessary memory area |
| mov ecx,eax |
| mcall SF_SYS_MISC,SSF_MEM_FREE |
| mov ecx,eax |
| mcall SF_SYS_MISC,SSF_MEM_FREE |
| .exit: |
| jmp edit_box.draw_bg_cursor_text |
| jmp edit_box.draw_bg_cursor_text |
| |
| edit_box_key.ctrl_a: |
| mov eax,ed_size |
| mov ed_pos,eax |
| xor eax,eax |
| mov ed_shift_pos,eax |
| or word ed_flags,ed_shift_bac+ed_shift_on |
| jmp edit_box.draw_bg_cursor_text |
| mov eax,ed_size |
| mov ed_pos,eax |
| xor eax,eax |
| mov ed_shift_pos,eax |
| or word ed_flags,ed_shift_bac+ed_shift_on |
| jmp edit_box.draw_bg_cursor_text |
| |
| ;========================================================== |
| ;=== ®¡à ¡®âª ¬ëè¨ ======================================= |
| 619,127 → 572,127 |
|---|
| ;save for stdcall ebx,esi,edi,ebp |
| align 16 |
| edit_box_mouse: |
| pushad |
| mov edi,[esp+36] |
| test word ed_flags,ed_disabled |
| jnz edit_box.editbox_exit |
| pushad |
| mov edi,[esp+36] |
| test word ed_flags,ed_disabled |
| jnz edit_box.editbox_exit |
| |
| ;---------------------------------------------------------- |
| ;--- ¯®«ãç ¥¬ á®áâ®ï¨¥ ª®¯®ª ¬ëè¨ ----------------------- |
| ;---------------------------------------------------------- |
| mcall SF_MOUSE_GET,SSF_BUTTON |
| mcall SF_MOUSE_GET,SSF_BUTTON |
| ;---------------------------------------------------------- |
| ;--- ¯à®¢¥à塞 á®áâ®ï¨¥ ---------------------------------- |
| ;---------------------------------------------------------- |
| test eax,1 |
| jnz edit_box_mouse.mouse_left_button |
| and word ed_flags,ed_mouse_on_off |
| mov ebx,ed_mouse_variable |
| push 0 |
| pop dword [ebx] |
| jmp edit_box.editbox_exit |
| test eax,1 |
| jnz edit_box_mouse.mouse_left_button |
| and word ed_flags,ed_mouse_on_off |
| mov ebx,ed_mouse_variable |
| push 0 |
| pop dword [ebx] |
| jmp edit_box.editbox_exit |
| |
| .mouse_left_button: |
| ;---------------------------------------------------------- |
| ;--- ¡«®ª¨à®¢ª ®â 䮪ãá¨à®¢ª¨ ¢ ¤àã£¨å ¡®ªá å ¯à¨ ¯®¯ ¤ ¨¨ ¨å ªãàá®à |
| ;---------------------------------------------------------- |
| mov eax,ed_mouse_variable |
| push dword [eax] |
| pop eax |
| test eax,eax |
| jz @f |
| cmp eax,edi |
| je @f |
| jmp edit_box_mouse._blur |
| mov eax,ed_mouse_variable |
| push dword [eax] |
| pop eax |
| test eax,eax |
| jz @f |
| cmp eax,edi |
| je @f |
| jmp edit_box_mouse._blur |
| ;---------------------------------------------------------- |
| ;--- ¯®«ãç ¥¬ ª®®à¤¨ âë ¬ëè¨ ®â®á¨â¥«ì® 0 â.¥ ¢á¥© ®¡« á⨠íªà |
| ;---------------------------------------------------------- |
| @@: |
| mcall SF_MOUSE_GET,SSF_WINDOW_POSITION |
| mcall SF_MOUSE_GET,SSF_WINDOW_POSITION |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;ãªæ¨ï ®¡à ¡®âª¨ ¬ë誨 ¯®«ã票¥ ª®®à¤¨ â ¨ ¯à®¢¥àª ¨å + ¢ë¤¥«¥¨ï |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ; ¥ 㤥ন¢ ¥¬ «¨ ¬ë ª« ¢¨èã ¬ë誨, ¯¥à¥¬¥é ï ªãàá®à? |
| test word ed_flags,ed_mouse_on |
| jne edit_box_mouse.mouse_wigwag |
| test word ed_flags,ed_mouse_on |
| jne edit_box_mouse.mouse_wigwag |
| ; ¯à®¢¥à塞, ¯®¯ ¤ ¥â «¨ ªãàá®à ¢ edit box |
| mov ebx,ed_top |
| cmp ax,bx |
| jl edit_box_mouse._blur |
| add ebx,ed_height |
| cmp ax,bx |
| jg edit_box_mouse._blur |
| shr eax,16 |
| mov ebx,ed_left |
| cmp ax,bx |
| jl edit_box_mouse._blur |
| add ebx,ed_width |
| cmp ax,bx |
| jg edit_box_mouse._blur |
| mov ebx,ed_top |
| cmp ax,bx |
| jl edit_box_mouse._blur |
| add ebx,ed_height |
| cmp ax,bx |
| jg edit_box_mouse._blur |
| shr eax,16 |
| mov ebx,ed_left |
| cmp ax,bx |
| jl edit_box_mouse._blur |
| add ebx,ed_width |
| cmp ax,bx |
| jg edit_box_mouse._blur |
| ; ¨§¬¥ï¥¬ ¯®§¨æ¨î ªãàá®à |
| push eax |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| pop eax |
| push eax |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| pop eax |
| edit_box_mouse._mvpos: |
| xor edx,edx |
| sub eax,ed_left |
| div word ed_char_width |
| add eax,ed_offset |
| cmp eax,ed_size |
| jna edit_box_mouse._mshift |
| mov eax,ed_size |
| xor edx,edx |
| sub eax,ed_left |
| div word ed_char_width |
| add eax,ed_offset |
| cmp eax,ed_size |
| jna edit_box_mouse._mshift |
| mov eax,ed_size |
| edit_box_mouse._mshift: |
| ; ᥪæ¨ï ®¡à ¡®âª¨ shift ¨ ¢ë¤¥«¥¨ï ¯® shift |
| test word ed_flags,ed_shift_bac |
| je @f |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| push eax |
| call edit_box_key.sh_cl_ |
| and word ed_flags,ed_shift_bac_cl |
| pop eax |
| test word ed_flags,ed_shift_bac |
| je @f |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| push eax |
| call edit_box_key.sh_cl_ |
| and word ed_flags,ed_shift_bac_cl |
| pop eax |
| @@: |
| test word ed_flags,ed_mouse_on |
| jne @f |
| mov ed_shift_pos,ax |
| or word ed_flags,ed_mouse_on |
| mov ed_pos,eax |
| mov ebx,ed_mouse_variable |
| push edi |
| pop dword [ebx] |
| bts word ed_flags,1 |
| call edit_box.draw_bg |
| jmp edit_box_mouse.m_sh |
| test word ed_flags,ed_mouse_on |
| jne @f |
| mov ed_shift_pos,ax |
| or word ed_flags,ed_mouse_on |
| mov ed_pos,eax |
| mov ebx,ed_mouse_variable |
| push edi |
| pop dword [ebx] |
| bts word ed_flags,1 |
| call edit_box.draw_bg |
| jmp edit_box_mouse.m_sh |
| |
| @@: cmp ax,ed_shift_pos |
| je edit_box.editbox_exit |
| mov ed_pos,eax |
| call edit_box.draw_bg |
| mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| or word ed_flags,ed_mous_adn_b |
| @@: cmp ax,ed_shift_pos |
| je edit_box.editbox_exit |
| mov ed_pos,eax |
| call edit_box.draw_bg |
| mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| or word ed_flags,ed_mous_adn_b |
| edit_box_mouse.m_sh: |
| call edit_box.draw_text |
| call edit_box.draw_cursor |
| call edit_box.draw_text |
| call edit_box.draw_cursor |
| ; ¯à®æ¥¤ãà ãáâ ®¢ª¨ 䮪ãá |
| jmp edit_box_mouse.drc |
| |
| jmp edit_box_mouse.drc |
| |
| edit_box_mouse._remove_selection: |
| and word ed_flags,ed_shift_cl |
| jmp edit_box.draw_bg_cursor_text |
| and word ed_flags,ed_shift_cl |
| jmp edit_box.draw_bg_cursor_text |
| |
| edit_box_mouse._blur: |
| test word ed_flags,ed_always_focus |
| jne edit_box_mouse._remove_selection |
| btr word ed_flags, bsf ed_focus ;if focused then remove focus, otherwise exit |
| jnc edit_box_mouse._remove_selection |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| test word ed_flags,ed_always_focus |
| jne edit_box_mouse._remove_selection |
| btr word ed_flags, bsf ed_focus ;if focused then remove focus, otherwise exit |
| jnc edit_box_mouse._remove_selection |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| edit_box_mouse.drc: |
| call edit_box.draw_border |
| jmp edit_box_mouse._remove_selection |
| call edit_box.draw_border |
| jmp edit_box_mouse._remove_selection |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;¡é¨¥ äãªæ¨¨ ®¡à ¡®âª¨ |
| 747,52 → 700,52 |
|---|
| ;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ¢ë¤¥«¥®© ç á⨠---------------- |
| ;---------------------------------------------------------- |
| edit_box.draw_shift: |
| test word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« á⨠|
| jz @f |
| mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| @@: ret |
| test word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« á⨠|
| jz @f |
| mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| @@: ret |
| ;---------------------------------------------------------- |
| ;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ⥪áâ -------------------------- |
| ;---------------------------------------------------------- |
| edit_box.draw_text: |
| call edit_box.get_n |
| mov esi,ed_size |
| sub esi,ed_offset |
| cmp eax,esi |
| jae @f |
| mov esi,eax |
| call edit_box.get_n |
| mov esi,ed_size |
| sub esi,ed_offset |
| cmp eax,esi |
| jae @f |
| mov esi,eax |
| @@: |
| test esi,esi |
| jz @f |
| mov eax,SF_DRAW_TEXT |
| mov ebx,ed_left |
| add ebx,2 |
| shl ebx,16 |
| add ebx,ed_top |
| add ebx,3 |
| mov ecx,ed_text_color |
| test dword ed_flags,ed_pass |
| jnz .password |
| mov edx,ed_text |
| add edx,ed_offset |
| mcall |
| test esi,esi |
| jz @f |
| mov eax,SF_DRAW_TEXT |
| mov ebx,ed_left |
| add ebx,2 |
| shl ebx,16 |
| add ebx,ed_top |
| add ebx,3 |
| mov ecx,ed_text_color |
| test dword ed_flags,ed_pass |
| jnz .password |
| mov edx,ed_text |
| add edx,ed_offset |
| mcall |
| @@: |
| ret |
| ret |
| |
| .password: |
| mov ebp,esi |
| mov esi,1 |
| mov edx,txt_pass |
| mov ebp,esi |
| mov esi,1 |
| mov edx,txt_pass |
| @@: |
| mcall |
| rol ebx,16 |
| add ebx,ed_char_width |
| rol ebx,16 |
| dec ebp |
| jnz @b |
| ret |
| mcall |
| rol ebx,16 |
| add ebx,ed_char_width |
| rol ebx,16 |
| dec ebp |
| jnz @b |
| ret |
| |
| txt_pass db '*' |
| ;---------------------------------------------------------- |
| 799,32 → 752,32 |
|---|
| ;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ä® ---------------------------- |
| ;---------------------------------------------------------- |
| edit_box.draw_bg: |
| mov ebx,ed_left |
| inc ebx |
| shl ebx,16 |
| add ebx,ed_width |
| dec ebx |
| mov edx,ed_color |
| test word ed_flags, ed_disabled |
| jz edit_box.draw_bg_eax |
| mov edx, 0xCACACA ; TODO: add disabled_color field to editbox struct |
| mov ebx,ed_left |
| inc ebx |
| shl ebx,16 |
| add ebx,ed_width |
| dec ebx |
| mov edx,ed_color |
| test word ed_flags, ed_disabled |
| jz edit_box.draw_bg_eax |
| mov edx, 0xCACACA ; TODO: add disabled_color field to editbox struct |
| edit_box.draw_bg_eax: |
| mov ecx,ed_top |
| inc ecx |
| shl ecx,16 |
| add ecx,ed_height |
| mcall SF_DRAW_RECT |
| ret |
| mov ecx,ed_top |
| inc ecx |
| shl ecx,16 |
| add ecx,ed_height |
| mcall SF_DRAW_RECT |
| ret |
| |
| ;---------------------------------------------------------- |
| ;--- ¯à®æ¥¤ãà ¯®«ãç¥¨ï ª®«¨ç¥á⢠ᨬ¢®«®¢ ¢ ⥪ã饩 è¨à¨¥ ª®¬¯®¥â |
| ;---------------------------------------------------------- |
| edit_box.get_n: |
| mov eax,ed_width |
| sub eax,4 |
| xor edx,edx |
| div word ed_char_width |
| ret |
| mov eax,ed_width |
| sub eax,4 |
| xor edx,edx |
| div word ed_char_width |
| ret |
| |
| ;---------------------------------------------------------- |
| ;------------------ Draw Cursor Procedure ----------------- |
| 831,75 → 784,79 |
|---|
| ;---------------------------------------------------------- |
| ; in: ebp = Color |
| edit_box.clear_cursor: |
| movzx ebx, word cl_curs_x |
| cmp ebx, ed_left ;¯®¯ ¤ ¥â «¨ ªãàá®à ⥪á⮢®¥ ¯®«¥? |
| jle @f |
| mov edx, ebp |
| movzx ecx, word cl_curs_y |
| cmp ecx, ed_top |
| jg edit_box.draw_curs |
| movzx ebx, word cl_curs_x |
| cmp ebx, ed_left ;¯®¯ ¤ ¥â «¨ ªãàá®à ⥪á⮢®¥ ¯®«¥? |
| jle @f |
| mov edx, ebp |
| movzx ecx, word cl_curs_y |
| cmp ecx, ed_top |
| jg edit_box.draw_curs |
| @@: |
| ret |
| ret |
| |
| edit_box.draw_cursor: |
| mov edx, ed_text_color |
| mov eax, ed_pos |
| sub eax, ed_offset |
| mul dword ed_char_width |
| mov ebx, eax |
| add ebx, ed_left |
| inc ebx |
| mov ecx, ed_top |
| add ecx, 2 |
| mov cl_curs_x, bx |
| mov cl_curs_y, cx |
| mov edx, ed_text_color |
| mov eax, ed_pos |
| sub eax, ed_offset |
| mul dword ed_char_width |
| mov ebx, eax |
| add ebx, ed_left |
| inc ebx |
| mov ecx, ed_top |
| add ecx, 2 |
| mov cl_curs_x, bx |
| mov cl_curs_y, cx |
| edit_box.draw_curs: |
| mov eax, ebx |
| shl ebx, 16 |
| or ebx, eax |
| mov eax, ecx |
| shl ecx, 16 |
| or ecx, eax |
| add ecx, ed_height |
| sub ecx, 3 |
| mcall SF_DRAW_LINE |
| ret |
| mov eax, ebx |
| shl ebx, 16 |
| or ebx, eax |
| mov eax, ecx |
| shl ecx, 16 |
| or ecx, eax |
| add ecx, ed_height |
| sub ecx, 3 |
| mcall SF_DRAW_LINE |
| ret |
| |
| ;---------------------------------------------------------- |
| ;--- ¯à®æ¥¤ãà à¨á®¢ ¨ï à ¬ª¨ ---------------------------- |
| ;---------------------------------------------------------- |
| edit_box.draw_border: |
| test word ed_flags,ed_focus |
| mov edx,ed_focus_border_color |
| jne @f |
| mov edx,ed_blur_border_color |
| test word ed_flags,ed_focus |
| mov edx,ed_focus_border_color |
| jne @f |
| mov edx,ed_blur_border_color |
| @@: |
| mov ebx,ed_left |
| mov ecx,ebx |
| shl ebx,16 |
| add ebx,ecx |
| add ebx,ed_width |
| mov ecx,ed_top |
| mov esi,ecx |
| shl ecx,16 |
| add ecx,esi |
| mcall SF_DRAW_LINE ; top |
| mov esi,ecx |
| inc ecx |
| add ecx,ed_height |
| mov ebp,ecx |
| shl ecx,16 |
| mov cx,bp |
| mcall ; bottom |
| mov cx,si |
| mov ebp,ebx |
| sub ebx,ed_width |
| mcall ; left |
| mov ebx,ebp |
| shl ebx,16 |
| mov bx,bp |
| mcall ; right |
| ret |
| ;mov edx,$808080 |
| mov ebx,ed_left |
| mov eax,ebx |
| shl ebx,16 |
| add ebx,eax |
| ;add ebx,ed_width |
| mov ecx,ed_top |
| mov eax,ecx |
| shl ecx,16 |
| add ecx,eax |
| push ecx |
| inc ecx |
| add ecx,ed_height |
| mcall SF_DRAW_LINE ; left |
| xchg ecx,[esp] |
| add ebx,ed_width |
| mcall ; top |
| ;or edx,-1 |
| pop ecx |
| push cx |
| push cx |
| push ebx |
| push bx |
| push bx |
| pop ebx |
| mcall ; right |
| pop ebx |
| pop ecx |
| mcall ; bottom |
| ret |
| |
| ;---------------------------------------------------------- |
| ;--- ¯à®¢¥àª , § 襫 «¨ ªãàá®à § £à ¨æë ¨, ¥á«¨ ¤®, --- |
| 909,78 → 866,78 |
|---|
| ; ¢ ®¡é¥© ¡¨â®¢®© ¬ âà¨æ¥ á®áâ®ï¨ï ª®¬¯®¥â®¢ word ed_flags |
| ;---------------------------------------------------------- |
| edit_box.check_offset: |
| pushad |
| mov ecx,ed_pos |
| mov ebx,ed_offset |
| cmp ebx,ecx |
| ja edit_box.sub_8 |
| push ebx |
| call edit_box.get_n |
| pop ebx |
| mov edx,ebx |
| add edx,eax |
| inc edx ;¥®¡å®¤¨¬® ¤«ï ®à¬ «ì®£® ¯®«®¦¥¨ï ªãàá®à ¢ ªà ©¥© «¥¢®© ¯®§¨æ¨¨ |
| cmp edx,ecx |
| ja @f |
| mov edx,ed_size |
| cmp edx,ecx |
| je edit_box.add_end |
| sub edx,ecx |
| cmp edx,8 |
| jbe edit_box.add_8 |
| add ebx,8 |
| jmp edit_box.chk_d |
| pushad |
| mov ecx,ed_pos |
| mov ebx,ed_offset |
| cmp ebx,ecx |
| ja edit_box.sub_8 |
| push ebx |
| call edit_box.get_n |
| pop ebx |
| mov edx,ebx |
| add edx,eax |
| inc edx ;¥®¡å®¤¨¬® ¤«ï ®à¬ «ì®£® ¯®«®¦¥¨ï ªãàá®à ¢ ªà ©¥© «¥¢®© ¯®§¨æ¨¨ |
| cmp edx,ecx |
| ja @f |
| mov edx,ed_size |
| cmp edx,ecx |
| je edit_box.add_end |
| sub edx,ecx |
| cmp edx,8 |
| jbe edit_box.add_8 |
| add ebx,8 |
| jmp edit_box.chk_d |
| |
| @@: or word ed_flags,ed_offset_fl |
| popad |
| ret |
| @@: or word ed_flags,ed_offset_fl |
| popad |
| ret |
| |
| edit_box.sub_8: |
| test ecx,ecx |
| jz @f |
| sub ebx,8 ;ebx=ed_offset |
| ja edit_box.chk_d |
| test ecx,ecx |
| jz @f |
| sub ebx,8 ;ebx=ed_offset |
| ja edit_box.chk_d |
| @@: |
| xor ebx,ebx |
| jmp edit_box.chk_d |
| xor ebx,ebx |
| jmp edit_box.chk_d |
| |
| edit_box.add_end: |
| sub edx,eax |
| mov ebx,edx |
| jmp edit_box.chk_d |
| sub edx,eax |
| mov ebx,edx |
| jmp edit_box.chk_d |
| |
| edit_box.add_8: |
| add ebx,edx |
| add ebx,edx |
| edit_box.chk_d: |
| mov ed_offset,ebx |
| call edit_box.draw_bg |
| and word ed_flags,ed_offset_cl |
| popad |
| ret |
| mov ed_offset,ebx |
| call edit_box.draw_bg |
| and word ed_flags,ed_offset_cl |
| popad |
| ret |
| |
| align 4 |
| proc edit_box_set_text, edit:dword, text:dword |
| pushad |
| mov edi,[edit] |
| mov ecx,ed_max |
| inc ecx |
| mov edi,[text] |
| xor al,al |
| cld |
| repne scasb |
| mov ecx,edi |
| mov edi,[edit] |
| mov esi,[text] |
| sub ecx,esi |
| dec ecx |
| mov ed_size,ecx |
| mov ed_pos,ecx |
| and word ed_flags,ed_shift_cl |
| mov edi,ed_text |
| repne movsb |
| mov byte[edi],0 |
| popad |
| ret |
| pushad |
| mov edi,[edit] |
| mov ecx,ed_max |
| inc ecx |
| mov edi,[text] |
| xor al,al |
| cld |
| repne scasb |
| mov ecx,edi |
| mov edi,[edit] |
| mov esi,[text] |
| sub ecx,esi |
| dec ecx |
| mov ed_size,ecx |
| mov ed_pos,ecx |
| and word ed_flags,ed_shift_cl |
| mov edi,ed_text |
| repne movsb |
| mov byte[edi],0 |
| popad |
| ret |
| endp |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 989,306 → 946,306 |
|---|
| |
| ;¡à ¡®âª Shift ¤«ï áïâ¨ï ¢ë¤¥«¥¨ï ¥¨§¢¥á⮩ ®¡« á⨠|
| edit_box_key.shift: |
| call edit_box.draw_bg |
| test word ed_flags,ed_shift |
| je edit_box_key.f_exit |
| mov ebp,shift_color |
| or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« á⨠|
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| jmp edit_box.draw_cursor_text |
| call edit_box.draw_bg |
| test word ed_flags,ed_shift |
| je edit_box_key.f_exit |
| mov ebp,shift_color |
| or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« á⨠|
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| jmp edit_box.draw_cursor_text |
| |
| edit_box_key.f_exit: |
| call edit_box.check_offset |
| and word ed_flags,ed_shift_cl |
| call edit_box_key.enable_null |
| jmp edit_box.draw_cursor_text |
| call edit_box.check_offset |
| and word ed_flags,ed_shift_cl |
| call edit_box_key.enable_null |
| jmp edit_box.draw_cursor_text |
| |
| edit_box_key.sh_cl_: |
| ;®¡à ¡®âª ®ç¨á⪨, ¯à¨ «¥¢®¬ - ¯à ¢®¬ ¤¢¨¦¥¨¨ ¢ë¤¥«¥¨ï |
| ;¤«ï ®¡à ¡®âª¨ áïâ¨ï ¢ë¤¥«¥¨ï |
| ;¢å®¤ë¥ ¯ à ¬¥âàë ebp=color ebx=ed_shift_pos |
| mov eax,ed_pos |
| cmp eax,ebx |
| jae edit_box_key.sh_n |
| push eax ;¬¥ì襥 ¢ eax |
| push ebx ;¡®«ì襥 |
| jmp edit_box_key.sh_n1 |
| mov eax,ed_pos |
| cmp eax,ebx |
| jae edit_box_key.sh_n |
| push eax ;¬¥ì襥 ¢ eax |
| push ebx ;¡®«ì襥 |
| jmp edit_box_key.sh_n1 |
| |
| edit_box_key.sh_n: |
| push ebx |
| push eax |
| push ebx |
| push eax |
| edit_box_key.sh_n1: |
| call edit_box.check_offset |
| call edit_box.get_n |
| mov edx,eax ;size of ed_box |
| mov ecx,ed_offset |
| add eax,ecx ;eax = w_off= ed_offset+width |
| mov edx,eax ;save |
| pop ebx ;¡®«ì襥 |
| pop eax ;¬¥ì襥 |
| cmp eax,ecx ;áà ¢¥¨¥ ¬¥ì襣® á offset. |
| jae edit_box_key.f_f ;¥á«¨ ¡®«ìè¥ |
| xor eax,eax |
| cmp edx,ebx ;cà ¢¨¬ à §¬¥à w_off á ¡®«ì訬 |
| jnb @f |
| mov ebx,edx |
| call edit_box.check_offset |
| call edit_box.get_n |
| mov edx,eax ;size of ed_box |
| mov ecx,ed_offset |
| add eax,ecx ;eax = w_off= ed_offset+width |
| mov edx,eax ;save |
| pop ebx ;¡®«ì襥 |
| pop eax ;¬¥ì襥 |
| cmp eax,ecx ;áà ¢¥¨¥ ¬¥ì襣® á offset. |
| jae edit_box_key.f_f ;¥á«¨ ¡®«ìè¥ |
| xor eax,eax |
| cmp edx,ebx ;cà ¢¨¬ à §¬¥à w_off á ¡®«ì訬 |
| jnb @f |
| mov ebx,edx |
| @@: |
| sub ebx,ecx |
| jmp edit_box_key.nxt_f |
| sub ebx,ecx |
| jmp edit_box_key.nxt_f |
| |
| edit_box_key.f_f: |
| sub eax,ecx |
| cmp edx,ebx ;cà ¢¨¬ à §¬¥à w_off á ¡®«ì訬 |
| jle @f |
| sub ebx,ecx |
| sub ebx,eax |
| jmp edit_box_key.nxt_f |
| sub eax,ecx |
| cmp edx,ebx ;cà ¢¨¬ à §¬¥à w_off á ¡®«ì訬 |
| jle @f |
| sub ebx,ecx |
| sub ebx,eax |
| jmp edit_box_key.nxt_f |
| |
| @@: mov ebx,edx |
| sub ebx,ecx |
| sub ebx,eax |
| @@: mov ebx,edx |
| sub ebx,ecx |
| sub ebx,eax |
| edit_box_key.nxt_f: |
| mul dword ed_char_width |
| xchg eax,ebx |
| mul dword ed_char_width |
| add ebx,ed_left |
| inc ebx |
| shl ebx,16 |
| inc eax |
| mov bx, ax |
| mov edx,ebp ;shift_color |
| call edit_box.draw_bg_eax |
| jmp edit_box_key.enable_null |
| mul dword ed_char_width |
| xchg eax,ebx |
| mul dword ed_char_width |
| add ebx,ed_left |
| inc ebx |
| shl ebx,16 |
| inc eax |
| mov bx, ax |
| mov edx,ebp ;shift_color |
| call edit_box.draw_bg_eax |
| jmp edit_box_key.enable_null |
| |
| ;áâ ®¢ª - áï⨥ ¢ë¤¥«¥¨ï ¢ ®¤¨ ᨬ¢®« |
| edit_box_key.drw_sim: |
| mov eax,ed_pos |
| call edit_box_key.draw_rectangle |
| jmp edit_box_key.enable_null |
| mov eax,ed_pos |
| call edit_box_key.draw_rectangle |
| jmp edit_box_key.enable_null |
| |
| ;ãªæ¨ï ãáâ ®¢ª¨ ¢ë¤¥«¥¨ï ¯à¨ ¤¢¨¦¥¨¨ ¢«¥¢® ¨ ¢¯à ¢® ¨ ¦ ⨨ shift |
| edit_box_key.draw_wigwag: |
| mov ebp,shift_color |
| call edit_box.clear_cursor |
| or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ ¢ë¤¥«¥®© ®¡« á⨠|
| mov ebp,shift_color |
| mov eax,ed_pos |
| test word ed_flags,ed_left_fl |
| jnz edit_box_key.draw_rectangle |
| dec eax |
| jmp edit_box_key.draw_rectangle |
| mov ebp,shift_color |
| call edit_box.clear_cursor |
| or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ ¢ë¤¥«¥®© ®¡« á⨠|
| mov ebp,shift_color |
| mov eax,ed_pos |
| test word ed_flags,ed_left_fl |
| jnz edit_box_key.draw_rectangle |
| dec eax |
| jmp edit_box_key.draw_rectangle |
| |
| ;ãªæ¨ï 㤠«¥¨ï ¢ë¤¥«¥¨ï ¯à¨ ¤¢¨¦¥¨¨ ¢«¥¢® ¨ ¢¯à ¢® ¨ ¦ ⨨ shift |
| edit_box_key.draw_wigwag_cl: |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| mov ebp,ed_color |
| mov eax,ed_pos |
| test word ed_flags,ed_left_fl |
| jnz edit_box_key.draw_rectangle |
| dec eax |
| jmp edit_box_key.draw_rectangle |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| mov ebp,ed_color |
| mov eax,ed_pos |
| test word ed_flags,ed_left_fl |
| jnz edit_box_key.draw_rectangle |
| dec eax |
| jmp edit_box_key.draw_rectangle |
| |
| ;¢å®¤®© ¯ à ¬¥âà ebx - ed_pos |
| edit_box_key.sh_first_sh: |
| test word ed_flags,ed_shift |
| je @f |
| mov ed_shift_pos_old,bx |
| test word ed_flags,ed_shift_on |
| jne @f |
| mov ed_shift_pos,bx |
| or word ed_flags,ed_shift_on |
| @@: ret |
| test word ed_flags,ed_shift |
| je @f |
| mov ed_shift_pos_old,bx |
| test word ed_flags,ed_shift_on |
| jne @f |
| mov ed_shift_pos,bx |
| or word ed_flags,ed_shift_on |
| @@: ret |
| ;¡à ¡®âª ªà ©¨å ¯®«®¦¥¨© ¢ editbox ¯à¨ ¦ ⮬ shift |
| ;¯à®¨§¢®¤¨â áï⨥ ¢ë¤¥«¥¨ï, ¥á«¨ ¥â shift |
| ;¨ ç¥ ¢®®¡é¥ ¢ë室¨â |
| edit_box_key.sh_st_of: |
| test word ed_flags,ed_shift |
| jne @f |
| test word ed_flags,ed_shift_bac |
| je @f |
| call edit_box.draw_bg |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ ;®ç¨á⪠¢ë¤¥«¥®£® äà £¬¥â |
| and word ed_flags,ed_shift_cl ; ®ç¨á⪠®â ⮣®, çâ® ã¡à «¨ ¢ë¤¥«¥¨¥ |
| jmp edit_box.draw_cursor_text |
| test word ed_flags,ed_shift |
| jne @f |
| test word ed_flags,ed_shift_bac |
| je @f |
| call edit_box.draw_bg |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ ;®ç¨á⪠¢ë¤¥«¥®£® äà £¬¥â |
| and word ed_flags,ed_shift_cl ; ®ç¨á⪠®â ⮣®, çâ® ã¡à «¨ ¢ë¤¥«¥¨¥ |
| jmp edit_box.draw_cursor_text |
| |
| @@: and word ed_flags,ed_shift_off |
| popad |
| ret 4 |
| @@: and word ed_flags,ed_shift_off |
| popad |
| ret 4 |
| ;¯à®¢¥àª á®áâ®ï¨ï shift, ¡ë« «¨ ® ¦ â à ìè¥? |
| edit_box_key.sh_enable: |
| test word ed_flags,ed_shift |
| jne edit_box_key.sh_ext_en ; à¨á®¢ âì § ªà è¥ë© ¯àאַ㣮«ì¨ª |
| test word ed_flags,ed_shift_bac |
| je @f |
| call edit_box.check_offset |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ ;®ç¨á⪠¢ë¤¥«¥®£® äà £¬¥â |
| call edit_box_key.draw_wigwag_cl |
| and word ed_flags,ed_shift_cl ; 1¢ à ¥ 㦮 |
| ret |
| test word ed_flags,ed_shift |
| jne edit_box_key.sh_ext_en ; à¨á®¢ âì § ªà è¥ë© ¯àאַ㣮«ì¨ª |
| test word ed_flags,ed_shift_bac |
| je @f |
| call edit_box.check_offset |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ ;®ç¨á⪠¢ë¤¥«¥®£® äà £¬¥â |
| call edit_box_key.draw_wigwag_cl |
| and word ed_flags,ed_shift_cl ; 1¢ à ¥ 㦮 |
| ret |
| |
| @@: mov ebp,ed_color |
| call edit_box.clear_cursor |
| jmp edit_box.check_offset |
| @@: mov ebp,ed_color |
| call edit_box.clear_cursor |
| jmp edit_box.check_offset |
| |
| edit_box_key.sh_ext_en: |
| call edit_box.check_offset |
| test word ed_flags,ed_offset_fl |
| je @f |
| call edit_box.check_offset |
| test word ed_flags,ed_offset_fl |
| je @f |
| ;¨á®¢ ¨¥ § ªà è¥ëå ¯àאַ㣮«ì¨ª®¢ ¨ ¨å ®ç¨á⪠|
| movzx eax, word ed_shift_pos |
| mov ebx,ed_pos |
| movzx ecx, word ed_shift_pos_old |
| movzx eax, word ed_shift_pos |
| mov ebx,ed_pos |
| movzx ecx, word ed_shift_pos_old |
| ;¯à®¢¥àª ¨ à¨á®¢ ¨¥ § ªà è¥ëå ®¡« á⥩ |
| cmp eax,ecx |
| je edit_box_key.1_shem |
| jb edit_box_key.smaller |
| cmp ecx,ebx |
| ja edit_box_key.1_shem |
| call edit_box_key.draw_wigwag_cl ;clear |
| jmp edit_box_key.sh_e_end |
| cmp eax,ecx |
| je edit_box_key.1_shem |
| jb edit_box_key.smaller |
| cmp ecx,ebx |
| ja edit_box_key.1_shem |
| call edit_box_key.draw_wigwag_cl ;clear |
| jmp edit_box_key.sh_e_end |
| |
| edit_box_key.smaller: |
| cmp ecx,ebx |
| jb edit_box_key.1_shem |
| call edit_box_key.draw_wigwag_cl ;clear |
| jmp edit_box_key.sh_e_end |
| cmp ecx,ebx |
| jb edit_box_key.1_shem |
| call edit_box_key.draw_wigwag_cl ;clear |
| jmp edit_box_key.sh_e_end |
| |
| edit_box_key.1_shem: |
| call edit_box_key.draw_wigwag |
| call edit_box_key.draw_wigwag |
| edit_box_key.sh_e_end: |
| and word ed_flags,ed_shift_off |
| ret |
| and word ed_flags,ed_shift_off |
| ret |
| |
| @@: mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| jmp edit_box_key.sh_e_end |
| @@: mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| jmp edit_box_key.sh_e_end |
| ;äãªæ¨ï ¤«ï ®¡à ¡®âª¨ shift ¯à¨ ¦ ⨨ home and end |
| edit_box_key.sh_home_end: |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| test word ed_flags,ed_shift_bac |
| je @f |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos_old |
| call edit_box_key.sh_cl_ |
| mov ebp,ed_color |
| call edit_box.clear_cursor |
| test word ed_flags,ed_shift_bac |
| je @f |
| mov ebp,ed_color |
| movzx ebx, word ed_shift_pos_old |
| call edit_box_key.sh_cl_ |
| @@: |
| test word ed_flags,ed_shift |
| je edit_box_key.sh_exit_ ;¢ë©â¨ |
| mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« á⨠|
| jmp edit_box_key.sh_e_end |
| test word ed_flags,ed_shift |
| je edit_box_key.sh_exit_ ;¢ë©â¨ |
| mov ebp,shift_color |
| movzx ebx, word ed_shift_pos |
| call edit_box_key.sh_cl_ |
| or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« á⨠|
| jmp edit_box_key.sh_e_end |
| |
| edit_box_key.sh_exit_: |
| call edit_box.draw_bg |
| jmp edit_box.check_offset |
| call edit_box.draw_bg |
| jmp edit_box.check_offset |
| |
| ;äãªæ¨ï ¢¥á¥¨ï 0 ¯® ¤à¥áã ed_size+1 |
| edit_box_key.enable_null: |
| pusha |
| mov eax,ed_size |
| mov ebx,ed_text |
| test eax,eax |
| add eax,ebx |
| jne @f |
| inc eax |
| @@: xor ebx,ebx |
| mov [eax],bl |
| popad |
| ret |
| pusha |
| mov eax,ed_size |
| mov ebx,ed_text |
| test eax,eax |
| add eax,ebx |
| jne @f |
| inc eax |
| @@: xor ebx,ebx |
| mov [eax],bl |
| popad |
| ret |
| |
| ;- 㤠«¥¨¥ ᨬ¢®« |
| ;å®¤ë¥ ¤ ë¥ edx=ed_size;ecx=ed_pos |
| edit_box_key.del_char: |
| mov esi,ed_text |
| test word ed_flags,ed_shift_on |
| je @f |
| movzx eax, word ed_shift_pos |
| mov ebx,esi |
| cmp eax,ecx |
| jae edit_box_key.dh_n |
| mov ed_pos,eax ;çâ®¡ë ¥ ¡ë«® ã¡¥£ ¨ï ªãàá®à |
| mov ebp,ecx |
| sub ebp,eax |
| add ebx,eax ;eax ¬¥ìè¥ |
| sub edx,ecx |
| add esi,ecx |
| mov ed_shift_pos,bp |
| jmp edit_box_key.del_ch_sh |
| mov esi,ed_text |
| test word ed_flags,ed_shift_on |
| je @f |
| movzx eax, word ed_shift_pos |
| mov ebx,esi |
| cmp eax,ecx |
| jae edit_box_key.dh_n |
| mov ed_pos,eax ;çâ®¡ë ¥ ¡ë«® ã¡¥£ ¨ï ªãàá®à |
| mov ebp,ecx |
| sub ebp,eax |
| add ebx,eax ;eax ¬¥ìè¥ |
| sub edx,ecx |
| add esi,ecx |
| mov ed_shift_pos,bp |
| jmp edit_box_key.del_ch_sh |
| |
| edit_box_key.dh_n: |
| mov ebp,eax |
| sub ebp,ecx |
| add ebx,ecx |
| sub edx,eax |
| add esi,eax |
| mov ed_shift_pos,bp |
| jmp edit_box_key.del_ch_sh |
| mov ebp,eax |
| sub ebp,ecx |
| add ebx,ecx |
| sub edx,eax |
| add esi,eax |
| mov ed_shift_pos,bp |
| jmp edit_box_key.del_ch_sh |
| |
| @@: add esi,ecx ;㪠§ ⥫ì + ᬥ饨¥ ª ॠ«ì®¬ã ¡ãä¥àã |
| mov ebx,esi |
| inc esi |
| cld |
| sub edx,ecx |
| @@: add esi,ecx ;㪠§ ⥫ì + ᬥ饨¥ ª ॠ«ì®¬ã ¡ãä¥àã |
| mov ebx,esi |
| inc esi |
| cld |
| sub edx,ecx |
| edit_box_key.del_ch_sh: |
| push edi |
| mov edi,ebx |
| push edi |
| mov edi,ebx |
| @@: |
| lodsb |
| stosb |
| dec edx |
| jns @b |
| pop edi |
| ret |
| lodsb |
| stosb |
| dec edx |
| jns @b |
| pop edi |
| ret |
| ;¢ëç¨á«¨âì § ªà 訢 ¥¬ãî ®¡« áâì |
| ;ᮣ« 襨¥ ¢ ebp - ¯¥à¥¤ ¥âáï ed_size |
| edit_box_key.clear_bg: |
| call edit_box.get_n ;¯®«ãç¨âì à §¬¥à ¢ ᨬ¢®« å è¨à¨ë ª®¬¯®¥â |
| push eax |
| mov ebx,ed_offset |
| add eax,ebx ;eax = w_off= ed_offset+width |
| mov ebx,ebp ;ed_size |
| cmp eax,ebx |
| jb @f |
| mov eax,ed_pos |
| sub ebx,eax |
| mov ecx,ed_offset |
| sub eax,ecx |
| jmp edit_box_key.nxt |
| call edit_box.get_n ;¯®«ãç¨âì à §¬¥à ¢ ᨬ¢®« å è¨à¨ë ª®¬¯®¥â |
| push eax |
| mov ebx,ed_offset |
| add eax,ebx ;eax = w_off= ed_offset+width |
| mov ebx,ebp ;ed_size |
| cmp eax,ebx |
| jb @f |
| mov eax,ed_pos |
| sub ebx,eax |
| mov ecx,ed_offset |
| sub eax,ecx |
| jmp edit_box_key.nxt |
| |
| @@: mov ebx,ed_pos |
| push ebx |
| sub eax,ebx |
| mov ebx,eax ;It is not optimal |
| pop eax ;ed_pos |
| mov ecx,ed_offset |
| sub eax,ecx |
| @@: mov ebx,ed_pos |
| push ebx |
| sub eax,ebx |
| mov ebx,eax ;It is not optimal |
| pop eax ;ed_pos |
| mov ecx,ed_offset |
| sub eax,ecx |
| edit_box_key.nxt: |
| mov ebp,eax ;¯à®¢¥àª ¢ë室 § ªà 訢 ¥¬®© ®¡« á⨠§ ¯à¥¤¥«ë ¤«¨ë |
| add ebp,ebx |
| pop edx |
| cmp ebp,edx |
| je @f |
| inc ebx |
| mov ebp,eax ;¯à®¢¥àª ¢ë室 § ªà 訢 ¥¬®© ®¡« á⨠§ ¯à¥¤¥«ë ¤«¨ë |
| add ebp,ebx |
| pop edx |
| cmp ebp,edx |
| je @f |
| inc ebx |
| @@: |
| mul dword ed_char_width |
| xchg eax,ebx |
| mul dword ed_char_width |
| add ebx,ed_left |
| inc ebx |
| shl ebx,16 |
| inc eax |
| mov bx, ax |
| mov edx,ed_color |
| jmp edit_box.draw_bg_eax |
| mul dword ed_char_width |
| xchg eax,ebx |
| mul dword ed_char_width |
| add ebx,ed_left |
| inc ebx |
| shl ebx,16 |
| inc eax |
| mov bx, ax |
| mov edx,ed_color |
| jmp edit_box.draw_bg_eax |
| |
| ;;;;;;;;;;;;;;;;;;; |
| ;;; ¡à ¡®âª ¯à¨¬¨â¨¢®¢ |
| 1298,122 → 1255,99 |
|---|
| ;eax=dword ed_pos |
| ;ebp=-梥â ed_color or shift_color |
| edit_box_key.draw_rectangle: |
| sub eax,ed_offset |
| mul dword ed_char_width |
| add eax,ed_left |
| inc eax |
| shl eax,16 |
| add eax,ed_char_width |
| mov ebx,eax |
| mov edx,ebp |
| jmp edit_box.draw_bg_eax |
| sub eax,ed_offset |
| mul dword ed_char_width |
| add eax,ed_left |
| inc eax |
| shl eax,16 |
| add eax,ed_char_width |
| mov ebx,eax |
| mov edx,ebp |
| jmp edit_box.draw_bg_eax |
| |
| ;;;;;;;;;;;;;;;;;; |
| ;;஢¥àª ¦ â «¨ shift |
| ;;;;;;;;;;;;;;;;;; |
| edit_box_key.check_shift_ctrl_alt: |
| pusha |
| mcall SF_KEYBOARD,SSF_GET_CONTROL_KEYS |
| test al,11b |
| je @f |
| or word ed_flags,ed_shift ;ãáâ ®¢¨¬ ä« £ Shift |
| @@: |
| and word ed_flags,ed_ctrl_off ; ®ç¨á⨬ ä« £ Ctrl |
| test al,1100b |
| je @f |
| or word ed_flags,ed_ctrl_on ;ãáâ ®¢¨¬ ä« £ Ctrl |
| @@: |
| and word ed_flags,ed_alt_off ; ®ç¨á⨬ ä« £ Alt |
| test al,110000b |
| je @f |
| or word ed_flags,ed_alt_on ;ãáâ ®¢¨¬ ä« £ Alt |
| @@: |
| popad |
| ret |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;ãªæ¨¨ ¤«ï à ¡®âë á mouse |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| edit_box_mouse.mouse_wigwag: |
| push eax |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| pop eax |
| or word ed_flags,ed_shift_bac+ed_shift_on+ed_shift |
| push eax |
| call edit_box.draw_bg |
| call edit_box.draw_shift |
| pop eax |
| or word ed_flags,ed_shift_bac+ed_shift_on+ed_shift |
| ;¡à ¡®âª ¯®«®¦¥¨ï ¢ë¤¥«¥®£® ⥪áâ , ª®£¤ ¯à®¨á室¨â ¢ë室 § ¯à¥¤¥«ë editbox |
| test eax,eax |
| js edit_box_mouse.mleft |
| shr eax,16 |
| sub eax,ed_left |
| jc edit_box_mouse.mleft |
| cmp ed_width,eax |
| jc edit_box_mouse.mright |
| xor edx,edx |
| div word ed_char_width |
| test eax,eax |
| js edit_box_mouse.mleft |
| shr eax,16 |
| sub eax,ed_left |
| jc edit_box_mouse.mleft |
| cmp ed_width,eax |
| jc edit_box_mouse.mright |
| xor edx,edx |
| div word ed_char_width |
| ;¡à ¡®âª ¯®«®¦¥¨ï ¢ë¤¥«¥®£® ⥪áâ , ¢ ¯à¥¤¥« å ®¡« á⨠editbox |
| ;®«ã稫¨ ª®®à¤¨ âë ¢ eax ¬ë誨, â.¥. ªã¤ ® ¯¥à¥¬¥á⨫ áì |
| ;¨á®¢ ¨¥ § ªà è¥ëå ¯àאַ㣮«ì¨ª®¢ ¨ ¨å ®ç¨á⪠|
| add eax,ed_offset |
| cmp eax,ed_size |
| ja edit_box_mouse.mwigvag |
| add eax,ed_offset |
| cmp eax,ed_size |
| ja edit_box_mouse.mwigvag |
| edit_box_mouse.mdraw: |
| mov ed_pos,eax |
| mov ed_pos,eax |
| ;¨á®¢ ¨¥ § ªà è¥ëå ¯àאַ㣮«ì¨ª®¢ ¨ ¨å ®ç¨á⪠|
| movzx ecx, word ed_shift_pos |
| movzx ebx, word ed_shift_pos_old |
| mov ed_shift_pos_old,ax |
| movzx ecx, word ed_shift_pos |
| movzx ebx, word ed_shift_pos_old |
| mov ed_shift_pos_old,ax |
| ;¯à®¢¥àª ¨ à¨á®¢ ¨¥ § ªà è¥ëå ®¡« á⥩ |
| cmp ecx,ebx |
| je edit_box_mouse.m1_shem ;¤¢¨¦¥¨ï ¥ ¡ë«® à ¥¥ |
| jb edit_box_mouse.msmaller ;¡ë«® ¤¢¨¦¥¨¥ -> |
| cmp ebx,eax |
| ja edit_box_mouse.m1_shem ;¡ë«® ¤¢¨¦¥¨¥ <- |
| je edit_box_mouse.mwigvag |
| mov ebp,ed_color |
| call edit_box_key.sh_cl_ ;®ç¨áâ¨âì ®¡« áâì c ed_pos ed_shift_pos_old |
| jmp edit_box_mouse.mwigvag |
| cmp ecx,ebx |
| je edit_box_mouse.m1_shem ;¤¢¨¦¥¨ï ¥ ¡ë«® à ¥¥ |
| jb edit_box_mouse.msmaller ;¡ë«® ¤¢¨¦¥¨¥ -> |
| cmp ebx,eax |
| ja edit_box_mouse.m1_shem ;¡ë«® ¤¢¨¦¥¨¥ <- |
| je edit_box_mouse.mwigvag |
| mov ebp,ed_color |
| call edit_box_key.sh_cl_ ;®ç¨áâ¨âì ®¡« áâì c ed_pos ed_shift_pos_old |
| jmp edit_box_mouse.mwigvag |
| |
| edit_box_mouse.msmaller: |
| cmp ebx,eax |
| jb edit_box_mouse.m1_shem |
| mov ebp,ed_color |
| call edit_box_key.sh_cl_ |
| jmp edit_box_mouse.mwigvag |
| cmp ebx,eax |
| jb edit_box_mouse.m1_shem |
| mov ebp,ed_color |
| call edit_box_key.sh_cl_ |
| jmp edit_box_mouse.mwigvag |
| |
| edit_box_mouse.m1_shem: |
| mov ebp,shift_color |
| mov ebx,ecx |
| call edit_box_key.sh_cl_ |
| mov ebp,shift_color |
| mov ebx,ecx |
| call edit_box_key.sh_cl_ |
| edit_box_mouse.mwigvag: |
| and word ed_flags,ed_shift_mcl |
| jmp edit_box.draw_cursor_text |
| and word ed_flags,ed_shift_mcl |
| jmp edit_box.draw_cursor_text |
| |
| edit_box_mouse.mleft: |
| mov eax,ed_pos |
| cmp eax,0 |
| jbe edit_box_mouse.mwigvag |
| dec eax |
| call edit_box.check_offset |
| push eax |
| movzx ebx, word ed_shift_pos |
| mov ebp,shift_color |
| call edit_box_key.sh_cl_ |
| pop eax |
| jmp edit_box_mouse.mdraw |
| mov eax,ed_pos |
| cmp eax,0 |
| jbe edit_box_mouse.mwigvag |
| dec eax |
| call edit_box.check_offset |
| push eax |
| movzx ebx, word ed_shift_pos |
| mov ebp,shift_color |
| call edit_box_key.sh_cl_ |
| pop eax |
| jmp edit_box_mouse.mdraw |
| |
| edit_box_mouse.mright: |
| mov eax,ed_pos |
| mov ebx,ed_size |
| cmp eax,ebx |
| jae edit_box_mouse.mwigvag |
| inc eax |
| call edit_box.check_offset |
| movzx ebx, word ed_shift_pos |
| mov ebp,shift_color |
| push eax |
| call edit_box_key.sh_cl_ |
| pop eax |
| jmp edit_box_mouse.mdraw |
| mov eax,ed_pos |
| mov ebx,ed_size |
| cmp eax,ebx |
| jae edit_box_mouse.mwigvag |
| inc eax |
| call edit_box.check_offset |
| movzx ebx, word ed_shift_pos |
| mov ebp,shift_color |
| push eax |
| call edit_box_key.sh_cl_ |
| pop eax |
| jmp edit_box_mouse.mdraw |
| |
| |
| ed_struc_size=84 |