RosettaCodeData/Task/Command-line-arguments/PowerBASIC/command-line-arguments-2.powerbasic

'these two both return ALL args
? COMMAND$
? COMMAND$(0)

DO WHILE(LEN(COMMAND$(i)))
    PRINT "The argument "; i; " is "; COMMAND$(i)
    i = i + 1
LOOP