Truncate a file: Difference between revisions

Content added Content deleted
(→‎{{header|C}}: POSIX truncate)
m ({{header|ZX Spectrum Basic}})
Line 181: Line 181:


<lang zxbasic>10 CLEAR 29999
<lang zxbasic>10 CLEAR 29999
20 PRINT "Start tape to load file to truncate."
20 INPUT "Which file do you want to truncate?";f$
30 INPUT "Which file do you want to truncate?";f$
30 PRINT "Start tape to load file to truncate."
40 LOAD f$ CODE 30000
40 LOAD f$ CODE 30000
50 "Input how many bytes do you want to keep?";n
50 "Input how many bytes do you want to keep?";n