mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-26 00:29:29 +00:00
mist: dentist: scroll bars work and proper constellations appear
This commit is contained in:
parent
8f03fbbac7
commit
36486b256e
|
@ -643,11 +643,11 @@ month_limits:
|
||||||
.byte 0,1,3,4,6,7,9,10,11
|
.byte 0,1,3,4,6,7,9,10,11
|
||||||
date_limits:
|
date_limits:
|
||||||
.byte $00,$04,$08,$12,$16,$20,$24,$28,$30
|
.byte $00,$04,$08,$12,$16,$20,$24,$28,$30
|
||||||
century_limits:
|
century_limits: ; 21 is wrong
|
||||||
.byte $00,$12,$25,$37,$50,$62,$75,$87,$99
|
.byte $00,$12,$21,$37,$50,$62,$75,$87,$99 ; makes scroll to 1984
|
||||||
hour_limits:
|
hour_limits: ; faster
|
||||||
.byte $00,$03,$06,$09,$12,$15,$18,$21,$23
|
.byte $00,$03,$06,$09,$12,$15,$18,$21,$23
|
||||||
|
arbitrary:
|
||||||
|
|
||||||
;===============================
|
;===============================
|
||||||
;===============================
|
;===============================
|
||||||
|
@ -809,6 +809,12 @@ button_on_sprite:
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;========================
|
||||||
|
;========================
|
||||||
|
; button pressed
|
||||||
|
;========================
|
||||||
|
;========================
|
||||||
|
|
||||||
panel_button:
|
panel_button:
|
||||||
|
|
||||||
lda CURSOR_Y
|
lda CURSOR_Y
|
||||||
|
@ -817,6 +823,9 @@ panel_button:
|
||||||
cmp #24
|
cmp #24
|
||||||
bcs done_panel_button
|
bcs done_panel_button
|
||||||
|
|
||||||
|
lda #32
|
||||||
|
sta ANIMATE_FRAME
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
sta button_smc+1
|
sta button_smc+1
|
||||||
lda DENTIST_MONTH
|
lda DENTIST_MONTH
|
||||||
|
@ -1129,6 +1138,64 @@ draw_stars:
|
||||||
|
|
||||||
stars_lights_off:
|
stars_lights_off:
|
||||||
|
|
||||||
|
lda ANIMATE_FRAME
|
||||||
|
beq regular_stars
|
||||||
|
|
||||||
|
dec ANIMATE_FRAME
|
||||||
|
|
||||||
|
tay
|
||||||
|
|
||||||
|
; plot 1st
|
||||||
|
lda #$0f
|
||||||
|
sta plot_color+1
|
||||||
|
lda saved_year,Y
|
||||||
|
eor arbitrary,Y
|
||||||
|
tax
|
||||||
|
ldy saved_minutes
|
||||||
|
jsr special_plot_point
|
||||||
|
|
||||||
|
; plot 2nd
|
||||||
|
ldy ANIMATE_FRAME
|
||||||
|
lda #$ff
|
||||||
|
sta plot_color+1
|
||||||
|
lda saved_month,Y
|
||||||
|
eor arbitrary,Y
|
||||||
|
tax
|
||||||
|
lda saved_hour,Y
|
||||||
|
sbc arbitrary,Y
|
||||||
|
tay
|
||||||
|
jsr special_plot_point
|
||||||
|
|
||||||
|
; plot 3rd
|
||||||
|
ldy ANIMATE_FRAME
|
||||||
|
lda #$f0
|
||||||
|
sta plot_color+1
|
||||||
|
lda saved_hour,Y
|
||||||
|
adc arbitrary,Y
|
||||||
|
tax
|
||||||
|
lda saved_year,Y
|
||||||
|
sbc arbitrary,Y
|
||||||
|
tay
|
||||||
|
jsr special_plot_point
|
||||||
|
|
||||||
|
; plot 4th
|
||||||
|
ldy ANIMATE_FRAME
|
||||||
|
lda #$50
|
||||||
|
sta plot_color+1
|
||||||
|
lda saved_minutes,Y
|
||||||
|
eor arbitrary,Y
|
||||||
|
tax
|
||||||
|
lda saved_year,Y
|
||||||
|
adc arbitrary,Y
|
||||||
|
tay
|
||||||
|
|
||||||
|
jsr special_plot_point
|
||||||
|
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
regular_stars:
|
||||||
|
|
||||||
lda saved_month
|
lda saved_month
|
||||||
cmp #9 ; OCTOBER
|
cmp #9 ; OCTOBER
|
||||||
beq draw_leaf
|
beq draw_leaf
|
||||||
|
@ -1141,7 +1208,7 @@ stars_lights_off:
|
||||||
; OCT 11 1984 10:04AM (leaf)
|
; OCT 11 1984 10:04AM (leaf)
|
||||||
draw_leaf:
|
draw_leaf:
|
||||||
lda saved_day
|
lda saved_day
|
||||||
cmp #$11
|
cmp #$10
|
||||||
bne not_special
|
bne not_special
|
||||||
lda saved_century
|
lda saved_century
|
||||||
cmp #$19
|
cmp #$19
|
||||||
|
@ -1163,7 +1230,7 @@ draw_leaf:
|
||||||
; JAN 17 1207 5:46AM (snake)
|
; JAN 17 1207 5:46AM (snake)
|
||||||
draw_snake:
|
draw_snake:
|
||||||
lda saved_day
|
lda saved_day
|
||||||
cmp #$17
|
cmp #$16
|
||||||
bne not_special
|
bne not_special
|
||||||
lda saved_century
|
lda saved_century
|
||||||
cmp #$12
|
cmp #$12
|
||||||
|
@ -1185,7 +1252,7 @@ draw_snake:
|
||||||
; NOV 23 9791 6:57PM (bug)
|
; NOV 23 9791 6:57PM (bug)
|
||||||
draw_bug:
|
draw_bug:
|
||||||
lda saved_day
|
lda saved_day
|
||||||
cmp #$23
|
cmp #$22
|
||||||
bne not_special
|
bne not_special
|
||||||
lda saved_century
|
lda saved_century
|
||||||
cmp #$97
|
cmp #$97
|
||||||
|
|
Loading…
Reference in New Issue
Block a user