Write entire file: Difference between revisions
Applesoft BASIC
m (→{{header|Phix}}: added \n note) |
(Applesoft BASIC) |
||
Line 182:
=={{header|BASIC}}==
==={{header|Applesoft BASIC}}===
<lang gwbasic> 10 D$ = CHR$ (4)
20 F$ = "OUTPUT.TXT"
30 PRINT D$"OPEN"F$
40 PRINT D$"CLOSE"F$
50 PRINT D$"DELETE"F$
60 PRINT D$"OPEN"F$
70 PRINT D$"WRITE"F$
80 PRINT "THIS STRING IS TO BE WRITTEN TO THE FILE"
90 PRINT D$"CLOSE"F$</lang>
==={{header|BASIC256}}===
<lang freebasic>f = freefile
|