=====Finding the current user name=====

//by Richard Russell, October 2010//\\ \\  To find the user name for the current thread use this function:

<code bb4w>
        DEF FNusername
        LOCAL name%, size%
        size% = 255
        DIM name% LOCAL size%
        SYS "GetUserName", name%, ^size%
        = $$name%
</code>

The function can be called in the following context:

<code bb4w>
        PRINT "The user name is " FNusername
</code>