Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-08-10 06:25:04 +00:00
Code Issues Projects Releases Wiki Activity

xmas2019: sorta vapor lock

Browse Source
This commit is contained in:
Vince Weaver
2019-12-19 00:12:09 -05:00
parent cd3e602667
commit 0f133e83be
1 changed files with 48 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

62
xmas_2019/xmas2019.s
View File

@@ -89,34 +89,53 @@ bloop2: dex ; 2
;===================================== ;=====================================
; Next 32*4 = 128 lines HGR2/GR1/HGR2 ; Next 32*4 = 128 lines HGR1/GR1 for 20 cycles/HGR1
; 8320 - 8 = 8312
bit SET_GR ; 4
bit LORES ; 4
; Try X=13 Y=117 cycles=8308 R4 ldx #127 ; 2
middle_loop:
bit HIRES ; 4
; 27
lda COLOR ; 3
bit LORES ; 4
; 16
nop nop
nop nop
nop
nop
nop
nop
nop
nop
bit HIRES ; 4
; 5cycles
nop
lda COLOR
ldy #117 ; 2 lda COLOR ; 3
dloop1: ldx #13 ; 2 lda COLOR ; 3
dloop2: dex ; 2 lda COLOR ; 3
bne dloop2 ; 2nt/3 lda COLOR ; 3
dey ; 2 lda COLOR ; 3
bne dloop1 ; 2nt/3 lda COLOR ; 3
lda COLOR ; 3
lda COLOR ; 3
dex ; 2
bpl middle_loop ; 3
; -1
;========================== ;==========================
; Next 8*4 = 32 lines GR ?? ; Next 8*4 = 32 lines GR ??
; 2080 cycles ; 2080 cycles -8 -2 +1=2071
bit SET_GR ; 4 bit SET_GR ; 4
bit LORES ; 4 bit LORES ; 4
; Try X=1 Y=188 cycles=2069 R3 ; Try X=1 Y=188 cycles=2069 R2
lda COLOR ; 3 nop
ldy #188 ; 2 ldy #188 ; 2
cloop1: ldx #1 ; 2 cloop1: ldx #1 ; 2
@@ -128,6 +147,21 @@ cloop2: dex ; 2
vblank_start: vblank_start:
; 4550 cycles - 3 = 4547
; Try X=13 Y=64 cycles=4545 R2
nop
ldy #64 ; 2
dloop1: ldx #13 ; 2
dloop2: dex ; 2
bne dloop2 ; 2nt/3
dey ; 2
bne dloop1 ; 2nt/3
jmp display_loop
;========================================================== ;==========================================================
;========================================================== ;==========================================================
; erase old lines ; erase old lines