By registering with us, you'll be able to discuss, share and private message with other members of our community.
SignUp Now!EXTPROC C:\Windows\System32\cmd.exe
dir c:\
C:\> test.cmd
TCC: Unknown command "C:\Windows\System32\cmd.exeC:\test.cmd"
Interesting... I didn't know about EXTPROC before. But it doesn't seem to be working for me in v17.
/* REXX */
numeric digits 20
parse arg infile
call stream infile, 'c', 'open read'
outfile = "temp.txt" ; call stream outfile, 'c', 'open write replace'
do while lines(infile)
incard = linein(infile)
parse var incard 1 cx 2 tail
select
when cx = ';' then break
when cx = '=' then interpret 'outcard='tail
otherwise ; outcard = tail ; end
call lineout outfile, outcard
end
call stream infile, 'c', 'close'
call stream outfile, 'c', 'close'
EXTPROC simpcalc.rex
; goto :eof
;
; Inline calculator
foot
=0.3048
yard
= 0.3048*3
chain
= o.3048*66