diff options
| -rw-r--r-- | dla.s | 21 |
1 files changed, 10 insertions, 11 deletions
@@ -47,7 +47,7 @@ .include "io.s" ; printchrx and getchrx msg: .byte "Diffusion Limited Aggregate",$9b - .byte "Urchlay's ASM version 0.0.3",$9b,$9b + .byte "Urchlay's ASM version 0.0.4",$9b,$9b .byte "How many particles [",.sprintf("%d", DEFAULTPART),"]? ",$0 init: ; set default particles (if user just hits return) @@ -130,14 +130,13 @@ usedefault: xex_org loadaddr main: ;;; start of main() jsr initscreen - ; this stuff isn't working, commented out for now: ; wait for shadow regs to get updated... - ;lda RTCLOK+2 -;wl: - ;cmp RTCLOK+2 - ;beq wl - ;lda #1 ; ...turn off shadow reg updates (tiny speed boost) - ;sta CRITIC + lda RTCLOK+2 +wl: + cmp RTCLOK+2 + beq wl + lda #1 ; ...turn off shadow reg updates (tiny speed boost) + sta CRITIC lda #0 sta particles sta particles+1 @@ -310,7 +309,7 @@ plotsetup: ;adc screenptr+1 ;sta pixptr+1 - ; now, use a table, which makes this run ~3.5x as fast! + ; now, use a table, which makes this run ~2x as fast! ldx cursor_y lda lineaddrs_l,x sta pixptr @@ -431,8 +430,8 @@ checkbounds: jsr unplot ldx #DMA_ON dontplot: - stx SDMCTL ; nope, shadow updates are off... - ;stx DMACTL + ;stx SDMCTL ; nope, shadow updates are off... + stx DMACTL jsr check_neighbors bne stick beq drunkwalk |