sb: add in sound
This commit is contained in:
parent
c3dd6b2687
commit
49585b0a28
|
@ -107,27 +107,40 @@ asplode_loop:
|
||||||
|
|
||||||
done_extra_sprites:
|
done_extra_sprites:
|
||||||
|
|
||||||
.if 0
|
|
||||||
;==========================
|
|
||||||
; draw SPLODE
|
|
||||||
;==========================
|
|
||||||
|
|
||||||
lda #<splode_sprite
|
|
||||||
sta INL
|
|
||||||
lda #>splode_sprite
|
|
||||||
sta INH
|
|
||||||
lda #23
|
|
||||||
sta SPRITE_X
|
|
||||||
lda #133
|
|
||||||
sta SPRITE_Y
|
|
||||||
jsr hgr_draw_sprite_big
|
|
||||||
.endif
|
|
||||||
|
|
||||||
; play sound
|
|
||||||
; jsr play_asplode
|
|
||||||
|
|
||||||
jsr flip_page
|
jsr flip_page
|
||||||
|
|
||||||
|
|
||||||
|
ldx FRAME
|
||||||
|
cpx #17
|
||||||
|
bne sound_check_head
|
||||||
|
sound_check_your:
|
||||||
|
; play sound
|
||||||
|
ldy #0
|
||||||
|
beq do_play_asplode
|
||||||
|
|
||||||
|
sound_check_head:
|
||||||
|
cpx #23
|
||||||
|
bne sound_check_a
|
||||||
|
ldy #1
|
||||||
|
bne do_play_asplode
|
||||||
|
sound_check_a:
|
||||||
|
cpx #29
|
||||||
|
bne sound_check_splode
|
||||||
|
ldy #2
|
||||||
|
bne do_play_asplode
|
||||||
|
|
||||||
|
sound_check_splode:
|
||||||
|
cpx #34
|
||||||
|
bne sound_check_done
|
||||||
|
ldy #3
|
||||||
|
|
||||||
|
do_play_asplode:
|
||||||
|
jsr play_asplode
|
||||||
|
|
||||||
|
sound_check_done:
|
||||||
|
|
||||||
inc FRAME
|
inc FRAME
|
||||||
lda FRAME
|
lda FRAME
|
||||||
cmp #35
|
cmp #35
|
||||||
|
|
|
@ -177,12 +177,21 @@ was_space:
|
||||||
|
|
||||||
check_bracket:
|
check_bracket:
|
||||||
cmp #'S'
|
cmp #'S'
|
||||||
bne done_keyboard
|
bne check_escape
|
||||||
|
|
||||||
jsr score_inc_d1
|
jsr score_inc_d1
|
||||||
|
|
||||||
lda #$ff
|
lda #$ff
|
||||||
sta D1_XSPEED
|
sta D1_XSPEED
|
||||||
|
jmp done_keyboard
|
||||||
|
|
||||||
|
check_escape:
|
||||||
|
cmp #27
|
||||||
|
bne done_keyboard
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta WHICH_LOAD
|
||||||
|
rts
|
||||||
|
|
||||||
done_keyboard:
|
done_keyboard:
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
ASPLODE_SAMPLE = $D000
|
ASPLODE_SAMPLE = $D000
|
||||||
ASPLODE_LENGTH = 28
|
ASPLODE_LENGTH = 28 ; $1C
|
||||||
|
|
||||||
play_asplode:
|
play_asplode:
|
||||||
; only avail if language card
|
; only avail if language card
|
||||||
|
@ -19,10 +19,13 @@ play_asplode:
|
||||||
|
|
||||||
lda #<ASPLODE_SAMPLE
|
lda #<ASPLODE_SAMPLE
|
||||||
sta BTC_L
|
sta BTC_L
|
||||||
lda #>ASPLODE_SAMPLE
|
|
||||||
|
lda sound_parts,Y ; #>ASPLODE_SAMPLE
|
||||||
sta BTC_H
|
sta BTC_H
|
||||||
|
|
||||||
ldx #ASPLODE_LENGTH ; 28 pages long???
|
lda sound_len,Y
|
||||||
|
tax
|
||||||
|
;ldx #ASPLODE_LENGTH ; 28 pages long???
|
||||||
jsr play_audio
|
jsr play_audio
|
||||||
|
|
||||||
; read ROM/no-write
|
; read ROM/no-write
|
||||||
|
@ -32,3 +35,18 @@ play_asplode:
|
||||||
done_play_asplode:
|
done_play_asplode:
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
sound_parts:
|
||||||
|
.byte $D0 ; your
|
||||||
|
.byte $D8 ; head
|
||||||
|
.byte $E0 ; a
|
||||||
|
.byte $E1 ; splode
|
||||||
|
.byte $D0 ; whole thing
|
||||||
|
|
||||||
|
sound_len:
|
||||||
|
.byte $8
|
||||||
|
.byte $8
|
||||||
|
.byte $6
|
||||||
|
.byte $10
|
||||||
|
.byte 28
|
||||||
|
|
Loading…
Reference in New Issue