rename Example10 CLEAR SCREEN
20 PRINT "Creating file"
30 SAVE "file.XXX"
40 CAT "*.XXX";NAMES
50 WAIT 2
60 PRINT "Now, I will rename it to"
70 RENAME "file.XXX" TO "file.ZZZ"
80 CAT "*.ZZZ";NAMES
90 WAIT 2
100 PURGE "file.ZZZ"
110 PRINT "File purged."
120 END
|