shithub: pokecrystal

Download patch

ref: 016c2baae2a84b9119274e5e4a4443c406793a5d
parent: 3810cefaa24d6805d6ddfb7f7e3f905e4e6be626
author: yenatch <[email protected]>
date: Wed Mar 2 19:07:17 EST 2016

Use the dakuten characters.

--- a/home/text.asm
+++ b/home/text.asm
@@ -226,25 +226,12 @@
 endm
 
 dict2: macro
-if \1 == 0
-	and a
-else
 	cp \1
-endc
-	jr nz, \@
+	jr nz, ._\@
 	ld a, \2
-\@:
+._\@:
 endm
 
-dict3: macro
-if \1 == 0
-	and a
-else
-	cp \1
-endc
-	jr z, \2
-endm
-
 	dict "<DAY>", Char15
 	dict "<LINE>", LineChar
 	dict "<NEXT>", NextLineChar
@@ -281,9 +268,12 @@
 	dict "<USER>", PlaceMoveUsersName
 	dict "<ENEMY>", PlaceEnemysName
 	dict "<PLAY_G>", PlaceGenderedPlayerName
-	dict3 $e4, .place
-	dict3 $e5, .place
 
+	cp "゚"
+	jr z, .place
+	cp "゙"
+	jr z, .place
+
 	jr .nope
 	ld b, a
 	call Diacritic
@@ -290,22 +280,21 @@
 	jp NextChar
 .nope
 
-	cp $60
+	cp $60 ; Regular characters
 	jr nc, .place
 
-	cp $40
+	cp "パ"
 	jr nc, .handakuten
 
 .dakuten
-
 	cp $20
 	jr nc, .daku1
-	add $80
+	add "カ" - "ガ"
 	jr .daku2
 .daku1
-	add $90
+	add "か" - "が"
 .daku2
-	ld b, $e5 ; dakuten
+	ld b, "゙" ; dakuten
 	call Diacritic
 	jr .place
 
@@ -317,7 +306,7 @@
 .han1
 	add "は" - "ぱ"
 .han2
-	ld b, $e4 ; handakuten
+	ld b, "゚" ; handakuten
 	call Diacritic
 
 .place
@@ -347,18 +336,18 @@
 PrintRedsName:   print_name RedsName   ; 119b
 PrintGreensName: print_name GreensName ; 11a2
 
-TrainerChar: print_name TrainerCharText ; 11a9
-TMChar: print_name TMCharText ; 11b0
-PCChar: print_name PCCharText ; 11b7
-RocketChar: print_name RocketCharText ; 11be
-PlacePOKe: print_name PlacePOKeText ; 11c5
-PlaceKougeki: print_name KougekiText ; 11cc
-SixDotsChar: print_name SixDotsCharText ; 11d3
-PlacePKMN: print_name PlacePKMNText ; 11da
-PlacePOKE: print_name PlacePOKEText ; 11e1
-Char35: print_name Char35Text ; 11e8
-Char36: print_name Char36Text ; 11ef
-Char37: print_name Char37Text ; 11f6
+TrainerChar:  print_name TrainerCharText ; 11a9
+TMChar:       print_name TMCharText      ; 11b0
+PCChar:       print_name PCCharText      ; 11b7
+RocketChar:   print_name RocketCharText  ; 11be
+PlacePOKe:    print_name PlacePOKeText   ; 11c5
+PlaceKougeki: print_name KougekiText     ; 11cc
+SixDotsChar:  print_name SixDotsCharText ; 11d3
+PlacePKMN:    print_name PlacePKMNText   ; 11da
+PlacePOKE:    print_name PlacePOKEText   ; 11e1
+Char35:       print_name Char35Text      ; 11e8
+Char36:       print_name Char36Text      ; 11ef
+Char37:       print_name Char37Text      ; 11f6
 
 
 PlaceMoveTargetsName:: ; 11fd
--- a/macros/charmap.asm
+++ b/macros/charmap.asm
@@ -191,6 +191,7 @@
 	charmap "ビ", $1a
 	charmap "ブ", $1b
 	charmap "ボ", $1c
+;	charmap "ベ", $1d
 
 	charmap "が", $26
 	charmap "ぎ", $27
@@ -273,11 +274,13 @@
 	charmap "ュ", $ae
 	charmap "ョ", $af
 	charmap "ィ", $b0
+
 	charmap "あ", $b1
 	charmap "い", $b2
 	charmap "う", $b3
 	charmap "え", $b4
 	charmap "お", $b5
+
 	charmap "か", $b6
 	charmap "き", $b7
 	charmap "く", $b8
@@ -303,6 +306,7 @@
 	charmap "ふ", $cc
 	charmap "へ", $cd
 	charmap "ほ", $ce
+
 	charmap "ま", $cf
 	charmap "み", $d0
 	charmap "む", $d1
@@ -323,6 +327,10 @@
 	charmap "ゃ", $e0
 	charmap "ゅ", $e1
 	charmap "ょ", $e2
+
 	charmap "ー", $e3
+
+	charmap "゚", $e4
+	charmap "゙", $e5
 
 	charmap "ァ", $e9