INICIO:
CLS
INPUT "LA PANTALLA SE BORRA CON ", CLSE$
IF CLSE$ = "CLS" THEN C = C + 1
IF CLSE$ = "CLS" THEN
PRINT
PRINT "­ MUY BIEN !"
ELSE PRINT "­ MUY MAL !"
END IF
INPUT "LOS ARCHIVOS SE BORRAN CON ", BORR$
IF BORR$ = "DEL" THEN : C = C + 1
IF BORR$ = "ERASE" THEN : C = C + 1
IF BORR$ = "DEL" THEN
GOTO MAS2
IF BORR$ = "ERASE" THEN
MAS2:
PRINT
PRINT "­ MUY BIEN !"
ELSE PRINT "­ MUY MAL !"
END IF
INPUT "LOS ARCHIVOS O DIRECTORIOS SE COPIAN CON ", COP$
IF COP$ = "COPY" THEN : C = C + 1
PRINT
PRINT "­ MUY BIEN !"
ELSE PRINT "­ MUY MAL !"
END IF
INPUT "LOS ARCHIVOS SE RENOMBRAN CON ", REN$
IF REN$ = "REN" THEN : C = C + 1
IF REN$ = "RENAME" THEN : C = C + 1
IF REN$ = "REN" THEN PRINT "­ MUY BIEN !" ELSE PRINT "­ MUY MAL !"
GOTO FIN


IF REN$ = "RENAME" THEN PRINT "­ MUY BIEN !" ELSE PRINT "­ MUY MAL !"

FIN:
PRINT
PRINT "TU PUANTUACION ES "; C; " SOBRE 4"

