forked from KolibriOS/kolibrios
bcdclk: visual fix (proper align of digits), skin height handling
git-svn-id: svn://kolibrios.org@2740 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
e783cf020c
commit
8050dfb9ec
@ -72,16 +72,16 @@ drawclock:
|
|||||||
mov ecx,6
|
mov ecx,6
|
||||||
dgtomem:
|
dgtomem:
|
||||||
push eax
|
push eax
|
||||||
and al,15
|
and al,0x0f
|
||||||
mov [edi],al
|
mov [edi],al
|
||||||
inc edi
|
inc edi
|
||||||
pop eax
|
pop eax
|
||||||
shr eax,4
|
shr eax,4
|
||||||
loop dgtomem
|
loop dgtomem
|
||||||
mov ebx,74*65536+10
|
mov ebx,79*65536+11
|
||||||
mov edi,dg1
|
mov edi,dg1
|
||||||
digitlp:
|
digitlp:
|
||||||
mov ecx,10*65536+10
|
mov ecx,10*65536+11
|
||||||
xor esi,esi
|
xor esi,esi
|
||||||
plotlp:
|
plotlp:
|
||||||
xor edx,edx
|
xor edx,edx
|
||||||
@ -91,7 +91,7 @@ plotlp:
|
|||||||
nobit:
|
nobit:
|
||||||
mov eax,13 ; plot 8,4,2,1
|
mov eax,13 ; plot 8,4,2,1
|
||||||
mcall
|
mcall
|
||||||
add ecx,12*65536
|
add ecx,13*65536
|
||||||
shl byte[edi],1
|
shl byte[edi],1
|
||||||
inc esi
|
inc esi
|
||||||
cmp esi,4
|
cmp esi,4
|
||||||
@ -112,7 +112,7 @@ nobit:
|
|||||||
mov eax,47 ; display decimal
|
mov eax,47 ; display decimal
|
||||||
mcall
|
mcall
|
||||||
popa
|
popa
|
||||||
sub ebx,12*65536
|
sub ebx,13*65536
|
||||||
inc edi
|
inc edi
|
||||||
cmp edi,dg1+6
|
cmp edi,dg1+6
|
||||||
jne digitlp
|
jne digitlp
|
||||||
@ -126,9 +126,13 @@ drawwindow:
|
|||||||
mov ebx,1 ; start redraw
|
mov ebx,1 ; start redraw
|
||||||
mcall
|
mcall
|
||||||
|
|
||||||
|
mov eax, 48
|
||||||
|
mov ebx, 4
|
||||||
|
mcall
|
||||||
|
mov ecx, eax
|
||||||
xor eax,eax ; window
|
xor eax,eax ; window
|
||||||
mov ebx,100*65536+107
|
mov ebx,100*65536+113
|
||||||
mov ecx,100*65536+105
|
add ecx,100*65536+87
|
||||||
mov edx,0x34400088
|
mov edx,0x34400088
|
||||||
mov edi,title
|
mov edi,title
|
||||||
mcall
|
mcall
|
||||||
@ -143,4 +147,4 @@ call drawclock
|
|||||||
|
|
||||||
title db 'BCD Clock',0
|
title db 'BCD Clock',0
|
||||||
I_END:
|
I_END:
|
||||||
dg1: db ?
|
dg1: db ?
|
||||||
|
Loading…
Reference in New Issue
Block a user