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

Simplify spinning enterprise XOR case

Browse Source
This commit is contained in:
David Schmenk 2024-10-28 16:02:38 -07:00
parent ff14bbb35c
commit bab302ebc1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/samplesrc/dcgrtest.pla
View File

@ -291,11 +291,11 @@ def dcgrTest#0
dcgrSurfScr(OP_SRC)
dcgrColor(CLR_BLACK)
dcgrClearBl7(21/7, 30, 100/7, 132)
dcgrOp(OP_XOR)
k = 0
i = @ncc1701
dcgrPixMap(70-i=>spr_xorg, 96-i=>spr_yorg, i=>spr_width, i=>spr_height, i=>spr_pixmap)
while ^$C000 < 128
dcgrOp(OP_XOR)
dcgrPixMap(70-i=>spr_xorg, 96-i=>spr_yorg, i=>spr_width, i=>spr_height, i=>spr_pixmap)
i = i + t_sprite
k++
@ -303,10 +303,10 @@ def dcgrTest#0
k = 0
i = @ncc1701
fin
dcgrOp(OP_SRC)
dcgrPixMap(70-i=>spr_xorg, 96-i=>spr_yorg, i=>spr_width, i=>spr_height, i=>spr_pixmap)
loop
getc
dcgrOp(OP_SRC)
while ^$C000 < 128
dcgrColor(CLR_BLACK)
dcgrClearBl7(60/7, 75, 5, 43)