RESTORE @DIALOG FOR I = 0 TO 3 READ A$:B$=B$+A$ NEXT @DIALOG DATA"aaa" DATA"bbb" DATA"ccc"