WebSVN – Kolibri OS – Diff – /programs/develop/libraries/box_lib/trunk/editbox.mac



;--- ¯à®æ¥¤ãà  ¯à®à¨á®¢ª¨ ä®­  ----------------------------
;¢å®¤­ë¥ ¤ ­­ë¥
;eax
;edx - color
;----------------------------------------------------------
 
 
edit_box.draw_bg:
        mov     ebx,ed_left
        add     ebx,1
        mov     edx,ed_color
        shl     ebx,16
        add     ebx,ed_width
        sub     ebx,1
;¢å®¤ â®«ìª® æ¢¥â edx
edit_box.draw_bg_eax:
        mov     ecx,ed_top
        mov     eax,13
        add     ecx,1
        shl     ecx,16

        mov     ebx,ed_offset
        cmp     ebx,ecx
        ja      edit_box.sub_8

 
        push    ebx
        call    edit_box.get_n  ;¯®«ãç¨¬ ª®«-¢® á¨¬¢®«®¢ ª®â®àë¥ ã¬¥­é îâáï ¢ è¨à¨­¥ ª®¬¯®­¥­â , ¢ ¯ à¥ à¥£¨áâà®¢ edx:eax 
        pop     ebx
        mov     edx,ebx
        add     edx,eax         ;ed_offset+width editbox
        inc     edx             ;­¥®¡å®¤¨¬® ¤«ï ­®à¬ «ì­®£® ¯®«®¦¥­¨ï ªãàá®à  ¢ ªà ©­¥© «¥¢®© ¯®§¨æ¨¨
        cmp     edx,ecx

        ja      @f
 

        jbe     edit_box.add_8
        add     ebx,8
        jmp     edit_box.chk_d

 
edit_box.sub_8:
	test    ecx,ecx
        jz      edit_box.sub_min
        cmp     ebx,8
        jbe     edit_box.sub_min
        sub     ebx,8   ;ebx=ed_offset
        jmp     edit_box.chk_d

        call    edit_box.draw_bg
        and     word ed_flags,ed_offset_cl
edit_ex
@@:     
        or      word ed_flags,ed_offset_fl
 
edit_ex
}

 
macro use_key_func

        or      word ed_flags,ed_shift_bac ;ãáâ ­®¢ª  ä« £ , ¢ë¤¥«¥­­®© ®¡« áâ¨
        mov     ebx,dword       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
edit_box_key.sh_cl_:
;;;;;;SHIFT end

        mov     ebx,dword       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
	call    edit_box.check_offset
        ret
;äã­ªæ¨ï ¢­¥á¥­¨ï 0 ¯®  ¤à¥áã ed_size+1
edit_box_key.enable_null:
        pusha

Rev 1476	Rev 1596
Line 216...	Line 216...
216	;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ä® ----------------------------	216	;--- ¯à®æ¥¤ãà ¯à®à¨á®¢ª¨ ä® ----------------------------
217	;¢å®¤ë¥ ¤ ë¥	217	;¢å®¤ë¥ ¤ ë¥
218	;eax	218	;eax
219	;edx - color	219	;edx - color
220	;----------------------------------------------------------	220	;----------------------------------------------------------
221	;¢å®¤ â®«ìª® æ¢¥â edx	-
-		221
222	edit_box.draw_bg:	222	edit_box.draw_bg:
223	mov ebx,ed_left	223	mov ebx,ed_left
224	add ebx,1	224	add ebx,1
225	mov edx,ed_color	225	mov edx,ed_color
226	shl ebx,16	226	shl ebx,16
227	add ebx,ed_width	227	add ebx,ed_width
228	sub ebx,1	228	sub ebx,1
-		229	;¢å®¤ â®«ìª® æ¢¥â edx
229	edit_box.draw_bg_eax:	230	edit_box.draw_bg_eax:
230	mov ecx,ed_top	231	mov ecx,ed_top
231	mov eax,13	232	mov eax,13
232	add ecx,1	233	add ecx,1
233	shl ecx,16	234	shl ecx,16
Line 334...	Line 335...
334	mov ebx,ed_offset	335	mov ebx,ed_offset
335	cmp ebx,ecx	336	cmp ebx,ecx
336	ja edit_box.sub_8	337	ja edit_box.sub_8
Line 337...	Line 338...
337		338
338	push ebx	339	push ebx
339	call edit_box.get_n ;¯®«ãç¨¬ ª®«-¢® á¨¬¢®«®¢ ¢ ¯ à¥ à¥£¨áâà®¢ edx:eax	340	call edit_box.get_n ;¯®«ãç¨¬ ª®«-¢® á¨¬¢®«®¢ ª®â®àë¥ ã¬¥é îâáï ¢ è¨à¨¥ ª®¬¯®¥â , ¢ ¯ à¥ à¥£¨áâà®¢ edx:eax
340	pop ebx	341	pop ebx
341	mov edx,ebx	342	mov edx,ebx
342	add edx,eax ;ed_offset+width editbox	343	add edx,eax ;ed_offset+width editbox
343	inc edx ;¥®¡å®¤¨¬® ¤«ï ®¬ «ì®£® ¯®«®¦¥¨ï ªãàá®à ¢ ªà ©¥© «¥¢®© ¯®§¨æ¨¨	344	inc edx ;¥®¡å®¤¨¬® ¤«ï ®à¬ «ì®£® ¯®«®¦¥¨ï ªãàá®à ¢ ªà ©¥© «¥¢®© ¯®§¨æ¨¨
344	cmp edx,ecx	345	cmp edx,ecx
Line 345...	Line 346...
345	ja @f	346	ja @f
346		347
Line 353...	Line 354...
353	jbe edit_box.add_8	354	jbe edit_box.add_8
354	add ebx,8	355	add ebx,8
355	jmp edit_box.chk_d	356	jmp edit_box.chk_d
Line 356...	Line 357...
356		357
357	edit_box.sub_8:	358	edit_box.sub_8:
358	cmp ecx,0	359	test ecx,ecx
359	je edit_box.sub_min	360	jz edit_box.sub_min
360	cmp ebx,8	361	cmp ebx,8
361	jbe edit_box.sub_min	362	jbe edit_box.sub_min
362	sub ebx,8 ;ebx=ed_offset	363	sub ebx,8 ;ebx=ed_offset
363	jmp edit_box.chk_d	364	jmp edit_box.chk_d
Line 373...	Line 374...
373	call edit_box.draw_bg	374	call edit_box.draw_bg
374	and word ed_flags,ed_offset_cl	375	and word ed_flags,ed_offset_cl
375	edit_ex	376	edit_ex
376	@@:	377	@@:
377	or word ed_flags,ed_offset_fl	378	or word ed_flags,ed_offset_fl
-		379
378	edit_ex	380	edit_ex
379	}	381	}
Line 380...	Line 382...
380		382
381	macro use_key_func	383	macro use_key_func
Line 389...	Line 391...
389	or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨	391	or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
390	mov ebx,dword ed_shift_pos	392	mov ebx,dword ed_shift_pos
391	call edit_box_key.sh_cl_	393	call edit_box_key.sh_cl_
392	jmp edit_box.draw_cursor_text	394	jmp edit_box.draw_cursor_text
393	;;;;;;;;;;;;;;;;;;;;;	395	;;;;;;;;;;;;;;;;;;;;;
-		396	edit_box_key.f_exit:
394	edit_box_key.f_exit: call edit_box.check_offset	397	call edit_box.check_offset
395	and word ed_flags,ed_shift_cl	398	and word ed_flags,ed_shift_cl
396	call edit_box_key.enable_null	399	call edit_box_key.enable_null
397	jmp edit_box.draw_cursor_text	400	jmp edit_box.draw_cursor_text
398	edit_box_key.sh_cl_:	401	edit_box_key.sh_cl_:
399	;;;;;;SHIFT end	402	;;;;;;SHIFT end
Line 589...	Line 592...
589	mov ebx,dword ed_shift_pos	592	mov ebx,dword ed_shift_pos
590	call edit_box_key.sh_cl_	593	call edit_box_key.sh_cl_
591	or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨	594	or word ed_flags,ed_shift_bac ;ãáâ ®¢ª ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
592	jmp edit_box_key.sh_e_end	595	jmp edit_box_key.sh_e_end
593	edit_box_key.sh_exit_:	596	edit_box_key.sh_exit_:
-		597	call edit_box.draw_bg
594	call edit_box.check_offset	598	call edit_box.check_offset
595	ret	599	ret
596	;äãªæ¨ï ¢¥á¥¨ï 0 ¯® ¤à¥áã ed_size+1	600	;äãªæ¨ï ¢¥á¥¨ï 0 ¯® ¤à¥áã ed_size+1
597	edit_box_key.enable_null:	601	edit_box_key.enable_null:
598	pusha	602	pusha

Subversion Repositories Kolibri OS

(root)/programs/develop/libraries/box_lib/trunk/editbox.mac – Rev 1476 → 1596