【FM/S1】F-BASICとS1BASIC機械語ファイル形式は同じでした

FM-7でF-BASICの機械語ファイルのロードアドレスを調べる必要があった為、
ちと調べていたところていたところ、S1BASICと全く同じ感じでした。
(もしかするとFMユーザやS1ユーザにとっては、何を今更・・・的な話題かもしれませんが
調べている方には多少は有益だと思われるので記事で残しておきます^^;;)

試しにS1BASICで$1000番地から16バイト分を保存し、エントリ番地を$1007にして保存するとこんな感じです

1～2バイト目にデータ長さ。
3～4バイト目にロード開始番地。
データが続き、最後に5バイトのフッタがあり、最後の2バイトがエントリ番地。
と、FM系の解説書で読んだ物と同じ結果になりました。
同じことをFMでやってみたところ、やはり同じ結果でした。

そうなると話は早く、S1で作っていた番地抽出プログラムをFM-7で実行させれば目的達成ということで、実行してみると。

正常に番地情報が表示されました^^

F-BASICとS1BASICでは#0のシステムランダムバッファを使ったプログラムは互換性が無いようですが、普通に入出力モードでオープンした場合、1文字の変更も無くS1用に作ったプログラムがFM-7で動作しました。

S1用に昔作ったプログラムで、FMのロード開始番地、終了番地、エントリ番地が抽出できました。

100 '+*** ﾏｼﾝ ｺﾞ ﾌｧｲﾙ ﾉ ﾊﾞﾝﾁ ﾋｮｳｼﾞ for ﾋﾀﾁ MB-S1 V.1 / MFADR.BAS
110 CLEAR5000: DR$="0:"
120 DEF FNH$(X,F)=RIGHT$("00000"+HEX$(X),F) 'FormatFloat
130 INPUT"FileName>";FL$
140 OPEN"I",#1,DR$+FL$
150 D$=INPUT$(5,#1)
160 LN=CVI(MID$(D$,2,2)): ST=CVI(MID$(D$,4,2)): ED=LN+ST-1: LN1=LN
170 IF LN>254 THEN D$=INPUT$(255,#1): LN=LN-255: GOTO170
180 D$=INPUT$(LN,#1) :D$=INPUT$(5,#1)
190 ET=CVI(MID$(D$,4,2))
200 PRINT "Start=$";FNH$(ST,4);" Entry=$";FNH$(ET,4);" Last=$";FNH$(ED,4); " (";LN1"Byte )"
210 CLOSE#1
220 END

という訳で、F-BASICでもS1BASICでも機械語ファイルの番地情報は同じように抽出できるということのようです。

普通のF-BASIC環境ではこのプログラムで機械語の番地情報が表示できるのですが、今回の目的だったFAMOS77&EXURAMによる裏RAMディスクを使うと上手く表示できません・・・

何か方法はあると思うので、調査を続けます^^;;;;