RosettaCodeData/Task/Get-system-command-output/IS-BASIC/get-system-command-output.b...

6 lines
119 B
Plaintext

100 OPEN #1:"dirinfo.txt" ACCESS OUTPUT
110 SET DEFAULT CHANNEL 1
120 EXT "dir"
130 CLOSE #1
140 SET DEFAULT CHANNEL 0