LOADの場合はLOAD "TXT:ファイル名",文字列変数
で文字列変数1個に結合した文字列が読み込まれますんで
これを文字列配列変数に展開する必要があります。
LOAD "TXT:ファイル名",BUF$
P=0:N=0
REPEAT
P1=INSTR(P,BUF$,",")
IF P1==-1 THEN BREAK
P2=INSTR(P1+1,BUF$,",")
Q$[N]=MID$(BUF$,P,P1-P)
A$[N]=MID$(BUF$,P1+1,P2-P1-1)
P=P2+1:N=N+1
UNTIL P>LEN(BUF$)
0そうだね プレイ済み