paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-13 21:29:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use the si register instead of di in the asm version of GetPixel320

Browse Source 
git-svn-id: trunk@40967 -
This commit is contained in:
nickysn 2019-01-21 15:18:51 +00:00
parent cab9b4cb6b
commit 1b4fcabc1d
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packages/graph/src/msdos/graph.pp
View File

@ -2293,14 +2293,14 @@ End;
{$endif FPC_MM_HUGE}
mov ax, [Y]
add ax, [StartYViewPort]
mov di, [X]
add di, [StartXViewPort]
mov si, [X]
add si, [StartXViewPort]
xchg ah, al { The value of Y must be in AH }
add di, ax
add si, ax
shr ax, 1
shr ax, 1
add di, ax
mov al, es:[di]
add si, ax
mov al, es:[si]
xor ah, ah
{$ifdef FPC_GRAPH_SUPPORTS_TRUECOLOR}
xor dx, dx