Petitverse

文字コードの数値配列にしてからDAT形式でセーブするのが簡単かな。
例：
DIM D%[0]
T$=LOAD("TXT:TEST.TXT",0)
WHILE LEN(T$) PUSH D%,ASC(SHIFT(T$)) WEND
SAVE"DAT:TEST.DAT",D%

文字列に戻す時は
DIM R%[0]
LOAD"DAT:TEST.DAT",R%,0
S$=""
WHILE LEN(R%) INC S$,CHR$(SHIFT(R%)) WEND

PUSH,SHIFTを使わない書き方の例も挙げておきます(こっちの方が素直かな^^;)
T$=LOAD("TXT:TEST.TXT",0)
L=LEN(T$)
DIM D%[L]
I=0:WHILE I<L D%[I]=ASC(T$[I]):I=I+1 WEND
SAVE"DAT:TEST.DAT",D%

思った話していいでしょうか。
実はですね、"Petitmodem"というものを使って、データーファイル(TXTをDAT変換)をパソコンに送ったんですけど、地味にinteger型(4byte)でして、文字コード1つ分で、short型(漢字を含めると、2byteになる？)っぽかったので、地味にもったいないことをしていることに気が付きました。

「自分で組む場合」の解説が入ったようなので、ライブラリという手段も書いておきます（という名の宣伝を兼ねていますが）

http://wiki.hosiken.jp/petc3gou/?Toukou%2FAWK-9%20LIBRARY
AWK-9U_LIB.PRGを同じプロジェクトにコピーして
プログラムの中で
EXEC "PRG3:​A​WK-9U​_L​I​B​.P​RG"
と書いていただきますと
AWK9_PUSHとAWK9_SHIFT$()という命令が使えるようになります。

容量が少なくなる特徴がありますが、パソコンでは扱えないのが欠点でしょうか。

サンプル
配列の1要素に2文字詰め込みます。