これは濁点を分けるプログラムだけど、FOR-NEXTとASC()CHR$()、それと96の足し引きでひらがなカタカナ変換ができる。