${SegmentFile}

Var StringValue
Var HexValue
Var TypeRead
Var SuccessOrFail

${SegmentPreExec}
    ${registry::Read} HKEY_CURRENT_USER\Software\Ulduzsoft\kchmviewer\recentFileList "" $StringValue $TypeRead
    ${If} $TypeRead == REG_SZ
        ${registry::StrToHex} $StringValue $HexValue
        ${registry::Write} HKEY_CURRENT_USER\Software\Ulduzsoft\kchmviewer recentFileList $HexValue REG_MULTI_SZ $SuccessOrFail
    ${Else}
    ${EndIf}
!macroend

${SegmentPostExec}
    ${registry::Read} HKEY_CURRENT_USER\Software\Ulduzsoft\kchmviewer\recentFileList "" $HexValue $TypeRead
    ${If} $TypeRead == $REG_MULTI_SZ
        ${registry::HexToStr} $HexValue $StringValue
        ${registry::Write} HKEY_CURRENT_USER\Software\Ulduzsoft\kchmviewer recentFileList $StringValue REG_SZ $SuccessOrFail
    ${Else}
    ${EndIf}
!macroend