Расширенная библиотека для работы с реестром
Пример с её использованием:
Код:

#include <Array.au3>
#include <Registry_UDF.au3>
$aArr = _RegEnumKeys2Array("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run")
For $i = 1 To $aArr[0][0]
$sPath = StringRegExpReplace($aArr[$i][0], "\\Run\\", "\\Run_Test\\") ;Копируем в Run_Test
$sPath = StringRegExpReplace($sPath, "\\[^\\]*$", "")
$sKey = StringRegExpReplace($aArr[$i][0], "^.*\\", "")
$sKey = StringReplace($sKey, "!", "! ") ;этот символ на конце почему то блокирует запись
$sRet = RegWrite($sPath, $sKey, $aArr[$i][2], $aArr[$i][1])
Next