scawful/oracle-of-secrets
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add ApplyGraphicsSheet(sheet,dest) macro

Browse Source
This commit is contained in:
scawful
2025-01-19 13:51:12 -05:00
parent 6aaafb87ce
commit a7b3278927
1 changed files with 17 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
Overworld/custom_gfx.asm
View File

@@ -5,25 +5,26 @@ CheckForChangeGraphicsNormalLoadBoat:
JSR ApplyGraphics1
JSR ApplyGraphics2
PLB
RTL
.boat_area
RTL
}
ApplyGraphics1:
{
macro ApplyGraphicsSheet(sheet, dest)
REP #$20 ; A = 16, XY = 8
LDX #$80 : STX $2115 ; Set the video port register every time we write it increase by 1
LDA #$2C00 : STA $2116 ; Destination of the DMA $5800 in vram <- this need to be divided by 2
LDA #<dest> : STA $2116 ; Destination of the DMA $7800 in vram <- this need to be divided by 2
LDA #$1801 : STA $4300 ; DMA Transfer Mode and destination register
; "001 => 2 registers write once (2 bytes: p, p+1)"
LDA.w #BoatBitmap : STA $4302 ; Source address where you want gfx from ROM
LDX.b #BoatBitmap>>16 : STX $4304
LDA #$2000 : STA $4305 ; size of the transfer 4 sheets of $800 each
LDX #$01 : STX $420B ; Do the DMA
LDA.w #<sheet> : STA $4302
LDX.b #<sheet>>>16 : STX $4304
LDA #$2000 : STA $4305 ; Size of the transfer 4 sheets of $800 each
LDX #$01 : STX $420B ; Execute the DMA
SEP #$30
endmacro
ApplyGraphics1:
{
%ApplyGraphicsSheet(BoatBitmap, $2C00)
RTS
BoatBitmap:
@@ -32,18 +33,7 @@ ApplyGraphics1:
ApplyGraphics2:
{
REP #$20 ; A = 16, XY = 8
LDX #$80 : STX $2115 ; Set the video port register every time we write it increase by 1
LDA #$5000 : STA $2116 ; Destination of the DMA $7800 in vram <- this need to be divided by 2
LDA #$1801 : STA $4300 ; DMA Transfer Mode and destination register
; "001 => 2 registers write once (2 bytes: p, p+1)"
LDA.w #AdditionalBitmap : STA $4302 ; Source address where you want gfx from ROM
LDX.b #AdditionalBitmap>>16 : STX $4304
LDA #$2000 : STA $4305 ; size of the transfer 4 sheets of $800 each
LDX #$01 : STX $420B ; Do the DMA
SEP #$30
%ApplyGraphicsSheet(AdditionalBitmap, $5000)
RTS
AdditionalBitmap: