12 lines
207 B
Text
12 lines
207 B
Text
|
If OpenConsole()
|
||
|
|
Define n=CountProgramParameters()
|
||
|
|
PrintN("Reading all parameters")
|
||
|
|
While n
|
||
|
|
PrintN(ProgramParameter())
|
||
|
|
n-1
|
||
|
|
Wend
|
||
|
|
Print(#CRLF$+"Press Enter")
|
||
|
|
Input()
|
||
|
|
CloseConsole()
|
||
|
|
EndIf
|