6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-03-27 18:35:06 +00:00
Code Issues Projects Releases Wiki Activity

Better set pixel sequence

Browse Source
This commit is contained in:
David Schmenk 2024-09-01 09:39:56 -07:00
parent 22f17edcce
commit d979f0ffed
1 changed files with 20 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

46
src/libsrc/apple/dhgrlib.pla
View File

@ -353,58 +353,48 @@ end
asm _dcgrPlotC
LDA $4000,X ; AUXCLRMSK
BEQ ++
PHA
STA $C055 ; PAGE1X
BMI +++
end
asm _dcgrPlotD
AND $5000 ; AUXCLRL
STA TMPL
PLA
EOR #$FF
AND (DST),Y
ORA TMPL
LDA $5000 ; AUXCLRL
EOR (DST),Y
AND $4000,X ; AUXCLRMSK
EOR (DST),Y
STA (DST),Y
BNE ++
BEQ ++
+++ INY
end
asm _dcgrPlotE
AND $5001 ; AUXCLRH
STA TMPL
PLA
EOR #$FF
AND (DST),Y
ORA TMPL
LDA $5001 ; AUXCLRH
EOR (DST),Y
AND $4000,X ; AUXCLRMSK
EOR (DST),Y
STA (DST),Y
DEY
end
asm _dcgrPlotF
++ LDA $4001,X ; MEMCLRMSK
BEQ +
PHA
STA $C054 ; PAGE1M
BMI +++
end
asm _dcgrPlotG
AND $5002 ; MEMCLRL
STA TMPL
PLA
EOR #$FF
AND (DST),Y
ORA TMPL
LDA $5002 ; MEMCLRL
EOR (DST),Y
AND $4000,X ; MEMCLRMSK
EOR (DST),Y
STA (DST),Y
+ LDX ESP
RTS
+++ INY
end
asm _dcgrPlotH
AND $5003 ; MEMCLRH
STA TMPL
PLA
EOR #$FF
AND (DST),Y
ORA TMPL
LDA $5003 ; MEMCLRH
EOR (DST),Y
AND $4000,X ; MEMCLRMSK
EOR (DST),Y
STA (DST),Y
LDX ESP
RTS
@ -707,10 +697,14 @@ _dcgrPlotA:6 = @hgrscanh
_dcgrPlotB:1 = @divmod7
_dcgrPlotC:1 = @auxclrmsk
_dcgrPlotD:1 = @auxclrl
_dcgrPlotD:6 = @auxclrmsk
_dcgrPlotE:1 = @auxclrh
_dcgrPlotE:6 = @auxclrmsk
_dcgrPlotF:1 = @memclrmsk
_dcgrPlotG:1 = @memclrl
_dcgrPlotG:6 = @memclrmsk
_dcgrPlotH:1 = @memclrh
_dcgrPlotH:6 = @memclrmsk
_dcgrXorPlotA:1 = @hgrscanl
_dcgrXorPlotA:6 = @hgrscanh
_dcgrXorPlotB:1 = @divmod7