[madmasles]

Pozia,
Примерно так:

Код:

$sPathOld = ".\Setting\Set.reg"
$sPathNew = "SetNew.reg"
$slovo = "PoziaMark"
$slovoOld = "Program Files Mark"
$slovoNew32 = "Program Files"
$slovoNew64 = "Program Files (x86)"
$sTest = FileRead($sPathOld)
$sTest = StringReplace($sTest, $slovo, @UserName)
$ras = @OSArch
If $ras = "X86" Then
    $sTest = StringReplace($sTest, $slovoOld, $slovoNew32)
Else
    $sTest = StringReplace($sTest, $slovoOld, $slovoNew64)
EndIf
FileWrite($sPathNew, $sTest)

Только меня смущает это:

$sPathOld = ".\Setting\Set.reg"

Вы проверяли, так работает?
PS
Сам проверил - у меня так работает.