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

  .no_boot:
    cmp   byte [temp_area],0
    jz    .no_param
    mov   edi,string      ; clear string
-   mov   ecx,43*3        ;   length of a string
+   mov   ecx,256/4       ;   length of a string
-   xor   eax,eax         ;   symbol <0>
-   add   al,14h
-   cld
+   xor   eax,eax         ;   symbol <0>
-   rep   stosb
+   rep   stosd
+   mov   edi,temp_area   ; look for <0> in temp_area
-   mov   edi,temp_area   ; look for <0> in temp_area
+   mov   esi,edi
-   mov   ecx,43*3+1      ;   strlen
+   mov   ecx,257         ;   strlen
-   repne scasb
-   add   edi,-temp_area  ;   get length of the string
-   dec   edi
    repne scasb
-   mov   ecx,edi
+        lea     ecx, [edi-temp_area]
    mov   esi,temp_area
    mov   edi,string
   @@:
 ; â¥¯¥àì ¢ ecx ®¬¥à ¯à®æ¥áá
+    mov  [process],ecx
     mov  [process],ecx
 draw_still:
     call draw_window
 still:
-    mov  eax,10                 ; wait here for event
-    int  0x40
+    mov  eax,10                 ; wait here for event
-    cmp  eax,1                  ; redraw request ?
+    int  0x40
-    je   red
-    cmp  eax,2                  ; key in buffer ?
-    je   key
-    cmp  eax,3                  ; button in buffer ?
-    je   button
-    jmp  still
-  red:
-    bt   [status],2
-    jnc  @f
-    mov eax,18
-    mov ebx,3
-    mov ecx,[process]
-    int 0x40
     btr [status],2
+        dec     eax
-    jmp still
+        jz      red
+        dec     eax
-   @@:
+        jnz     button
     call draw_window
-    jmp still
+  key:                          ; key
     mov  al,2
-  key:                          ; key
+    int  0x40
-    int  0x40
+    mov  al,ah
-    cmp  ah,6
+    cmp  al,6
     je   kfile
-    cmp  ah,15
+    cmp  al,15
+    je   kopen
+    cmp  al,9
+    je   kinfo
+    cmp  al,2
+    je   kbgrd
+    jmp  still
+  red:
+        test    byte [status], 4
+        jz      draw_still
-    je   kopen
+        mov     al, 18
-    cmp  ah,9
+        mov     ebx, 3
-    je   kinfo
+        mov     ecx, [process]
-    cmp  ah,2
+        int     0x40
     int  0x40
   noclose:
     cmp  ah,2
     jne  nofile
   kfile:
-    bt   dword [status],0
+        test    byte [status], 1
-    jc   still
+        jnz     still
-    bts  dword [status],0
+        or      byte [status], 1
     mov  eax,51
     mov  ebx,1
     mov  ecx,thread1
     mov  edx,0x29fff0
     int  0x40
   noopen:
     cmp  ah,4
     jne  noinfo
   kinfo:
-    bt   dword [status],1
+        test    byte [status], 2
-    jc   still
+        jnz     still
-    bts  dword [status],1
+        or      byte [status], 2
     mov  eax,51
     mov  ebx,1
     mov  ecx,thread2
     mov  edx,0x2afff0
+;
     cmp  ah,5
     jne  still
   kbgrd:
-    bt dword [status],3
+        test    byte [status], 8
-    jc   still
+        jnz     still
-    bts dword [status],3
+        or      byte [status], 8
     mov  eax,51
     mov  ebx,1
     mov  ecx,thread3
     mov  edx,0x2bfff0
     int  0x40
     ret
-load_image:
-    mov  dword [fileinfo+8],1 ; how many blocks to read (1)
-    mov  eax,58
-    mov  ebx,fileinfo
-    int  0x40
-    cmp  [I_END+2],dword 512  ; à §¬¥à ä ©«  (file size)
-    jbe  @f
-    mov  eax,[I_END+2]
-    shr  eax,9 ; ¯®¤¥«¨¬   512 ¨ ¯à¨¡ ¢¨¬ 1 - ¯®«ãç¨¬ ç¨á«® ¡«®ª®¢
-    inc  eax
-    mov  dword [fileinfo+8],eax
+load_image:
-    mov  eax,58
+        mov     eax, 70
-    mov  ebx,fileinfo
-    int  0x40
+        mov     ebx, fileinfo
-@@:
+        int     0x40
     mov  eax,[I_END+18]
     mov  ebx,[I_END+22]
     add  eax,20
     mov  edx,[I_END+22] ; ¢ëá®â
     int  0x40
     mov  esi, ecx
     imul esi, edx
-    imul esi, 3
+        lea     esi, [esi+esi*2]
     mov  ebx,5
     mov  ecx,[soi]
     xor  edx,edx
 ;;;    mov  esi, ;640*480*3
     ret
   convert:
     movzx eax,word [I_END+28]
     mul dword [I_END+18]
-    mov  ebx,32
+;    mov  ebx,32
-    div  ebx
+;    div  ebx
-    test edx,edx
+;    test edx,edx
-    je   noaddword
+;    je   noaddword
-    inc  eax
+;    inc  eax
+;  noaddword:
+        add     eax, 31
-  noaddword:
+        shr     eax, 5
     mov  [dwps],eax  ;dwps-doublewords per string
     shl  eax,2
     mov  [bps],eax   ;bps-bytes per string
 labelt:
          db 'MeView v.0.3'
 lsz buttext,\
     en,   ' FILE   OPEN   INFO   BGRD',\
+    ru,   '           ',\
-    ru,   '           '
+    de,   'DATEI OEFNEN  INFO   HGRD'
 status   dd 0  ;bit0=1 if file thread is created
 bps      dd 0
                                    ; WINDOW LABEL
     mov  eax,4                     ; function 4 : write text to window
     mov  ebx,8*65536+8             ; [x start] *65536 + [y start]
     mov  ecx,0x10ddeeff            ; font 1 & color ( 0xF0RRGGBB )
     mov  edx,labelt1               ; pointer to text beginning
-    mov  esi,4                     ; text length
+    mov  esi,labelt1.size          ; text length
     int  0x40
     call drawstring
 ; DATA AREA
 lsz labelt1,\
-   en,  'File',\
-   ru,  ' ©«'
-pos: dd 6
-fileinfo:
-     dd 0
-     dd 0
-     dd 1          ;number of blocks  of 512 bytes
+   en,  'File',\
-     dd I_END
-     dd temp_area
-string:
-; db '/HARDDISK/FIRST/1/DICK.BMP                  '
-; db '/hd/1/menuet/pics/new.bmp                   '
-  db '/rd/1/bgr.bmp                               '
-  db '                                            '
+   ru,  ' ©«',\
-  db '                                            '
+   de,  'Datei'
 ; DATA AREA
 lsz labelt2,\
+    en,   'File info',\
-    en,   'File info',\
+    ru,   'ä®à¬ æ¨ï ® ä ©«¥',\
-    ru,   'ä®à¬ æ¨ï ® ä ©«¥'
+    de,   'Dateiinfo'
 lsz fitext,\
      en, 'FILE SIZE     ',\
      en, 'X SIZE        ',\
      en, 'Y SIZE        ',\
      en, 'BITS PER PIXEL',\
+                          \
      ru, ' §¬¥à ä ©«   ',\
+     ru, '¨à¨         ',\
+     ru, 'ëá®â         ',\
+     ru, '¨â   ¯¨ªá¥« ',\
+                          \
+     de, 'FATEIGROESSE  ',\
-     ru, '¨à¨         ',\
+     de, 'X GROESSE     ',\
-     ru, 'ëá®â         ',\
+     de, 'Y GROESSE     ',\
                                    ; WINDOW LABEL
     mov  eax,4                     ; function 4 : write text to window
     mov  ebx,8*65536+8             ; [x start] *65536 + [y start]
     mov  ecx,0x10ddeeff            ; font 1 & color ( 0xF0RRGGBB )
     mov  edx,labelt3               ; pointer to text beginning
-    mov  esi,14                    ; text length
+    mov  esi,labelt3.size          ; text length
     int  0x40
     add  ebx,38*65536+20
     mov  ecx,0xddeeff
     mov  edx, bgrdtext
     mov  esi, bgrdtext.size
 wnd_width dd 210
 wnd_height dd 53
 lsz labelt3,\
     en,   'Background set',\
+    ru,   "áâ ®¢ª  ä® ",\
-    ru,   "áâ ®¢ª  ä® "
+    de,   'Hintergrund gesetzt'
 lsz bgrdtext,\
+    en, 'SET AS BACKGROUND:',\
-    en, 'SET AS BACKGROUND:',\
+    ru, '¨¯ ®¡®¥¢:',\
-    ru, '¨¯ ®¡®¥¢:'
+    de, 'ALS HINTERGRUND'
+lsz tiled,\
-lsz tiled,\
+    en, 'TILED',\
-    en, 'TILED',\
+    ru, '§ ¬®áâ¨âì',\
-    ru, '§ ¬®áâ¨âì'
+    de, 'GEKACHELT'
 lsz stretch,\
-lsz stretch,\
+    en, 'STRETCH',\
-    en, 'STRETCH',\
+    ru, 'à áâïãâì',\
-    ru, 'à áâïãâì'
+    de, 'GESTRECKT'
+lsz ok_btn,\
+    en, 'Ok',\
+    ru, 'Ok',\
+    de, 'Ok'
+pos: dd 6
+fileinfo:
+     dd 0
      dd 0
+     dd 0
+     dd 0x290000-I_END
-lsz ok_btn,\
+     dd I_END
-    en, 'Ok',\
+string:
-    ru, 'Ok'
+        db      '/rd/1/bgr.bmp',0

Subversion Repositories Kolibri OS

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