shithub: pokecrystal

Download patch

ref: ddec0ee305f25bc9941e19e16c79f499c5e95c23
parent: b199f6cfbff81cec3e62351ae4aaa6edce0270d5
author: Remy Oukaour <remy.oukaour@gmail.com>
date: Fri Jan 19 15:48:33 EST 2018

More Japanese characters

--- a/Makefile
+++ b/Makefile
@@ -215,6 +215,7 @@
 gfx/mobile/ascii_font.2bpp: tools/gfx += --trim-whitespace
 gfx/mobile/electro_ball.2bpp: tools/gfx += --trim-whitespace
 gfx/mobile/electro_ball_nonmatching.2bpp: tools/gfx += --remove-duplicates --remove-xflip
+gfx/mobile/mobile_adapter.2bpp: tools/gfx += --trim-whitespace
 gfx/mobile/mobile_splash.2bpp: tools/gfx += --remove-duplicates --remove-xflip
 gfx/mobile/pichu_animated.2bpp: tools/gfx += --trim-whitespace
 
--- a/charmap.asm
+++ b/charmap.asm
@@ -73,7 +73,7 @@
 
 	charmap "<LV>",      $6e
 
-	charmap "<ど>",       $70 ; hiragana small do, unused
+	charmap "<DO>",      $70 ; hiragana small do, unused
 	charmap "◀",         $71
 	charmap "『",         $72 ; Japanese opening quote, unused
 	charmap "<ID>",      $73
@@ -208,7 +208,7 @@
 
 ; Japanese control characters (see home/text.asm)
 
-	charmap "<CTRL_18>", $18 ; "ノ゛"? (ungrammatical)
+	charmap "<JP_18>",   $18 ; "ノ゛"? (ungrammatical)
 	charmap "<NI>",      $1d ; "に "
 	charmap "<TTE>",     $1e ; "って"
 	charmap "<WO>",      $1f ; "を "
@@ -276,11 +276,18 @@
 	charmap "ぺ", $47
 	charmap "ぽ", $48
 
+	charmap "「", $70
+	charmap "」", $71
+	charmap "』", $73
+	charmap "⋯", $75
+
+	charmap " ", $7f
+
 	charmap "ア", $80
 	charmap "イ", $81
 	charmap "ウ", $82
 	charmap "エ", $83
-	charmap "ォ", $84
+	charmap "オ", $84
 	charmap "カ", $85
 	charmap "キ", $86
 	charmap "ク", $87
@@ -331,7 +338,6 @@
 	charmap "う", $b3
 	charmap "え", $b4
 	charmap "お", $b5
-
 	charmap "か", $b6
 	charmap "き", $b7
 	charmap "く", $b8
@@ -357,7 +363,6 @@
 	charmap "ふ", $cc
 	charmap "へ", $cd
 	charmap "ほ", $ce
-
 	charmap "ま", $cf
 	charmap "み", $d0
 	charmap "む", $d1
@@ -380,8 +385,31 @@
 	charmap "ょ", $e2
 
 	charmap "ー", $e3
-
 	charmap "゚", $e4
 	charmap "゙", $e5
 
+	charmap "?", $e6
+	charmap "!", $e7
+	charmap "。", $e8
+
 	charmap "ァ", $e9
+	charmap "ゥ", $ea
+	charmap "ェ", $eb
+
+	charmap "円", $f0
+
+	charmap ".", $f2
+	charmap "/", $f3
+
+	charmap "ォ", $f4
+
+	charmap "0", $f6
+	charmap "1", $f7
+	charmap "2", $f8
+	charmap "3", $f9
+	charmap "4", $fa
+	charmap "5", $fb
+	charmap "6", $fc
+	charmap "7", $fd
+	charmap "8", $fe
+	charmap "9", $ff
--- a/data/credits_strings.asm
+++ b/data/credits_strings.asm
@@ -128,7 +128,7 @@
 .NobuhiroSeya:        db "   NOBUHIRO SEYA@"          ; "せや のぶひろ@"
 .KazuhitoSekine:      db "  KAZUHITO SEKINE@"         ; "せきね かずひと@"
 .TetsujiOota:         db "    TETSUJI OOTA@"          ; "おおた てつじ@"
-.NclSuperMarioClub:   db "NCL SUPER MARIO CLUB@"      ; "スーパーマりォクラブ@"
+.NclSuperMarioClub:   db "NCL SUPER MARIO CLUB@"      ; "スーパーマりオクラブ@"
 .Sarugakucho:         db "    SARUGAKUCHO@"           ; "さるがくちょう@"
 .AkitoMori:           db "     AKITO MORI@"           ; "もり あきと@"
 .TakahiroHarada:      db "  TAKAHIRO HARADA@"         ; "はらだ たかひろ@"
@@ -190,7 +190,7 @@
 .Music:               db "       MUSIC@"              ; "おんがく@"
 .SoundEffects:        db "   SOUND EFFECTS@"          ; "サウンド エフ→クト@"
 .GameDesign:          db "    GAME DESIGN@"           ; "ゲームデザイン@"
-.GameScenario:        db "   GAME SCENARIO@"          ; "シナりォ@"
+.GameScenario:        db "   GAME SCENARIO@"          ; "シナりオ@"
 .ToolProgramming:     db "  TOOL PROGRAMMING@"        ; "ツール プログラム@"
 .ParametricDesign:    db " PARAMETRIC DESIGN@"        ; "パラメーター せってい@"
 .ScriptDesign:        db "   SCRIPT DESIGN@"          ; "スクりプト せってい@"
--- a/data/unused/gen_1_trainer_names.asm
+++ b/data/unused/gen_1_trainer_names.asm
@@ -56,7 +56,7 @@
 .Pokemaniac:   db "マニア@"
 .SuperNerd:    db "りかけい@"
 .Burglar:      db "どろぼう@"
-.Engineer:     db "ォヤジ@"
+.Engineer:     db "オヤジ@"
 .Jack:         db "ジャック@"
 .Swimmer:      db "かいパン@"
 .Beauty:       db "おねえさん@"
@@ -63,7 +63,7 @@
 .Rocker:       db "グループ@"
 .Juggler:      db "ジャグラー@"
 .Blackbelt:    db "からて@"
-.ProfOak:      db "ォーキド@"
+.ProfOak:      db "オーキド@"
 .Chief:        db "チーフ@"
 .Scientist:    db "けんきゅういん@"
 .Rocket:       db "だんいん@"
--- a/engine/debug.asm
+++ b/engine/debug.asm
@@ -384,7 +384,7 @@
 	ret
 ; 81baf
 
-String_81baf: db "レアぅぅ@" ; rare (shiny)
+String_81baf: db "レア", DEBUGTEST_BLACK, DEBUGTEST_BLACK, "@" ; rare (shiny)
 String_81bb4: db "ノーマル@" ; normal
 String_81bb9: db DEBUGTEST_A, "きりかえ▶@" ; (A) switches
 ; 81bc0
--- a/engine/link_2.asm
+++ b/engine/link_2.asm
@@ -56,7 +56,7 @@
 
 .PlaceBorder: ; 4d37e
 	push hl
-	ld a, "ぁ" ; $76
+	ld a, $76
 	ld [hli], a
 	inc a
 	call .PlaceRow
--- a/engine/link_trade.asm
+++ b/engine/link_trade.asm
@@ -139,7 +139,7 @@
 
 LinkComms_LoadPleaseWaitTextboxBorderGFX: ; 16d69a
 	ld de, LinkCommsBorderGFX + $30 tiles
-	ld hl, vTiles2 tile "ぁ"
+	ld hl, vTiles2 tile $76
 	lb bc, BANK(LinkCommsBorderGFX), 8
 	call Get2bpp
 	ret
--- a/engine/load_font.asm
+++ b/engine/load_font.asm
@@ -56,7 +56,7 @@
 	ld hl, vTiles2 tile "☎" ; $62
 	lb bc, BANK(PokegearPhoneIconGFX), 1
 	call Get2bpp_2
-	ld de, FontExtra tile 3
+	ld de, FontExtra + 3 tiles ; "<BOLD_D>"
 	ld hl, vTiles2 tile "<BOLD_D>"
 	lb bc, BANK(FontExtra), 22 ; "<BOLD_D>" to "ぉ"
 	call Get2bpp_2
@@ -104,8 +104,8 @@
 	lb bc, BANK(FontBattleExtra), 12
 	call Get2bpp_2
 	ld hl, vTiles2 tile $70
-	ld de, FontBattleExtra tile 16
-	lb bc, BANK(FontBattleExtra), 3 ; "<ど>" to "『"
+	ld de, FontBattleExtra + 16 tiles ; "<DO>"
+	lb bc, BANK(FontBattleExtra), 3 ; "<DO>" to "『"
 	call Get2bpp_2
 	call LoadFrame
 
@@ -122,7 +122,7 @@
 	ld hl, vTiles2 tile $55
 	lb bc, BANK(ExpBarGFX), 9
 	call Get2bpp_2
-	ld de, MobilePhoneTilesGFX tile 7 ; mobile phone icon
+	ld de, MobilePhoneTilesGFX + 7 tiles ; mobile phone icon
 	ld hl, vTiles2 tile $5e
 	lb bc, BANK(MobilePhoneTilesGFX), 2
 	call Get2bpp_2
--- a/engine/routines/checknickerrors.asm
+++ b/engine/routines/checknickerrors.asm
@@ -64,11 +64,11 @@
 ; table defining which characters are actually text commands
 ; format:
 	;      ≥           <
-	db TX_START,   TX_BOX      + 1
-	db "<PLAY_G>", "<CTRL_18>" + 1
-	db "<NI>",     "<NO>"      + 1
-	db "<ROUTE>",  "<GREEN>"   + 1
-	db "<ENEMY>",  "<ENEMY>"   + 1
-	db "<MOM>",    "<TM>"      + 1
-	db "<ROCKET>", "┘"         + 1
+	db TX_START,   TX_BOX    + 1
+	db "<PLAY_G>", "<JP_18>" + 1
+	db "<NI>",     "<NO>"    + 1
+	db "<ROUTE>",  "<GREEN>" + 1
+	db "<ENEMY>",  "<ENEMY>" + 1
+	db "<MOM>",    "<TM>"    + 1
+	db "<ROCKET>", "┘"       + 1
 	db -1 ; end
binary files a/gfx/mobile/mobile_adapter.png b/gfx/mobile/mobile_adapter.png differ
--- a/mobile/fixed_words.asm
+++ b/mobile/fixed_words.asm
@@ -2054,13 +2054,13 @@
 
 String_11cdd9: ; 11cdd9
 ; Words will be displayed in alphabetical order
-	db   "ことば¯アイウエォ の"
+	db   "ことば¯アイウエオ の"
 	next "じゅんばんで ひょうじ します@"
 ; 11cdf5
 
 String_11cdf5: ; 11cdf5
 	db   "しゅるいべつ モード"  ; Category mode
-	next "アイウエォ  モード@" ; ABC mode
+	next "アイウエオ  モード@" ; ABC mode
 ; 11ce0b
 
 Function11ce0b: ; 11ce0b (47:4e0b)
@@ -3601,7 +3601,7 @@
 	db "ラララ@@", $98, $5, $0
 	db "わーい@@", $ac, $5, $0
 	db "わーん!!", $b0, $5, $0
-	db "ワォ@@@", $b2, $5, $0
+	db "ワオ@@@", $b2, $5, $0
 	db "わっ!!@", $ce, $5, $0
 	db "わははは!", $d0, $5, $0
 
@@ -3683,7 +3683,7 @@
 	db "エキサイト", $d8, $0, $0
 	db "えらい@@", $de, $0, $0
 	db "おかしい@", $ec, $0, $0
-	db "ォッケー@", $8, $1, $0
+	db "オッケー@", $8, $1, $0
 	db "かえりたい", $48, $1, $0
 	db "がっくし@", $5a, $1, $0
 	db "かなしい@", $6c, $1, $0
@@ -3850,7 +3850,7 @@
 	db "もようがえ", $3a, $5, $0
 	db "ゆめ@@@", $5a, $5, $0
 	db "ようちえん", $66, $5, $0
-	db "ラジォ@@", $92, $5, $0
+	db "ラジオ@@", $92, $5, $0
 	db "ワールド@", $ae, $5, $0
 
 .Hobbies: ; 11ea58
--- a/mobile/mobile_22.asm
+++ b/mobile/mobile_22.asm
@@ -2,8 +2,8 @@
 	db "-----@"
 
 String_8911c: ; 8911c
-	db   "でんわばんごうが ただしく"   ; Phone number is not
-	next "はいって いません!@"         ; entered correctly!
+	db   "でんわばんごうが ただしく" ; Phone number is not
+	next "はいって いません!@"   ; entered correctly!
 ; 89135
 
 String_89135: ; 89135
@@ -556,13 +556,13 @@
 
 Function8942b: ; 8942b (22:542b)
 	ld de, vTiles0 tile $02
-	ld hl, MobileAdapterGFX + $7d0
-	ld bc, $80
+	ld hl, MobileAdapterGFX + $7d tiles
+	ld bc, 8 tiles
 	ld a, BANK(MobileAdapterGFX)
 	call FarCopyBytes
 	ld de, vTiles0 tile $0a
-	ld hl, MobileAdapterGFX + $c60
-	ld bc, $40
+	ld hl, MobileAdapterGFX + $c6 tiles
+	ld bc, 4 tiles
 	ld a, BANK(MobileAdapterGFX)
 	call FarCopyBytes
 	ret
@@ -581,9 +581,9 @@
 	ret
 
 Function89455: ; 89455 (22:5455)
-	ld hl, MobileAdapterGFX + $7d0
+	ld hl, MobileAdapterGFX + $7d tiles
 	ld de, vTiles2 tile $0c
-	ld bc, $490
+	ld bc, $49 tiles
 	ld a, BANK(MobileAdapterGFX)
 	call FarCopyBytes
 	ret
@@ -591,12 +591,12 @@
 Function89464: ; 89464
 	ld hl, MobileAdapterGFX
 	ld de, vTiles2
-	ld bc, $200
+	ld bc, $20 tiles
 	ld a, BANK(MobileAdapterGFX)
 	call FarCopyBytes
-	ld hl, MobileAdapterGFX + $660
+	ld hl, MobileAdapterGFX + $66 tiles
 	ld de, vTiles2 tile $20
-	ld bc, $170
+	ld bc, $17 tiles
 	ld a, BANK(MobileAdapterGFX)
 	call FarCopyBytes
 	ret
@@ -1267,15 +1267,15 @@
 
 
 Function89807: ; 89807 (22:5807)
-	ld hl, MobileAdapterGFX + $200
+	ld hl, MobileAdapterGFX + $20 tiles
 	ld a, [wPlayerGender]
 	bit 0, a
 	jr z, .asm_89814
-	ld hl, MobileAdapterGFX + $200 + $230
+	ld hl, MobileAdapterGFX + $43 tiles
 .asm_89814
 	call DisableLCD
 	ld de, vTiles2 tile $37
-	ld bc, $230
+	ld bc, $23 tiles
 	ld a, BANK(MobileAdapterGFX)
 	call FarCopyBytes
 	call EnableLCD
--- a/mobile/mobile_46.asm
+++ b/mobile/mobile_46.asm
@@ -6003,7 +6003,7 @@
 
 String_11ae40: ; 11ae40
 	db   "どちらでも"
-	next "♂ォス"
+	next "♂オス"
 	next "♀メス"
 	db   "@"
 ; 11ae4e
@@ -6338,7 +6338,7 @@
 	ret
 ; 11b07a
 
-.MaleString: db "ォスの "
+.MaleString: db "オスの "
 .FemaleString: db "メスの "
 
 Function11b082: ; 11b082
--- a/mobile/mobile_5f.asm
+++ b/mobile/mobile_5f.asm
@@ -240,7 +240,7 @@
 	jr c, .end
 	cp "<PLAY_G>"
 	jr c, .next
-	cp "<CTRL_18>" + 1
+	cp "<JP_18>" + 1
 	jr c, .end
 	cp "<NI>"
 	jr c, .next