Location:
State:
Carrier
Country
Status

Windows 8.1 Calculator Install Script


Made a little script to install the old Win32 style calculator from Windows 8.1. Maybe someone will find it useful.

While the batch file does not overwrite any system files, it does change the keyboard calculator button to open the 8.1 app (comment out the "reg add" line to disable that).

See attachment for calculator executables.

Code:
cd /d %~dp0    set MUI64="%SystemRoot%System32en-UScalc32.exe.mui"  set MUI32="%SystemRoot%SysWOW64en-UScalc32.exe.mui"  set CALC64="%SystemRoot%System32calc32.exe"  set CALC32="%SystemRoot%SysWOW64calc32.exe"    copy calc32.exe.mui %MUI64%  copy calc32.exe.mui %MUI32%  copy calc32_x64.exe %CALC64%  copy calc32_x32.exe %CALC32%    reg add HKLMSOFTWAREMicrosoftWindowsCurrentVersionExplorerAppKey18 /v ShellExecute /t REG_SZ /d calc32.exe /f    set SCRIPT="%temp%\%RANDOM%.vbs"  echo Set oWS = WScript.CreateObject("WScript.Shell") >> %SCRIPT%  echo sLinkFile = "%SystemRoot%..ProgramDataMicrosoftWindowsStart MenuProgramsAccessoriesCalculator (Classic).lnk" >> %SCRIPT%  echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT%  echo oLink.TargetPath = "%windir%system32calc32.exe" >> %SCRIPT%  echo oLink.WorkingDirectory = "" >> %SCRIPT%  echo oLink.Description = "Performs basic arithmetic tasks with an on-screen calculator." >> %SCRIPT%  echo oLink.IconLocation = "%windir%system32calc32.exe" >> %SCRIPT%  echo oLink.Save >> %SCRIPT%  cscript /nologo %SCRIPT%  del %SCRIPT%    icacls "%SystemRoot%..ProgramDataMicrosoftWindowsStart MenuProgramsAccessoriesCalculator (Classic).lnk" /setowner "NT AUTHORITYSYSTEM"  icacls %MUI64% /grant "ALL APPLICATION PACKAGES:(RX)"  icacls %MUI64% /grant "BUILTINUsers:(RX)"  icacls %MUI64% /grant "NT AUTHORITYSYSTEM:(RX)"  icacls %MUI64% /grant "BUILTINAdministrators:(RX)"  icacls %MUI64% /grant "NT SERVICETrustedInstaller:(F)"  icacls %MUI64% /setowner "NT SERVICETrustedInstaller"  icacls %MUI64% /inheritance:r  icacls %MUI32% /grant "ALL APPLICATION PACKAGES:(RX)"  icacls %MUI32% /grant "BUILTINUsers:(RX)"  icacls %MUI32% /grant "NT AUTHORITYSYSTEM:(RX)"  icacls %MUI32% /grant "BUILTINAdministrators:(RX)"  icacls %MUI32% /grant "NT SERVICETrustedInstaller:(F)"  icacls %MUI32% /setowner "NT SERVICETrustedInstaller"  icacls %MUI32% /inheritance:r  icacls %CALC64% /grant "ALL APPLICATION PACKAGES:(RX)"  icacls %CALC64% /grant "BUILTINUsers:(RX)"  icacls %CALC64% /grant "NT AUTHORITYSYSTEM:(RX)"  icacls %CALC64% /grant "BUILTINAdministrators:(RX)"  icacls %CALC64% /grant "NT SERVICETrustedInstaller:(F)"  icacls %CALC64% /setowner "NT SERVICETrustedInstaller"  icacls %CALC64% /inheritance:r  icacls %CALC32% /grant "ALL APPLICATION PACKAGES:(RX)"  icacls %CALC32% /grant "BUILTINUsers:(RX)"  icacls %CALC32% /grant "NT AUTHORITYSYSTEM:(RX)"  icacls %CALC32% /grant "BUILTINAdministrators:(RX)"  icacls %CALC32% /grant "NT SERVICETrustedInstaller:(F)"  icacls %CALC32% /setowner "NT SERVICETrustedInstaller"  icacls %CALC32% /inheritance:r
  • Calculator_6.3.9600.16384_en-US_Installer.zip (760.8 KB, 106 views)

Ah, good ole calc.

In return of your kind gesture, I leave you with this.

Windows 8.1 Calculator Install Script