You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-04-09 05:44:44 -07:00
Merge pull request #756 from mid-kid/master
Rub a dub dub, thanks for the grub
This commit is contained in:
@@ -1,20 +1,22 @@
|
||||
SetMenuAttributes::
|
||||
Load2DMenuData::
|
||||
push hl
|
||||
push bc
|
||||
ld hl, w2DMenuCursorInitY
|
||||
ld b, $8
|
||||
ld hl, w2DMenuData
|
||||
ld b, w2DMenuDataEnd - w2DMenuData
|
||||
.loop
|
||||
ld a, [de]
|
||||
inc de
|
||||
ld [hli], a
|
||||
dec b
|
||||
jr nz, .loop
|
||||
|
||||
; Reset menu state
|
||||
ld a, $1
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hli], a ; wMenuCursorY
|
||||
ld [hli], a ; wMenuCursorX
|
||||
xor a
|
||||
ld [hli], a
|
||||
ld [hli], a
|
||||
ld [hli], a ; wCursorOffCharacter
|
||||
ld [hli], a ; wCursorCurrentTile
|
||||
ld [hli], a
|
||||
pop bc
|
||||
pop hl
|
||||
|
@@ -99,7 +99,7 @@ DmgToCgbBGPals::
|
||||
ld c, 8
|
||||
call CopyPals
|
||||
; request pal update
|
||||
ld a, 1
|
||||
ld a, TRUE
|
||||
ldh [hCGBPalUpdate], a
|
||||
|
||||
pop af
|
||||
@@ -147,7 +147,7 @@ DmgToCgbObjPals::
|
||||
ld c, 8
|
||||
call CopyPals
|
||||
; request pal update
|
||||
ld a, 1
|
||||
ld a, TRUE
|
||||
ldh [hCGBPalUpdate], a
|
||||
|
||||
pop af
|
||||
@@ -182,7 +182,7 @@ DmgToCgbObjPal0::
|
||||
ld b, a
|
||||
ld c, 1
|
||||
call CopyPals
|
||||
ld a, 1
|
||||
ld a, TRUE
|
||||
ldh [hCGBPalUpdate], a
|
||||
|
||||
pop af
|
||||
@@ -219,7 +219,7 @@ DmgToCgbObjPal1::
|
||||
ld b, a
|
||||
ld c, 1
|
||||
call CopyPals
|
||||
ld a, 1
|
||||
ld a, TRUE
|
||||
ldh [hCGBPalUpdate], a
|
||||
|
||||
pop af
|
||||
@@ -319,7 +319,7 @@ ReloadSpritesNoPalettes::
|
||||
call ByteFill
|
||||
pop af
|
||||
ldh [rSVBK], a
|
||||
ld a, 1
|
||||
ld a, TRUE
|
||||
ldh [hCGBPalUpdate], a
|
||||
call DelayFrame
|
||||
ret
|
||||
|
@@ -698,7 +698,7 @@ TextCommands::
|
||||
dw TextCommand_PROMPT_BUTTON ; TX_PROMPT_BUTTON
|
||||
dw TextCommand_SCROLL ; TX_SCROLL
|
||||
dw TextCommand_START_ASM ; TX_START_ASM
|
||||
dw TextCommand_NUM ; TX_NUM
|
||||
dw TextCommand_DECIMAL ; TX_DECIMAL
|
||||
dw TextCommand_PAUSE ; TX_PAUSE
|
||||
dw TextCommand_SOUND ; TX_SOUND_DEX_FANFARE_50_79
|
||||
dw TextCommand_DOTS ; TX_DOTS
|
||||
@@ -851,8 +851,8 @@ TextCommand_START_ASM::
|
||||
ld [hl], a
|
||||
ret
|
||||
|
||||
TextCommand_NUM::
|
||||
; print a number
|
||||
TextCommand_DECIMAL::
|
||||
; print a decimal number
|
||||
ld a, [hli]
|
||||
ld e, a
|
||||
ld a, [hli]
|
||||
|
@@ -197,7 +197,7 @@ ClearPalettes::
|
||||
ldh [rSVBK], a
|
||||
|
||||
; Request palette update
|
||||
ld a, 1
|
||||
ld a, TRUE
|
||||
ldh [hCGBPalUpdate], a
|
||||
ret
|
||||
|
||||
|
Reference in New Issue
Block a user