Data update
This commit is contained in:
parent
4bb20c9b71
commit
cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions
27
Task/Input-loop/REXX/input-loop.rexx
Normal file
27
Task/Input-loop/REXX/input-loop.rexx
Normal file
|
|
@ -0,0 +1,27 @@
|
|||
-- 23 Aug 2025
|
||||
include Setting
|
||||
|
||||
say 'INPUT LOOP'
|
||||
say version
|
||||
say
|
||||
call Streaming
|
||||
call Pulling
|
||||
exit
|
||||
|
||||
Streaming:
|
||||
say 'Using LineIn and LineOut...'
|
||||
do until input = ''
|
||||
input=LineIn()
|
||||
call LineOut ,input
|
||||
end
|
||||
return 0
|
||||
|
||||
Pulling:
|
||||
say 'Using pull and say...'
|
||||
do until input = ''
|
||||
parse pull input
|
||||
say input
|
||||
end
|
||||
return 0
|
||||
|
||||
include Abend
|
||||
Loading…
Add table
Add a link
Reference in a new issue