Code:
$adsPath = "WinNT://" + @DOMAIN + "/" + @USERID
$adsObj=GetObject($adsPath)

$strHomeDIR = $adsObj.HomeDirectory

"My home directory is : "+$strHomeDir+@CRLF

"...or with built-in macros: "+@HOMESHR+"\"+@HOMEDIR+@CRLF

"...or more simply: "+%HOMESHARE%+@CRLF