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

chiptune_debug: more minimizing

Browse Source
This commit is contained in:
Vince Weaver 2018-06-13 12:17:10 -04:00
parent 87a81f785d
commit 058882cb54
2 changed files with 9 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
chiptune_debug/NOTES
View File

@ -23,3 +23,7 @@ also turn off A/B freq still issue
also turn off noise/Aamp/Bamp still issue
move to single output routine still issue
always volume 12 still issue
fix clear accidentally wr r14 still issue
generate single tone FINE!!!
only play first 16 notes still issue

21
chiptune_debug/chiptune_tiny.s
View File

@ -173,7 +173,7 @@ write_ay_both:
; should silence the card
;=======================================
clear_ay_both:
ldx #14
ldx #13
lda #0
sta MB_VALUE
clear_ay_left_loop:
@ -214,6 +214,7 @@ mb_write_frame:
; 4: C CHANNEL FINE
ldx #4
; lda #$51
lda c_fine,Y
sta MB_VALUE
jsr write_ay_both
@ -238,6 +239,9 @@ mb_write_frame:
increment_offset:
inc MB_CHUNK_OFFSET ; increment offset
lda MB_CHUNK_OFFSET
and #$f
sta MB_CHUNK_OFFSET
done_interrupt:
pla ; restore a ; 4
@ -251,20 +255,5 @@ done_interrupt:
c_fine:
.byte $51,$3c,$32,$50,$3d,$32,$50,$3c, $33,$50,$3c,$32,$51,$3c,$32,$50
.byte $3d,$32,$50,$3c,$33,$50,$3c,$32, $51,$3c,$32,$50,$3d,$32,$50,$3c
.byte $33,$50,$3c,$32,$51,$3c,$32,$50, $3d,$33,$50,$3c,$32,$51,$3c,$32
.byte $50,$3d,$33,$50,$3c,$32,$51,$3c, $32,$50,$3d,$33,$50,$3c,$32,$51
.byte $3c,$32,$50,$3d,$33,$50,$3c,$32, $51,$3c,$32,$50,$3d,$33,$50,$3c
.byte $32,$51,$3c,$32,$50,$3d,$33,$50, $3c,$32,$51,$3c,$32,$50,$3d,$33
.byte $4c,$3c,$32,$4b,$3d,$32,$4b,$3c, $33,$4b,$3c,$32,$4c,$3c,$32,$4b
.byte $3d,$32,$4b,$3c,$33,$4b,$3c,$32, $4c,$3c,$32,$4b,$3d,$32,$4b,$3c
.byte $33,$4b,$3c,$32,$4c,$3c,$32,$4b, $3d,$33,$4b,$3c,$32,$4c,$3c,$32
.byte $4b,$3d,$33,$4b,$3c,$32,$4c,$3c, $32,$4b,$3d,$33,$4b,$3c,$32,$4c
.byte $3c,$32,$4b,$3d,$33,$4b,$3c,$32, $4c,$3c,$32,$4b,$3d,$33,$4b,$3c
.byte $32,$4c,$3c,$32,$4b,$3d,$33,$4b, $3c,$32,$4c,$3c,$32,$4b,$3d,$33
.byte $51,$43,$32,$50,$44,$32,$50,$43, $33,$50,$43,$32,$51,$43,$32,$50
.byte $44,$32,$50,$43,$33,$50,$43,$32, $51,$43,$32,$50,$44,$32,$50,$43
.byte $33,$50,$43,$32,$51,$43,$32,$50, $44,$33,$50,$43,$32,$51,$43,$32
.byte $50,$44,$33,$50,$43,$32,$51,$43, $32,$50,$44,$33,$50,$43,$32,$51