Un petit utilitaire pour restaurer vos fichiers effacés par inattention…

 

 

10 ‘ CPC RESTORE
30 MODE 2:INK 0,1:BORDER 1:PAPER 0:INK 1,26:PEN 1
40 PRINT »Récupérateur de fichiers effaces… »: PRINT:PRINT
50 POKE &A701,&E5:CAT
60 INPUT « Nom.ext: »;a$:b$= »0: » a$
70 |REN,@b$,@a$
80 GOTO 10