実は、ファイル実行マネージャーというプログムを作ってる途中なんですが、画像の通りファイルを実行できるようにしたいです。

それは、全部作ってくれということなのだろうか。 まあいいや、まずは DIM 文字列配列$[0] FILES "TXT:", 文字列配列$ でテキストファイル一覧を取得できるから、 それで選んだファイルを EXEC "ファイル名" するだけ。でも、文字列配列を使うことを考えるとちょっと書き換えて、 EXEC 文字列配列$[選択した番号] の方が楽。

自作ランチャーの簡略版 DIM FLIST$[0] FILES "TXT:",FLIST$ FOR I=0 TO LEN(FLIST$)-1 FLIST$[I]=MID$(FLIST$[I],1,LEN(FLIST$[I])-1 NEXT WHILE 1 FOR I=0 TO LEN(FLIST$)-1 IF SEL==I THEN COLOR 3 ELSE COLOR 15 PRINT FLIST$[I] NEXT COLOR 15 IF BUTTON(1)==1 && SEL!=0 THEN DEC SEL IF BUTTON(1)==2 && SEL!=LEN(FLIST$)-1 THEN INC SEL IF BUTTON(2)==16 THEN EXEC "PRG1:"+FLIST$[I] WEND

↑コードは、 ①ファイル取得して余計なの取る ②表示する(選択中のやつは赤くなる ③ボタン操作 ちなみにEXECは、別のスロットに読み込んだものを実行すると、エラー以外で終わったときに戻ってきてくれるんだよ。派遣会社みたいだね あ、WENDの前にCLS:WAIT入れてねぇ((