Skip to content

Commit

Permalink
Yen symbol now hugs the most significant digit.
Browse files Browse the repository at this point in the history
  • Loading branch information
andwhyisit committed Jul 23, 2023
1 parent 2b0cd69 commit e866a56
Show file tree
Hide file tree
Showing 12 changed files with 124 additions and 66 deletions.
74 changes: 74 additions & 0 deletions game/src/patch/yen.asm
Original file line number Diff line number Diff line change
@@ -0,0 +1,74 @@
INCLUDE "game/src/common/constants.asm"
INCLUDE "game/src/common/macros.asm"

SECTION "Place Yen Symbol", ROM0[$2016]
PlaceYenSymbolShop::
; hl is the money tile mapping address for the least significant digit.
push bc
ld b, h
ld a, l
sub 5
ld c, a
xor a
ld [bc], a
inc c

.ext
call PlaceYenSymbol
ld h, b
ld l, c
pop bc
ret

PlaceYenSymbolShopAlt::
; hl is the mapping address for the tile before the money tile mapping address.
push bc
ld b, h
ld c, l
xor a
ld [bc], a
inc c
jr PlaceYenSymbolShop.ext

PlaceYenSymbol::
; bc is the money tile mapping address.
; Warning: This will cause an infinite loop if it can't find an empty tile to map to.
push bc
push de
ld a, c
add 3
jr .decccommon

.loop
di
rst $20
ld a, [bc]
ei
or a
jr z, .exit

.decc
ld a, c
dec a

.decccommon
and $1F
ld d, a
ld a, c
and $E0
add d
ld c, a
jr .loop

.exit
di
rst $20
ld a, $EC
ld [bc], a
ei
pop de
pop bc
ret

; Free space.
padend $2060
10 changes: 4 additions & 6 deletions game/src/pausemenu/core.asm
Original file line number Diff line number Diff line change
Expand Up @@ -552,14 +552,12 @@ PauseMenuDrawMoney::
jr z, .draw_00
ld bc, $120B
call $14ec
ld a, $e0
di
push af
rst $20
pop af
ld [hli], a
ld a, $e0
ld [hl], a
ei
ret
jp PlaceYenSymbolShop
.draw_00
ld bc, $120B
call $14ec
Expand All @@ -572,7 +570,7 @@ PauseMenuDrawMoney::
ei
ld bc, $110B
call $14ec
ld a, $00
ld a, $EC
di
push af
rst $20
Expand Down
24 changes: 8 additions & 16 deletions game/src/shop/core.asm
Original file line number Diff line number Diff line change
Expand Up @@ -1002,13 +1002,11 @@ ShopBuyDisplayPartNamesPricesAndGenderState::
ld [hli], a
ei
ld hl, $98B2 ; Previously 98B1
ld a, $E0
di
push af
rst $20
pop af
ld [hli], a
ld [hl], $E0
ei
call PlaceYenSymbolShop
ld a, [$C54B]
ld hl, $98AB
call ShopMapHeartMaybe
Expand Down Expand Up @@ -1040,13 +1038,11 @@ ShopBuyDisplayPartNamesPricesAndGenderState::
ld [hli], a
ei
ld hl, $98F2 ; Previously 98F1
ld a, $E0
di
push af
rst $20
pop af
ld [hli], a
ld [hl], $E0
ei
call PlaceYenSymbolShop
ld a, [$C54B]
ld hl, $98EB
call ShopMapHeartMaybe
Expand Down Expand Up @@ -1078,13 +1074,11 @@ ShopBuyDisplayPartNamesPricesAndGenderState::
ld [hli], a
ei
ld hl, $9932 ; Previously 9931
ld a, $E0
di
push af
rst $20
pop af
ld [hli], a
ld [hl], $E0
ei
call PlaceYenSymbolShop
ld a, [$C54B]
ld hl, $992B
call ShopMapHeartMaybe
Expand Down Expand Up @@ -1116,13 +1110,11 @@ ShopBuyDisplayPartNamesPricesAndGenderState::
ld [hli], a
ei
ld hl, $9972 ; Previously 9971
ld a, $E0
di
push af
rst $20
pop af
ld [hli], a
ld [hl], $E0
ei
call PlaceYenSymbolShop
ld a, [$C54B]
ld hl, $996B
call ShopMapHeartMaybe
Expand Down
10 changes: 4 additions & 6 deletions game/src/shop/paint.asm
Original file line number Diff line number Diff line change
Expand Up @@ -705,21 +705,19 @@ PaintShopMapMoney::
add b
ld b, a
call $14EC
ld a, $E0
di
push af
rst $20
pop af
ld [hli], a
ld a, $E0
ld [hl], a
ei
ret
jp PlaceYenSymbolShop

.noMoney
ld a, 3
add b
ld b, a
call $14EC
ld a, 0
ld a, $EC
di
push af
rst $20
Expand Down
37 changes: 18 additions & 19 deletions game/src/shop/shop.asm
Original file line number Diff line number Diff line change
Expand Up @@ -125,21 +125,19 @@ ShopMapMoney::
add b
ld b, a
call $14EC
ld a, $E0
di
push af
rst $20
pop af
ld [hli], a
ld a, $E0
ld [hl], a
ei
ret
jp PlaceYenSymbolShop

.noMoney
ld a, 3
add b
ld b, a
call $14EC
ld a, 0
ld a, $EC
di
push af
rst $20
Expand Down Expand Up @@ -229,28 +227,31 @@ ShopBuyMapSelectionPrice::
pop af
ld [hli], a
ei
ld hl, $99CA ; Previously 99c9
ld a, $E0
push hl
di
push af
rst $20
pop af
ld a, $E0
ld [hli], a
ei
ld hl, $99C6 ; Previously 99c5
ld a, 0
xor a
di
push af
rst $20
pop af
ld [hli], a
ld [hld], a
ei
ld hl, $99C5 ; Previously 99c4
call ShopMapThreeDigitNumber
ret
pop hl
jp PlaceYenSymbolShop

ShopMapSelectionPriceDashes::
ld hl, $99C7 ; previously 99c6
ld hl, $99C5
di
rst $20
xor a
ld [hli], a
ei
ld a, 5
ld b, a
call ShopMapDashes
Expand Down Expand Up @@ -693,11 +694,9 @@ ShopMapPartPrice::
push hl
push hl
inc hl
xor a
di
push af
rst $20
pop af
xor a
ld [hli], a
ei
di
Expand Down Expand Up @@ -731,7 +730,7 @@ ShopMapPartPrice::
pop bc
pop hl
call ShopMapThreeDigitNumber
ret
jp PlaceYenSymbolShopAlt

ShopGetPartPriceAndStatus::
ld a, [W_ShopPartTypeSelectionIndex]
Expand Down
3 changes: 0 additions & 3 deletions game/src/text/main_script.asm
Original file line number Diff line number Diff line change
Expand Up @@ -324,9 +324,6 @@ ControlCodeD2_changePortrait::
.table
db 0,$C,$26,$44

; Free space.
padend $2060

SECTION "Main Script Helper Functions 1", ROM0[$2112]
MainScriptProgressXChars::
ld a, [W_MainScriptPointerLocationOffset + 1]
Expand Down
2 changes: 1 addition & 1 deletion gfx/tilemaps/MenuMainGame.txt
Original file line number Diff line number Diff line change
Expand Up @@ -10,5 +10,5 @@
\xdc\x00\x0F\x10\x11\x00\x00\xde
\xdd\x00\x00\x00\x00\x00\x00\xdf
\xd4\xd9\xd8\xd8\xd8\xd8\xd9\xd5
\xdc\xec\x00\x00\x00\x00\x00\xde
\xdc\x00\x00\x00\x00\x00\x00\xde
\xd6\xdb\xda\xda\xda\xda\xdb\xd7
2 changes: 1 addition & 1 deletion gfx/tilemaps/PaintShopMainScreen.txt
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
[1|22]
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xed\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\xf7\xed\xf7\xec\x00\x00\x00\x00\x00\x00\xf7\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\xf7\xed\xf7\x00\x00\x00\x00\x00\x00\x00\xf7\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x01\x02\x03\x00\x00\x00\xf7\xed\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\xf7\xed\x02\x03\x04\x04\x04\x04\x04\x03\x02\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x04\x05\x06\x07\x08\x00\xf7\xed\x02\x03\x04\x04\x04\x04\x04\x03\x02\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
Expand Down
2 changes: 1 addition & 1 deletion gfx/tilemaps/PaintShopPaintSelectScreen.txt
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
[1|23]
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xf7\xec\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xf7\x00\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\x02\x03\x04\x04\x04\x04\x04\x03\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\x02\x03\x04\x04\x04\x04\x04\x03\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
Expand Down
12 changes: 6 additions & 6 deletions gfx/tilemaps/ShopBuyParts.txt
Original file line number Diff line number Diff line change
Expand Up @@ -4,16 +4,16 @@
\xf7\x00\x00\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xf7\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xee\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf0\xf4\xf4\xf4\xf4\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xef\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xf3\xfb\xfb\xfb\xfb\xfb\xfb\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xef\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xf3\xfb\xfb\xfb\xfb\xfb\xfb\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xef\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xf3\xfb\xfb\xfb\xfb\xfb\xfb\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf0\xf4\xf4\xf4\xf4\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xd4\xd8\xd8\xd8\xd8\xd8\xd9\xd8\xd8\xd8\xd8\xd8\xd8\xd9\xd8\xd8\xd8\xd8\xd8\xd5\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x27\x28\x29\x2a\xec\x00\x00\x00\x00\x00\x00\x00\x00\x33\x34\x35\x36\x37\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x27\x28\x29\x2a\x00\x00\x00\x00\x00\x00\x00\x00\x00\x33\x34\x35\x36\x37\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdd\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdf\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x2b\x2c\x2d\x2e\xec\x00\x00\x00\x00\x00\x00\x2f\x30\x31\x32\x00\x00\x00\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x2b\x2c\x2d\x2e\x00\x00\x00\x00\x00\x00\x00\x2f\x30\x31\x32\x00\x00\x00\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xd6\xda\xda\xda\xda\xda\xdb\xda\xda\xda\xda\xda\xda\xdb\xda\xda\xda\xda\xda\xd7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
2 changes: 1 addition & 1 deletion gfx/tilemaps/ShopMainScreen.txt
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
[1|1E]
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xf7\xec\x00\x00\x00\x00\x00\x00\xf7\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xf7\x00\x00\x00\x00\x00\x00\x00\xf7\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x02\x03\x04\x05\x06\x07\x00\xf7\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\xf7\x08\x09\x0a\x0a\x0a\x0a\x0a\x09\x08\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x08\x09\x0a\x0b\x0c\x0d\x00\xf7\x08\x09\x0a\x0a\x0a\x0a\x0a\x09\x08\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
Expand Down
12 changes: 6 additions & 6 deletions gfx/tilemaps/ShopSellParts.txt
Original file line number Diff line number Diff line change
Expand Up @@ -4,16 +4,16 @@
\xf7\x00\x00\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\xf7\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xee\xee\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf0\xf4\xf4\xf4\xf4\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xef\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xf3\xfb\xfb\xfb\xfb\xfb\xfb\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xef\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xf3\xfb\xfb\xfb\xfb\xfb\xfb\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xef\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xfb\xf3\xfb\xfb\xfb\xfb\xfb\xfb\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\xec\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfa\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xee\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf4\xf0\xf4\xf4\xf4\xf4\xf4\xf4\xee\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xd4\xd8\xd8\xd8\xd8\xd8\xd9\xd8\xd8\xd8\xd8\xd8\xd8\xd9\xd8\xd8\xd8\xd8\xd8\xd5\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x27\x28\x29\x2a\xec\x00\x00\x00\x00\x00\x00\x00\x00\x38\x39\x3a\x3b\x3c\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x27\x28\x29\x2a\x00\x00\x00\x00\x00\x00\x00\x00\x00\x38\x39\x3a\x3b\x3c\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdd\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdf\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x2b\x2c\x2d\x2e\xec\x00\x00\x00\x00\x00\x00\x2f\x30\x31\x32\x00\x00\x00\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xdc\x2b\x2c\x2d\x2e\x00\x00\x00\x00\x00\x00\x00\x2f\x30\x31\x32\x00\x00\x00\xde\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00
\xd6\xda\xda\xda\xda\xda\xdb\xda\xda\xda\xda\xda\xda\xdb\xda\xda\xda\xda\xda\xd7\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00

0 comments on commit e866a56

Please sign in to comment.