Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-11-01 01:06:33 +00:00
Code Issues Projects Releases Wiki Activity

d2_hgr: closer to submit

Browse Source
This commit is contained in:
Vince Weaver 2021-11-11 20:29:38 -05:00
parent 44d0160b26
commit a9418f88fa
4 changed files with 14 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
demos/d2/d2.s
View File

@ -123,6 +123,8 @@ forever:
;===================== ;=====================
; repeat ; repeat
bit TEXTGR
jmp forever jmp forever
@ -153,16 +155,14 @@ print_message:
jsr clear_both_bottoms jsr clear_both_bottoms
ldx #13 ldx #12
print_message_loop: print_message_loop:
lda message1,X lda message1,X
; ora #$80 sta $6d2,X
sta $650,X sta $Ad2,X
sta $A50,X
lda message2,X lda message2,X
; ora #$80 sta $6ea,X
sta $6d0,X sta $Aea,X
sta $AD0,X
dex dex
bpl print_message_loop bpl print_message_loop

7
demos/d2/mockingboard_setup.s
View File

@ -100,6 +100,7 @@ mockingboard_setup_interrupt:
; Note, on Apple II the clock isn't 1MHz but is actually closer to ; Note, on Apple II the clock isn't 1MHz but is actually closer to
; roughly 1.023MHz, and every 65th clock is stretched (it's complicated) ; roughly 1.023MHz, and every 65th clock is stretched (it's complicated)
; c7ce / 1.023e6 = .050s, 20Hz
; 9c40 / 1.023e6 = .040s, 25Hz ; 9c40 / 1.023e6 = .040s, 25Hz
; 8534 / 1.023e6 = .033s, 30Hz ; 8534 / 1.023e6 = .033s, 30Hz
; 4fe7 / 1.023e6 = .020s, 50Hz ; 4fe7 / 1.023e6 = .020s, 50Hz
@ -120,12 +121,14 @@ mockingboard_setup_interrupt:
sta MOCK_6522_IFR ; IFR: 1100, enable interrupt on timer one oflow sta MOCK_6522_IFR ; IFR: 1100, enable interrupt on timer one oflow
sta MOCK_6522_IER ; IER: 1100, enable timer one interrupt sta MOCK_6522_IER ; IER: 1100, enable timer one interrupt
lda #$40 lda #$CE
; lda #$40
; lda #$34 ; lda #$34
; lda #$E7 ; lda #$E7
sta MOCK_6522_T1CL ; write into low-order latch sta MOCK_6522_T1CL ; write into low-order latch
lda #$9C lda #$C7
; lda #$9C
; lda #$85 ; lda #$85
; lda #$4f ; lda #$4f
sta MOCK_6522_T1CH ; write into high-order latch, sta MOCK_6522_T1CH ; write into high-order latch,

2
demos/d2/moving.s
View File

@ -99,7 +99,7 @@ ror_nop_smc:
; sta HGR_PAGE ; sta HGR_PAGE
lda FRAME lda FRAME
cmp #$1f cmp #$1b ; NOTE: NEEDS TO BE ODD
bne draw_moving ; bra bne draw_moving ; bra
rts rts

2
demos/d2/wires.s
View File

@ -78,7 +78,7 @@ noflo:
inc COUNT inc COUNT
inc FRAME inc FRAME
lda FRAME lda FRAME
cmp #32 cmp #53
bne outer_loop bne outer_loop