Subversion Repositories Kolibri OS

Rev

Rev 2197 | Rev 2837 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2197 Rev 2201
Line 51... Line 51...
51 
 
 51 
 
Line 52... Line 52...
52 
;---------------------------------------------------------------------
 52 
;---------------------------------------------------------------------
53 
 
 53 
 
- 
 
 54 
key:		       ; ­ ¦ â  ª« ¢¨è  ­  ª« ¢¨ âãà¥
- 
 
 55 
    mcall 2
54 
key:		       ; ­ ¦ â  ª« ¢¨è  ­  ª« ¢¨ âãà¥
 56 
	cmp ah,13 ;®¡à ¡®âª  ª­®¯ª¨ Enter
- 
 
 57 
	je @f
- 
 
 58 
		stdcall [edit_box_key], dword edit1
- 
 
 59 
		jmp still
- 
 
 60 
	@@:
- 
 
 61 
	mov edi,string1
55 
    mcall 2
 62 
	add edi,[edit1.size] ;ãáâ ­ ¢«¨¢ ¥¬ ¢ edi ª®­¥æ áâப¨
Line 56... Line 63...
56 
	stdcall [edit_box_key], dword edit1
 63 
	jmp read_str
57 
    jmp  still		; ¢¥à­ãâìáï ª ­ ç «ã 横« 
 64 
    jmp still		; ¢¥à­ãâìáï ª ­ ç «ã 横« 
58 
 
 65