Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-09 07:29:32 +00:00
Code Issues Projects Releases Wiki Activity

demo: unwisely shave off like 10 bytes

Browse Source
This commit is contained in:
Vince Weaver 2022-11-17 20:10:37 -05:00
parent 123d684970
commit 8643183756
3 changed files with 16 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
demos/demosplash2022/apple_desire.s
View File

@ -46,6 +46,11 @@ main_loop:
rol rol
tax tax
lda PAGE1,X lda PAGE1,X
; lda AY_REGS+7
; sta $5000
; sta $3000
jmp main_loop jmp main_loop

14
demos/demosplash2022/mA2E_4.s
View File

@ -9,16 +9,16 @@ channel_a_volume:
.byte 0*8,1*8,2*8,4*8 .byte 0*8,1*8,2*8,4*8
tracks_l: tracks_l:
.byte <track4,<track0,<track1,<track2,<track3 .byte <track4,<track0 ;,<track1,<track2,<track3
; assume all on same page ; assume all on same page
; tracks_h: ; tracks_h:
; .byte >track4,>track0,>track1,>track2,>track3 ; .byte >track4,>track0 ;,>track1,>track2,>track3
bamps_l: bamps_l:
.byte <bamps4,<bamps0,<bamps1,<bamps2,<bamps3 .byte <bamps4,<bamps0 ;,<bamps1,<bamps2,<bamps3
; bamps_h: ; bamps_h:
; .byte >bamps4,>bamps0,>bamps1,>bamps2,>bamps3 ; .byte >bamps4,>bamps0 ;,>bamps1,>bamps2,>bamps3
@ -113,7 +113,7 @@ track0:
.byte $14 ; frame=62 A=2 L=2 .byte $14 ; frame=62 A=2 L=2
; last: a=10 b=-1 len=2 ; last: a=10 b=-1 len=2
.byte $54 ; frame=64 A=10 L=2 .byte $54 ; frame=64 A=10 L=2
.byte $ff ;.byte $ff
track1: track1:
; A: 12 ; A: 12
@ -203,7 +203,7 @@ track1:
.byte $14 ; frame=62 A=2 L=2 .byte $14 ; frame=62 A=2 L=2
; last: a=10 b=-1 len=2 ; last: a=10 b=-1 len=2
.byte $54 ; frame=64 A=10 L=2 .byte $54 ; frame=64 A=10 L=2
.byte $ff ;.byte $ff
track2: track2:
; A: 15 ; A: 15
@ -289,7 +289,7 @@ track2:
.byte $26 ; frame=56 A=4 L=3 .byte $26 ; frame=56 A=4 L=3
; last: a=0 b=-1 len=8 ; last: a=0 b=-1 len=8
.byte $10 ; frame=64 A=0 L=8 .byte $10 ; frame=64 A=0 L=8
.byte $ff ;.byte $ff
track3: track3:
; A: 15 ; A: 15

8
demos/demosplash2022/play_frame.s
View File

@ -26,11 +26,11 @@ track_smc:
;==================================== ;====================================
; if at end, loop back to beginning ; if at end, loop back to beginning
ldy WHICH_TRACK ; get current track in Y ; ldy WHICH_TRACK ; get current track in Y
iny ; increment track ; iny ; increment track
cpy #5 ; see if off end ; cpy #5 ; see if off end
bne no_wrap ; bne no_wrap
ldy #1 ; loop to track 1 ldy #1 ; loop to track 1
no_wrap: no_wrap:
sty WHICH_TRACK sty WHICH_TRACK