2020-03-07 16:06:29 +00:00
|
|
|
|
|
|
|
|
|
|
|
;======================
|
|
|
|
; draw the clock face
|
|
|
|
|
|
|
|
draw_clock_face:
|
|
|
|
|
|
|
|
lda CLOCK_HOUR
|
|
|
|
asl
|
|
|
|
tay
|
|
|
|
lda clock_hour_sprites,Y
|
|
|
|
sta INL
|
|
|
|
lda clock_hour_sprites+1,Y
|
|
|
|
sta INH
|
|
|
|
|
|
|
|
lda #20
|
|
|
|
sta XPOS
|
|
|
|
lda #6
|
|
|
|
sta YPOS
|
|
|
|
jsr put_sprite_crop
|
|
|
|
|
|
|
|
lda CLOCK_MINUTE
|
|
|
|
asl
|
|
|
|
tay
|
|
|
|
lda clock_minute_sprites,Y
|
|
|
|
sta INL
|
|
|
|
lda clock_minute_sprites+1,Y
|
|
|
|
sta INH
|
|
|
|
|
|
|
|
lda #20
|
|
|
|
sta XPOS
|
|
|
|
lda #6
|
|
|
|
sta YPOS
|
|
|
|
jsr put_sprite_crop
|
|
|
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
2020-03-07 18:07:42 +00:00
|
|
|
;======================
|
|
|
|
; clock puzzle
|
|
|
|
|
|
|
|
clock_puzzle:
|
|
|
|
lda CURSOR_X
|
|
|
|
cmp #19
|
|
|
|
bcc clock_puzzle_hours ; blt
|
|
|
|
|
|
|
|
cmp #24
|
|
|
|
bcc clock_puzzle_minutes ; blt
|
|
|
|
bcs clock_puzzle_button ; bge
|
|
|
|
|
|
|
|
clock_puzzle_hours:
|
|
|
|
inc CLOCK_HOUR
|
|
|
|
lda CLOCK_HOUR
|
|
|
|
cmp #12
|
|
|
|
bne clock_puzzle_done
|
|
|
|
|
|
|
|
lda #0
|
|
|
|
sta CLOCK_HOUR
|
|
|
|
beq clock_puzzle_done
|
|
|
|
|
|
|
|
clock_puzzle_minutes:
|
|
|
|
inc CLOCK_MINUTE
|
|
|
|
lda CLOCK_MINUTE
|
|
|
|
cmp #12
|
|
|
|
bne clock_puzzle_done
|
|
|
|
|
|
|
|
lda #0
|
|
|
|
sta CLOCK_MINUTE
|
|
|
|
beq clock_puzzle_done
|
|
|
|
|
|
|
|
clock_puzzle_button:
|
|
|
|
|
|
|
|
lda CLOCK_MINUTE
|
|
|
|
cmp #8
|
|
|
|
bne bridge_down
|
|
|
|
|
|
|
|
lda CLOCK_HOUR
|
|
|
|
cmp #2
|
|
|
|
bne bridge_down
|
|
|
|
|
|
|
|
lda #1
|
|
|
|
jmp bridge_adjust
|
2020-03-07 16:06:29 +00:00
|
|
|
|
2020-03-07 18:07:42 +00:00
|
|
|
bridge_down:
|
|
|
|
lda #0
|
|
|
|
|
|
|
|
bridge_adjust:
|
|
|
|
sta CLOCK_BRIDGE
|
|
|
|
|
|
|
|
bit $C030 ; click speaker
|
|
|
|
|
|
|
|
clock_puzzle_done:
|
|
|
|
|
|
|
|
rts
|
2020-03-07 16:06:29 +00:00
|
|
|
|
|
|
|
|
|
|
|
.include "clock_sprites.inc"
|