$KCODE='e'
require 'nkf'
#これはEUCベースの表

CHAR_TBL_AD = 
[ 
# 〇付き数字
    ["\xa1", '１'],
    ["\xa2", '２'],
    ["\xa3", '３'],
    ["\xa4", '４'],
    ["\xa5", '５'],
    ["\xa6", '６'],
    ["\xa7", '７'],
    ["\xa8", '８'],
    ["\xa9", '９'],
    ["\xaa", '10'],
    ["\xab", '11'],
    ["\xac", '12'],
    ["\xad", '13'],
    ["\xae", '14'],
    ["\xaf", '15'],
    ["\xb0", '16'],
    ["\xb1", '17'],
    ["\xb2", '18'],
    ["\xb3", '19'],
    ["\xb4", '20'],
# ローマ数字
    ["\xb5", 'I'],
    ["\xb6", 'II'],
    ["\xb7", 'III'],
    ["\xb8", 'IV'],
    ["\xb9", 'V'],
    ["\xba", 'VI'],
    ["\xbb", 'VII'],
    ["\xbc", 'VIII'],
    ["\xbd", 'IX'],
    ["\xbe", 'X'],
# 単位    
    ["\xc0", 'ﾐﾘ'],
    ["\xc1", 'ｷﾛ'],
    ["\xc2", 'ｾﾝﾁ'],
    ["\xc3", 'ﾒ-ﾄﾙ'],
    ["\xc4", 'ｸﾞﾗﾑ'],
    ["\xc5", 'ﾄﾝ'],
    ["\xc6", 'ｱ-ﾙ'],
    ["\xc7", 'ﾍｸﾀ-ﾙ'],
    ["\xc8", 'ﾘｯﾄﾙ'],
    ["\xc9", 'ﾜｯﾄ'],
    ["\xca", 'ｶﾛﾘ-'],
    ["\xcb", 'ﾄﾞﾙ'],
    ["\xcc", 'ｾﾝﾄ'],
    ["\xcd", 'ﾊﾟ-ｾﾝﾄ'],
    ["\xce", 'ﾐﾘﾒ-ﾄﾙ'],
    ["\xcf", 'ﾍﾟ-ｼﾞ'],
# 単位
    ["\xd0", 'mm'],
    ["\xd1", 'cm'],
    ["\xd2", 'km'],
    ["\xd3", 'mg'],
    ["\xd4", 'kg'],
    ["\xd5", 'cc'],
    ["\xd6", 'm^2'],
    
    ["\xdf", '平成'],
# その他
    ["\xe0", '``'],
    ["\xe1", ',,'],
    ["\xe2", 'No'],
    ["\xe3", 'KK'],
    ["\xe4", 'Tel'],
    ["\xe5", '上'],
    ["\xe6", '中'],
    ["\xe7", '下'],
    ["\xe8", '左'],
    ["\xe9", '右'],
    ["\xea", '(株)'],
    ["\xeb", '(有)'],
    ["\xec", '(代)'],
    ["\xed", '明治'],
    ["\xee", '大正'],
    ["\xef", '昭和'],
    ["\xf0", '≒'],
    ["\xf1", '≡'],
    ["\xf2", '∫'],
    ["\xf3", '§'], #ト音記号.. 
    ["\xf4", 'Σ'],
    ["\xf5", '√'],
    ["\xf6", '⊥'],
    ["\xf7", '∠'],
    ["\xf8", '└'],
    ["\xf9", '△'],
    ["\xfa", '∵'],
    ["\xfb", '∩'],
    ["\xfc", '∪'],
  ]

# こういうのも表示できてない
CHAR_TBL_AC = [
["\xa3",'・'], #実際は半角中点?
]

CHAR_TBL_FC = [
["\xa3",'  '], #??
]

def replace_char(text)
# とりあえず富豪的に
#  CHAR_TBL.each do |a, b|
  CHAR_TBL_AD.each do |a, b|
    text.gsub!(/#{"\xad"+a}/, b)
  end

  CHAR_TBL_AC.each do |a, b|
    text.gsub!(/#{"\xac"+a}/, b)
  end

  CHAR_TBL_FC.each do |a, b|
    text.gsub!(/#{"\xfc"+a}/, b)
  end
  return text
end



while line = gets
#  replace_char(NKF::nkf('-ex',line).chop!)
  print replace_char(NKF::nkf('-ex',line).chop)
  print "\n"
end