File: ko_KP.sor

__numbertext__
^0 령
1 일
2 이 
3 삼
4 사
5 오
6 륙
7 칠
8 팔
9 구
1(\d) 십$1
(\d)(\d) $1십$2
1(\d\d) 백$1
(\d)(\d\d) $1백$2
1(\d\d\d) 천$1
(\d)(\d\d\d) $1천$2
(\d{1,4})(\d{4}) $1만$2
(\d{1,4})(\d{8}) $1억$2
(\d{1,4})(\d{12}) $1조$2
(\d{1,4})(\d{16}) $1경$2
(\d{1,4})(\d{20}) $1해$2
(\d{1,4})(\d{24}) $1자$2
(\d{1,4})(\d{28}) $1양$2
(\d{1,4})(\d{32}) $1구$2
(\d{1,4})(\d{36}) $1간$2
(\d{1,4})(\d{40}) $1정$2
(\d{1,4})(\d{44}) $1재$2
(\d{1,4})(\d{52}) $1극$2

# negative numbers?

#[-−](\d+) 负|$1

# decimals?

#"([-−]?\d+)[.,]" "$1|点"
#"([-−]?\d+[.,]\d*)(\d)" $1||$2

# currency

# unit/subunit

u:([^,]*),([^,]*) \1
s:([^,]*),([^,]*) \2

CNY:(.) $(\1:런민비
JPY:(.) $(\1:엔,센)
KPW:(.) $(\1:조선민주주의인민공화국 원,전)
KRW:(.) $(\1:대한민국 원,전)
USD:(.) $(\1:미국 달러,센트)

"([A-Z]{3}) ([-−]?\d+([.,]0+)?)" $2$(\1:u)
"(([A-Z]{3}) [-−]?\d+)[.,](\d+)" $1$3$(\2:s)