RosettaCodeData/Task/Rename-a-file/Applesoft-BASIC/rename-a-file-3.basic
2023-07-01 13:44:08 -04:00

5 lines
208 B
Text

10 PRINT CHR$ (4)"RENAME INPUT.TXT,OUTPUT.TXT"
20 PRINT CHR$ (4)"RENAME DOCS,MYDOCS"
30 PRINT CHR$ (4)"PREFIX /"
40 PRINT CHR$ (4)"RENAME INPUT.TXT,OUTPUT.TXT"
50 PRINT CHR$ (4)"RENAME DOCS,MYDOCS"