var %i = 1
  var %fail = 0
  var %inc = 0
  var %jpname

  while (%i <= $len($2)) {
    if ($readini(hiragana.ini,HIRAGANA,$mid($2,%i,1)) == $null) {
      if ($readini(hiragana.ini,HIRAGANA,$mid($2,%i,2)) == $null) {
        if ($readini(hiragana.ini,HIRAGANA,$mid($2,%i,3)) == $null) {
          %fail = 1
          break
        }
        else {
          %jpname = %jpname $+ $readini(hiragana.ini,HIRAGANA,$mid($2,%i,3))
          %inc = 3
        }
      }
      else {
        %jpname = %jpname $+ $readini(hiragana.ini,HIRAGANA,$mid($2,%i,2))
        %inc = 2
      }
    }
    else {
      %jpname = %jpname $+ $readini(hiragana.ini,HIRAGANA,$mid($2,%i,3))
      %inc = 1
    }

    %i = %i + %inc
  }

  if (%fail == 1) {
    echo -a Failed ( $+ %jpname $+ )
  }
  else {
    echo -a %jpname
  }