RosettaCodeData/Task/Command-line-arguments/HicEst/command-line-arguments.hicest
2023-07-01 13:44:08 -04:00

4 lines
181 B
Text

DO i = 2, 100 ! 1 is HicEst.exe
EDIT(Text=$CMD_LINE, SePaRators='-"', ITeM=i, IF ' ', EXit, ENDIF, Parse=cmd, GetPosition=position)
IF(position > 0) WRITE(Messagebox) cmd
ENDDO