routine GetCurrentDirectoryA
  module=KERNEL32
  minarg=2
  maxarg=2
  stackpop=called
  returns=long
;

arg 1 input  num          format=pib4. byvalue; * DWORD  nBufferLength // size, in characters, of directory buffer ;
arg 2 output char fdstart format=$cstr200. ;    * LPTSTR lpBuffer      // address of buffer for current directory ;