echo.nv
· 296 B · Text
Originalformat
Playground
|:: read a line? :@stdio: (10 $x)|
:@stdio: 10
:buffer: $x
|:: read a line :@stdio: 10|
|:: read a line?|
:@stdio: read
|:: print the buffer? :buffer: $x|
:@stdio: write $x
|:: print the buffer|
:@stdio: write 10
|:: echo|
:: read a line
:: print the buffer
||:: echo
| 1 | |:: read a line? :@stdio: (10 $x)| |
| 2 | :@stdio: 10 |
| 3 | :buffer: $x |
| 4 | |:: read a line :@stdio: 10| |
| 5 | |:: read a line?| |
| 6 | :@stdio: read |
| 7 | |
| 8 | |:: print the buffer? :buffer: $x| |
| 9 | :@stdio: write $x |
| 10 | |:: print the buffer| |
| 11 | :@stdio: write 10 |
| 12 | |
| 13 | |:: echo| |
| 14 | :: read a line |
| 15 | :: print the buffer |
| 16 | |
| 17 | ||:: echo |