# HG changeset patch # User Mike Pavone # Date 1378667561 25200 # Node ID 30f1d4c90900621a45b29a741e340e13eef4e511 # Parent 580b64af2241d1d124895c5598505237926a64e0 Get direct color sample working diff -r 580b64af2241 -r 30f1d4c90900 directcolor.s68 --- a/directcolor.s68 Fri Sep 06 19:13:46 2013 -0700 +++ b/directcolor.s68 Sun Sep 08 12:12:41 2013 -0700 @@ -109,9 +109,15 @@ - move #$2300, SR + ;move #$2300, SR + move.b #0, $a10003 +WaitStart: + btst.b #5, $a10003 + bne.s WaitStart Top: + move.l #$40000000, (a5) ;Setup VRAM writes + lea BgData(pc), a0 ;set DMA source address move.l a0, d7 sub.l #258, d7 @@ -133,10 +139,7 @@ move.w #$8F00, (a5) ;set auto-increment to 0 - move.w #$8174, (a5) - - - move.l #$40000000, (a5) ;Setup VRAM writes + move.w #$8154, (a5) addq #1, a5 WaitVBlank: btst.b #3, (a5)