pokecrystal-board/engine/gfx/crystal_layouts.asm

67 lines
1.1 KiB
NASM
Raw Normal View History

2018-06-24 07:09:41 -07:00
_InitMG_Mobile_LinkTradePalMap:
hlcoord 0, 0, wAttrmap
2015-12-16 18:57:42 -08:00
lb bc, 16, 2
ld a, $4
call FillBoxCGB
2015-12-16 18:57:42 -08:00
ld a, $3
ldcoord_a 0, 1, wAttrmap
ldcoord_a 0, 14, wAttrmap
hlcoord 2, 0, wAttrmap
2015-12-16 18:57:42 -08:00
lb bc, 8, 18
ld a, $5
call FillBoxCGB
hlcoord 2, 8, wAttrmap
2015-12-16 18:57:42 -08:00
lb bc, 8, 18
ld a, $6
call FillBoxCGB
hlcoord 0, 16, wAttrmap
2015-12-16 18:57:42 -08:00
lb bc, 2, SCREEN_WIDTH
ld a, $4
call FillBoxCGB
2015-12-16 18:57:42 -08:00
ld a, $3
lb bc, 6, 1
hlcoord 6, 1, wAttrmap
call FillBoxCGB
2015-12-16 18:57:42 -08:00
ld a, $3
lb bc, 6, 1
hlcoord 17, 1, wAttrmap
call FillBoxCGB
2015-12-16 18:57:42 -08:00
ld a, $3
lb bc, 6, 1
hlcoord 6, 9, wAttrmap
call FillBoxCGB
2015-12-16 18:57:42 -08:00
ld a, $3
lb bc, 6, 1
hlcoord 17, 9, wAttrmap
call FillBoxCGB
2015-12-16 18:57:42 -08:00
ld a, $2
hlcoord 2, 16, wAttrmap
2015-12-16 18:57:42 -08:00
ld [hli], a
ld a, $7
ld [hli], a
ld [hli], a
ld [hli], a
2015-12-16 18:57:42 -08:00
ld a, $2
ld [hl], a
hlcoord 2, 17, wAttrmap
2015-12-16 18:57:42 -08:00
ld a, $3
ld bc, 6
call ByteFill
ret
_LoadTradeRoomBGPals:
2017-12-15 19:36:33 -08:00
ld hl, TradeRoomPalette
2018-01-01 06:08:21 -08:00
ld de, wBGPals1 palette PAL_BG_GREEN
2017-12-15 19:36:33 -08:00
ld bc, 6 palettes
2018-01-01 06:08:21 -08:00
ld a, BANK(wBGPals1)
2015-12-16 18:57:42 -08:00
call FarCopyWRAM
2017-12-24 09:47:30 -08:00
farcall ApplyPals
2015-12-16 18:57:42 -08:00
ret
2018-06-24 07:09:41 -07:00
TradeRoomPalette:
INCLUDE "gfx/trade/border.pal"
2015-12-16 18:57:42 -08:00
2018-06-24 07:09:41 -07:00
InitMG_Mobile_LinkTradePalMap:
2015-12-21 11:10:16 -08:00
call _InitMG_Mobile_LinkTradePalMap
2015-12-16 18:57:42 -08:00
ret