routine GetUserNameA minarg=2 maxarg=2 stackpop=called module=advapi32 returns=short; arg 1 char update format=$cstr20; * buffer to contain username; arg 2 num update format=pib4.; * size of buffer, returns length of username + 1;