shithub: pokecrystal

Download patch

ref: 2085ebcc617fdd78cc8194dc4a9a34e9fb8e8b51
parent: 163f3e0c3f56831b5255b31045798ac950098faa
author: Remy Oukaour <remy.oukaour@gmail.com>
date: Thu Jan 11 18:04:50 EST 2018

maskbits for NUM_FRAMES

--- a/constants/wram_constants.asm
+++ b/constants/wram_constants.asm
@@ -28,6 +28,7 @@
 	const FRAME_6 ; 5
 	const FRAME_7 ; 6
 	const FRAME_8 ; 7
+NUM_FRAMES EQU const_value
 
 ; TextBoxFlags:
 	const_def
--- a/gfx/font.asm
+++ b/gfx/font.asm
@@ -172,7 +172,7 @@
 
 LoadFrame: ; fb4cc
 	ld a, [TextBoxFrame]
-	and 7
+	maskbits NUM_FRAMES +- 1
 	ld bc, 6 * LEN_1BPP_TILE
 	ld hl, Frames
 	call AddNTimes
--- a/mobile/mobile_41.asm
+++ b/mobile/mobile_41.asm
@@ -1033,17 +1033,17 @@
 
 Function10649b: ; 10649b
 	ld a, [TextBoxFrame]
-	and $7
-	ld bc, 3 tiles
+	maskbits NUM_FRAMES +- 1
+	ld bc, 6 * LEN_1BPP_TILE
 	ld hl, Frames
 	call AddNTimes
 	ld d, h
 	ld e, l
-	ld hl, vTiles2 tile $79
-	ld c, 6
+	ld hl, vTiles2 tile "┌" ; $79
+	ld c, 6 ; "┌" to "┘"
 	ld b, BANK(Frames)
 	call Function1064c3
-	ld hl, vTiles2 tile $7f
+	ld hl, vTiles2 tile " " ; $7f
 	ld de, TextBoxSpaceGFX
 	ld c, 1
 	ld b, BANK(TextBoxSpaceGFX)