kolibrios/programs/media/scrshoot/scrshoot.asm

; <20><><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> <20><><EFBFBD><EFBFBD>客 <20><><EFBFBD>ᨬ (Maxxxx32)
; 24.07.2008 <Lrz> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> editbox
; 01.02.07 - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> editbox
; 31.01.07 - <20><><EFBFBD> ⥯<><E2A5AF><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>⭮<EFBFBD><E2ADAE>⥫쭮 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>᪮<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
macro draw_status text_ptr
{
        mov     [status.text],dword text_ptr
        call    send_draw_status
}


title equ 'Screenshooter v 0.9' ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
include 'macros.inc'  ; <20><>⠢<EFBFBD>塞 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        meos_header  cmdstr ; <20><>⠢<EFBFBD>塞 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC>
include 'scrwin.inc'  ; <20><>⠢<EFBFBD>塞 <20><><EFBFBD> <20><><EFBFBD><EFBFBD> <20>य<EFBFBD><E0A4AF>ᬮ<EFBFBD><E1ACAE><EFBFBD>
include 'scrsavef.inc'; <20><>⠢<EFBFBD>塞 <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD><EFBFBD> 䠩<><E4A0A9>
        use_edit_box                            ; \
        use_txt_button                          ;  |
        use_label                               ;  |-- GUI <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD>
        use_check_box                           ;  |
        use_text_work                           ; /
include 'gp.inc'
include 'srectwin.inc'
include 'lang.inc'
;--- <20><>砫<EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> ---
        app_start
        ;mov     al,[gs:1280*4*1024]
                    ; <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ipc <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        push    60
        pop     eax
        ;mov     ebx,1
        xor     ebx,ebx
        inc     ebx
        mov     ecx,app_ipc
        mov     edx,32
        int     0x40

        push    66   ; <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        pop     eax
        push    eax
        mov     ebx,4
        mov     cl,55    ; 55 - PrintScrn
        xor     edx,edx
        int     0x40

        mov     ebx,app
        call    get_slot_n
        mov     [slot_n],ecx

        ; <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> ᮡ<>⨩
        set_events_mask (evm_redraw+evm_key+evm_button+evm_mouse+evm_ipc)

; <20> <20><>룠<EFBFBD><EBA3A0> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2>
red:
        get_procinfo app   ; <20><><EFBFBD><EFBFBD>砥<EFBFBD> <20><><EFBFBD><EFBFBD>ଠ<EFBFBD><E0ACA0><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        get_sys_colors sc  ; <20><><EFBFBD><EFBFBD>砥<EFBFBD> <20><><EFBFBD>⥬<EFBFBD><E2A5AC><EFBFBD> 梥<><E6A2A5>

        ; <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>⥬<EFBFBD><E2A5AC><EFBFBD> 梥<><E6A2A5> <20> GUI <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⮢
        txt_but_set_sys_color buttons,buttons_end,sc             ; \
        labels_set_sys_color labels,labels_end,sc                ; |
        check_boxes_set_sys_color check_boxes,check_boxes_end,sc ; |
        edit_boxes_set_sys_color editboxes,editboxes_end,sc      ; /

        get_screen_prop scr ; <20><><EFBFBD><EFBFBD>砥<EFBFBD> <20><><EFBFBD><EFBFBD>ଠ<EFBFBD><E0ACA0><EFBFBD> <20><> <20><>࠭<EFBFBD>
        call    draw_window ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᮢ뢠<E1AEA2><EBA2A0> <20><><EFBFBD><EFBFBD>
still:
        wait_event red,key,button,mouse,ipc,still ; <20><><EFBFBD><EFBFBD> ᮡ<>⨩

key:
        get_key
        cmp     al,2
        jne     @f
        cmp     ah,55
        jne     @f
        call    shoot
        jmp     still
@@:
        key_edit_boxes editboxes,editboxes_end
        jmp     still
button:
        get_pressed_button
        cmp     ah,1
        je      p_close
        txt_but_ev buttons,buttons_end
        jmp     still
mouse:
        get_active_window
        cmp     eax,[slot_n]
        jne     still
        mouse_check_boxes check_boxes,check_boxes_end
        mouse_edit_boxes editboxes,editboxes_end
        jmp     still
ipc:
        cmp     word [app_ipc+8],2
        jne     @f
        min_window
        jmp     .clear_ipc
@@:

        call    draw_number
        call    dr_st

.clear_ipc:
        cld
        xor     eax,eax
        movr     ecx,32
        mov     edi,app_ipc
        rep     stosb
        jmp     still

p_close:
        btr     dword [flags],1

        bt      dword [flags],3
        jnc     @f
        movr    eax,18
        mov     ebx,eax
        mov     ecx,[set_rect_window_pid]
        int     0x40
@@:

close:
        app_close

;--------------------------------------------------------------------
;--- <20>ம楤<E0AEAE><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ---------------------------
;--------------------------------------------------------------------
draw_window:
start_draw_window        ; <20><>砫<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2>
        ; <20><>।<EFBFBD><E0A5A4>塞 <20><><EFBFBD><EFBFBD>
        get_skin_height
        mov     ebx,100*65536+320
        mov     ecx,100*65536+220
        add     cx,ax
        mov     edx,[sc.work]
        add     edx,0x34000000;0x33000000
        xor     esi,esi
        ;xor     edi,edi
        mov     edi,grab_text
        xor     eax,eax
        int     0x40

        movr     eax,47             ; <20>뢮<EFBFBD><EBA2AE><EFBFBD> <20><>᫠ <20> <20><><EFBFBD><EFBFBD>
        mov     bx,4
        shl     ebx,16
        movsx   ecx,word [scr.width] ; <20><>ਭ<EFBFBD> <20><>࠭<EFBFBD>
        mov     dx,95
        shl     edx,16
        mov     dx,[label1.top]
        push    dx
        mov     esi,[sc.work_text]
        int     0x40
        movsx   ecx,word [scr.height]   ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>࠭<EFBFBD>
        mov     dx,[label2.top]
        int     0x40
        mov     bx,2
        shl     ebx,16
        movsx   ecx,word [scr.bitspp]   ; <20><><EFBFBD> <20><> <20><><EFBFBD>ᥫ<EFBFBD>
        mov     dx,240
        shl     edx,16
        pop     dx
        int     0x40
        mov     bx,6
        shl     ebx,16
        mov     ecx,[scr.bytesps]       ; <20><><EFBFBD><EFBFBD> <20><> <20><>ப<EFBFBD>
        mov     dx,[label2.top]
        int     0x40

        call    draw_number      ; <20><><EFBFBD><EFBFBD><EFBFBD>ᮢ뢠<E1AEA2><EBA2A0> <20><><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD>
        call    dr_st

        draw_labels labels,labels_end            ; <20><>⪨
        draw_edit_boxes editboxes,editboxes_end  ; edit_box
        draw_txt_buttons buttons,buttons_end     ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        draw_check_boxes check_boxes,check_boxes_end ; 䫠<><E4ABA0><EFBFBD>
stop_draw_window      ; <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2>
ret

shoot:
        bt      dword [ch4.flags],1   ; <20><><EFBFBD><EFBFBD>祭<EFBFBD> <20><> <20><><EFBFBD><EFBFBD>প<EFBFBD> ?
        jnc     @f
        draw_status delay_now
        mov     edi,ed_buffer.2
        call    zstr_to_int
        mov     ebx,eax
        delay
@@:
        call    get_mem_for_shoot; <20><><EFBFBD><EFBFBD>砥<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> ᭨<><E1ADA8><EFBFBD>


        bts     dword [flags],0       ; <20>㫥<EFBFBD><E3ABA5><EFBFBD> 䫠<> - ᭨<><E1ADA8><EFBFBD> <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>

        ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD>
        draw_status shooting
        mov     esi,scr
        mov     edi,[scr_buf.ptr]
        call    copy_screen_to_image

        bt      dword [use_rect.flags],1
        jc      .use_rect
        push    dword [scr]
        jmp     @f
.use_rect:
        push    dword [rect.height]
@@:
        pop     dword [scr_buf.size]

        bt      dword [ch5.flags],1  ; <20><><EFBFBD><EFBFBD>祭<EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD><EFBFBD> ?
        jnc     @f
        call    save_file
@@:
        draw_status     shooted_ok

        bt      dword [flags],1
        jnc     @f
        ret
@@:

        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
@@:
        bt      word [ch3.flags],1   ; <20><><EFBFBD><EFBFBD>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ?
        jnc     @f

        delay 100
        mov     ecx,[slot_n]
        activ_window
@@:
ret

;--- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> ᭨<><E1ADA8><EFBFBD> ---
get_mem_for_shoot:
        mov     [scr_buf.ptr],dword __app_end
        bt      dword [use_rect.flags],1 ; <20><>⪠<EFBFBD><E2AAA0> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>࠭<EFBFBD>
        jc      .use_area
        movzx   ecx, word [scr.width]
        movzx   ebx, word [scr.height]
        jmp     @f
.use_area:
        call    read_rect
        movzx   ecx, word [rect.width]
        movzx   ebx, word [rect.height]
@@:
        imul    ecx,ebx
        lea     ecx,[ecx*3]
        add     ecx,__app_end
        mov     [scr_buf.end_ptr],ecx
        xor     ebx,ebx
        inc     ebx
        mov     eax,64
        int     0x40
ret

;--- ᮤ<><E1AEA4><EFBFBD> <20><><EFBFBD><EFBFBD> <20>஥<EFBFBD><E0AEA5><EFBFBD><EFBFBD>ᬮ<EFBFBD><E1ACAE><EFBFBD> ---
show_scr_window:
pusha
        bt      dword [flags],0
        jnc     @f
        mov     eax,51
        xor     ebx,ebx
        inc     ebx
        movr     ecx,scr_window
        mov     edx,__app_end-1000
        int     0x40
@@:
popa
ret

;--- <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2><EFBFBD> ⥪<>騩 <20><><EFBFBD><EFBFBD><EFBFBD> ---
apply_number:
        mov     edi,ed_buffer.3
        call    zstr_to_int
        mov     [cur_number],eax
        call    draw_number
ret

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2> ⥪<>饣<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ---
draw_number:
        mov     edi,sign_n_input
        call    zstr_to_int
        mov     [sign_n],al
        movr     eax,13
        mov     ebx,150*65536+96
        mov     cx,[label9.top]
        shl     ecx,16
        mov     cx,10
        mov     edx,[sc.work]
        int     0x40
        movr     eax,47
        movsx   bx,byte [sign_n]
        shl     ebx,16
        mov     ecx,[cur_number]
        mov     dx,150
        shl     edx,16
        mov     dx,[label9.top]
        mov     esi,[sc.work_text]
        int     0x40
ret

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD>, <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><>⮪ <20><><EFBFBD><EFBFBD><EFBFBD>ꥬ<EFBFBD><EAA5AC> ---
start_autoshoot:
        bts     dword [flags],1
        jc      @f
        movr     eax,51
        ;mov     ebx,1
        xor     ebx,ebx
        inc     ebx
        mov     ecx,autoshoot
        mov     edx,__app_end-512
        int     0x40
@@:
ret

;--- <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><>⮪ ---
stop_autoshoot:
        btr     dword [flags],1
ret

;--- 横<> <20><>⮪<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ꥬ<EFBFBD><EAA5AC> ---
autoshoot:
        mov     ecx,[slot_n]
        activ_window
.next:
        bt      dword [flags],1
        jnc     close
        movr     eax,60
        movr     ebx,2
        mov     ecx,[app.pid]
        mov     edx,messages.draw_number
        mov     esi,2
        int     0x40
        call    shoot
        jmp     autoshoot.next

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2> <20><>ப<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ﭨ<EFBFBD> ---
; (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>뢠<EFBFBD><EBA2A0><EFBFBD><EFBFBD> <20><>⮪<EFBFBD><E2AEAA> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>)
dr_st:
        movr     eax,38              ; <20><>१<EFBFBD><E0A5A7>
        mov     ebx,0*65536+310
        mov     ecx,198*65536+198
        mov     edx,[sc.work_graph]
        int     0x40

        movr     eax,13              ; <20><><EFBFBD><EFBFBD>᪠
        mov     bx,310
        mov     ecx,199*65536+15
        mov     edx,[sc.work]
        int     0x40

        mov     edi,status
        call    draw_label
ret

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD> <20><><EFBFBD><EFBFBD>祭<EFBFBD><E7A5AD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᫮<><E1ABAE> <20><>⮪<EFBFBD> ---
; <20>室 ebx - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1024 <20><><EFBFBD><EFBFBD>
; <20><>室 ecx - <20><><EFBFBD><EFBFBD><EFBFBD> ᫮<><E1ABAE>
get_slot_n:
        movr     eax,9
        xor     ecx,ecx
        dec     ecx
        int     0x40

        mov     edx,[ebx+30]
        xor     ecx,ecx
@@:
        movr     eax,9
        inc     ecx
        int     0x40
        cmp     [ebx+30],edx
        je      @f
        jmp     @b
@@:
ret

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD>, <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><>⮪, <20><><EFBFBD><EFBFBD><EFBFBD>騩 1 ᭨<><E1ADA8><EFBFBD> ---
one_shoot:
        mov     ecx,one_shoot_thread
        mov     edx,shoot_esp
        jmp     @f
;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4>, <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><>⮪, <20><><EFBFBD>࠭<EFBFBD><E0A0AD>騩 ᭨<><E1ADA8><EFBFBD> ---
save_shoot:
        mov     ecx,save_shoot_thread
        mov     edx,shoot_esp
@@:
        bts     dword [flags],2
        jc      .running
        bt      dword [flags],1
        jc      .running

        movr     eax,51
        ;mov     ebx,1
        xor     ebx,ebx
        inc     ebx
        int     0x40
.running:
ret

;--- <20><>⮪, <20><><EFBFBD><EFBFBD><EFBFBD>騩 1 ᭨<><E1ADA8><EFBFBD> ---
one_shoot_thread:
        mov     ecx,[slot_n]
        activ_window
        bt      dword [ch1.flags],1   ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2><EFBFBD> <20><><EFBFBD><EFBFBD> ?
        jnc      @f
        movr     eax,60
        movr     ebx,2
        mov     ecx,[app.pid]
        mov     edx,messages.min_window
        mov     esi,2
        int     0x40
@@:
        call    shoot
        btr     dword [flags],2
        jmp     close

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD>, <20><><EFBFBD>ࠢ<EFBFBD><E0A0A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ᮮ<>饭<EFBFBD><E9A5AD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ᮢ<EFBFBD><E1AEA2>
; <20><>ப<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ﭨ<EFBFBD> ---
send_draw_status:
        movr     eax,60
        movr     ebx,2
        mov     ecx,[app.pid]
        mov     edx,messages.draw_status
        mov     esi,2
        int     0x40
ret

;--- <20><>⮪, <20><><EFBFBD>࠭<EFBFBD> 䠩<> ---
save_shoot_thread:
        mov     ecx,[slot_n]
        activ_window
        call    save_file
        btr     dword [flags],2
        jmp     close

;--- <20><><EFBFBD>楤<EFBFBD><E6A5A4><EFBFBD>, <20><><EFBFBD><EFBFBD>᪠<EFBFBD><E1AAA0><EFBFBD><EFBFBD> <20><>⮪ <20><><EFBFBD><EFBFBD> <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ꥬ<EFBFBD><EAA5AC> ---
show_set_rect_window:
        bts     dword [flags],3
        jc      @f
        movr     eax,51
        xor     ebx,ebx
        inc     ebx
        mov     ecx,set_rect_window
        mov     edx,set_rect_window_esp
        int     0x40

        mov     [set_rect_window_pid],eax
ret

@@:
        movr    eax,18
        mov     ebx,eax
        mov     ecx,[set_rect_window_pid]
        int     0x40
        btr     dword [flags],3
ret

;--- <20><><EFBFBD><EFBFBD>祭<EFBFBD><E7A5AD> <20><><EFBFBD><EFBFBD>ଠ樨 <20><> <20><>⨢<EFBFBD><E2A8A2><EFBFBD> <20><><EFBFBD><EFBFBD> ---
get_active_window_info:
        movr    eax,18
        movr    ebx,7
        int     0x40

        mov     ecx,eax
        movr    eax,9
        mov     ebx,active_app
        int     0x40
ret

;====================================================================
;=== <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC> ===============================================
;====================================================================
messages:
.draw_number dw 0
.draw_status dw 1
.min_window  dw 2


grab_text:
        db      title,0

labels:
label1 label 5,5,0,text.1   ; <20><>ਭ<EFBFBD> <20><>࠭<EFBFBD>
label2 label 5,15,0,text.2   ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>࠭<EFBFBD>
label3 label 5,25,0,text.3   ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> 䠩<><E4A0A9>
label4 label 150,5,0,text.4  ; <20><><EFBFBD> <20><> <20><><EFBFBD>ᥫ<EFBFBD>
label5 label 150,15,0,text.5  ; <20><><EFBFBD><EFBFBD> <20><> <20><>ப<EFBFBD>
label6 label 115,138,0,text.6  ; 100 = 1 ᥪ.
;label7 label 10,190,0,text.7
;label8 label 10,225,0,text.8
label9 label 5,52,0,text.9   ; <20><><EFBFBD><EFBFBD><EFBFBD> ⥪<>饣<EFBFBD> ᨬ<><E1A8AC>
label10 label 5,185,0,text.10
status label 5,201,0,no_shoot
labels_end:

editboxes:
edit1 edit_box 300,5,35,cl_white,0xaabbcc,0,0,0,1024,ed_buffer.1,ed_focus        ; <20><><EFBFBD><EFBFBD> <20> 䠩<><E4A0A9>
edit2 edit_box 35,75,134,cl_white,0xaabbcc,0,0,0,9,ed_buffer.2,ed_figure_only    ; <20><><EFBFBD><EFBFBD>প<EFBFBD>
edit3 edit_box 35,165,164,cl_white,0xaabbcc,0,0,0,9,ed_buffer.3,ed_figure_only
edit4 edit_box 16,165,181,cl_white,0xaabbcc,0,0,0,1,sign_n_input,ed_figure_only,1
editboxes_end:

buttons:
but1 txt_button 150,5,15,65,2,0,0,but_text.1,one_shoot            ; ᤥ<><E1A4A5><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD>
but2 txt_button 145,160,15,65,3,0,0,but_text.2,save_shoot          ; <20><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD> ᭨<><E1ADA8><EFBFBD>
but3 txt_button 140,115,12,120,4,0,0,but_text.3,show_scr_window    ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD>
but4 txt_button 80,205,15,163,5,0,0,but_text.4,apply_number        ; <20>ਬ<EFBFBD><E0A8AC><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
but5 txt_button 150,5,15,85,6,0,0,but_text.5,start_autoshoot     ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
but6 txt_button 145,160,15,85,7,0,0,but_text.6,stop_autoshoot     ; <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
but7 txt_button 40,205,10,150,8,0,0,but_text.7,show_set_rect_window ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
buttons_end:

check_boxes:
ch1 check_box 5,105,cl_white,0,0,ch_text.1,(ch_text.2-ch_text.1)  ; ᢥ<><E1A2A5><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
ch2 check_box 5,120,cl_white,0,0,ch_text.2,(ch_text.3-ch_text.2)  ; <20><>⥬ ᤥ<><E1A4A5><EFBFBD><EFBFBD> <20><>⨢<EFBFBD><E2A8A2><EFBFBD>
ch3 check_box 145,105,cl_white,0,0,ch_text.3,(ch_text.4-ch_text.3) ; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD>
ch4 check_box 5,135,cl_white,0,0,ch_text.4,(ch_text.5-ch_text.4)  ;
ch5 check_box 5,150,cl_white,0,0,ch_text.5,(ch_text.6-ch_text.5)
ch6 check_box 5,165,cl_white,0,0,ch_text.6,(ch_text.7-ch_text.6)
use_rect check_box 145,150,cl_white,0,0,ch_text.7,(ch_text.8-ch_text.7) ; <20><><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
; <20><>⮭㬥<E2AEAD><E3ACA5><EFBFBD><EFBFBD><EFBFBD>
check_boxes_end:

if lang eq ru
text:
.2 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>࠭<EFBFBD>:',0
.1 db '<27><>ਭ<EFBFBD> <20><>࠭<EFBFBD>:',0
.3 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20> 䠩<><E4A0A9>:',0
.4 db '<27><><EFBFBD> <20><> <20><><EFBFBD>ᥫ<EFBFBD>:',0
.5 db '<27><><EFBFBD><EFBFBD> <20><> <20><>ப<EFBFBD>:',0
.6 db '100 = 1 ᥪ㭤<E1A5AA>',0
;.7: db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> 䠩<><E4A0A9>:',0
;.8: db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "*" <20> <20><><EFBFBD><EFBFBD><EFBFBD> 䠩<><E4A0A9> <20>㤥<EFBFBD> <20><>⠢<EFBFBD><E2A0A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>.',0
.9 db '<27><><EFBFBD><EFBFBD><EFBFBD> ⥪<>饣<EFBFBD> ᭨<><E1ADA8><EFBFBD>:',0
.10 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⢮ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>:',0

but_text:
.1 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD> <20><>࠭<EFBFBD>',0
.2 db '<27><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD> ᭨<><E1ADA8><EFBFBD> <20><>࠭<EFBFBD>',0
.3 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD> ᥩ<><E1A5A9><EFBFBD>',0
.4 db '<27>ਬ<EFBFBD><E0A8AC><EFBFBD><EFBFBD><EFBFBD>',0
.5 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ꥬ<EFBFBD><EAA5AC>',0
.6 db '<27><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ꥬ<EFBFBD><EAA5AC>',0
.7 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>',0

ch_text:
.1 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>';,0
.2 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD>';,0
.3 db '<27><>⥬ ᤥ<><E1A4A5><EFBFBD><EFBFBD> <20><>⨢<EFBFBD><E2A8A2><EFBFBD>';,0
.4 db '<27><><EFBFBD><EFBFBD>প<EFBFBD>:';,0
.5 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD><EFBFBD>';,0
.6 db '<27><>⮭㬥<E2AEAD><E3ACA5><EFBFBD><EFBFBD><EFBFBD>, <20><>稭<EFBFBD><E7A8AD> <20>';,0
.7 db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
.8:

no_shoot db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> ᤥ<><E1A4A5><EFBFBD>',0
shooting db '<27><>⮣<EFBFBD><E2AEA3><EFBFBD><EFBFBD>஢<EFBFBD><E0AEA2><EFBFBD><EFBFBD>...',0
shooted_ok db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᤥ<><E1A4A5><EFBFBD>',0
saving db '<27><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD><EFBFBD>...',0
saved_ok db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>࠭<EFBFBD><E0A0AD>',0
delay_now db '<27><><EFBFBD><EFBFBD>প<EFBFBD>...',0
bad_file_name db '<27><><EFBFBD> 䠩<><E4A0A9> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>୮',0
disk_filled db '<27><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>',0
bad_fat_table db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> FAT ࠧ<><E0A0A7>襭<EFBFBD>',0
ac_den db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>饭',0
device_er db '<27>訡<EFBFBD><E8A8A1> <20><><EFBFBD>ன<EFBFBD>⢠',0
not_shooted db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᭨<><E1ADA8><EFBFBD> !!!',0
no_file_name db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> 䠩<><E4A0A9> !!!',0
invalid_rect db '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⨬<EFBFBD><E2A8AC> ࠧ<><E0A0A7><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>',0

else
text:
.2 db 'Screen width:',0
.1 db 'Screen height:',0
.3 db 'Enter full path to the file:',0
.4 db 'Bits per pixel:',0
.5 db 'Bytes per line:',0
.6 db '100 = 1 second',0
;.7: db 'Enter name of file:',0
;.8: db 'Instead of "*" in filename the number will be included.',0
.9 db 'Current photo number:',0
.10 db 'Amount of digits in number:',0

but_text:
.1 db 'Make screen photo',0
.2 db 'Save screen photo',0
.3 db 'Show photo now',0
.4 db 'Apply',0
.5 db 'Start autoshooting',0
.6 db 'Stop autoshooting',0
.7 db 'Set',0

ch_text:
.1 db 'Minimize window';,0
.2 db 'Show photo';,0
.3 db 'then make active';,0
.4 db 'Delay:';,0
.5 db 'Autosave';,0
.6 db 'Start numeration from';,0
.7 db 'Area'
.8:

no_shoot db 'There is no photo',0
shooting db 'Photographing...',0
shooted_ok db 'Photo created',0
saving db 'Saving...',0
saved_ok db 'Photo saved',0
delay_now db 'Delay...',0
bad_file_name db 'File name is wrong',0
disk_filled db 'Disk is full',0
bad_fat_table db 'FAT table destroyed',0
ac_den db 'Access denied',0
device_er db 'Device error',0
not_shooted db 'Make photo !!!',0
no_file_name db 'Enter file name !!!',0
invalid_rect db 'Wrong area size',0

end if

sign_n_input:
        db      '2',0

app_ipc ipc_buffer 32

mouse_flag: dd 0x0
structure_of_potock:
rb 100

cur_number        dd      ?

sign_n        db      ?

slot_n        dd ?

flags        dd ?

scr_buf:
.ptr        dd      ?
.end_ptr        dd      ?
.size:
.height        dw      ?
.width        dw      ?

fs_struc:
.funk_n        dd      ?
        dd      ?
        dd      ?
.bytes_to_write  dd      ?
.data_ptr        dd    ?,?
.fn_ptr        dd      ?

sf_buf:
.bmp_header   dd      ?
.bmp_area     dd      ?
.end          dd      ?

set_rect_window_pid dd ?
set_rect_window_slot dd ?

rect_input_buffer:
.left rb 6
.top  rb 6
.width  rb 6
.height rb 6

cmdstr rb 257

ed_buffer:
.1: rb 1025
.2: rb 10
.3: rb 10

file_name:
        rb      1058

scr screen_prop
rect:
.left dw ?
.top dw ?
.height dw ?
.width dw ?


sc sys_color_table
app procinfo        ; <20><><EFBFBD><EFBFBD>ଠ<EFBFBD><E0ACA0><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
active_app procinfo ; <20><><EFBFBD><EFBFBD>ଠ<EFBFBD><E0ACA0><EFBFBD> <20><> <20><>⨢<EFBFBD><E2A8A2><EFBFBD> <20><><EFBFBD><EFBFBD>
set_rect_window_procinfo procinfo  ; <20><><EFBFBD><EFBFBD>ଠ<EFBFBD><E0ACA0><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
shoot_esp rb 512                   ; <20>⥪ <20><>⮪<EFBFBD> <20><>⪠<EFBFBD><E2AAA0><EFBFBD>
set_rect_window_esp rb 512         ; <20>⥪ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        app_end    ; <20><><EFBFBD><EFBFBD><EFBFBD> <20>ணࠬ<E0AEA3><E0A0AC>