[Creat0R]

я бы комплексовал бы, как обычно кода боюсь »

Нечего бояться, без эксперементов трудно (невозможно?) достичь желаемых результатов

Что касается кода выше, то можно укоротить:

Код:

$sRegKeyName = ""

Switch @OSArch
    Case "x86"
        $sRegKeyName = "HKLM\Software\Native Instruments\AkoustikPiano"
    Case "x64"
        $sRegKeyName = "HKLM\Software\Wow6432Node\Native Instruments\AkoustikPiano"
EndSwitch

$InstallDir = RegRead($sRegKeyName, "InstallDir")

$sFile_Content = _
    "Windows Registry Editor Version 5.00" & @CRLF & @CRLF & _
    "[" & $sRegKeyName & "]" & @CRLF & _
    '"SYSTEMID"=' & $sysID & @CRLF & @CRLF

$hFileOpen = FileOpen($InstallDir & "\AkoustikPiano.reg", 10)
FileWrite($hFileOpen, $sFile_Content)
FileClose($hFileOpen)