duke: initial sound effects support

well, clicking, it is an Apple II after all
This commit is contained in:
Vince Weaver 2020-12-14 10:44:31 -05:00
parent af488e4b26
commit 7c75cbb973
4 changed files with 16 additions and 0 deletions

View File

@ -47,6 +47,7 @@ duke.o: duke.s zp.inc hardware.inc duke.s \
maps/level1_map.lzsa \
status_bar.s draw_duke.s gr_putsprite_crop.s \
draw_tilemap.s \
sound_effects.s \
keyboard.s handle_laser.s
ca65 -o duke.o duke.s -l duke.lst

View File

@ -183,5 +183,7 @@ done_with_duke:
.include "handle_laser.s"
.include "draw_tilemap.s"
.include "sound_effects.s"
level1_data_lzsa:
.incbin "maps/level1_map.lzsa"

View File

@ -195,6 +195,8 @@ space_pressed:
lda #7
sta DUKE_JUMPING
jsr jump_noise
jmp done_keypress
check_return:

11
duke/sound_effects.s Normal file
View File

@ -0,0 +1,11 @@
jump_noise:
lda SOUND_STATUS
bmi done_jump_noise
bit $C030
done_jump_noise:
rts