WebSVN – Kolibri OS – Diff – /programs/media/mv/trunk/mv.asm

 ;   Picture browser by lisovin@26.ru
 ;   Modified by Ivan Poddubny - v.0.3
+;   Modified by Diamond - v.0.4
 ;   Compile with FASM for Menuet
 ;******************************************************************************
     use32
         mov     eax, 70
         mov     ebx, fileinfo
         int     0x40
     mov  eax,[I_END+18]
     mov  ebx,[I_END+22]
+        test    ebx, ebx
+        jns     @f
+        neg     ebx
+@@:
     add  eax,20
     cmp  eax,210
     jae  @f
     mov  eax,210
 @@:
   drawimage:
     cmp  word [I_END],word 'BM'
     jne  nodrawimage
     mov  eax,7
     mov  ebx,[soi]
+        mov     ecx, dword [I_END+18-2]
-    mov  ecx,[I_END+18]
+        mov     cx, [I_END+22]
-    shl  ecx,16
+        test    cx, cx
-    add  ecx,[I_END+22]
+        jns     @f
+        neg     cx
+@@:
     mov  edx,10*65536+50
     int  0x40
   nodrawimage:
     ret
     int  0x40
    @@:
     ret
+convert:
+        mov     ecx, I_END
+        add     ecx, [ecx+2]
+        mov     [soi], ecx
+        mov     ebp, [I_END+18]
+        lea     ebp, [ebp*3]    ; ebp = size of output scanline
+        mov     eax, [I_END+22]
+        dec     eax
+        mul     ebp
+        add     eax, ecx
+        mov     edi, eax        ; edi points to last scanline
+        mov     esi, I_END
+        add     esi, [esi+10]
+        mov     ebx, I_END+54
+        mov     edx, [I_END+22]
+        lea     eax, [ebp*2]
+        mov     [delta], eax
+        test    edx, edx
+        jz      .ret
+        jns     @f
+        neg     edx
+        and     [delta], 0
+        mov     edi, ecx
-  convert:
+@@:
-    movzx eax,word [I_END+28]
-    mul dword [I_END+18]
+        movzx   eax, word [I_END+28]
-;    mov  ebx,32
-;    div  ebx
-;    test edx,edx
+        cmp     eax, 24
-;    je   noaddword
+        jz      convert24
-;    inc  eax
-;  noaddword:
+        cmp     eax, 8
-        add     eax, 31
+        jz      convert8
-        shr     eax, 5
-    mov  [dwps],eax  ;dwps-doublewords per string
-    shl  eax,2
-    mov  [bps],eax   ;bps-bytes per string
+        cmp     eax, 4
-    cmp dword [I_END+34],0
-    jne  yespicsize  ;if picture size is defined
+        jz      convert4
-    mul dword [I_END+22]
+        dec     eax
-    mov dword [I_END+34],eax
+        jz      convert1
-  yespicsize:
-    mov  eax,I_END
+.ret:
-    push eax
-    add  eax, [I_END+2];file size
+        ret
-    inc  eax
-    mov  [soi],eax   ;soi-start of image area for drawing
+convert24:
-    pop  eax
+        mov     ecx, ebp
-    add  eax, [I_END+10]
+        rep     movsb
-    mov  [sop],eax   ;sop-start of picture in file
+        sub     edi, [delta]
-    add  eax, [I_END+34]
-    mov  [eop],eax   ;eop-end of picture in file
+        mov     eax, ebp
-    mov  eax, [I_END+18]
+        neg     eax
-    mov  ebx,3
+        and     eax, 3
-    mul  ebx             ;3x pixels in eax
+        add     esi, eax
-    mov  edi,[soi]   ;initializing
+        dec     edx
-    mov  esi,[eop]
+        jnz     convert24
-    sub  esi,[bps]
+        ret
-  nextstring:
+convert8:
+        push    edi
+        add     [esp], ebp
+.loopi:
+        xor     eax, eax
-    push edi
+        lodsb
+        cmp     dword [I_END+30], 1
+        jnz     .nocompressed
+.compressed:
+        mov     ecx, eax
+        jecxz   .special
+        lodsb
+        mov     eax, [ebx+eax*4]
+@@:
+        call    putpixel
+        loop    @b
+        jmp     .loopi
+.nocompressed:
+        mov     eax, [ebx+eax*4]
+        call    putpixel
+.loopicont:
+        cmp     edi, [esp]
+        jnz     .loopi
+.next:
+        pop     edi
+        sub     edi, [delta]
+        mov     eax, ebp
+        and     eax, 3
+        add     esi, eax
-    cmp word [I_END+28],24
+        dec     edx
+        jnz     convert8
+        ret
+.special:
+        lodsb
+        test    al, al
+        jz      .next
+        cmp     al, 2
+        jbe     .end
+        mov     ecx, eax
-    jne  convertno32
+        push    ecx
+@@:
+        xor     eax, eax
+        lodsb
+        mov     eax, [ebx+eax*4]
+        call    putpixel
+        loop    @b
+        pop     ecx
+        and     ecx, 1
+        add     esi, ecx
+        jmp     .loopi
+.end:
+        pop     edi
+        ret
+convert4:
+        push    edi
+        add     [esp], ebp
+.loopi:
-    mov  ecx,[dwps]
+        xor     eax, eax
+        lodsb
+        shr     eax, 4
+        mov     eax, [ebx+eax*4]
+        call    putpixel
+        cmp     edi, [esp]
+        jz      .loopidone
+        mov     al, [esi-1]
+        and     eax, 0xF
-    cld
+        mov     eax, [ebx+eax*4]
+        stosd
+        dec     edi
+        cmp     edi, [esp]
+        jnz     .loopi
+.loopidone:
+        pop     edi
+        sub     edi, [delta]
+        call    align_input
+        dec     edx
+        jnz     convert4
-    rep movsd
+        ret
+convert1:
+        push    edi
+        add     [esp], ebp
+.loopi:
+        lodsb
+        mov     ecx, 8
+.loopii:
+        add     al, al
+        push    eax
+        setc    al
+        movzx   eax, al
+        mov     eax, [ebx+eax*4]
+        call    putpixel
+        pop     eax
+        cmp     edi, [esp]
+        loopnz  .loopii
-  convert1:
+        jnz     .loopi
-    pop  edi
-    sub  esi,[bps]
+        pop     edi
-    sub  esi,[bps]
-    cmp  esi,[sop]
+        sub     edi, [delta]
-    jb   nomorestring
+        call    align_input
-    add  edi,eax
+        dec     edx
-    jmp  nextstring
-  nomorestring:
+        jnz     convert1
-    ret
+        ret
-  convertno32:
-    mov  ebx,I_END
     add  ebx, [I_END+14]
+align_input:
+        push    esi
-    add  ebx,14          ;start of color table
+        sub     esi, I_END
+        sub     esi, [I_END+10]
-    push esi
+        neg     esi
-    add  esi,[bps]
+        and     esi, 3
+        add     [esp], esi
+        pop     esi
-    mov  [eos],esi
+        ret
     pop  esi
-  nextelem:
-    push eax
-    movzx eax,byte [esi]
+putpixel:
-    cmp word [I_END+28],4
+        push    eax
-    je   convert4bpp
+        stosw
-    cmp word [I_END+28],1
-    je   convert1bpp
-    call converttable
+        shr     eax, 16
-  convert2:
-    pop  eax
-    inc  esi
-    cmp  esi,[eos]
-    jae  convert1
-    add  edi,3
-    jmp  nextelem
-  convert4bpp:
-    shl  ax,4
-    shr  al,4
-    push ax
-    movzx eax,ah
-    call converttable
-    add  edi,3
-    pop  ax
-    movzx eax,al
-    call converttable
-    jmp  convert2
-  convert1bpp:
-    mov  ecx,eax
-    mov  edx,7
-  nextbit:
-    xor  eax,eax
-    bt   ecx,edx
-    jnc  noaddelem
-    inc  eax
-  noaddelem:
-    push edx
-    call converttable
-    pop  edx
-    dec  edx
-    cmp  edx,0xffffffff
-    je   convert2
-    add  edi,3
-    jmp  nextbit
-  converttable:
-    shl  eax,2
-    add  eax,ebx
-    mov  edx, [eax]
+        stosb
-    mov dword [edi],edx
+        pop     eax
-    ret
+        ret
 ; DATA AREA
 labelt:
-         db 'MeView v.0.3'
+         db 'MeView v.0.4'
-lsz buttext,\
-    en,   ' FILE   OPEN   INFO   BGRD',\
-    ru,   '           ',\
-    de,   'DATEI OEFNEN  INFO   HGRD'
-status   dd 0  ;bit0=1 if file thread is created
-bps      dd 0
-dwps     dd 0
-soi      dd 0
-sop      dd 0
-eop      dd 0
-eos      dd 0
+lsz buttext,\
-process  dd 0
+    en,   ' FILE   OPEN   INFO   BGRD',\
     ru,   '           ',\
     int  0x40
     ret
+; DATA AREA
+status   dd 0  ;bit0=1 if file thread is created
+soi      dd 0
+delta   dd      0
+process  dd 0
-; DATA AREA
+bWasDraw db 0
 vflag: db 'x'
 bgrmode: dd 1

Subversion Repositories Kolibri OS

(root)/programs/media/mv/trunk/mv.asm – Rev 135 → 190