a logic bugfix.

git-svn-id: svn://kolibrios.org@1100 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/media/scrshoot/scrshoot.asm

@@ -164,16 +164,21 @@ ipc:
         min_window
         jmp     .clear_ipc
 @@:
-
+        cmp     word [app_ipc+8],3
+        jne     @f
+	mov     ecx,[slot_n]
+        activ_window
+        jmp     .clear_ipc
+@@:
         call    draw_number
         call    dr_st
 
 .clear_ipc:
         cld
         xor     eax,eax
-        mov     ecx,32
+        mov     ecx,32/4
         mov     edi,app_ipc
-        rep     stosb
+        rep     stosd
         jmp     still
 
 p_close:
@@ -314,7 +319,9 @@ shoot:
 
         bt      dword [ch2.flags],1  ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>।<EFBFBD><E0A5A4><EFBFBD>ᬮ<EFBFBD><E1ACAE><EFBFBD> ?
         jnc     @f
+
         call    show_scr_window
+	ret
 @@:
         bt      word [ch3.flags],1   ; <20><><EFBFBD><EFBFBD>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ?
         jnc     @f
@@ -575,7 +582,7 @@ messages:
 .draw_number dw 0
 .draw_status dw 1
 .min_window  dw 2
-
+.act_window  dw 3
 
 grab_text:
         db      title,0

programs/media/scrshoot/scrwin.inc

@@ -6,7 +6,7 @@ scr_window:
 .red:
         call    .draw_window
 .still:
-        wait_event .red,close
+        wait_event .red,.close
         jmp     .still
 
 .draw_window:
@@ -37,6 +37,19 @@ scr_window:
 
         stop_draw_window
 ret
+.close:
+        bt      word [ch3.flags],1   ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>⠭<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> ?
+        jnc     @f
+
+        mov     eax,60
+        mov     ebx,2
+        mov     ecx,[app.pid]
+        mov     edx,messages.act_window
+        mov     esi,2
+        mcall
+@@:
+        jmp	close
+
 .label label 20,20,0x80000000,$+4
 db '<27><><EFBFBD> <20><><EFBFBD> ᭨<><E1ADA8><EFBFBD>. <20><>室 - <20><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.',0