Cleanup
This commit is contained in:
parent
7224cf9706
commit
4c121ed130
Binary file not shown.
|
@ -20,7 +20,7 @@ BlitFillColor:
|
|||
move.w #BLIT_DEST|$FF,d5 ; yes ? all ones
|
||||
bra .doblit
|
||||
.zero
|
||||
move.w #BLIT_DEST|$0,d5 ; no ? all zeros
|
||||
move.w #BLIT_DEST|$0,d5 ; no ? all zeros
|
||||
.doblit
|
||||
WaitBlitter
|
||||
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
MASKED_FONT equ 0
|
||||
MASKED_FONT equ 1
|
||||
|
||||
if MASKED_FONT==1
|
||||
BACKGROUND_COLOR equ 4
|
||||
|
|
|
@ -25,7 +25,6 @@ Entry:
|
|||
|
||||
move.w #(INTF_SETCLR|INTF_VERTB|INTF_INTEN),INTENA(a6)
|
||||
move.w #(DMAF_BLITTER|DMAF_SETCLR!DMAF_MASTER),DMACON(a6)
|
||||
|
||||
move.l onscreen,a0
|
||||
move.l #BACKGROUND_COLOR,d0
|
||||
move.w #SCREEN_HEIGHT,d1
|
||||
|
@ -48,7 +47,7 @@ MainLoop:
|
|||
move.l offscreen,a0
|
||||
move.l #BACKGROUND_COLOR,d0
|
||||
move.w #FONT_HEIGHT,d1
|
||||
move.l ypos,d2 ; ypos
|
||||
move.l ypos,d2
|
||||
jsr BlitFillColor
|
||||
|
||||
move.l offscreen,a0
|
||||
|
|
Loading…
Reference in New Issue