thorn/kep-hack
1
0
Fork 0
mirror of https://github.com/thornAvery/kep-hack.git synced 2025-09-16 18:30:50 +12:00
Code Issues Actions Packages Projects Releases Wiki Activity

Add support for Unicode, and use it to put in ♀ and ♂.

Browse source 
hg-commit-id: a482b0ef7a01
This commit is contained in:
IIMarckus 2011-12-21 00:12:36 -07:00
parent 35a33bf3d7
commit 63b7b8e783
2 changed files with 18 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
pokered.asm
View file

@ -4352,7 +4352,7 @@ INCBIN "baserom.gbc",$1C000,$21E
MonsterNames: ; 421E
db "RHYDON@@@@"
db "KANGASKHAN"
db "NIDORAN",$EF,"@@"
db "NIDORAN♂@@"
db "CLEFAIRY@@"
db "SPEAROW@@@"
db "VOLTORB@@@"
@ -4364,7 +4364,7 @@ MonsterNames: ; 421E
db "EXEGGCUTE@"
db "GRIMER@@@@"
db "GENGAR@@@@"
db "NIDORAN",$F5,"@@"
db "NIDORAN♀@@"
db "NIDOQUEEN@"
db "CUBONE@@@@"
db "RHYHORN@@@"
@ -4804,9 +4804,9 @@ BugCatcherName:
LassName:
db "LASS@"
JrTrainerMName:
db "JR.TRAINER",$EF,$50
db "JR.TRAINER♂@"
JrTrainerFName:
db "JR.TRAINER",$F5,$50
db "JR.TRAINER♀@"
PokemaniacName:
db "POK",$BA,"MANIAC@"
SuperNerdName:
@ -4836,9 +4836,9 @@ ScientistName:
RocketName:
db "ROCKET@"
CooltrainerMName:
db "COOLTRAINER",$EF,$50
db "COOLTRAINER♂@"
CooltrainerFName:
db "COOLTRAINER",$F5,$50
db "COOLTRAINER♀@"
INCBIN "baserom.gbc",$27f86,$27fb8-$27f86

12
textpre.awk
View file

@ -67,8 +67,10 @@ char["-"] = "$E3"
char["?"] = "$E6"
char["!"] = "$E7"
char["."] = "$E8"
char["♂"] = "$EF"
char["/"] = "$F3"
char[","] = "$F4"
char["♀"] = "$F5"
char["0"] = "$F6"
char["1"] = "$F7"
char["2"] = "$F8"
@ -98,6 +100,16 @@ else {
while (f != "") {
c = substr(f,1,1)
f = substr(f,2,length(f) - 1)
if (c > "𐀀") { # U+10000
c = c substr(f,1,3)
f = substr(f,4,length(f) - 3)
} else if (c > "ࠀ") { # U+0800
c = c substr(f,1,2)
f = substr(f,3,length(f) - 2)
} else if (c > "€") { # U+0080
c = c sustr(f,1,1)
f = substr(f,2,length(f) - 1)
}
print char[c]
if (length(f))
print ","