1つのDATAで定義できるデータの個数には限界があるようで、その最大個数は4096のようです。
検証PRG例
- ACLS
- PRGEDIT 1,1:PRGSET ”@TEST”
- FOR I=0 TO 10000
- I$=”DATA ”+”1,”*I+”-1”
- PRGEDIT 1,2:PRGSET I$
- LOCATE 0,0:PRINT I
- USE 1:RESTORE ”1:@TEST”
- REPEAT
- READ A
- UNTIL A==-1
- NEXT
実行すると、4096(-1を含めて4097個のとき)にSyntax errorで止まります。
なお、DATAをこれ以内に納めるのであれば、一行にマルチステートメントでDATAを並べることは出来ました。