mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-09-09 09:51:34 -07:00
e6ea1889fb
The former is arguably misleading (as you don’t access the memory location in hl to retrieve the jump location), and is consequently deprecated in newer versions of rgbds. This fix silences these deprecation warnings.
615 lines
9.2 KiB
NASM
Executable File
615 lines
9.2 KiB
NASM
Executable File
GetMysteryGift_MobileAdapterLayout: ; 4930f (mobile)
|
|
ld a, b
|
|
cp SCGB_RAM
|
|
jr nz, .not_ram
|
|
ld a, [SGBPredef]
|
|
.not_ram
|
|
push af
|
|
callba ResetBGPals
|
|
pop af
|
|
ld l, a
|
|
ld h, 0
|
|
add hl, hl
|
|
ld de, .dw
|
|
add hl, de
|
|
ld a, [hli]
|
|
ld h, [hl]
|
|
ld l, a
|
|
ld de, .done
|
|
push de
|
|
jp hl
|
|
.done
|
|
ret
|
|
; 49330 (12:5330)
|
|
|
|
.dw ; 49330
|
|
|
|
dw MG_Mobile_Layout00
|
|
dw MG_Mobile_Layout01
|
|
dw MG_Mobile_Layout02
|
|
; 49336
|
|
|
|
MG_Mobile_Layout_FillBox: ; 49336
|
|
.row
|
|
push bc
|
|
push hl
|
|
.col
|
|
ld [hli], a
|
|
dec c
|
|
jr nz, .col
|
|
pop hl
|
|
ld bc, SCREEN_WIDTH
|
|
add hl, bc
|
|
pop bc
|
|
dec b
|
|
jr nz, .row
|
|
ret
|
|
; 49346
|
|
|
|
MG_Mobile_Layout_WipeAttrMap: ; 49346 (12:5346)
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, SCREEN_HEIGHT * SCREEN_WIDTH
|
|
xor a
|
|
call ByteFill
|
|
ret
|
|
|
|
MG_Mobile_Layout_LoadPals: ; 49351 (12:5351)
|
|
ld de, UnknBGPals
|
|
ld hl, Palette_493e1
|
|
ld bc, 5 palettes
|
|
ld a, $5 ; BANK(UnknBGPals)
|
|
call FarCopyWRAM
|
|
ld de, UnknBGPals + 7 palettes
|
|
ld hl, Palette_TextBG7
|
|
ld bc, 1 palettes
|
|
ld a, $5 ; BANK(UnknBGPals)
|
|
call FarCopyWRAM
|
|
ret
|
|
|
|
MG_Mobile_Layout00: ; 4936e (12:536e)
|
|
call MG_Mobile_Layout_LoadPals
|
|
call MG_Mobile_Layout_WipeAttrMap
|
|
call MG_Mobile_Layout_CreatePalBoxes
|
|
callba ApplyAttrMap
|
|
callba ApplyPals
|
|
ret
|
|
|
|
MG_Mobile_Layout_CreatePalBoxes: ; 49384 (12:5384)
|
|
hlcoord 0, 0, AttrMap
|
|
lb bc, 4, 1
|
|
ld a, $1
|
|
call MG_Mobile_Layout_FillBox
|
|
lb bc, 2, 1
|
|
ld a, $2
|
|
call MG_Mobile_Layout_FillBox
|
|
lb bc, 6, 1
|
|
ld a, $3
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 1, 0, AttrMap
|
|
ld a, $1
|
|
lb bc, 3, 18
|
|
call MG_Mobile_Layout_FillBox
|
|
lb bc, 2, 18
|
|
ld a, $2
|
|
call MG_Mobile_Layout_FillBox
|
|
lb bc, 12, 18
|
|
ld a, $3
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 19, 0, AttrMap
|
|
lb bc, 4, 1
|
|
ld a, $1
|
|
call MG_Mobile_Layout_FillBox
|
|
lb bc, 2, 1
|
|
ld a, $2
|
|
call MG_Mobile_Layout_FillBox
|
|
lb bc, 6, 1
|
|
ld a, $3
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 0, 12, AttrMap
|
|
ld bc, 6 * SCREEN_WIDTH
|
|
ld a, $7
|
|
call ByteFill
|
|
ret
|
|
; 493e1 (12:53e1)
|
|
|
|
Palette_493e1: ; 493e1
|
|
RGB 03, 07, 09
|
|
RGB 26, 31, 00
|
|
RGB 20, 16, 03
|
|
RGB 31, 31, 31
|
|
|
|
RGB 13, 24, 29
|
|
RGB 11, 16, 30
|
|
RGB 07, 11, 22
|
|
RGB 05, 06, 18
|
|
|
|
RGB 31, 31, 31
|
|
RGB 20, 26, 31
|
|
RGB 13, 24, 29
|
|
RGB 11, 16, 30
|
|
|
|
RGB 31, 31, 31
|
|
RGB 20, 26, 31
|
|
RGB 00, 00, 00
|
|
RGB 00, 00, 00
|
|
|
|
RGB 31, 31, 31
|
|
RGB 20, 16, 08
|
|
RGB 31, 00, 00
|
|
RGB 00, 00, 00
|
|
; 49409
|
|
|
|
LoadOW_BGPal7:: ; 49409
|
|
ld hl, Palette_TextBG7
|
|
ld de, UnknBGPals + 8 * 7
|
|
ld bc, 8
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ret
|
|
; 49418
|
|
|
|
Palette_TextBG7: ; 49418
|
|
RGB 31, 31, 31
|
|
RGB 08, 19, 28
|
|
RGB 05, 05, 16
|
|
RGB 00, 00, 00
|
|
; 49420
|
|
|
|
Function49420:: ; 49420 (12:5420)
|
|
ld hl, MansionPalette4
|
|
ld de, UnknBGPals + $30
|
|
ld bc, $8
|
|
ld a, $5 ; BANK(UnknBGPals)
|
|
call FarCopyWRAM
|
|
ret
|
|
; 4942f (12:542f)
|
|
|
|
MG_Mobile_Layout01: ; 4942f
|
|
call MG_Mobile_Layout_LoadPals
|
|
ld de, UnknBGPals + $38
|
|
ld hl, Palette_49478
|
|
ld bc, $8
|
|
ld a, $5 ; BANK(UnknBGPals)
|
|
call FarCopyWRAM
|
|
call MG_Mobile_Layout_WipeAttrMap
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, SCREEN_WIDTH * SCREEN_HEIGHT
|
|
xor a
|
|
call ByteFill
|
|
hlcoord 0, 14, AttrMap
|
|
ld bc, 4 * SCREEN_WIDTH
|
|
ld a, $7
|
|
call ByteFill
|
|
ld a, [wd002]
|
|
bit 6, a
|
|
jr z, .asm_49464
|
|
call Function49480
|
|
jr .asm_49467
|
|
|
|
.asm_49464
|
|
call Function49496
|
|
|
|
.asm_49467
|
|
callba ApplyAttrMap
|
|
callba ApplyPals
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 49478
|
|
|
|
Palette_49478: ; 49478
|
|
RGB 31, 31, 31
|
|
RGB 26, 31, 00
|
|
RGB 20, 16, 03
|
|
RGB 00, 00, 00
|
|
; 49480
|
|
|
|
Function49480: ; 49480
|
|
hlcoord 0, 0, AttrMap
|
|
lb bc, 4, SCREEN_WIDTH
|
|
ld a, $7
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 0, 2, AttrMap
|
|
ld a, $4
|
|
ld [hl], a
|
|
hlcoord 19, 2, AttrMap
|
|
ld [hl], a
|
|
ret
|
|
; 49496
|
|
|
|
Function49496: ; 49496
|
|
hlcoord 0, 0, AttrMap
|
|
lb bc, 2, SCREEN_WIDTH
|
|
ld a, $7
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 0, 1, AttrMap
|
|
ld a, $4
|
|
ld [hl], a
|
|
hlcoord 19, 1, AttrMap
|
|
ld [hl], a
|
|
ret
|
|
; 494ac
|
|
|
|
LoadSpecialMapPalette: ; 494ac
|
|
ld a, [wTileset]
|
|
cp TILESET_POKECOM_CENTER
|
|
jr z, .pokecom_2f
|
|
cp TILESET_BATTLE_TOWER
|
|
jr z, .battle_tower
|
|
cp TILESET_ICE_PATH
|
|
jr z, .ice_path
|
|
cp TILESET_HOUSE_1
|
|
jr z, .house
|
|
cp TILESET_RADIO_TOWER
|
|
jr z, .radio_tower
|
|
cp TILESET_CELADON_MANSION
|
|
jr z, .mansion_mobile
|
|
jr .do_nothing
|
|
|
|
.pokecom_2f
|
|
call LoadPokeComPalette
|
|
scf
|
|
ret
|
|
|
|
.battle_tower
|
|
call LoadBattleTowerPalette
|
|
scf
|
|
ret
|
|
|
|
.ice_path
|
|
ld a, [wPermission] ; permission
|
|
and 7
|
|
cp 3 ; Hall of Fame
|
|
jr z, .do_nothing
|
|
call LoadIcePathPalette
|
|
scf
|
|
ret
|
|
|
|
.house
|
|
call LoadHousePalette
|
|
scf
|
|
ret
|
|
|
|
.radio_tower
|
|
call LoadRadioTowerPalette
|
|
scf
|
|
ret
|
|
|
|
.mansion_mobile
|
|
call LoadMansionPalette
|
|
scf
|
|
ret
|
|
|
|
.do_nothing
|
|
and a
|
|
ret
|
|
; 494f2
|
|
|
|
LoadPokeComPalette: ; 494f2
|
|
ld a, $5
|
|
ld de, UnknBGPals
|
|
ld hl, PokeComPalette
|
|
ld bc, 8 palettes
|
|
call FarCopyWRAM
|
|
ret
|
|
; 49501
|
|
|
|
PokeComPalette: ; 49501
|
|
INCLUDE "tilesets/pokecom.pal"
|
|
; 49541
|
|
|
|
LoadBattleTowerPalette: ; 49541
|
|
ld a, $5
|
|
ld de, UnknBGPals
|
|
ld hl, BattleTowerPalette
|
|
ld bc, 8 palettes
|
|
call FarCopyWRAM
|
|
ret
|
|
; 49550
|
|
|
|
BattleTowerPalette: ; 49550
|
|
INCLUDE "tilesets/battle_tower.pal"
|
|
; 49590
|
|
|
|
LoadIcePathPalette: ; 49590
|
|
ld a, $5
|
|
ld de, UnknBGPals
|
|
ld hl, IcePathPalette
|
|
ld bc, 8 palettes
|
|
call FarCopyWRAM
|
|
ret
|
|
; 4959f
|
|
|
|
IcePathPalette: ; 4959f
|
|
INCLUDE "tilesets/ice_path.pal"
|
|
; 495df
|
|
|
|
LoadHousePalette: ; 495df
|
|
ld a, $5
|
|
ld de, UnknBGPals
|
|
ld hl, HousePalette
|
|
ld bc, 8 palettes
|
|
call FarCopyWRAM
|
|
ret
|
|
; 495ee
|
|
|
|
HousePalette: ; 495ee
|
|
INCLUDE "tilesets/house.pal"
|
|
; 4962e
|
|
|
|
LoadRadioTowerPalette: ; 4962e
|
|
ld a, $5
|
|
ld de, UnknBGPals
|
|
ld hl, RadioTowerPalette
|
|
ld bc, 8 palettes
|
|
call FarCopyWRAM
|
|
ret
|
|
; 4963d
|
|
|
|
RadioTowerPalette: ; 4963d
|
|
INCLUDE "tilesets/radio_tower.pal"
|
|
; 4967d
|
|
|
|
MansionPalette1: ; 4967d
|
|
RGB 30, 28, 26
|
|
RGB 19, 19, 19
|
|
RGB 13, 13, 13
|
|
RGB 07, 07, 07
|
|
|
|
RGB 30, 28, 26
|
|
RGB 31, 19, 24
|
|
RGB 30, 10, 06
|
|
RGB 07, 07, 07
|
|
|
|
RGB 18, 24, 09
|
|
RGB 15, 20, 01
|
|
RGB 09, 13, 00
|
|
RGB 07, 07, 07
|
|
|
|
RGB 30, 28, 26
|
|
RGB 15, 16, 31
|
|
RGB 09, 09, 31
|
|
RGB 07, 07, 07
|
|
|
|
RGB 30, 28, 26
|
|
RGB 31, 31, 07
|
|
RGB 31, 16, 01
|
|
RGB 07, 07, 07
|
|
|
|
RGB 26, 24, 17
|
|
RGB 21, 17, 07
|
|
RGB 16, 13, 03
|
|
RGB 07, 07, 07
|
|
|
|
MansionPalette3: ; 496ad
|
|
RGB 30, 28, 26
|
|
RGB 17, 19, 31
|
|
RGB 14, 16, 31
|
|
RGB 07, 07, 07
|
|
|
|
RGB 31, 31, 16
|
|
RGB 31, 31, 16
|
|
RGB 14, 09, 00
|
|
RGB 00, 00, 00
|
|
; 496bd
|
|
|
|
MansionPalette4: ; 496bd
|
|
RGB 05, 05, 16
|
|
RGB 08, 19, 28
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
; 496c5
|
|
|
|
LoadMansionPalette: ; 496c5
|
|
ld a, $5
|
|
ld de, UnknBGPals
|
|
ld hl, MansionPalette1
|
|
ld bc, 8 palettes
|
|
call FarCopyWRAM
|
|
ld a, $5
|
|
ld de, UnknBGPals + 4 palettes
|
|
ld hl, MansionPalette2
|
|
ld bc, 1 palettes
|
|
call FarCopyWRAM
|
|
ld a, $5
|
|
ld de, UnknBGPals + 3 palettes
|
|
ld hl, MansionPalette3
|
|
ld bc, 1 palettes
|
|
call FarCopyWRAM
|
|
ld a, $5
|
|
ld de, UnknBGPals + 6 palettes
|
|
ld hl, MansionPalette4
|
|
ld bc, 1 palettes
|
|
call FarCopyWRAM
|
|
ret
|
|
; 496fe
|
|
|
|
MansionPalette2: ; 496fe
|
|
RGB 25, 24, 23
|
|
RGB 20, 19, 19
|
|
RGB 14, 16, 31
|
|
RGB 07, 07, 07
|
|
; 49706
|
|
|
|
MG_Mobile_Layout02: ; 49706
|
|
ld hl, Palette_49732
|
|
ld de, UnknBGPals
|
|
ld bc, 1 palettes
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
callba ApplyPals
|
|
call MG_Mobile_Layout_WipeAttrMap
|
|
callba ApplyAttrMap
|
|
ld hl, Palette_4973a
|
|
ld de, UnknOBPals
|
|
ld bc, 1 palettes
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ret
|
|
; 49732
|
|
|
|
Palette_49732: ; 49732
|
|
RGB 31, 31, 31
|
|
RGB 23, 16, 07
|
|
RGB 23, 07, 07
|
|
RGB 03, 07, 20
|
|
; 4973a
|
|
|
|
Palette_4973a: ; 4973a
|
|
RGB 00, 00, 00
|
|
RGB 07, 05, 31
|
|
RGB 14, 18, 31
|
|
RGB 31, 31, 31
|
|
; 49742
|
|
|
|
Function49742: ; 49742
|
|
ld hl, Palette_49757
|
|
ld de, UnknBGPals
|
|
ld bc, $40
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
callba ApplyPals
|
|
ret
|
|
; 49757
|
|
|
|
Palette_49757: ; 49757
|
|
RGB 31, 31, 63
|
|
RGB 00, 00, 00
|
|
RGB 00, 00, 00
|
|
RGB 00, 00, 00
|
|
|
|
RGB 31, 31, 63
|
|
RGB 00, 00, 00
|
|
RGB 00, 00, 00
|
|
RGB 00, 00, 00
|
|
|
|
RGB 04, 02, 15
|
|
RGB 21, 00, 21
|
|
RGB 31, 00, 00
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 21, 00, 21
|
|
RGB 30, 16, 26
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 21, 00, 21
|
|
RGB 16, 16, 16
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 21, 00, 21
|
|
RGB 31, 12, 12
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 21, 00, 21
|
|
RGB 07, 08, 31
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 21, 00, 21
|
|
RGB 29, 28, 09
|
|
RGB 31, 31, 31
|
|
; 49797
|
|
|
|
_InitMG_Mobile_LinkTradePalMap: ; 49797
|
|
hlcoord 0, 0, AttrMap
|
|
lb bc, 16, 2
|
|
ld a, $4
|
|
call MG_Mobile_Layout_FillBox
|
|
ld a, $3
|
|
ldcoord_a 0, 1, AttrMap
|
|
ldcoord_a 0, 14, AttrMap
|
|
hlcoord 2, 0, AttrMap
|
|
lb bc, 8, 18
|
|
ld a, $5
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 2, 8, AttrMap
|
|
lb bc, 8, 18
|
|
ld a, $6
|
|
call MG_Mobile_Layout_FillBox
|
|
hlcoord 0, 16, AttrMap
|
|
lb bc, 2, SCREEN_WIDTH
|
|
ld a, $4
|
|
call MG_Mobile_Layout_FillBox
|
|
ld a, $3
|
|
lb bc, 6, 1
|
|
hlcoord 6, 1, AttrMap
|
|
call MG_Mobile_Layout_FillBox
|
|
ld a, $3
|
|
lb bc, 6, 1
|
|
hlcoord 17, 1, AttrMap
|
|
call MG_Mobile_Layout_FillBox
|
|
ld a, $3
|
|
lb bc, 6, 1
|
|
hlcoord 6, 9, AttrMap
|
|
call MG_Mobile_Layout_FillBox
|
|
ld a, $3
|
|
lb bc, 6, 1
|
|
hlcoord 17, 9, AttrMap
|
|
call MG_Mobile_Layout_FillBox
|
|
ld a, $2
|
|
hlcoord 2, 16, AttrMap
|
|
ld [hli], a
|
|
ld a, $7
|
|
ld [hli], a
|
|
ld [hli], a
|
|
ld [hli], a
|
|
ld a, $2
|
|
ld [hl], a
|
|
hlcoord 2, 17, AttrMap
|
|
ld a, $3
|
|
ld bc, 6
|
|
call ByteFill
|
|
ret
|
|
; 49811
|
|
|
|
LoadTradeRoomBGPals: ; 49811
|
|
ld hl, Palette_49826
|
|
ld de, UnknBGPals + $10
|
|
ld bc, $30
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
callba ApplyPals
|
|
ret
|
|
; 49826
|
|
|
|
Palette_49826: ; 49826
|
|
RGB 04, 02, 15
|
|
RGB 07, 09, 31
|
|
RGB 31, 00, 00
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 07, 09, 31
|
|
RGB 15, 23, 30
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 07, 09, 31
|
|
RGB 16, 16, 16
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 07, 09, 31
|
|
RGB 25, 07, 04
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 07, 09, 31
|
|
RGB 03, 22, 08
|
|
RGB 31, 31, 31
|
|
|
|
RGB 04, 02, 15
|
|
RGB 07, 09, 31
|
|
RGB 29, 28, 09
|
|
RGB 31, 31, 31
|
|
; 49856
|
|
|
|
InitMG_Mobile_LinkTradePalMap: ; 49856
|
|
call _InitMG_Mobile_LinkTradePalMap
|
|
ret
|
|
; 4985a
|