DIM EN_NAME$[0],EN_HP[0]
WHILE 1
READ T$,T
IF !T THEN BREAK
PUSH EN_NAME$,T$
PUSH EN_HP,T
WEND
読み込んで配列変数にしまってくれます
ここで出したPUSHを使う読み込みプログラムは「データの数が分からない、これからどんどん増やしたい」時に向いています。
データの最後は「もうデータがないよ」の印です
場合によっては、READのかわりにCOPYも使えます。
DIM N$[5]
COPY N$,@NDATA
@NDATA
DATA "A","B","C","D","E"
ゲームのタイトルは、インパクトがある上に親しみも感じられ、もちろん内容に沿っている、なるべくコンパクトな名前…を理想にしてネーミングしてます。