From 98bbc0ab14f660a0d0151db41286115d68d46dfe Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Tue, 22 Jan 2019 14:30:18 +0000
Subject: [PATCH] * swapped di and ax in the beginning of GetPixel16

git-svn-id: trunk@40989 -
---
 packages/graph/src/msdos/graph.pp | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/packages/graph/src/msdos/graph.pp b/packages/graph/src/msdos/graph.pp
index 6c484e4661..4a1397e3f3 100644
--- a/packages/graph/src/msdos/graph.pp
+++ b/packages/graph/src/msdos/graph.pp
@@ -1680,11 +1680,11 @@ end;
 {$else FPC_MM_HUGE}
     mov   es, [SegA000]
 {$endif FPC_MM_HUGE}
-    mov   ax, [X]          { Get X address                    }
-    add   ax, [StartXViewPort]
-    mov   di, ax
+    mov   di, [X]          { Get X address                    }
+    add   di, [StartXViewPort]
+    mov   ax, di
     mov   cl, 3
-    shr   ax, cl
+    shr   di, cl
 
     mov   bx, [Y]
     add   bx, [StartYViewPort]
@@ -1694,7 +1694,7 @@ end;
     shl   si, 1            { SI=32*(Y+StartYViewPort)*32 }
     shl   si, 1            { SI=64*(Y+StartYViewPort)*64 }
     add   si, bx           { SI=(64+16)*(Y+StartYViewPort)=80*(Y+StartYViewPort) }
-    add   si, ax           { SI=correct offset into video segment }
+    add   si, di           { SI=correct offset into video segment }
     add   si, [VideoOfs]   { Point to correct page offset... }
 
     mov   dx,03ceh
@@ -1702,7 +1702,7 @@ end;
     out   dx,ax
     inc   dx
 
-    mov   cx, di
+    mov   cx, ax
     and   cl,7
 
     mov   bh, 080h