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