Subversion Repositories Kolibri OS

;; on all copies.

;; on all copies.

;;

;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$Revision: 2268 $

$Revision: 2434 $

        cli                             ; disable all irqs

        cli                             ; disable all irqs

        cld

        cld

        mov     al,255                  ; mask all irqs

        mov     al, 255                 ; mask all irqs

        out     0xa1,al

        out     0xa1, al

        out     0x21,al

        out     0x21, al

        test    al, 2

        test    al, 2

        jnz     l.5

        jnz     l.5

        mov     al, 0xD1

        mov     al, 0xD1

        out     0x64, al

        out     0x64, al

        test    al, 2

        test    al, 2

        jnz     l.6

        jnz     l.6

        mov     al, 0xDF

        mov     al, 0xDF

        out     0x60, al

        out     0x60, al

        test    al, 2

        test    al, 2

        jnz     l.7

        jnz     l.7

        mov     al, 0xFF

        mov     al, 0xFF

        out     0x64, al

        out     0x64, al

        movzx eax, byte [BOOT_VAR+0x9000]        ; bpp

        movzx   eax, byte [BOOT_VAR+0x9000]      ; bpp

        mov [ScreenBPP],al

        mov     [ScreenBPP], al

        mov [_display.bpp], eax

        mov     [_display.bpp], eax

        mov [_display.disable_mouse],  __sys_disable_mouse

        mov     [_display.vrefresh], 60

        movzx eax,word [BOOT_VAR+0x900A]  ; X max

        movzx   eax, word [BOOT_VAR+0x900A]; X max

        mov [_display.width], eax

        mov     [_display.width], eax

        dec   eax

        dec     eax

        mov   [Screen_Max_Y],eax

        mov     [Screen_Max_Y], eax

        mov   [screen_workarea.bottom],eax

        mov     [screen_workarea.bottom], eax

        movzx eax,word [BOOT_VAR+0x9008]  ; screen mode

        movzx   eax, word [BOOT_VAR+0x9008]; screen mode

        mov   [SCR_MODE],eax

        mov     [SCR_MODE], eax

        mov   [BytesPerScanLine],word 640*4         ; Bytes PerScanLine

        mov     [BytesPerScanLine], word 640*4      ; Bytes PerScanLine

        cmp   [SCR_MODE],word 0x13          ; 320x200

        cmp     [SCR_MODE], word 0x13       ; 320x200

        je    @f

        je      @f

        cmp   [SCR_MODE],word 0x12          ; VGA 640x480

        cmp     [SCR_MODE], word 0x12       ; VGA 640x480

        je    @f

        je      @f

        mov     eax,[BOOT_VAR+0x9018]

        mov     eax, [BOOT_VAR+0x9018]

        mov     [LFBAddress],eax

        mov     [LFBAddress], eax

        cmp     [SCR_MODE],word 0100000000000000b

        cmp     [SCR_MODE], word 0100000000000000b

        cmp     [SCR_MODE],word 0x13

        cmp     [SCR_MODE], word 0x13  ; EGA 320*200 256 colors

      ga24:

        je      v20ga32

        jmp     v20ga24

;        jmp     v20ga24

      setvesa20:

setvesa20:

        mov     [PUTPIXEL],dword Vesa20_putpixel24  ; Vesa 2.0

        mov     [PUTPIXEL], dword Vesa20_putpixel24 ; Vesa 2.0

        mov     [GETPIXEL],dword Vesa20_getpixel24

        mov     [GETPIXEL], dword Vesa20_getpixel24

        cmp     [ScreenBPP],byte 24

        cmp     [ScreenBPP], byte 24

        jz      v20ga24

        jz      v20ga24

      v20ga32:

v20ga32:

        mov     [PUTPIXEL],dword Vesa20_putpixel32

        mov     [PUTPIXEL], dword Vesa20_putpixel32

        mov     [GETPIXEL],dword Vesa20_getpixel32

        jmp     no_mode_0x12

      v20ga24:

v20ga24:

        cmp     [SCR_MODE],word 0x12                ; 16 C VGA 640x480

        cmp     [SCR_MODE], word 0x12               ; 16 C VGA 640x480

        jne     no_mode_0x12

        jne     no_mode_0x12

        mov     [PUTPIXEL],dword VGA_putpixel

        mov     [PUTPIXEL], dword VGA_putpixel

                                 (unpack.lc+unpack.lp)))*4

                (unpack.lc+unpack.lp)))*4

           mov [unpack.p], eax

        mov     [unpack.p], eax

           call init_events

        call    init_events

           mov eax, srv.fd-SRV_FD_OFFSET

        mov     eax, srv.fd-SRV.fd

           mov [srv.fd], eax

        mov     [srv.fd], eax

           mov [srv.bk], eax

        mov     [srv.bk], eax

; LOAD FONTS I and II

; LOAD FONTS I and II

        stdcall read_file, char, FONT_I, 0, 2304

        stdcall read_file, char, FONT_I, 0, 2304

        stdcall read_file, char2, FONT_II, 0, 2560

        mov     [_display.check_m_pixel], check_mouse_area_for_getpixel

        mov   esi,boot_fonts

        mov     esi, boot_fonts

        call  boot_log

        call    boot_log

  cmp ax,'r1'           ; if not rused ram disk - load network configuration from files {SPraid.simba}

        cmp     ax, 'r1'; if not rused ram disk - load network configuration from files {SPraid.simba}

  je  no_st_network

        je      no_st_network

        call set_network_conf

        call    set_network_conf

  no_st_network:

  no_st_network:

; LOAD FIRST APPLICATION

; LOAD FIRST APPLICATION

        cli

        cli

; A 'All set - press ESC to start' messages if need

; A 'All set - press ESC to start' messages if need

if preboot_blogesc

if preboot_blogesc

        mov     esi, boot_tasking

        mov     esi, boot_tasking

.bll1:  in      al, 0x60        ; wait for ESC key press

        in      al, 0x60        ; wait for ESC key press

        cmp     al, 129

        cmp     al, 129

        jne     .bll1

        jne     .bll1

end if

end if

        ; Fly :)

        ; Fly :)

include 'unpacker.inc'

include 'unpacker.inc'

ahci_driver db 'AHCI',0

include 'fdo.inc'

align 4

align 4

boot_log:

boot_log:

;include 'detect/sear_par.inc'

;include 'detect/sear_par.inc'

;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

    ret

        ret

sys_end:

@@:

;--------------------------------------

     mov ecx, [current_slot]

        mov     ecx, [current_slot]

     mov eax, [ecx+APPDATA.tls_base]

        mov     eax, [ecx+APPDATA.tls_base]

     mov  [shutdown_processes],eax

        mov     [shutdown_processes], eax

     and  dword [esp+32], 0

        and     dword [esp+32], 0

 exit_for_anyone:

 exit_for_anyone:

     ret

        ret

  uglobal

  uglobal

  endg

  endg

;------------------------------------------------------------------------------

;------------------------------------------------------------------------------

sysfn_terminate:        ; 18.2 = TERMINATE

sysfn_terminate:        ; 18.2 = TERMINATE

     cmp  ecx,2

        cmp     ecx, 2

     jb   noprocessterminate

        jb      noprocessterminate

     mov  edx,[TASK_COUNT]

        mov     edx, [TASK_COUNT]

     cmp  ecx,edx

        cmp     ecx, edx

     ja   noprocessterminate

        ja      noprocessterminate

     mov  eax,[TASK_COUNT]

        mov     eax, [TASK_COUNT]

     shl  ecx,5

        shl     ecx, 5

     mov  edx,[ecx+CURRENT_TASK+TASKDATA.pid]

        mov     edx, [ecx+CURRENT_TASK+TASKDATA.pid]

     add  ecx,CURRENT_TASK+TASKDATA.state

        add     ecx, CURRENT_TASK+TASKDATA.state

     cmp  byte [ecx], 9

        cmp     byte [ecx], 9

     jz   noprocessterminate

        jz      noprocessterminate

;--------------------------------------

     ;call MEM_Heap_Lock      ;guarantee that process isn't working with heap

     ;call MEM_Heap_Lock      ;guarantee that process isn't working with heap

     mov  [ecx],byte 3       ; clear possible i40's

        mov     [ecx], byte 3; clear possible i40's

     ;call MEM_Heap_UnLock

     ;call MEM_Heap_UnLock

align 4

align 4

sys_clock:

sys_clock:

        cli

        cli

  @@:   mov   al, 10

        mov     al, 10

        out   0x70, al

        out     0x70, al

        in    al, 0x71

        in      al, 0x71

        test  al, al

        test    al, al

        jns   @f

        jns     @f

align 4

align 4

sys_date:

sys_date:

        cli

  @@:

  @@:   mov   al, 10

        mov     al, 10

        out   0x70, al

        out     0x70, al

        in    al, 0x71

        in      al, 0x71

        test  al, al

        test    al, al

nocpustart:

nocpustart:

    cmp   [mouse_active], 1

        cmp     [mouse_active], 1

    jne   mouse_not_active

        jne     mouse_not_active

    mov   [mouse_active], 0

    xor   edi, edi

set_mouse_event:

.set_mouse_event:

    loop  set_mouse_event

        pop     eax

mouse_not_active:

mouse_not_active:

    cmp   byte[BACKGROUND_CHANGED], 0

        cmp     byte[BACKGROUND_CHANGED], 0

    loop  markz

        loop    markz

@@:

@@:

    call [_display.disable_mouse]

  no_mark_system_shutdown:

    dec  byte [SYS_SHUTDOWN]

        dec     byte [SYS_SHUTDOWN]

        in    al,0x61

        in      al, 0x61

        and   al,0x10

        and     al, 0x10

        mov   ah,al

        mov     ah, al

        cld

        cld

 cnt1:  in    al,0x61

        in      al, 0x61

        and   al,0x10

        and     al, 0x10

        cmp   al,ah

        cmp     al, ah

        jz    cnt1

        jz      cnt1

        pop   ecx

        pop     ecx

        pop   eax

        pop     eax

align 4

        mov     [edi + TASKDATA.event_mask], ebx

        xchg    eax, [edi + TASKDATA.event_mask] ; set new event mask

        mov     [esp+32], eax

        mov     [esp+32], eax                    ; return old mask value

     jbe   new_port_access_disable

        jbe     new_port_access_disable

no_mask_io:

no_mask_io:

;     popad                         ; end disable io map

;     popad                         ; end disable io map

     xor   eax, eax

        xor     eax, eax

     ret

        ret

align 4

align 4

drawbackground:

drawbackground:

     dbrv20:

dbrv20:

       cmp   [BgrDrawMode],dword 1

        cmp     [BgrDrawMode], dword 1

       jne   bgrstr

        jne     bgrstr

       call  vesa20_drawbackground_tiled

        call    vesa20_drawbackground_tiled

       call   [draw_pointer]

        call    [draw_pointer]

       ret

        ret

     bgrstr:

bgrstr:

       call  vesa20_drawbackground_stretch

        call    vesa20_drawbackground_stretch

       call   [draw_pointer]

        call    [draw_pointer]

       ret

        ret

align 4

align 4

syscall_putimage:                       ; PutImage

syscall_putimage:                       ; PutImage

sys_putimage:

sys_putimage:

     test  ecx,0x80008000

        test    ecx, 0x80008000

     jnz   .exit

        jnz     .exit

     test  ecx,0x0000FFFF

        test    ecx, 0x0000FFFF

     jz    .exit

        jz      .exit

     test  ecx,0xFFFF0000

        test    ecx, 0xFFFF0000

     jnz   @f

        jnz     @f

  .exit:

.exit:

     ret

        ret

 @@:

@@:

        mov     edi,[current_slot]

        mov     edi, [current_slot]

        add     dx,word[edi+APPDATA.wnd_clientbox.top]

        add     dx, word[edi+APPDATA.wnd_clientbox.top]

        rol     edx,16

        rol     edx, 16

        add     dx,word[edi+APPDATA.wnd_clientbox.left]

        add     dx, word[edi+APPDATA.wnd_clientbox.left]

        rol     edx,16

        rol     edx, 16

  .forced:

.forced:

        push    ebp esi 0

        push    ebp esi 0

        mov     ebp, putimage_get24bpp

        mov     ebp, putimage_get24bpp

        mov     esi, putimage_init24bpp

        mov     esi, putimage_init24bpp

sys_putimage_bpp:

sys_putimage_bpp:

        pop     ebp esi ebp

        pop     ebp esi ebp

align 4

align 4

sys_putimage_palette:

sys_putimage_palette:

; ebx = pointer to image

; ebx = pointer to image

; ecx = [xsize]*65536 + [ysize]

; ecx = [xsize]*65536 + [ysize]

; edx = [xstart]*65536 + [ystart]

; edx = [xstart]*65536 + [ystart]

        shl     eax, 8

        shl     eax, 8

        add     dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.top]

        add     dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.top]

        rol     edx, 16

        rol     edx, 16

        add     dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.left]

        add     dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.left]

        rol     edx, 16

        rol     edx, 16

.forced:

.forced:

        cmp     esi, 1

        cmp     esi, 1

        jnz     @f

        jnz     @f

        push    edi

        push    edi

        mov     eax, [edi+4]

        mov     eax, [edi+4]

        mov     edi, esp

        mov     edi, esp

        call    put_mono_image

        call    put_mono_image

        add     esp, 12

        add     esp, 12

        pop     edi

        pop     edi

        ret

        ret

@@:

@@:

        cmp     esi, 2

        cmp     esi, 2

        jnz     @f

        jnz     @f

        push    edi

        push    edi

        push    0ffffff80h

        push    0ffffff80h

        mov     edi, esp

        mov     edi, esp

        call    put_2bit_image

        call    put_2bit_image

        pop     eax

        pop     eax

        pop     edi

        pop     edi

        ret

        ret

@@:

@@:

        cmp     esi, 4

        cmp     esi, 4

        jnz     @f

        jnz     @f

        push    edi

        push    edi

        push    0ffffff80h

        push    0ffffff80h

        mov     edi, esp

        mov     edi, esp

        call    put_4bit_image

        call    put_4bit_image

        pop     eax

        pop     eax

        pop     edi

        pop     edi

        ret

        ret

@@:

@@:

        push    ebp esi ebp

        push    ebp esi ebp

        cmp     esi, 8

        cmp     esi, 8

        jnz     @f

        jnz     @f

        mov     ebp, putimage_get8bpp

        mov     ebp, putimage_get8bpp

        mov     esi, putimage_init8bpp

        mov     esi, putimage_init8bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

@@:

@@:

        cmp     esi, 15

        cmp     esi, 15

        jnz     @f

        jnz     @f

        mov     ebp, putimage_get15bpp

        mov     ebp, putimage_get15bpp

        mov     esi, putimage_init15bpp

        mov     esi, putimage_init15bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

@@:

@@:

        cmp     esi, 16

        cmp     esi, 16

        jnz     @f

        jnz     @f

        mov     ebp, putimage_get16bpp

        mov     ebp, putimage_get16bpp

        mov     esi, putimage_init16bpp

        mov     esi, putimage_init16bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

@@:

@@:

        cmp     esi, 24

        cmp     esi, 24

        jnz     @f

        jnz     @f

        mov     ebp, putimage_get24bpp

        mov     ebp, putimage_get24bpp

        mov     esi, putimage_init24bpp

        mov     esi, putimage_init24bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

@@:

@@:

        cmp     esi, 32

        cmp     esi, 32

        jnz     @f

        jnz     @f

        mov     ebp, putimage_get32bpp

        mov     ebp, putimage_get32bpp

        mov     esi, putimage_init32bpp

        mov     esi, putimage_init32bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

@@:

@@:

        pop     ebp esi ebp

        pop     ebp esi ebp

        ret

        ret

put_mono_image:

put_mono_image:

        push    ebp esi ebp

        push    ebp esi ebp

        mov     ebp, putimage_get1bpp

        mov     ebp, putimage_get1bpp

        mov     esi, putimage_init1bpp

        mov     esi, putimage_init1bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

put_2bit_image:

put_2bit_image:

        push    ebp esi ebp

        push    ebp esi ebp

        mov     ebp, putimage_get2bpp

        mov     ebp, putimage_get2bpp

        mov     esi, putimage_init2bpp

        mov     esi, putimage_init2bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

put_4bit_image:

put_4bit_image:

        push    ebp esi ebp

        push    ebp esi ebp

        mov     ebp, putimage_get4bpp

        mov     ebp, putimage_get4bpp

        mov     esi, putimage_init4bpp

        mov     esi, putimage_init4bpp

        jmp     sys_putimage_bpp

        jmp     sys_putimage_bpp

putimage_init24bpp:

putimage_init24bpp:

        lea     eax, [eax*3]

        lea     eax, [eax*3]

putimage_init8bpp:

putimage_init8bpp:

        ret

        ret

align 16

align 16

putimage_get24bpp:

putimage_get24bpp:

        movzx   eax, byte [esi+2]

        movzx   eax, byte [esi+2]

        shl     eax, 16

        shl     eax, 16

        mov     ax, [esi]

        mov     ax, [esi]

        add     esi, 3

        add     esi, 3

        ret     4

        ret     4

align 16

align 16

putimage_get8bpp:

putimage_get8bpp:

        movzx   eax, byte [esi]

        movzx   eax, byte [esi]

        push    edx

        push    edx

        mov     edx, [esp+8]

        mov     edx, [esp+8]

        mov     eax, [edx+eax*4]

        mov     eax, [edx+eax*4]

        pop     edx

        pop     edx

        inc     esi

        inc     esi

        ret     4

        ret     4

putimage_init1bpp:

putimage_init1bpp:

        add     eax, ecx

        add     eax, ecx

        push    ecx

        push    ecx

        add     eax, 7

        add     eax, 7

        add     ecx, 7

        add     ecx, 7

        shr     eax, 3

        shr     eax, 3

        shr     ecx, 3

        shr     ecx, 3

        sub     eax, ecx

        sub     eax, ecx

        pop     ecx

        pop     ecx

        ret

        ret

align 16

align 16

putimage_get1bpp:

putimage_get1bpp:

        push    edx

        push    edx

        mov     edx, [esp+8]

        mov     edx, [esp+8]

        mov     al, [edx]

        mov     al, [edx]

        sbb     eax, eax

        sbb     eax, eax

        and     eax, [edx+8]

        and     eax, [edx+8]

        add     eax, [edx+4]

        add     eax, [edx+4]

        pop     edx

        pop     edx

        ret     4

        ret     4

putimage_init2bpp:

putimage_init2bpp:

        add     eax, ecx

        add     eax, ecx

        push    ecx

        push    ecx

        add     ecx, 3

        add     ecx, 3

        add     eax, 3

        add     eax, 3

        shr     ecx, 2

        shr     ecx, 2

        shr     eax, 2

        shr     eax, 2

        sub     eax, ecx

        sub     eax, ecx

        pop     ecx

        pop     ecx

        ret

        ret

align 16

align 16

putimage_get2bpp:

putimage_get2bpp:

        push    edx

        push    edx

        mov     edx, [esp+8]

        mov     edx, [esp+8]

        mov     al, [edx]

        mov     al, [edx]

        mov     edx, [edx+4]

        mov     edx, [edx+4]

        movzx   eax, al

        movzx   eax, al

        mov     eax, [edx+eax*4]

        mov     eax, [edx+eax*4]

        pop     edx

        pop     edx

        ret     4

        ret     4

putimage_init4bpp:

putimage_init4bpp:

        add     eax, ecx

        add     eax, ecx

        push    ecx

        push    ecx

        add     ecx, 1

        add     ecx, 1

        add     eax, 1

        add     eax, 1

        shr     ecx, 1

        shr     ecx, 1

        shr     eax, 1

        shr     eax, 1

        sub     eax, ecx

        sub     eax, ecx

        pop     ecx

        pop     ecx

        ret

        ret

align 16

align 16

putimage_get4bpp:

putimage_get4bpp:

        push    edx

        push    edx

        mov     edx, [esp+8]

        mov     edx, [esp+8]

        add     byte [edx], 80h

        add     byte [edx], 80h

        shr     eax, 4

        shr     eax, 4

        mov     edx, [edx+4]

        mov     edx, [edx+4]

        mov     eax, [edx+eax*4]

        mov     eax, [edx+eax*4]

        pop     edx

        pop     edx

        ret     4

        ret     4

putimage_init32bpp:

putimage_init32bpp:

        shl     eax, 2

        shl     eax, 2

        ret

        ret

align 16

align 16

putimage_get32bpp:

putimage_get32bpp:

        lodsd

        lodsd

        ret     4

        ret     4

putimage_init15bpp:

putimage_init15bpp:

putimage_init16bpp:

putimage_init16bpp:

        add     eax, eax

        add     eax, eax

        ret

        ret

align 16

align 16

putimage_get15bpp:

putimage_get15bpp:

; 0RRRRRGGGGGBBBBB -> 00000000RRRRR000GGGGG000BBBBB000

; 0RRRRRGGGGGBBBBB -> 00000000RRRRR000GGGGG000BBBBB000

        push    ecx edx

        push    ecx edx

        movzx   eax, word [esi]

        movzx   eax, word [esi]

        shl     edx, 9

        shl     edx, 9

        or      eax, ecx

        or      eax, ecx

        or      eax, edx

        or      eax, edx

        pop     edx ecx

        pop     edx ecx

        ret     4

        ret     4

align 16

align 16

putimage_get16bpp:

putimage_get16bpp:

; RRRRRGGGGGGBBBBB -> 00000000RRRRR000GGGGGG00BBBBB000

; RRRRRGGGGGGBBBBB -> 00000000RRRRR000GGGGGG00BBBBB000

        push    ecx edx

        push    ecx edx

        movzx   eax, word [esi]

        movzx   eax, word [esi]

        shl     edx, 8

        shl     edx, 8

        or      eax, ecx

        or      eax, ecx

        or      eax, edx

        or      eax, edx

        pop     edx ecx

        pop     edx ecx

        ret     4

        ret     4

; eax x beginning

; eax x beginning

; ebx y beginning

; ebx y beginning

; ecx x end

; ecx x end

        ; edx y end

        ; edx y end

; edi color

; edi color

kb_read:

kb_read:

        push    ecx edx

        push    ecx edx

      kr_exit:

      kr_exit:

        pop     edx ecx

        pop     edx ecx

;-----------------------------------------------------------------------------

align 4

kb_write:

kb_write:

      kw_exit:

      kw_exit:

        pop     edx ecx

        pop     edx ecx

;-----------------------------------------------------------------------------

align 4

kb_cmd:

kb_cmd:

           ; ps2 mouse enable

           ; ps2 mouse enable

        loop    @b

        loop    @b

        popad

        popad

        ret

        ret

  msg_board_data: times 4096 db 0

                  times 4096 db 0

  msg_board_count dd 0x0

  msg_board_count dd 0x0

endg

endg

        add     ebx, [edx-twdw+WDATA.box.top]

        add     ebx, [edx-twdw+WDATA.box.top]

        mov     edi, [current_slot]

        mov     edi, [current_slot]

        add     eax, [edi+APPDATA.wnd_clientbox.left]

        add     eax, [edi+APPDATA.wnd_clientbox.left]

        add     ebx, [edi+APPDATA.wnd_clientbox.top]

        add     ebx, [edi+APPDATA.wnd_clientbox.top]

        xor     edi, edi ; no force

        xor     edi, edi ; no force

        jmp     [putpixel]

        jmp     [putpixel]

align 4

align 4

     xor   edx, edx

        xor     edx, edx

     mov   eax, ebx

        mov     eax, ebx

     div   ecx

        div     ecx

     mov   ebx, edx

        mov     ebx, edx

     xchg  eax, ebx

        xchg    eax, ebx

     call  dword [GETPIXEL] ; eax - x, ebx - y

        call    dword [GETPIXEL]; eax - x, ebx - y

     mov   [esp + 32], ecx

        mov     [esp + 32], ecx

     ret

        ret

;eax = 36

;eax = 36

;ebx = pointer to bufer for img BBGGRRBBGGRR...

;ebx = pointer to bufer for img BBGGRRBBGGRR...

;ecx = [size x]*65536 + [size y]

;ecx = [size x]*65536 + [size y]

;edx = [start x]*65536 + [start y]

;edx = [start x]*65536 + [start y]

     pushad

        pushad

     mov   edi,ebx

        mov     edi, ebx

     mov   eax,edx

        mov     eax, edx

     shr   eax,16

        shr     eax, 16

     mov   ebx,edx

        mov     ebx, edx

     and   ebx,0xffff

        and     ebx, 0xffff

     push  ecx edx

        push    ecx edx

.start_x:

.start_x:

     push  eax ebx ecx

        push    eax ebx ecx

     add   eax,ecx

        add     eax, ecx

        and     ecx, 0xFBFFFFFF  ;negate 0x04000000 use mouseunder area

     call  dword [GETPIXEL] ; eax - x, ebx - y

        call    dword [GETPIXEL]; eax - x, ebx - y

     mov   [ebp],cx

        mov     [ebp], cx

     jnz   .start_x

        jnz     .start_x

         pop   edx ecx

        pop     edx ecx

         dec   ebx

        dec     ebx

     dec   edx

        dec     edx

     jnz   .start_y

        jnz     .start_y

     popad

        popad

     ret

        ret