Reset
Closes all open files, or resets standard I/O handles.
Syntax
`
Declare Sub Reset ( )
Declare Sub Reset ( ByVal streamno As Integer )
`
Usage
`
Reset
or
Reset( streamno )
`
Parameters
`streamno`
The stream number, 0 for stdin or 1 for stdout to reset.
Description
`Reset`, when called with no arguments, closes all disk files.
`Reset`, when called with the `streamno` argument, will reset the redirected or piped streams associated with stdin (0), or stdout (1). Passing any value for `streamno` other than 0 or 1 has no effect.
Example
`
Open "test.txt" For Output As #1
Print #1, "testing 123"
Reset
`
`
Dim x As String
'' Read from STDIN from piped input
Open Cons For Input As #1
While EOF(1) = 0
Input #1, x
Print """"; x; """"
Wend
Close #1
'' Reset to read from the keyboard
Reset(0)
Print "Enter some text:"
Input x
'' Read from STDIN (now from keyboard)
Open Cons For Input As #1
While EOF(1) = 0
Input #1, x
Print """"; x; """"
Wend
Close #1
`
Differences from QB

- None for `Reset()`.
- The `Reset(streamno)` usage is new to FreeBASIC.

See also

- `Close`
- `Open`
- `Open Cons`