CLS PGMPLAY 41 @LOOP LOCATE GOTO@LOOP で良いかと。