routine CreateDirectoryA
   module=KERNEL32
   minarg=2
   maxarg=2
   stackpop=called
   returns=short
;

arg 1 input char format=$cstr200.;  * directory to create (cannot create multiple levels in one call);
arg 2 input num format=ib4.;        * security attributes, use 0;