WebSVN – Kolibri OS – Diff – /programs/develop/examples/editbox/trunk/EDITBOX.INC

+;  07.03.2007 ®¯¨á « ã¯à ¢«¥¨¥ á shift home + end ãá¯à ¢¨« ¥áª®«ìª® ¡ £®¢
 ;  06.03.2007 ¥à¥¯¨á « ¯®«®áâìî  «£®à¨â¬ ã¯à ¢«¥¨ï shift
 ;  15.02.2007 ã«ãçè¥¨¥ áïâ¨ï ¢ë¤¥«¥¨ï ¨ ¯¥à¥à¨á®¢ª¨ ®ç¨é ¥¬®© ®¡« áâ¨, § ç¨â¥«ì® ¯à¨ïâ¥¥ à ¡®â ¥â ª®¬¯®¥â
 ;  13.02.2007 ã¡à « ¯® ¢®§¬®¦®áâ¨ ¬¥àæ ¨¥, ã«ãçè¥  ®¡à ¡®âª  ¯¥à¥à¨á®¢ª¨ ä®
 ; ¤®¡ ¢¨« ä¨âçã ¢¥á¥¨ï 0å0 ¯®  ¤à¥áã ed_size ¨ ç¥ ã Maxxx32 ¡ë«¨ ¥á®áâëª®¢ª¨ ¢ ª®¤¥. à¨ç¨  ¢ â®¬, çâ® ®¯â¨¬¨§ æ¨ï ¡ë«  á¢¥¤¥  ª â®¬ã, çâ® ï ¥ ç¨áâ¨« á¨¬¢®«ë ¢ ¡ãä¥à¥, ª®£¤  ã¤ «ï«, ï ¯à®áâ® ¨å ¥ ¢ë¢®¤¨«, ¨ ¯®â®¬, ª®£¤  ¢®á¨«áï ®¢ë© á¨¬¢®«, ® ¯®¯à®áâã § â¨à « ã¦¥ ¨¬¥îé¨©áï. á«¨ ¡ë, ¯à®£à ¬¬  ®¡à ¡ âë¢ «  ª®¥æ áâà®ª¨ ¯® ed_size, ¯à®¡«¥¬ë ¥ ¢®§¨ª«®. ® á¥©ç á íâ®â ¥¤®áâ â®ª ¨á¯à ¢«¥.
 ;  01.02.2007 ¤®à ¡®âª  edit_box, ¨á¯à ¢¨« ¡ £¨.
 ed_size equ [edi+38]                    ;ª®«-¢® á¨¬¢®«®¢
 ed_pos	equ [edi+42]                    ;¯®§¨æ¨ï ªãàá®à
 ed_offset	equ [edi+46]            ;á¬¥é¥¨¥
 cl_curs_x	equ [edi+50]		;¯à¥¤ë¤ãé¥¥ ª®®à¤¨ â  ªãàá®à  ¯® å
 cl_curs_y	equ [edi+54]		;¯à¥¤ë¤ãé¥¥ ª®®à¤¨ â  ªãàá®à  ¯® ã
-ed_shift_pos	equ [edi+58]
+ed_shift_pos	equ [edi+58]            ;¯®«®¦¥¨¥ ªãàá®à
-ed_shift_pos_old equ [edi+62]
+ed_shift_pos_old equ [edi+62]           ;áâ à®¥ ¯®«®¦¥¨¥ ªãàá®à
 ;==========================================================
 ;=== ¯à®æ¥¤ãà  ¯à®à¨á®¢ª¨ =================================
 ;==========================================================
 .draw:
 pusha
 	call	.draw_cursor
 @@:
 	call	.draw_text
 popa
 ret
-;.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	    ;¢¥àãâìáï ç¥ì ¨â¥à¥áë© å®¤ â.ª. ¯®ª  ¢ áâ¥ª¥ åà ¨âìáï ª®«-¢® ¢ë§®¢®¢ â® áâ®«ìª® à § ¬ë ¨ ¡ã¤¥¬ ¢ë§ë¢ âìáï
 ;----------------------------------------------------------
 ;--- ¯à®æ¥¤ãà  ¯à®à¨á®¢ª¨ â¥ªáâ  --------------------------
 ;----------------------------------------------------------
 .draw_text:
 ;--- ¢ëç¨á«ï¥¬, áª®«ìª® ¯®¬¥é ¥âáï á¨¬¢®«®¢ ---
 	xor	edx,edx   ;à¥§ã«ìâ â à á¯®«®£ ¥âáï ¢ ¯ à¥ edx:eax ¢ eax - ®áâ â®ª
 	sub	eax,4		;¢ëçâ¨¬ 4
 	mov	ebx,6		;§ £àã§¬¨ ¤¥«¨â¥«ì
 	div	ebx		;à §¬¤¥«¨¬   6
 ret
 ;----------------------------------------------------------
 ;--- ¯à®æ¥¤ãà  à¨á®¢ ¨ï ªãàá®à  --------------------------
 ;----------------------------------------------------------
 ;¢å®¤ë¥ ebp- æ¢¥â
 .clear_cursor:
 	mov	edx,ebp
 	mov	ebx,cl_curs_x
 	mov	ecx,cl_curs_y
 	jmp	.draw_curs
 .draw_cursor:
 	mov	edx,ed_text_color
-;@@:
 	mov	ebx,ed_pos
 	mov	ecx,ed_offset
 	sub	ebx,ecx
 	mov	cl_curs_y,ecx
 .draw_curs:
 	mov	eax,38
 	int	0x40
 ret
 ;----------------------------------------------------------
 ;--- ¯à®æ¥¤ãà  à¨á®¢ ¨ï à ¬ª¨ ----------------------------
 ;----------------------------------------------------------
 .draw_border:
 ;--- æ¢¥â à ¬ª¨ ---
-	test	dword ed_flags,ed_focus
+	test	word ed_flags,ed_focus
 	mov	edx,ed_focus_border_color
 	jne     @f
 	mov	edx,ed_blur_border_color
 @@:
 ;--- á¢¥àåã ---
 	mov	ebx,edx
 	jmp	.chk_d
 .add_8:	add	ebx,edx
 .chk_d:	mov	ed_offset,ebx
 	call    .draw_bg
-	;mov	dword [esp+28],-1
+	and	word ed_flags,ed_offset_cl
 popa
 	ret
 @@:
-	mov	dword [esp+28],0
+	or	word ed_flags,ed_offset_fl
 popa
 	ret
 ;==========================================================
 ;=== ®¡à ¡®âª  ª« ¢¨ âãàë =================================
 ;==========================================================
 	mov	ebx,3
 	int	0x40
 	test	al,0x03
 	je	@f
         or      word ed_flags,ed_shift   ;ãáâ ®¢¨¬ ä« £
 @@:     pop	eax   ;¢®ááâ ®¢¨¬ áç¨â ë© á¨¬¢®« á ª« ¢¨ âãàë
 ;----------------------------------------------------------
 ;--- ¯à®¢¥àï¥¬, çâ®  ¦ â® --------------------------------
 ;----------------------------------------------------------
 	cmp	ah,8
 	jz	@f
 	cmp	ah,'0'
 	jb	.no_figure
 	cmp	ah,'9'
 	ja	.no_figure
 ;¯à®¢¥àª    shift
 @@:	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
-	;cmp	edx,ecx
-	;jne	.sh_cl
 ;clear
 	mov	ebp,edx ;ed_size
         call	.clear_bg
        	mov	ebp,ed_color
+	mov	ebx,dword	ed_shift_pos
         call	.sh_cl_
 .sh_nxt:popa
-	call	.del_char
 	call	.del_char
 ;;;;
         mov	eax,dword ed_shift_pos
         mov	ebx,ed_size
 	sub	ebx,eax
 	mov	ed_size,ebx
-	pop	eax
 	pop	eax
         ; ¯à®¢¥àï¥¬,  å®¤¨âáï «¨ ªãàá®à ¢ ª®æ¥
 @@:	mov	ecx,ed_size
 	mov	edx, ed_max
 	test	word ed_flags,ed_insert
 	mov	ebp,ed_color
 	call	.clear_cursor
 	call	.check_offset
-        call	.draw_bg
         call	.draw_bg
-	ret
 	ret
 @@:	dec	 dword ed_size
 .draw_all2:
 	and    word ed_flags,ed_shift_cl
 	mov	ebp,ed_color
 	call	.clear_cursor
 	call	.check_offset
 	mov	ebp,ed_size
-	call	.clear_bg
-	ret
+	call	.clear_bg
-	;jmp	.shift
+	ret
 ;---  ¦ â  ª« ¢¨è  left ---
 .left:  mov	ebx,ed_pos
 	test	ebx,ebx
  	jmp	.draw_cursor_text
 .end:
 	mov	ebx,ed_pos
 	cmp	ebx,dword ed_size
 	je	.sh_st_of
+	call	.sh_first_sh
 	mov	eax,ed_size
 	mov	ed_pos,eax
 	call	.sh_home_end
 	jmp	.draw_cursor_text
 ;¡à ¡®âª  Shift ¤«ï áïâ¨ï ¢ë¤¥«¥¨ï ¥¨§¢¥áâ®© ®¡« áâ¨
 	test    word ed_flags,ed_shift
         je	.f_exit
 @@:	mov	ebp,shift_color
+	or	word ed_flags,ed_shift_bac ;ãáâ ®¢ª  ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
-	or	word ed_flags,ed_shift_bac ;ãáâ ®¢ª  ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
+	mov	ebx,dword	ed_shift_pos
 	call	.sh_cl_
         jmp	.draw_cursor_text
 ;;;;;;;;;;;;;;;;;;;;;
 .f_exit:call	.check_offset
 	jmp	.draw_cursor_text
 .sh_cl_:
 ;;;;;;SHIFT end
 ;®¡à ¡®âª  ®ç¨áâª¨, ¯à¨ «¥¢®¬ - ¯à ¢®¬ ¤¢¨¦¥¨¨ ¢ë¤¥«¥¨ï
 ;¤«ï ®¡à ¡®âª¨ áïâ¨ï ¢ë¤¥«¥¨ï
-;	or	word ed_flags,ed_shift_bac ;ãáâ ®¢ª  ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
+;¢å®¤ë¥ ¯ à ¬¥âàë ebp=color ebx=ed_shift_pos
 	mov 	eax,dword	ed_pos
-	mov	ebx,dword	ed_shift_pos
+;	mov	ebx,dword	ed_shift_pos
 	cmp	eax,ebx
 	jae	.sh_n
 	push	eax  ;¬¥ìè¥¥ ¢ eax
 	push	ebx  ;¡®«ìè¥¥
 	jmp	.sh_n1
 	             ;¥á«¨ ¨ ç¥
 .sh_n: 	push	ebx
 	push	eax
 .sh_n1:
 	call	.check_offset
-;	test	eax,eax
-;	jz      .drw_sim
 	call	.get_n
 	mov	edx,eax	;size of ed_box
-;	push	eax
 	mov	ecx,ed_offset
 	add	eax,ecx	;eax = w_off= ed_offset+width
 	mov	edx,eax ;save
 	pop	ebx     ;¡®«ìè¥¥
 	pop	eax     ;¬¥ìè¥¥
 	sub	ebx,ecx
 	jmp     .nxt_f
 @@:	mov	ebx,edx
 	sub	ebx,ecx
 	jmp     .nxt_f
 .f_f:
 	sub	eax,ecx
 	cmp	edx,ebx		;cà ¢¨¬ à §¬¥à w_off á ¡®«ìè¨¬
 	jle	@f
 	sub	ebx,ecx
 	mov	bx,cx
 	inc	ebx
 	mov	edx,ebp;shift_color
-	call	.draw_bg_eax
-@@:	;and    word ed_flags,1111111111111011b
+	call	.draw_bg_eax
-	call	.enable_null
-	;mov	dword	ed_shift_pos,0
+@@:	call	.enable_null
 	ret
 ;;;;;;;;;;;;;;;;;;;;;
 ;áâ ®¢ª - áïâ¨¥ ¢ë¤¥«¥¨ï ¢ ®¤¨ á¨¬¢®«
 ;;;;;;;;;;;;;;;;;;;;;
 .drw_sim:
 	mov	eax,dword	ed_pos
 	call    .draw_rectangle   ; à¨á®¢ âì ¯àï¬®ã£®«ì¨ª á § ¤ ë¬ æ¢¥â®¬
         jmp     @b
-;;;;;;;;;;;;;;;;;;;;;
-;;;;;;;;;;
+;;;;;;;;;;;;;;;;;;;;;
 ;ãªæ¨ï ãáâ ®¢ª¨ ¢ë¤¥«¥¨ï ¯à¨ ¤¢¨¦¥¨ï ¢«¥¢® ¨ ¢¯à ¢® ¨  ¦ â¨¨ shift
 ;®£¨ª :
 ;;;;;;;;;;
 .draw_wigwag:
 	call	.clear_cursor
 	or	word ed_flags,ed_shift_bac ;ãáâ ®¢ª  ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
 	mov	ebp,shift_color
-	mov 	eax,dword	ed_pos
-	;mov	ebx,dword	ed_shift_pos
+	mov 	eax,dword	ed_pos
 	test	word ed_flags,ed_left_fl
-	jz      .low
-;	sub	eax,2
-	;dec	eax
+	jz      .low
 	jmp	@f
 ;;;;;;;;;;
 ;ãªæ¨ï ã¤ «¥¨ï ¢ë¤¥«¥¨ï ¯à¨ ¤¢¨¦¥¨ï ¢«¥¢® ¨ ¢¯à ¢® ¨  ¦ â¨¨ shift
 ;®£¨ª :
 	mov	ebp,ed_color
 	call	.clear_cursor
 	mov	ebp,ed_color
-	mov 	eax,dword	ed_pos
-	;mov	ebx,dword	ed_shift_pos
+	mov 	eax,dword	ed_pos
 	test	word ed_flags,ed_left_fl
 	jz      .low
 	;dec	eax
 @@:     call	.draw_rectangle  ; à¨á®¢ âì ¯àï¬®ã£®«ì¨ª § ªà è¨¢ ¥¬®© ®¡« áâ¨
 	test	word ed_flags,ed_shift_on
 	jne	@f
 	mov	dword ed_shift_pos,ebx
        	or	word ed_flags,ed_shift_on
 @@:    	ret
 ;¡à ¡®âª  ªà ©¨å ¯®«®¦¥¨© ¢ editbox ¯à¨  ¦ â®¬ shift
 ;¯à®¨§¢®¤¨â áïâ¨¥ ¢ë¤¥«¥¨¥, ¥á«¨ ¥â shift
 ;¨ ç¥ ¢®®¡é¥ ¢ëå®¤¨â
 .sh_st_of:
 	test    word ed_flags,ed_shift
 	jne	@f
 	test    word ed_flags,ed_shift_bac
         je      @f
        	mov	ebp,ed_color
+	mov	ebx,dword	ed_shift_pos
 	call	.sh_cl_  ;®ç¨áâª  ¢ë¤¥«¥®£® äà £¬¥â
-	call	.draw_wigwag_cl
 	and	word ed_flags,ed_shift_cl ; ®ç¨áâª  ®â â®£® çâ® ã¡à «¨ ¢ë¤¥«¥¨¥
 	jmp     .draw_cursor_text
 @@:
-     	;-----------  ®â« ¤ª
-;	pushad
-;	mov	dword [ed_buffer.3],0
-;	mov eax,ebx;word ed_flags
-;	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
-	;----------- ®â« ¤ª
         and	word ed_flags,ed_shift_off
 	popa
 	ret
 	test    word ed_flags,ed_shift_bac
         je      @f
        	call	.check_offset
+	mov	ebp,ed_color
-	mov	ebp,ed_color
+	mov	ebx,dword	ed_shift_pos
 	call	.sh_cl_  ;®ç¨áâª  ¢ë¤¥«¥®£® äà £¬¥â
 	call	.draw_wigwag_cl
 	and	word ed_flags,ed_shift_cl ; 1¢ à ¥ ã¦®
 	call	.clear_cursor
 	call	.check_offset
 	ret
 .sh_ext_en:
        	call	.check_offset
-	test	eax,eax
+	test	word ed_flags,ed_offset_fl
-	jnz	@f
+	jne	@f
 ;¨á®¢ ¨¥ § ªà è¥ëå ¯àï¬®ã£®«ì¨ª®¢ ¨ ®ç¨áâª  ¨å
         mov 	eax,dword	ed_shift_pos
 	mov	ebx,dword	ed_pos
 	mov	ecx,dword	ed_shift_pos_old
 ;¯à®¢¥àª  ¨ à¨á®¢ ¨¥ § ªà è¥ëå ®¡« áâ¥©
 ;alike  =
 .1_shem: call	.draw_wigwag
 .sh_e_end:	and	word ed_flags,ed_shift_off
 	ret
 @@:	mov	ebp,shift_color
+	mov	ebx,dword	ed_shift_pos
 	call	.sh_cl_
 	jmp	.sh_e_end
 ;äãªæ¨ï ¤«ï ®¡à ¡®âª¨ shift ¯à¨  ¦ â¨¨ home and end
 .sh_home_end:
 	mov	ebp,ed_color
 	call	.clear_cursor
 	test    word ed_flags,ed_shift_bac
         je      @f
 	mov	ebp,ed_color
+	mov	ebx,dword	ed_shift_pos_old
 	call	.sh_cl_
 @@:	test    word ed_flags,ed_shift
-	je	.sh_exit_ ; à¨á®¢ âì § ªà è¥ë© ¯àï¬®ã£®«ì¨ª (®¡« áâì)
-    	call	.check_offset
+	je	.sh_exit_ ; à¨á®¢ âì § ªà è¥ë© ¯àï¬®ã£®«ì¨ª (®¡« áâì)
+        mov	ebp,shift_color
-        mov	ebp,shift_color
+        mov	ebx,dword	ed_shift_pos
 	call	.sh_cl_
 	or	word ed_flags,ed_shift_bac ;ãáâ ®¢ª  ä« £ , ¢ë¤¥«¥®© ®¡« áâ¨
 	jmp	.sh_e_end
-.sh_exit_:	ret
-;	test    word ed_flags,ed_shift_bac
-;        je      @f
+.sh_exit_: 	call	.check_offset
 	ret
 ;äãªæ¨ï ¢¥á¥¨ï 0 ¯®  ¤à¥áã ed_size+1
 .enable_null:
         pusha
         mov	eax,ed_size
 	inc	eax
 	xor	ebx,ebx
 	mov 	[eax],bl
 	popa
 	ret
-        ;- ã¤ «¥¨¥ á¨¬¢®«
+;- ã¤ «¥¨¥ á¨¬¢®«
-	;å®¤ë¥ ¤ ë¥ edx=ed_size;ecx=ed_pos
+;å®¤ë¥ ¤ ë¥ edx=ed_size;ecx=ed_pos
 .del_char:
 	mov     esi,ed_text
         test	word ed_flags,ed_shift_on
 	dec edx
 	jns @b
 	pop edi
-	ret
 	ret
 ;¢ëç¨á«¨âì § ªà è¨¢ ¥¬ãî ®¡« áâì
 ;á®£« è¥¨¥ ¢ ebp - ¯¥à¥¤ ¥âáï ed_size
 .clear_bg:
 	call	.get_n  ;¯®«ãç¨âì à §¬¥à ¢ á¨¬¢®« å è¨à¨ë ª®¬¯®¥â
 ; à¨á®¢ âì ¯àï¬®ã£®«ì¨ª, æ¢¥â ¯¥à¥¤ ¥âáï ¢ ebp
 ;¢å®¤ë¥ ¯ à ¬¥âàë:
 ;eax=dword ed_pos
 ;ebp=-æ¢¥â ed_color or shift_color
 .draw_rectangle:
-;        mov	eax,dword ed_pos
 	mov	ecx,dword ed_offset
 	sub     eax,ecx
         lea	ebx,[eax*2+eax]
 	shl	ebx,1
 	inc	ebx
 ;----------------------------------------------------------
 	bts	word ed_flags,1
 	jc	@f
 	call	.draw_cursor
 	jmp	.drc
 ._blur:
 	test	word ed_flags,ed_always_focus
 	jne	@f
 	btr	word ed_flags,1 ; ¥á«¨ ¥ ¢ ä®ªãá¥, ¢ëå®¤¨¬
 	jnc     @f
 	;call    .clear_cursor
 ;@@:
 ;popa
 ;ret
+}
-ed_figure_only= 1000000000000000b
+ed_figure_only= 1000000000000000b   ;®¤¨ á¨¬¢®«ë
 ed_always_focus= 100000000000000b
-ed_focus=10b
+ed_focus=                     10b   ;ä®ªãá ¯à¨«®¦¥¨ï
 ed_shift_on=                1000b   ;¥á«¨ ¥ ãáâ ®¢«¥ -§ ç¨â ¢¯¥à¢ë¥  ¦ â shift,¥á«¨ ¡ë« ãáâ ®¢«¥, § ç¨â ¬ë ã¦¥ çâ® - â® ¤¥« «¨ ã¤¥à¦¨¢ ï shift
 ed_shift=                    100b   ;¢ª«îç ¥âáï ¯à¨  ¦ â¨¨   shift â.¥. ¥á«¨  ¦¨¬ î
 ed_shift_off=   1111111111111011b
 ed_shift_bac=              10000b   ;¡¨â ¤«ï ®ç¨áâª¨ ¢ë¤¥«¥®£® shift â.¥. ¯à¨ ãáâ ®¢ª¥ £®¢®à¨â çâ® ¥áâì ¢ë¤¥«¥¨¥
 ed_shift_cl=    1111111111100011b
 ed_left_fl=               100000b
 ed_right_fl=    1111111111011111b
+ed_offset_fl=            1000000b
+ed_offset_cl=   1111111110111111b
 ed_insert=              10000000b
 ed_insert_cl=   1111111101111111b
 ed_height=14 ; ¢ëá®â
 shift_color=0x6a9480
 macro draw_edit_boxes start,end
 macro key_edit_boxes start,end
+{
 	mov	edi,start
 	mov	ecx,((end-start)/ed_struc_size)
 @@:
+;	push	eax
 	call	edit_box.key
+;	pop	eax
 	add	edi,ed_struc_size
 	loop	@b
+}
 ed_struc_size=66
 struc  edit_box width,left,top,color,focus_border_color,\
-       blur_border_color,text_color,max,text,flags,size
+       blur_border_color,text_color,max,text,flags
+{
 .width dd width
 .left dd left
 .top dd top
 .color dd color
 .blur_border_color dd blur_border_color
 .text_color dd text_color
 .max dd max
 .text dd text
 .flags dw flags+0
-.size dd size+0
+.size dd 0
 .pos dd 0
 .offset dd 0
 .cl_curs_x dd 0
 .cl_curs_y dd 0
 .shift   dd 0

Subversion Repositories Kolibri OS

(root)/programs/develop/examples/editbox/trunk/EDITBOX.INC – Rev 391 → 396