Use the dakuten characters.

home/text.asm

@@ -226,23 +226,10 @@ endc
 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
@@ -281,8 +268,11 @@ endm
 	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
@@ -290,22 +280,21 @@ endm
 	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 @@ endm
 .han1
 	add "は" - "ぱ"
 .han2
-	ld b, $e4 ; handakuten
+	ld b, "ﾟ" ; handakuten
 	call Diacritic
 
 .place

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