ref: 4a6d81aea2e9ff583336f11268981dd463d25734
parent: a2887bc963210a5253bf129a141caa16fcf7ff8a
author: Sawakita <sawakitanoodles@gmail.com>
date: Mon Dec 26 20:04:13 EST 2011
Fix (hopefully) unicode mis-behaviour. hg-commit-id: 78ad0d43eabc
--- a/constants.asm
+++ b/constants.asm
@@ -917,4 +917,3 @@
; status ailments (masks)
FRZ EQU %00100000
SLP EQU %00000111
-
--- a/pokered.asm
+++ b/pokered.asm
@@ -382,10 +382,10 @@
; index = Mew, bank 1
; index = Kabutops fossil, bank $B
; index < $1F, bank 9
-; $1F ¿ index < $4A, bank $A
-; $4A ¿ index < $74, bank $B
-; $74 ¿ index < $99, bank $C
-; $99 ¿ index, bank $D
+; $1F ≤ index < $4A, bank $A
+; $4A ≤ index < $74, bank $B
+; $74 ≤ index < $99, bank $C
+; $99 ≤ index, bank $D
ld a,[$CF91] ; XXX name for this ram location
ld b,a
cp $15
@@ -479,11 +479,11 @@
; first row
push hl
- ld a,"¿"
+ ld a,"┌"
ld [hli],a
- inc a ; horizontal border ¿
+ inc a ; horizontal border ─
call NPlaceChar
- inc a ; upper-right border ¿
+ inc a ; upper-right border ┐
ld [hl],a
; middle rows
@@ -493,11 +493,11 @@
.PlaceRow\@
push hl
- ld a,"¿"
+ ld a,"│"
ld [hli],a
ld a," "
call NPlaceChar
- ld [hl],"¿"
+ ld [hl],"│"
pop hl
ld de,20
@@ -506,11 +506,11 @@
jr nz,.PlaceRow\@
; bottom row
- ld a,"¿"
+ ld a,"└"
ld [hli],a
- ld a,"¿"
+ ld a,"─"
call NPlaceChar
- ld [hl],"¿"
+ ld [hl],"┘"
ret
;
NPlaceChar:
@@ -611,18 +611,18 @@
dec de
ret
-Char00Text: ; ¿%d ERROR.¿
+Char00Text: ; “%d ERROR.”
db $17
dw $6696
db $22
TX_NULL
-Char52: ; player¿s name
+Char52: ; player’s name
push de
ld de,$D158
jr FinishDTE
-Char53: ; rival¿s name
+Char53: ; rival’s name
push de
ld de,$D34A
jr FinishDTE
@@ -652,7 +652,7 @@
ld de,Char54Text
jr FinishDTE
-Char56: ; ¿¿
+Char56: ; ……
push de
ld de,Char56Text
jr FinishDTE
@@ -664,9 +664,9 @@
Char59:
; depending on whose turn it is, print
-; player active monster¿s name
+; player active monster’s name
; or
-; enemy active monster¿s name, prefixed with ¿Enemy ¿
+; enemy active monster’s name, prefixed with “Enemy ”
; (XXX what is the purpose of this vs. Char5A)
ld a,[$FFF3]
xor 1
@@ -674,9 +674,9 @@
Char5A:
; depending on whose turn it is, print
-; player active monster¿s name
+; player active monster’s name
; or
-; enemy active monster¿s name, prefixed with ¿Enemy ¿
+; enemy active monster’s name, prefixed with “Enemy ”
ld a,[$FFF3]
MonsterNameCharsCommon:
push de
@@ -686,7 +686,7 @@
jr FinishDTE
.Enemy\@ ; 1A40
- ; print ¿Enemy ¿
+ ; print “Enemy ”
ld de,Char5AText
call PlaceString
@@ -713,7 +713,7 @@
Char54Text:
db "POKé@"
Char56Text:
- db "¿¿@"
+ db "……@"
Char5AText:
db "Enemy @"
Char4AText:
@@ -2467,7 +2467,7 @@
;
; Program stops reading when either:
; a) Map_ID = $FF
-; b) Map_ID ¿ currentMapID
+; b) Map_ID ≠ currentMapID
;
; This Data is loaded into RAM at $D5CE-$D5F?.
@@ -4707,15 +4707,15 @@
db $0B ; border tile
db 3 ; warps
- db 5,5,0,$25 ; Red¿s house 1F
- db 5,$D,0,$27 ; Blue¿s house
- db $B,$C,1,$28 ; Oak¿s Lab
+ db 5,5,0,$25 ; Red’s house 1F
+ db 5,$D,0,$27 ; Blue’s house
+ db $B,$C,1,$28 ; Oak’s Lab
db 4 ; signs
db $D,$D,4 ; sign by lab
db 9,7,5 ; Pallet Town sign
- db 5,3,6 ; sign by Red¿s house
- db 5,$B,7 ; sign by Blue¿s house
+ db 5,3,6 ; sign by Red’s house
+ db 5,$B,7 ; sign by Blue’s house
db 3 ; people
db 3,5+4,8+4,$FF,$FF,1 ; Oak
@@ -4722,7 +4722,7 @@
db $D,8+4,3+4,$FE,0,2 ; girl
db $2F,$E+4,$B+4,$FE,0,3 ; fat man
- ; warp¿to
+ ; warp‐to
dw $C71B
db 5,5
@@ -4768,7 +4768,7 @@
call $23B1 ; stop music
ld a,2
ld c,a ; song bank
- ld a,$DB ; ¿oak appears¿ music
+ ld a,$DB ; “oak appears” music
call $23A1 ; plays music
ld a,$FC
ld [$CD6B],a
@@ -4817,7 +4817,7 @@
ld hl,$FF95
dec [hl]
ld a,$20
- call Predef ; load Oak¿s movement into $CC97
+ call Predef ; load Oak’s movement into $CC97
ld de,$CC97
ld a,1
ld [$FF8C],a
@@ -4947,11 +4947,11 @@
TX_FAR _PalletTownText5
db "@"
-PalletTownText6: ; sign by Red¿s house
+PalletTownText6: ; sign by Red’s house
TX_FAR _PalletTownText6
db "@"
-PalletTownText7: ; sign by Blue¿s house
+PalletTownText7: ; sign by Blue’s house
TX_FAR _PalletTownText7
db "@"
@@ -5078,7 +5078,7 @@
MonsterNames: ; 421E
db "RHYDON@@@@"
db "KANGASKHAN"
- db "NIDORAN¿@@"
+ db "NIDORAN♂@@"
db "CLEFAIRY@@"
db "SPEAROW@@@"
db "VOLTORB@@@"
@@ -5090,7 +5090,7 @@
db "EXEGGCUTE@"
db "GRIMER@@@@"
db "GENGAR@@@@"
- db "NIDORAN¿@@"
+ db "NIDORAN♀@@"
db "NIDOQUEEN@"
db "CUBONE@@@@"
db "RHYHORN@@@"
@@ -5530,9 +5530,9 @@
LassName:
db "LASS@"
JrTrainerMName:
- db "JR.TRAINER¿@"
+ db "JR.TRAINER♂@"
JrTrainerFName:
- db "JR.TRAINER¿@"
+ db "JR.TRAINER♀@"
PokemaniacName:
db "POKéMANIAC@"
SuperNerdName:
@@ -5562,9 +5562,9 @@
RocketName:
db "ROCKET@"
CooltrainerMName:
- db "COOLTRAINER¿@"
+ db "COOLTRAINER♂@"
CooltrainerFName:
- db "COOLTRAINER¿@"
+ db "COOLTRAINER♀@"
INCBIN "baserom.gbc",$27f86,$27fb8-$27f86
@@ -11162,7 +11162,7 @@
db "???@"
db 10 ; 1.0 m
db 100 ; 10.0 kg
- db 0,"¿?¿?¿?¿? ¿?¿?¿?¿?¿?¿?¿?@" ; ¿?¿?¿?¿?¿?¿?¿? (Comment to be written)
+ db 0,"コメント さくせいちゅう@" ; コメント作成中 (Comment to be written)
PokedexToIndex:
; converts the Pokédex number at $D11E to an index
@@ -11447,10 +11447,10 @@
jp $3C5F
OTString67E5: ; 67E5
- db "¿¿",$74,$F2,$4E
+ db "──",$74,$F2,$4E
db $4E
db "OT/",$4E
- db $73,"¿",$F2,"@"
+ db $73,"№",$F2,"@"
SECTION "bank11",DATA,BANK[$11]
INCBIN "baserom.gbc",$44000,$4000
@@ -12975,7 +12975,7 @@
INCBIN "baserom.gbc",$78DDB,$78E53-$78DDB
RealPlayAnimation: ; 4E53
- ld a,[$CF07] ; get animation # ¿ 1
+ ld a,[$CF07] ; get animation # − 1
cp a,$FF
jr z,.Next4E60
call $586F
@@ -13833,4 +13833,3 @@
db "SLASH@"
db "SUBSTITUTE@"
db "STRUGGLE@"
-