Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-21 06:39:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

Optional PutChar 8x8 only implemented by PLOT

Browse Source
This commit is contained in:
Pecusx
2023-04-06 14:37:15 +02:00
parent 19b71664f1
commit 5657171bb2
1 changed files with 39 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
grafproc.asm
+39
View File
@@ -1872,6 +1872,7 @@ CopyMask
dey dey
bpl CopyMask bpl CopyMask
.IF FASTER_GRAF_PROCS = 1
; calculating coordinates from xdraw and ydraw ; calculating coordinates from xdraw and ydraw
mwa xdraw xbyte mwa xdraw xbyte
@@ -1936,6 +1937,44 @@ CharLoopi
inx inx
cpx #8 cpx #8
bne CharLoopi bne CharLoopi
.ELSE
mvx #7 char2 ; line counter (Y)
CharLoop1
mva #7 mask2 ; pixel counter (X)
CharLoop2
mva #0 color
rol mask1,x
bcc NoMaskNoPlot
rol char1,x
bcs NoPlot
MakeCharPlot
lda Erase
bne ErasingChar
inc color
ErasingChar
NoPlot
jsr plot
AfterCharPlot
inw xdraw
ldx char2
dec mask2
bpl CharLoop2
sec
sbw xdraw #8
dec ydraw
ldx char2
dex
stx char2
bpl CharLoop1
clc
lda ydraw
adc #8
sta ydraw
bne EndPutChar
NoMaskNoPlot
rol char1,x
jmp AfterCharPlot
.ENDIF
EndPutChar EndPutChar
rts rts
.endp .endp