diff options
-rw-r--r-- | explosion.s | 19 |
1 files changed, 14 insertions, 5 deletions
diff --git a/explosion.s b/explosion.s index dc72538..eebf3ab 100644 --- a/explosion.s +++ b/explosion.s @@ -31,27 +31,36 @@ _explosion: ; { @loop: - lda #$05 + lda #$03 sta iloop_count @iloop: - lda RTCLOK+2 -@a: -cmp RTCLOK+2 - beq @a + ldx #0 ; jsleep(2) + lda #$02 + jsr _jsleep + ldx #2 @b: lda VCOUNT cmp #(4+8)*4 bne @b + +@d: sta WSYNC lda RANDOM sta CHBASE + lda VCOUNT + cmp #(4+23)*4 + bne @d + lda #$e0 + sta CHBASE lda RTCLOK+2 @c: cmp RTCLOK+2 beq @c + dex + bne @b dec iloop_count bne @iloop |