08/11/26 03:46:41
バイナリファイルからnull terminated stringを
読む方法はありますか?
OpenOffice.org 3.0/calc/OOo Basicです。
対象のファイルはバイナリファイル
(ゲーム提督の決断4のセーブデータ)であり
アドレス2192F(h)から
8b e3 98 5a 8e ae 8a cd 90 ed 00
と記録されています。(Shift-JISで「九六式艦戦」)
Dim Result as String
Get #1, Offset+1, Result
とすると「六式艦戦」から始まる長さ51807バイトの
文字列になってしまいます。
どうやら先頭2バイトを文字列長さと認識しており、
00を文字列終端と認識しません。
Input #1, Result
とすると「ﾋ￣ﾘZﾎ？ﾊ？ﾐ？」という長さ10バイトの
文字化けした文字列になってしまいます。
null terminated stringをOOo Basicのstringとして
読み込む方法を教えてください。