mist: dentist: feature complete?

This commit is contained in:
Vince Weaver 2020-07-05 22:17:39 -04:00
parent 36486b256e
commit 58dcf1104f
3 changed files with 43 additions and 2 deletions

View File

@ -159,6 +159,12 @@ set_level_over:
;===========================
pull_down_panel:
lda #0
sta button_smc+1 ; turn off blink
lda #31
sta startup_animate_smc+1 ; start startup animation
lda #DENTIST_PANEL
sta LOCATION

View File

@ -23,6 +23,40 @@ draw_date:
;=================
; draw the bars
startup_animate_smc:
lda #0
beq done_startup
dec startup_animate_smc+1
; 0001 1111
cmp #31
bne animate2
animate1:
lda #8
sta month_lit_smc+1
bne done_startup
animate2:
cmp #23
bne animate3
lda #8
sta date_lit_smc+1
bne done_startup
animate3:
cmp #15
bne animate4
lda #8
sta year_lit_smc+1
bne done_startup
animate4:
cmp #7
bne done_startup
lda #8
sta time_lit_smc+1
done_startup:
jsr draw_month_bar
jsr draw_date_bar
jsr draw_year_bar
@ -1123,7 +1157,8 @@ done_pressed_changed:
;===========================
draw_stars:
jmp stars_lights_off
lda DENTIST_LIGHT
bne stars_lights_off
; if lights on
lda #6

View File

@ -1,5 +1,5 @@
5 HOME
10 PRINT "LOADING MIST V0.88"
10 PRINT "LOADING MIST V0.89"
20 PRINT:PRINT
40 PRINT "CONTROLS: "
42 PRINT " MOVE CURSOR : ARROWS OR WASD"