Subversion Repositories Kolibri OS

Rev

Rev 8945 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8945 Rev 9035
Line 1233... Line 1233...
1233 
        mcall
 1233 
        mcall
1234 
        add     ebx, ((5+25*1) SHL 16)+(5+25*1)
 1234 
        add     ebx, ((5+25*1) SHL 16)+(5+25*1)
1235 
        mcall
 1235 
        mcall
1236 
        mov     ebx, [toolbar_abs_left]
 1236 
        mov     ebx, [toolbar_abs_left]
1237 
        add     ebx, [toolbar.width]
 1237 
        add     ebx, [toolbar.width]
1238 
        sub     ebx, 25*5+10
 1238 
        sub     ebx, 25*4+10
1239 
        shl     ebx, 16
 1239 
        shl     ebx, 16
1240 
        add     ebx, [toolbar_abs_left]
 1240 
        add     ebx, [toolbar_abs_left]
1241 
        add     ebx, [toolbar.width]
 1241 
        add     ebx, [toolbar.width]
1242 
        sub     ebx, 25*5+10
 1242 
        sub     ebx, 25*4+10
1243 
        mcall
 1243 
        mcall
Line 1244... Line 1244...
1244 
 
 1244 
 
1245 
        mov     ebx, [toolbar_abs_left]
 1245 
        mov     ebx, [toolbar_abs_left]
1246 
        shl     ebx, 16
 1246 
        shl     ebx, 16
Line 1259... Line 1259...
1259 
        mcall    , , , 'sld'+40000000h
 1259 
        mcall    , , , 'sld'+40000000h
1260 
        add     ebx, (5+25*1) SHL 16
 1260 
        add     ebx, (5+25*1) SHL 16
1261 
        mcall    , , , 'scl'+40000000h
 1261 
        mcall    , , , 'scl'+40000000h
1262 
        mov     ebx, [toolbar_abs_left]
 1262 
        mov     ebx, [toolbar_abs_left]
1263 
        add     ebx, [toolbar.width]
 1263 
        add     ebx, [toolbar.width]
1264 
        sub     ebx, 25*5+10
 1264 
        sub     ebx, 25*4+10
1265 
        add     ebx, 5
 1265 
        add     ebx, 5
1266 
        shl     ebx, 16
 1266 
        shl     ebx, 16
1267 
        mov     bl, 21
 1267 
        mov     bl, 21
1268 
        mcall   , , , 'flh'+40000000h
 1268 
        mcall   , , , 'flh'+40000000h
1269 
        add     ebx, 25 SHL 16
 1269 
        add     ebx, 25 SHL 16
Line 1294... Line 1294...
1294 
;        mcall     , buttons+scalebtn  *20
 1294 
;        mcall     , buttons+scalebtn  *20
1295 
        mov     [scale_button_xy], edx
 1295 
        mov     [scale_button_xy], edx
1296 
        call    draw_scale_button
 1296 
        call    draw_scale_button
1297 
        mov     edx, [client_abs_left]
 1297 
        mov     edx, [client_abs_left]
1298 
        add     edx, [client.width]
 1298 
        add     edx, [client.width]
1299 
        sub     edx, 25*5+4
 1299 
        sub     edx, 25*4+4
1300 
        shl     edx, 16
 1300 
        shl     edx, 16
1301 
        add     edx, [client_abs_top]
 1301 
        add     edx, [client_abs_top]
1302 
        add     edx, 5
 1302 
        add     edx, 5
1303 
        mcall   , buttons+fliphorzbtn*20
 1303 
        mcall   , buttons+fliphorzbtn*20
1304 
        add     edx, 25*65536
 1304 
        add     edx, 25*65536
1305 
        mcall   , buttons+flipvertbtn*20
 1305 
        mcall   , buttons+flipvertbtn*20
1306 
        add     edx, 30*65536
 1306 
        add     edx, 30*65536
1307 
        mcall   , buttons+rotcwbtn*20
 - 
 
1308 
        add     edx, 25*65536
 - 
 
1309 
        mcall   , buttons+rotccwbtn*20
 1307 
        mcall   , buttons+rotccwbtn*20
1310 
        add     edx, 25*65536
 1308 
        add     edx, 25*65536
1311 
        mcall   , buttons+rot180btn*20
 1309 
        mcall   , buttons+rotcwbtn*20
Line 1312... Line 1310...
1312 
 
 1310 
 
1313 
.quit:
 1311 
.quit:
1314 
        ret
 1312 
        ret
Line 1622... Line 1620...
1622 
        ret
 1620 
        ret
1623 
endp
 1621 
endp
Line 1624... Line 1622...
1624 
 
 1622 
 
1625 
 
 1623 
 
1626 
; fills window_header with window title
 1624 
; fills window_header with window title
1627 
; window title is generated as '[k/n]  - Kolibri Image Viewer'
 1625 
; window title is generated as '[k/n]  (WxH) - Kolibri Image Viewer'
- 
 
 1626 
; n = total files in dir
- 
 
 1627 
; k = current file index
1628 
; n = total files in dir
 1628 
; W = current image width
1629 
; k = current file index
 1629 
; H = current image height
1630 
proc generate_window_header
 1630 
proc generate_window_header
1631 
        push    eax ebx esi edi
 1631 
        push    eax ebx esi edi
1632 
        mov     esi, [last_name_component]
 1632 
        mov     esi, [last_name_component]
Line 1659... Line 1659...
1659 
        mov     dword[edi-4], '...'
 1659 
        mov     dword[edi-4], '...'
1660 
.ret:
 1660 
.ret:
1661 
        pop     edi esi ebx eax
 1661 
        pop     edi esi ebx eax
1662 
        ret
 1662 
        ret
1663 
@@:
 1663 
@@:
- 
 
 1664 
        ; add size
- 
 
 1665 
        mov     word[edi], ' ('
- 
 
 1666 
        add     edi, 2
- 
 
 1667 
 
- 
 
 1668 
        mov     ebx, [orig_image]
- 
 
 1669 
        mov     eax, [ebx+Image.Width]
- 
 
 1670 
        call    bin2dec
- 
 
 1671 
 
- 
 
 1672 
        mov     byte[edi], 'x'
- 
 
 1673 
        inc     edi
- 
 
 1674 
 
- 
 
 1675 
        mov     eax, [ebx+Image.Height]
- 
 
 1676 
        call    bin2dec
- 
 
 1677 
 
- 
 
 1678 
        mov     byte[edi], ')'
- 
 
 1679 
        inc     edi
- 
 
 1680 
 
1664 
        mov     esi, s_header
 1681 
        mov     esi, s_header
1665 
@@:
 1682 
@@:
1666 
        lodsb
 1683 
        lodsb
1667 
        stosb
 1684 
        stosb
1668 
        test    al, al
 1685 
        test    al, al