mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 18:09:30 +02:00
* yet another mov eliminated by using different registers in GetPixel16
git-svn-id: trunk@41000 -
This commit is contained in:
parent
820ba7dfb5
commit
16c6090f30
@ -1618,14 +1618,13 @@ end;
|
||||
{ setup the bit mask register }
|
||||
mov al, 8
|
||||
{ load the bitmask register }
|
||||
mov bx, [X]
|
||||
mov cl, bl
|
||||
mov si, [X]
|
||||
mov cx, si
|
||||
and cl, 07h
|
||||
mov ah, 80h
|
||||
shr ah, cl
|
||||
out dx, ax
|
||||
{ get the x index and divide by 8 for 16-color }
|
||||
mov si, bx
|
||||
mov cl, 3
|
||||
shr si, cl
|
||||
{ determine the address }
|
||||
|
Loading…
Reference in New Issue
Block a user