h2d2b - restore key [Enter]

git-svn-id: svn://kolibrios.org@2201 a494cfbc-eb01-0410-851d-a64ba20cac60
2011-09-16 18:43:27 +00:00 · 2011-09-16 18:43:27 +00:00 · afab218ec4
commit afab218ec4
parent 1fcf127ffb
1 changed files with 9 additions and 2 deletions
--- a/programs/develop/h2d2b/trunk/h2d2b.asm
+++ b/programs/develop/h2d2b/trunk/h2d2b.asm
@ -53,8 +53,15 @@ still:

 key:		       ;  ¦ â  ª« ¢¨è    ª« ¢¨ âãà¥
    mcall 2
-	stdcall [edit_box_key], dword edit1
-    jmp  still		; ¢¥àãâìáï ª  ç «ã æ¨ª« 
+	cmp ah,13 ;®¡à ¡®âª  ª®¯ª¨ Enter
+	je @f
+		stdcall [edit_box_key], dword edit1
+		jmp still
+	@@:
+	mov edi,string1
+	add edi,[edit1.size] ;ãáâ  ¢«¨¢ ¥¬ ¢ edi ª®¥æ áâà®ª¨
+	jmp read_str
+    jmp still		; ¢¥àãâìáï ª  ç «ã æ¨ª« 

 read_str:
    dec   edi