; stkfnc5テスト

	"argc=" PRINTS ARGC . PRINTN10 CRLF
	128 arg STRING ,
	0 <> FOR.
		I? PRINTN10 TAB
		arg . I? ARGV PRINTS CRLF
	NEXT

GETCH $1b == IF. END

	"env=環境変数" PUTENV ,

	256 work STRING . "env" GETENV , PRINTS CRLF
	work . "path" GETENV , PRINTS CRLF

GETCH $1b == IF. END

	( "/?" ). "as" EXEC ,	; 外部コマンド
	0 "dir *.doc -w" EXEC ,	; 内部コマンド

	"/?" a STRINGS ,
	"as" cmd STRINGS ,
	( a ). cmd EXEC ,
