From e241719ea53f305a77bece01a3ef40b41ba61c14 Mon Sep 17 00:00:00 2001
From: Dave Schmenk <dschmenk@gmail.com>
Date: Wed, 21 Feb 2018 09:53:11 -0800
Subject: [PATCH] Update line drawer with new PLASMA-isms

---
 src/libsrc/apple/dgr.pla | 29 +++++++++--------------------
 1 file changed, 9 insertions(+), 20 deletions(-)

diff --git a/src/libsrc/apple/dgr.pla b/src/libsrc/apple/dgr.pla
index 2d29f7d..d76d49e 100755
--- a/src/libsrc/apple/dgr.pla
+++ b/src/libsrc/apple/dgr.pla
@@ -506,7 +506,7 @@ asm _dgrFillTile
         RTS
 end
 //
-// Wait for VLB - Doens't work on //c
+// Wait for VLB - Shouldn't work on //c, but seems to.
 //
 asm vlbWait#0
 -       LDA     $C019
@@ -525,7 +525,6 @@ export def dgrMode#1
     ^showpage1
     ^ena80  = 0
     ^show80 = 0
-//  ^mapaux = 0
     ^an3on
     return 1
 end
@@ -578,16 +577,11 @@ export def dgrLine(buff, x1, y1, x2, y2)#0
     fin
     dx2 = dx << 1
     dy2 = dy << 1
-    if dx >= dy
-        // Horizontal line
+    if dx >= dy // Horizontal line
         if sx < 0
-            pp = x1
-            x1 = x2
-            x2 = pp
-            pp = y1
-            y1 = y2
-            y2 = pp
-            sy = -sy
+            x1, x2 = x2, x1
+            y1, y2 = y2, y1
+            sy     = -sy
         fin
         dd2 = dx2 - dy2
         err = dx - dy2
@@ -608,16 +602,11 @@ export def dgrLine(buff, x1, y1, x2, y2)#0
         if y2 == y1
             dgrHLin(buff, x1, x2, y1)
         fin
-    else
-        // Vertical line
+    else // Vertical line
         if sy < 0
-            pp = x1
-            x1 = x2
-            x2 = pp
-            pp = y1
-            y1 = y2
-            y2 = pp
-            sx = -sx
+            x1, x2 = x2, x1
+            y1, y2 = y2, y1
+            sx     = -sx
         fin
         dd2 = dy2 - dx2
         err = dy - dx2