Mercurial > repos > ghero

comparison genesis.s68 @ 7:4ffd621f1d0c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initialize VDP register 0 so it works on the Mega Everdrive. Temporarily disable the sprite stuff
author Mike Pavone <pavone@retrodev.com>
date Tue, 03 Sep 2013 09:37:53 -0700
parents 97ec271a513f
children 997690aa0507
comparison
equal deleted inserted replaced
6:3148b6389042 7:4ffd621f1d0c
95 move.l #$C00000, a4 95 move.l #$C00000, a4
96 move.l #$c00004, a5 96 move.l #$c00004, a5
97 97
98 move.l #$0, a7 98 move.l #$0, a7
99 99
100 move.w #$8004, (a5)
100 move.w #$8104, (a5) ;turn off display 101 move.w #$8104, (a5) ;turn off display
101 move.w #$8200, (a5) ;Table A = 0000 102 move.w #$8200, (a5) ;Table A = 0000
102 move.w #$8400, (a5) ;Table B = 0000 103 move.w #$8400, (a5) ;Table B = 0000
103 move.w #$857C, (a5) ;Sprite Table = F800 104 move.w #$857C, (a5) ;Sprite Table = F800
104 move.w #$8B00, (a5) ;set full screen vertical and horizontal scrolling 105 move.w #$8B00, (a5) ;set full screen vertical and horizontal scrolling
159 move.l #0, (a4) 160 move.l #0, (a4)
160 move.l #0, (a4) 161 move.l #0, (a4)
161 162
162 move.w #$8114, (a5) ;turn on DMA 163 move.w #$8114, (a5) ;turn on DMA
163 164
164 bsr InitSprites 165 ;bsr InitSprites
165 bsr AddSprite 166 ;bsr AddSprite
166 167
167 move.w #$0, (a0) 168 move.w #$0, (a0)
168 169
169 bsr LoadSpritePal 170 ;bsr LoadSpritePal
170 bsr InitFrameBigSprite 171 ;bsr InitFrameBigSprite
171 moveq #0, d3 172 moveq #0, d3
172 bsr ChangeFrameBigSprite 173 ;bsr ChangeFrameBigSprite
173
174 174
175 175
176 176
177 move.l #CRAMDMACmd, d5 ;setup DMA command word 177 move.l #CRAMDMACmd, d5 ;setup DMA command word
178 178
228 228
229 VINT: 229 VINT:
230 if USE_HINT 230 if USE_HINT
231 move.w #$8144, (a5) 231 move.w #$8144, (a5)
232 endif 232 endif
233 bsr SpriteCopyVRAM 233 ;bsr SpriteCopyVRAM
234 234
235 bsr ReadPad 235 bsr ReadPad
236 236
237 bsr Player1Vint 237 ;bsr Player1Vint
238 238
239 move.l (PalAddress).w, d7 ;setup DMA source address 239 move.l (PalAddress).w, d7 ;setup DMA source address
240 move.w #$9500, d6 240 move.w #$9500, d6
241 ror.l #1, d7 241 ror.l #1, d7
242 move.b d7, d6 242 move.b d7, d6