wip subtraction method, still not working
This commit is contained in:
parent
689363d083
commit
f7082ab371
1 changed files with 25 additions and 10 deletions
35
mandel.s
35
mandel.s
|
|
@ -221,8 +221,12 @@ char_map:
|
|||
.endrepeat
|
||||
|
||||
hex_chars:
|
||||
digits_zero:
|
||||
.byte "0123456789abcdef"
|
||||
|
||||
digits_space:
|
||||
.byte " 123456789abcdef"
|
||||
|
||||
aspect:
|
||||
; aspect ratio!
|
||||
; pixels at 320w are 5:6 (narrow)
|
||||
|
|
@ -1982,7 +1986,11 @@ update_status:
|
|||
lda FR0 + 1
|
||||
sta temp + 1
|
||||
|
||||
.macro countdown divisor, string
|
||||
;jsr IFP
|
||||
;jsr FASC
|
||||
;jsr draw_string
|
||||
|
||||
.macro countdown divisor, digits
|
||||
.scope
|
||||
; count the hours
|
||||
ldx #0
|
||||
|
|
@ -2003,20 +2011,27 @@ update_status:
|
|||
inx
|
||||
jmp countdown_loop
|
||||
countdown_done:
|
||||
stx FR0
|
||||
ldx #0
|
||||
stx FR0 + 1
|
||||
jsr IFP
|
||||
jsr FASC
|
||||
lda digits,x
|
||||
eor #$80
|
||||
sta temp2
|
||||
lda #.lobyte(temp2)
|
||||
sta INBUFF
|
||||
lda #.hibyte(temp2)
|
||||
sta INBUFF + 1
|
||||
jsr draw_string
|
||||
draw_string_const string
|
||||
.endscope
|
||||
.endmacro
|
||||
|
||||
draw_string_const str_space
|
||||
countdown 3600, str_h
|
||||
countdown 60, str_m
|
||||
countdown 1, str_s
|
||||
countdown 36000, digits_space
|
||||
countdown 3600, digits_zero
|
||||
draw_string_const str_h
|
||||
countdown 600, digits_zero
|
||||
countdown 60, digits_zero
|
||||
draw_string_const str_m
|
||||
countdown 10, digits_zero
|
||||
countdown 1, digits_zero
|
||||
draw_string_const str_s
|
||||
|
||||
skipped:
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue