RosettaCodeData/Task/Rename-a-file/BASIC/rename-a-file-4.basic

6 lines
208 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
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"