6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-08-16 00:27:38 +00:00
Code Issues Projects Releases Wiki Activity

Update line drawer with new PLASMA-isms

Browse Source
This commit is contained in:
Dave Schmenk
2018-02-21 09:53:11 -08:00
parent 4204d47d3c
commit e241719ea5
1 changed files with 9 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
src/libsrc/apple/dgr.pla
View File

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