1
0
mirror of https://frontier.innolan.net/github/AmigaExamples.git synced 2025-11-22 17:16:19 +00:00

A few incorrect dbra counters

This commit is contained in:
alpine9000
2016-03-25 19:49:36 +11:00
parent 634bddd77f
commit b2a2214d9d
9 changed files with 4 additions and 45 deletions

View File

@ -21,15 +21,6 @@ entry:
move #$7fff,INTENA(a6) ; disable all interrupts
include "out/image-palette.s"
if 0
;; reset color registers to white to prevent startup flicker
move.l #32,d0
lea COLOR00(a6),a0
.loop:
move.w #$FFF,(a0)
addq #2,a0
dbra d0,.loop
endif
;; set up playfield
move.w #(RASTER_Y_START<<8)|RASTER_X_START,DIWSTRT(a6)
@ -69,20 +60,6 @@ entry:
bsr.s waitRaster
bra.s .mainLoop
if 0
resetBitplanePointers:
movem.l d0-a6,-(sp)
lea bitplanes,a1
lea BPL1PTH(a6),a2
moveq #SCREEN_BIT_DEPTH,d0
.bitplaneloop:
move.l a1,(a2)
lea SCREEN_WIDTH_BYTES(a1),a1 ; bit plane data is interleaved
addq #4,a2
dbra d0,.bitplaneloop
movem.l (sp)+,d0-a6
rts
endif
waitRaster: ;wait for rasterline d0.w. Modifies d0-d2/a0.
move.l #$1ff00,d2