mirror of
https://github.com/jeremysrand/colourgo.git
synced 2024-06-12 07:29:34 +00:00
Add a bit of sound.
This commit is contained in:
parent
5cc8cf2b0c
commit
e941c58b81
|
@ -18,6 +18,8 @@ MAXY=191
|
||||||
MAXXBYTE=40
|
MAXXBYTE=40
|
||||||
MAXX=280
|
MAXX=280
|
||||||
|
|
||||||
|
SPEAKER=$C030
|
||||||
|
|
||||||
ZPADDR0=<$80
|
ZPADDR0=<$80
|
||||||
ZPADDR1=<$82
|
ZPADDR1=<$82
|
||||||
ZPADDR2=<$84
|
ZPADDR2=<$84
|
||||||
|
@ -317,10 +319,28 @@ LINE191 = LINE190 + 1024
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
|
|
||||||
.proc gameOver
|
.proc playSound
|
||||||
|
; A is the frequency
|
||||||
|
; X is the duration
|
||||||
|
|
||||||
jsr drawCharacter
|
sta freq
|
||||||
|
@loop:
|
||||||
|
sta SPEAKER
|
||||||
|
ldy freq
|
||||||
|
@innerloop:
|
||||||
|
dey
|
||||||
|
bne @innerloop
|
||||||
|
dex
|
||||||
|
bne @loop
|
||||||
|
rts
|
||||||
|
|
||||||
|
; Locals
|
||||||
|
freq: .BYTE $00
|
||||||
|
|
||||||
|
.endproc
|
||||||
|
|
||||||
|
|
||||||
|
.proc promptForReset
|
||||||
@loop:
|
@loop:
|
||||||
lda KBD
|
lda KBD
|
||||||
bpl @loop
|
bpl @loop
|
||||||
|
@ -342,14 +362,77 @@ LINE191 = LINE190 + 1024
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
|
|
||||||
|
.proc gameOver
|
||||||
|
jsr drawCharacter
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
ldx #36
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #250
|
||||||
|
ldx #34
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #230
|
||||||
|
ldx #32
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #220
|
||||||
|
ldx #30
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #230
|
||||||
|
ldx #32
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #250
|
||||||
|
ldx #34
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
ldx #36
|
||||||
|
jsr playSound
|
||||||
|
jmp promptForReset
|
||||||
|
.endproc
|
||||||
|
|
||||||
|
|
||||||
.proc levelWon
|
.proc levelWon
|
||||||
lda #COL_WHITE
|
lda #COL_WHITE
|
||||||
sta characterColour
|
sta characterColour
|
||||||
|
|
||||||
|
jsr drawCharacter
|
||||||
|
|
||||||
|
lda #80
|
||||||
|
ldx #36
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #120
|
||||||
|
ldx #34
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #160
|
||||||
|
ldx #32
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #200
|
||||||
|
ldx #30
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #160
|
||||||
|
ldx #32
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #120
|
||||||
|
ldx #34
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
|
lda #80
|
||||||
|
ldx #36
|
||||||
|
jsr playSound
|
||||||
|
|
||||||
inc level
|
inc level
|
||||||
|
|
||||||
; This is weird but at this point, all of the logic we
|
jmp promptForReset
|
||||||
; need to progress to the next level is in gameOver...
|
|
||||||
jmp gameOver
|
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user