9 lines
129 B
Text
9 lines
129 B
Text
PROCEDURE Main()
|
|
|
|
LOCAL i
|
|
|
|
FOR i := 1 TO PCount()
|
|
? "argument", hb_ntos( i ), "=", hb_PValue( i )
|
|
NEXT
|
|
|
|
RETURN
|