[Petya V4sechkin]

Код:

@Echo Off
SetLocal EnableExtensions

For /F "Tokens=2*" %%I In ('Reg Query "HKEY_LOCAL_MACHINE\SOFTWARE\Programma" /V InstallPath') Do Set InstallPath=%%J
CD /D "%InstallPath%"