Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
17
Task/Input-loop/PureBasic/input-loop.basic
Normal file
17
Task/Input-loop/PureBasic/input-loop.basic
Normal file
|
|
@ -0,0 +1,17 @@
|
|||
If OpenConsole()
|
||||
; file based line wise
|
||||
If ReadFile(0, "Text.txt")
|
||||
While Eof(0) = 0
|
||||
Debug ReadString(0) ; each line until eof
|
||||
Wend
|
||||
CloseFile(0)
|
||||
EndIf
|
||||
|
||||
; file based byte wise
|
||||
If ReadFile(1, "Text.bin")
|
||||
While Eof(1) = 0
|
||||
Debug ReadByte(1) ; each byte until eof
|
||||
Wend
|
||||
CloseFile(1)
|
||||
EndIf
|
||||
EndIf
|
||||
Loading…
Add table
Add a link
Reference in a new issue