分かったかも。 そのDEFの中の最初のDEFの前に　@LABEL　を入れて。そして FOR I=0 TO 4 の前には RESTORE @LABEL とやってみて。DEFの中からDEF外のREAD確かできたと思う。それで別のDATAをREADしてるんだと思う。間違ってたらすみません。