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

pt3: optimize interrupt_handler

Browse Source 
qkumba had some suggestions on comp.sys.apple2
This commit is contained in:
Vince Weaver 2019-05-17 12:25:37 -04:00
parent 3d35f781fe
commit 55137b5a73
5 changed files with 13 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
pt3_player/interrupt_handler.s
View File

@ -26,9 +26,6 @@ interrupt_handler:
bit $C404 ; clear 6522 interrupt by reading T1C-L ; 4
; jmp exit_interrupt
lda DONE_PLAYING ; 3
beq pt3_play_music ; if song done, don't play music ; 3/2nt
jmp check_keyboard ; 3
@ -37,17 +34,11 @@ interrupt_handler:
pt3_play_music:
; for(i=0;i < pt3.music_len;i++) {
; pt3_set_pattern(i,&pt3);
; for(j=0;j<64;j++) {
; if (pt3_decode_line(&pt3)) break;
; for(f=0;f<pt3.speed;f++) {
; decode a frame of music
jsr pt3_make_frame
; set song over
; handle song over condition
lda DONE_SONG
beq mb_write_frame
@ -58,8 +49,8 @@ pt3_play_music:
;======================================
; Write frames to Mockingboard
;======================================
; actually plays frame loaded at end of
; last interrupt, so 20ms behind?
; for speed could merge this into
; the decode code
mb_write_frame:
@ -129,14 +120,16 @@ done_interrupt:
;=====================
; Update time counter
;=====================
; self-modifying version via qkumba
update_time:
inc FRAME_COUNT ; 5
lda FRAME_COUNT ; 3
inc frame_count_smc+1 ; 5
frame_count_smc:
lda #$0 ; 2
cmp #50 ; 3
bne done_time ; 3/2nt
lda #$0 ; 2
sta FRAME_COUNT ; 3
sta frame_count_smc+1 ; 3
update_second_ones:
inc $7d0+TIME_OFFSET+3 ; 6

3
pt3_player/pt3_dumper.s
View File

@ -222,8 +222,7 @@ new_song:
; Init Variables
;=========================
lda #$0
sta FRAME_COUNT
; ?
;===========================

3
pt3_player/pt3_player.s
View File

@ -232,8 +232,7 @@ new_song:
; Init Variables
;=========================
lda #$0
sta FRAME_COUNT
; ?
;===========================
; Print loading message

3
pt3_player/pt3_timer.s
View File

@ -140,8 +140,7 @@ new_song:
; Init Variables
;=========================
lda #$0
sta FRAME_COUNT
; ?
;===========================

2
pt3_player/zp.inc
View File

@ -110,7 +110,7 @@ WHICH_FILE EQU $98
COLOR_MASK EQU $99
RASTERBARS_ON EQU $9A
RANDOM_POINTER EQU $9B
FRAME_COUNT EQU $9C
;FRAME_COUNT EQU $9C
MB_VALUE EQU $9D
;MB_CHUNK EQU $9E
MB_ADDRL EQU $9F