すいませんわかりました。 こんな感じでスロット1に出力できますがいかがでしょうか。 (動作確認していません。) PRGEDIT 1 A$="DATA " FOR I=0 TO LEN(配列)-1 A$=A$+STR$(配列[I]) IF (I+1) MOD 16==15 THEN 　　A$=A$+CHR$(10)+"DATA " 　ELSE 　　A$=A$+"," 　ENDIF NEXT PRGSET A$