10 PRINT "TAPE 1"
  20 PRINT "GO TO TAPE 2"
  30 CHAIN "REDOO"
 140 PRI"DATA";I;\INPUT A
 150 PRINT #,A
 160 NEXT I
 170 END