github/AmigaExamples
1
0
Fork 0
mirror of https://frontier.innolan.net/github/AmigaExamples.git synced 2025-11-23 06:12:31 +00:00
Code Releases Activity

Removed -phxass assembler argument

Browse Source
This commit is contained in:
alpine9000
2016-03-20 21:11:56 +11:00
parent 5ee2b42a30
commit 2da8e747dc
20 changed files with 77 additions and 75 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
018.vert_scroll/init.s
View File

@ -6,11 +6,11 @@ init:
move #$7fff,INTENA(a6) ; disable all interrupts
;; set up default palette
bsr.s installColorPalette
bsr installColorPalette
moveq.l #0,d0
lea copper(pc),a0
bsr.s pokeBitplanePointers
bsr pokeBitplanePointers
;; set up playfield
move.w #(RASTER_Y_START<<8)|RASTER_X_START,DIWSTRT(a6)

2
018.vert_scroll/vert_scroll.s
View File

@ -51,7 +51,7 @@ pokeBitplanePointers:
;; a0 = BPLP copper list address
movem.l d0-a6,-(sp)
lea bitplanes(pc),a1
add.l d0, a1
add.l d0,a1
moveq #SCREEN_BIT_DEPTH-1,d0
.bitplaneloop:
move.l a1,d1