出来たとのことなのでもう不必要だと思いますが、他の方の誤解が無いように書いておきますと、3つ前の返信で書かれているソースだとプログラム自体のファイルの存在を見に行ってしまっています。 プログラムファイルとセーブファイルは別です。同名でセーブすると、このプログラムをSLOT1などで実行していた場合、PRG0の内容で上書きされ、プログラムが消えます! また、Aは「ファイルの存在フラグ」なのか「セーブしたい内容」なのか、ごっちゃになっています。やるなら、DIM B[1]を最初に書いた上で、 CF=CHKFILE("DAT:○○○") IF CF==0 THEN @E ELSE @D @E (ゲームの説明) @D (ゲーム本体) ~~~ @SAVE ’ゲーム本体から、セーブしたい時にGOSUBする B[0]=A SAVE "DAT:○○○",B RETURN