>>らいちさん それだと1回余計にDATA文がREADされます FOR NO=0 TO 敵の種類の数 - 1 // … -1 を追加 READ MOBNAME[NO],MOBHP[NO] NEXT