80 IF INT(PEEK(28757)/2)= PEEK(28757)/2 THEN PRINT "Error de disco ";
    PEEK(28758): STOP
  90 IF x=1 THEN PRINT "No hay ficheros": STOP
100 FOR i=0 TO x-2
110 FOR j=0 TO 10 IVÁN RICO REYERO
120 PRINT CHR$(PEEK(32781+i*13+j));
130 NEXT INVESTIGACIÓN
140 PRINT DISEÑO
150 NEXT ARTE
160 DATA 243,237,115,0,144,1,253,127,58,92,91,203,
    167,246,7,50,92,91,237,121,49,255,159,251
170 DATA 33,0,128,17,1,128,1,0,4,54,0,237,176,6,
    64,14,1,17,0,128,33,81,112,205,30,1,245,225,
    34,85,112,72,6,0
180 DATA 243,197,1,253,127,58,92,91,203,231,230,
    248,50,92,91,237,121,193,237,123,0,144,201
190 DATA 42,46,42,255,0,0