Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-27 17:29:49 +00:00
Code Issues Projects Releases Wiki Activity

plasma: some last code comments

Browse Source
This commit is contained in:
Vince Weaver 2021-01-09 23:27:28 -05:00
parent 2f044a1633
commit 3b9f746ca6
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
graphics/gr/plasma/plasma.s
View File

@ -150,7 +150,8 @@ plot_xloop:
tya ; get x&0xf tya ; get x&0xf
and #$f and #$f
ora CTEMP ; get ((y&0xf)*16)+x ora CTEMP ; combine with val from earlier
; get ((y&0xf)*16)+x
tax tax
@ -163,11 +164,11 @@ plot_lookup_smc:
; lda lookup ; load lookup, (y*16)+x ; lda lookup ; load lookup, (y*16)+x
and #$f and #$f
lsr lsr ; we actually only have 8 colors
tax tax
lda colorlookup,X lda colorlookup,X ; lookup color
sta COLOR sta COLOR ; each nibble should be same
jsr PLOT1 ; plot at GBASL,Y (x co-ord goes in Y) jsr PLOT1 ; plot at GBASL,Y (x co-ord goes in Y)