@kix ?
$ExplorerKey="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer"
$value=readvalue("$ExplorerKey","EnableAutoTray")
if @error=0
$rcode=writevalue("$ExplorerKey","EnableAutoTray","$value","REG_DWORD")
"Wrote enableautotray=$value" ?
endif
$ProfilesKey="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList"
$value=readvalue("$ProfilesKey","ProfilesDirectory")
if @error=0
$rcode=writevalue("$ProfilesKey","ProfilesDirectory","$value","REG_EXPAND_SZ")
"Wrote profilesdirectory=$value" ?
endif