Now take into account also the upper-left corner of the workspace.

git-svn-id: svn://kolibrios.org@4146 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
GerdtR 2013-11-01 21:07:43 +00:00
parent 0dbb12299d
commit 8068f9225d
4 changed files with 2013 additions and 1905 deletions

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -1,38 +1,50 @@
BGRedrawThread:
mcall 40,010000b
mcall 40,010000b
BGRTRedrawIcons:
mcall 48,5
mov dx,ax
shr eax,16
sub dx,ax
mov [ScreenX],dx
mov ax,bx
shr ebx,16
sub ax,bx
mov [ScreenY],ax
mcall 48,5
mov ecx,[MaxNumIcon]
test ecx,ecx
jz .NoDraw
xor ebx,ebx
@@: push ecx
cmp [IconNoDraw],ebx
je .nd
stdcall DrawIcon,ebx,0
mov [wsXe],ax
mov [wsYe],bx
mov dx,ax
shr eax,16
mov [wsX],ax
sub dx,ax
mov [wsW],dx
mov ax,bx
shr ebx,16
mov [wsY],bx
sub ax,bx
mov [wsH],ax
mcall 14
mov [ScreenH],ax
shr eax,16
mov [ScreenW],ax
mov ecx,[MaxNumIcon]
test ecx,ecx
jz .NoDraw
xor ebx,ebx
@@: push ecx
cmp [IconNoDraw],ebx
je .nd
stdcall DrawIcon,ebx,0
.nd:
inc ebx
pop ecx
loop @b
inc ebx
pop ecx
loop @b
.NoDraw:
BGRTmessages:
mcall 10
sub eax,5
jz BGRTRedrawIcons
mcall 10
sub eax,5
jz BGRTRedrawIcons
jmp BGRTmessages
jmp BGRTmessages