大きな文字列の配列を作って、 DIC$[ASC("ご")]="た" DIC$[ASC("め")]="す" … という代入文をたくさん並べて変換テーブルを作る。 代入文たくさんはしんどいのでDATA文にするといいと思います。 そして入力された文字列を一つずつ、ASCかけてDIC$に食わすと変換できます。結果が空文字列の場合は元の文字をそのまま出せばOKです。