Check all or clear all checkboxes

Get help with using AutoHotkey and its commands and hotkeys
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Check all or clear all checkboxes

22 Nov 2018, 21:39

Well i'm almost done with this script, which is a menu for setting up w10 registers and change settings into windows...

The only thing that is missing is : an button (or line of txt) which displays "deselect" or "select all"

i tried several things but it does not work...

Code: Select all

If Not A_IsAdmin
{
Run *RunAs "%A_AhkPath%" "%A_ScriptFullPath%"
ExitApp
}
BeginScript:
Gui, Destroy
#SingleInstance Force

gui, Add, Tab2,w380 h750, Registers

gui, tab, Registers
gui, add, checkbox, cRed y+3 vFolder_reset, Folder reset
gui, add, checkbox, Checked cGreen y+3 vFolder_options, Change folder options (unhide and see ext.)
gui, add, checkbox, Checked cGreen y+3 vWebdavbuffer, Make Webdav buffer bigger
gui, add, checkbox, Checked cGreen y+3 vDelete_people_icon, Delete icon -> People <- from taskbar
gui, add, checkbox, Checked cGreen y+3 vClock_with_seconds, Put seconds after hours and minutes in taskbar
gui, add, checkbox, cRed y+3 vDPI_and_taskbar_color_changes, DPI and taskbar color changes
gui, add, checkbox, cRed y+3 vUAC_low, Set UAC to lowerst security
gui, add, checkbox, cRed y+3 vIcon_distance, Shorten distance between icons on desktop
gui, add, checkbox, Checked cGreen y+3 vNetworkandmypc, Add My PC and Network icons on desktop
gui, add, checkbox, Checked cGreen y+3 vTake_ownership, Take ownership of files and folders
gui, add, checkbox, Checked cGreen y+3 vVerbose_messages, Verbose messages during boot or shutdown
gui, add, checkbox, cRed y+3 vKeyboard_speed, Set keyboard to maximum speed
gui, add, checkbox, cRed y+3 vRemove_timeline, Empty timeline and remove saving from it
gui, add, checkbox, Checked cGreen y+3 vThumbs_bigger, Make thumbs bigger at taskbar (preview)
gui, add, checkbox, cRed y+3 vWindowarrang, Disable Aerosnap (rearange window)
gui, add, checkbox, Checked cGreen y+3 vBigger_window_copy, Maximize window when copying
gui, add, checkbox, cRed y+3 vDisable_grouping, Disable grouping with open windows on taskbar
gui, add, checkbox, Checked cGreen y+3 vUpdate_context_menu, Add Update at the top off context menu
gui, add, checkbox, Checked cGreen y+3 vCopy_path, Add to context menu COPY PATH
gui, add, checkbox, cRed y+3 vRemove_intel_context_menu, Remove Intel entries from context menu
gui, add, checkbox, Checked cGreen y+3 vAdd_bat_file_to_context, Add BAT file to context NEW menu
gui, add, checkbox, Checked cGreen y+3 vTurn_sticky_keys_off, Turn sticky keys off
gui, add, checkbox, Checked cGreen y+3 vGodmode, Add godmode to context menu
gui, add, checkbox, Checked cGreen y+3 vDisable_powerfile_on_c, Disable and Remove hibernation file on partition
gui, add, checkbox, Checked cGreen y+3 vRemove_onedrive, Remove Onedrive from system and sidebar
gui, Add, button, gStartbuttonregisters, Start
gui, Show, w380 h750,Installatiemenu nov 2018
return

 Startbuttonregisters:
gui, Submit

         if Folder_reset = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	 }

	  if Folder_options = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Webdavbuffer = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Webdav buffer is extented..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Delete_people_icon = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Deleting people icon from the taskbar..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Clock_with_seconds = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Display seconds after hours and seconds at tasbar times..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

          if DPI_and_taskbar_color_changes = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... DPI and taskbar color changes..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

          if UAC_low = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set UAC to lowerst security..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

          if Icon_distance = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Shorten distance between icons on desktop..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

          if Networkandmypc = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add My PC and Network icons on desktop..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Take_ownership = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Take ownership of files and folders..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Verbose_messages = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Verbose messages during boot or shutdown..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Keyboard_speed = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set keyboard to maximum speed..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Remove_timeline = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Empty timeline and remove saving from it..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Thumbs_bigger = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Make thumbs bigger at taskbar (preview)..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Windowarrang = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Aerosnap (rearange window)..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Bigger_window_copy = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Maximize window when copying..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Disable_grouping = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable grouping with open windows on taskbar..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Update_context_menu = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Update at the top off context menu..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Copy_path = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync, 
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, 
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Context menu copy path..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Add_bat_file_to_context = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add BAT file to context NEW menu..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Remove_intel_context_menu = 1
	{
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Intel entries from context menu..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Turn_sticky_keys_off = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Turn sticky keys off..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Godmode = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add godmode to context menu..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Remove_onedrive = 1
	{
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
Sleep, 500
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Onedrive from system and sidebar..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

	  if Disable_powerfile_on_c = 1
	{
run powercfg -h off
Sleep, 500
run powercfg -h off
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable and Remove hibernation file on partition..., 0, 20, WhichToolTip
Sleep, 500
ToolTip
	}

Goto, BeginScript
return
GuiClose:
ExitApp
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

22 Nov 2018, 23:26

Try this:

Code: Select all

#SingleInstance Force

VarNames := []

BeginScript:
Gui, Destroy
gui, Add, Tab2,w380 h750, Registers
gui, tab, Registers
Gui, Add, Button, Section, Select All
Gui, Add, Button, x+m, Select None
AddCheckbox("xs cRed y+3", "Folder_reset" , "Folder reset")
AddCheckbox("Checked cGreen y+3", "Folder_options", "Change folder options (unhide and see ext.)")
AddCheckbox("Checked cGreen y+3", "Webdavbuffer", "Make Webdav buffer bigger")
AddCheckbox("Checked cGreen y+3", "Delete_people_icon", "Delete icon -> People <- from taskbar")
AddCheckbox("Checked cGreen y+3", "Clock_with_seconds", "Put seconds after hours and minutes in taskbar")
AddCheckbox("cRed y+3", "DPI_and_taskbar_color_changes", "DPI and taskbar color changes")
AddCheckbox("cRed y+3", "UAC_low", "Set UAC to lowerst security")
AddCheckbox("cRed y+3", "Icon_distance", "Shorten distance between icons on desktop")
AddCheckbox("Checked cGreen y+3", "Networkandmypc", "Add My PC and Network icons on desktop")
AddCheckbox("Checked cGreen y+3", "Take_ownership", "Take ownership of files and folders")
AddCheckbox("Checked cGreen y+3", "Verbose_messages", "Verbose messages during boot or shutdown")
AddCheckbox("cRed y+3", "Keyboard_speed", "Set keyboard to maximum speed")
AddCheckbox("cRed y+3", "Remove_timeline", "Empty timeline and remove saving from it")
AddCheckbox("Checked cGreen y+3", "Thumbs_bigger", "Make thumbs bigger at taskbar (preview)")
AddCheckbox("cRed y+3", "Windowarrang", "Disable Aerosnap (rearange window)")
AddCheckbox("Checked cGreen y+3", "Bigger_window_copy", "Maximize window when copying")
AddCheckbox("cRed y+3", "Disable_grouping", "Disable grouping with open windows on taskbar")
AddCheckbox("Checked cGreen y+3", "Update_context_menu", "Add Update at the top off context menu")
AddCheckbox("Checked cGreen y+3", "Copy_path", "Add to context menu COPY PATH")
AddCheckbox("cRed y+3", "Remove_intel_context_menu", "Remove Intel entries from context menu")
AddCheckbox("Checked cGreen y+3", "Add_bat_file_to_context", "Add BAT file to context NEW menu")
AddCheckbox("Checked cGreen y+3", "Turn_sticky_keys_off", "Turn sticky keys off")
AddCheckbox("Checked cGreen y+3", "Godmode", "Add godmode to context menu")
AddCheckbox("Checked cGreen y+3", "Disable_powerfile_on_c", "Disable and Remove hibernation file on partition")
AddCheckbox("Checked cGreen y+3", "Remove_onedrive", "Remove Onedrive from system and sidebar")
gui, Add, button, gStartbuttonregisters, Start
gui, Show, w380 h750,Installatiemenu nov 2018
return

ButtonSelectAll:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 1
return

ButtonSelectNone:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 0
return

Startbuttonregisters:
gui, Submit
Goto, BeginScript
return
GuiClose:
ExitApp

AddCheckbox(options, VarName, Text) {
    global
    VarNames.Push(VarName)
    Gui, Add, Checkbox, %options% v%VarName%, %Text%
}
I hope that helps.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

23 Nov 2018, 05:22

Thank you very much, it works, only i need to change my script, which will be alot of work to make this one work, but thats ok :)

thanx again!
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

23 Nov 2018, 05:59

You could change the AddCheckbox() function to only accept one string, which would be the exact copy of your current setup, including the comma.
ex: AddCheckbox("Checked cGreen y+3 vFolder_options, Change folder options (unhide and see ext.)")
and deal with the VarName separately, it might be worth the effort, afterwards you can used mass-replacement in editor easily.
All depends how many more tabs there are.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

23 Nov 2018, 06:07

I will try, but i find it hard to change it, i tried and it gives me errors....

so the 1st one i will use, i guess...... if i manage :)
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

23 Nov 2018, 06:22

If all your commands follow the simple rule: vVarname must be the last part of the options, followed immediately by the comma, then the RegEx should be good.

Code: Select all

AddCheckbox(Haystack) {
    global
    
    ; split Haystack into two parts: options (incl. vVarname) and Text
    local commaPos := InStr(Haystack, ",")
    local options := SubStr(Haystack, 1, commaPos-1)
    local Text := SubStr(Haystack, commaPos+1)
    
    ; get Varname
    if RegExMatch(options, "v\K(.+)", VarName)
        VarNames.Push(VarName)
        
    ; rebuild the original command
    Gui, Add, Checkbox, %options%, %Text%
}
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

23 Nov 2018, 20:28

Thanx mate, i've managed to make it :)

but i found out that the amount of lines (reg scripts) getting longer and longer.... so i would be happy if it is possible to display the lines side by side (2 or 3)

i give an example

now it is:

Folder reset
Change folder options (unhide and see ext.)
Make Webdav buffer bigger
Put seconds after hours and minutes in taskbar
etc etc.

i want to make it like:"

Folder reset | Change folder options (unhide and see ext.)
Make Webdav buffer bigger | Put seconds after hours and minutes in taskbar

i cant display it exactly here, but you'll get my drift :P

maybe i can get some help on this, i asume i don't have to rewrite the whole script
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

23 Nov 2018, 23:29

  • I have noticed a serious flaw in my suggestion: whenever you press start, the list VarNames grows, but the Gui resets. Fixed by also resetting the list VarNames.
  • There was also the possibility of overwriting VarName at times, also fixed. I hope.
  • There may be more problems still hidden, I only tested what I got and this is hopefully what you want? (aimed at mass-editing the whole real script) :?:
Three columns would require a different approach, obviously a toggle between even/odd is not scalable.

Code: Select all

#SingleInstance Force

BeginScript:
VarNames := []
Gui, Destroy
gui, Add, Tab2,w640 h400, Registers
gui, tab, Registers
Gui, Add, Button, Section, Select All
Gui, Add, Button, x+m, Select None

AddCheckbox("cRed y+3 vFolder_reset, Folder reset")
AddCheckbox("Checked cGreen y+3 vFolder_options, Change folder options (unhide and see ext.)")
AddCheckbox("Checked cGreen y+3 vWebdavbuffer, Make Webdav buffer bigger")
AddCheckbox("Checked cGreen y+3 vDelete_people_icon, Delete icon -> People <- from taskbar")
AddCheckbox("Checked cGreen y+3 vClock_with_seconds, Put seconds after hours and minutes in taskbar")
AddCheckbox("cRed y+3 vDPI_and_taskbar_color_changes, DPI and taskbar color changes")
AddCheckbox("cRed y+3 vUAC_low, Set UAC to lowerst security")
AddCheckbox("cRed y+3 vIcon_distance, Shorten distance between icons on desktop")
AddCheckbox("Checked cGreen y+3 vNetworkandmypc, Add My PC and Network icons on desktop")
AddCheckbox("Checked cGreen y+3 vTake_ownership, Take ownership of files and folders")
AddCheckbox("Checked cGreen y+3 vVerbose_messages, Verbose messages during boot or shutdown")
AddCheckbox("cRed y+3 vKeyboard_speed, Set keyboard to maximum speed")
AddCheckbox("cRed y+3 vRemove_timeline, Empty timeline and remove saving from it")
AddCheckbox("Checked cGreen y+3 vThumbs_bigger, Make thumbs bigger at taskbar (preview)")
AddCheckbox("cRed y+3 vWindowarrang, Disable Aerosnap (rearange window)")
AddCheckbox("Checked cGreen y+3 vBigger_window_copy, Maximize window when copying")
AddCheckbox("cRed y+3 vDisable_grouping, Disable grouping with open windows on taskbar")
AddCheckbox("Checked cGreen y+3 vUpdate_context_menu, Add Update at the top off context menu")
AddCheckbox("Checked cGreen y+3 vCopy_path, Add to context menu COPY PATH")
AddCheckbox("cRed y+3 vRemove_intel_context_menu, Remove Intel entries from context menu")
AddCheckbox("Checked cGreen y+3 vAdd_bat_file_to_context, Add BAT file to context NEW menu")
AddCheckbox("Checked cGreen y+3 vTurn_sticky_keys_off, Turn sticky keys off")
AddCheckbox("Checked cGreen y+3 vGodmode, Add godmode to context menu")
AddCheckbox("Checked cGreen y+3 vDisable_powerfile_on_c, Disable and Remove hibernation file on partition")
AddCheckbox("Checked cGreen y+3 vRemove_onedrive, Remove Onedrive from system and sidebar")

gui, Add, button, gStartbuttonregisters, Start
gui, Show, x50 y50,Installatiemenu nov 2018
return

ButtonSelectAll:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 1
return

ButtonSelectNone:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 0
return

Startbuttonregisters:
gui, Submit
Goto, BeginScript
return
GuiClose:
ExitApp



;-------------------------------------------------------------------------------
AddCheckbox(Haystack) {
;-------------------------------------------------------------------------------
    global
    static even := True ; initially True, since 0 is even

    ; split Haystack into two parts: options (incl. vVarname) and Text
    local commaPos := InStr(Haystack, ",")
    local options := SubStr(Haystack, 1, commaPos-1)
    local Text := SubStr(Haystack, commaPos+1)

    ; 2 columns
    if (even := not even) ; toggle even/odd
        options := StrReplace(options, "y+3", "x320 yp")
    else
        options := "xs " options

    ; build the new command
    Gui, Add, Checkbox, %options%, %Text%

    ; store VarName
    local VarName := ""
    if RegExMatch(options, "v\K(.+)", VarName)
        VarNames.Push(VarName)
}
This what I came up with, only looking at positioning the boxes, and fixing mistakes from before.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 04:58

Sorry to say this, but i've used you 1st suggestion, not the last one... so everything is already done, but can you help me with the 1st one?

i will put up the code here (in total) which is VERY long!

Code: Select all

If Not A_IsAdmin
{
Run *RunAs "%A_AhkPath%" "%A_ScriptFullPath%"
ExitApp
}
path := "D:\USB Stick installatie windows"

#SingleInstance Force

VarNames := []

BeginScript:
Gui, Destroy
gui, Add, Tab2,w380 h750, Registers|Windows 10 instellingen|Programs en snelkoppelingen

; starts "Programs en snelkoppelingen"
Gui, Font, s10, Verdana
gui, tab, Programs en snelkoppelingen
gui, add, checkbox, y+3 vapp30, Test 1.0 MediaPlayerClassic
gui, add, checkbox, y+3 vapp31, Test 1.0 Apparatenbeheer
gui, add, checkbox, y+3 vapp32, Test 1.0 Audioapparaten_beheren
;gui, add, checkbox, y+3 vapp23, Winrar 5.40
;gui, add, checkbox, y+2 vapp15, Photoshop CS 6
;gui, add, checkbox, y+2 vapp04, Acdsee 3.1
;gui, add, checkbox, y+2 vapp07, EditPlus 4.3
;gui, add, checkbox, y+2 vapp22, Izotope Ozone Advance 8
;gui, add, checkbox, y+2 vapp18, Image Resizer 3.11
;gui, add, checkbox, y+2 vapp14, FL Studio Producer 12
;gui, add, checkbox, y+2 vapp05, Bandicam 3.4
;gui, add, checkbox, y+2 vapp24, Snip
;gui, add, checkbox, y+2 vapp17, RealTec HD Sound Drivers                                       [driver]
;gui, add, checkbox, y+2 vapp01, 7-Zip64
;gui, add, checkbox, y+2 vapp02, Acronis True Image 2018
;gui, add, checkbox, y+2 vapp03, Ammyy
;gui, add, checkbox, y+2 vapp06, Everthing
;gui, add, checkbox, y+2 vapp08, Daemon Tools Lite
;gui, add, checkbox, y+2 vapp09, Ccleaner
;gui, add, checkbox, y+2 vapp10, FileZilla
;gui, add, checkbox, y+2 vapp11, KMS Spico Windows 10 activation
;gui, add, checkbox, y+2 vapp12, Hard en Software metingen
;gui, add, checkbox, y+2 vapp13, Freemake Video Converter
;gui, add, checkbox, y+2 vapp16, Mini Tool Partition Wizard 10
;gui, add, checkbox, y+2 vapp19, Windows Iso Downloader
;gui, add, checkbox, y+2 vapp20, Winaero Tweaker
;gui, add, checkbox, y+2 vapp21, Rufus USB Creator
;gui, add, checkbox, y+2 vapp25, Perfromance Test
gui, Add, button, gStartbuttonprogrammas, Start

; starts "Systeem basis"
gui, tab, Windows 10 instellingen
Gui, Add, Text, y+3 cBlue gApparatenbeheertab , • Apparatenbeheer schijven uitschakelen
Gui, Add, Text, y+3 cRed gAutomatisch_afspelentab , • Automatisch afspelen
Gui, Add, Text, y+3 cBlue gCmdtab , • CMD instellingen
Gui, Add, Text, y+3 cBlue gGeluidsinstellingentab , • Geluidsinstellingen
Gui, Add, Text, y+3 cBlue gHerleidmappentab , • Herleid mappen naar andere locatie
Gui, Add, Text, y+3 cBlue gMapinstellingentab , • Map instellingen
Gui, Add, Text, y+3 cRed gNetwerken_weergeventab , • Netwerken weergeven
Gui, Add, Text, y+3 cBlue gEnergiebeheertab , • Pas energie aan
Gui, Add, Text, y+3 cBlue gPrestatiestab , • Prestaties aanpassen
Gui, Add, Text, y+3 cRed gSchijfbeheertab , • Schijfbeheer
Gui, Add, Text, y+3 cBlue gTaakbalkwijzigentab , • Taakbalkpictogrammen aan of uitzetten
Gui, Add, Text, y+3 cBlue gDatumentijdtab , • Wijzig datum en tijd notatie
Gui, Add, Text, y+3 cBlue gNaamvanpcwijzigentab , • Wijzig naam van de PC
Gui, Add, Text, y+3 cRed gUsercontrolpassword2tab , • Windows opstarten zonder wachtwoord
Gui, Add, Text, y+3 cRed gBenchmarktesttab , • Test warmte en snelheid van PC onderdelen
Gui, Add, Text, y+27 cGreen gSluit_explorer , ✓ Sluit en herstart explorer

; starts "Registers"
gui, tab, Registers
Gui, Add, Button, Section , Select All
Gui, Add, Button, x+m, Select None

AddCheckbox("xs cRed y+3", "Folder_reset" , "Folder reset")
AddCheckbox("Checked cGreen y+3", "Folder_options", "Change folder options (unhide and see ext.)")
AddCheckbox("Checked cGreen y+3", "Webdavbuffer", "Make Webdav buffer bigger")
AddCheckbox("Checked cGreen y+3", "Delete_people_icon", "Delete icon -> People <- from taskbar")
AddCheckbox("Checked cGreen y+3", "Clock_with_seconds", "Put seconds after hours and minutes in taskbar")
AddCheckbox("cRed y+3", "DPI_and_taskbar_color_changes", "DPI and taskbar color changes")
AddCheckbox("cRed y+3", "UAC_low", "Set UAC to lowerst security")
AddCheckbox("cBlue y+3", "Always_admin", "Run all programs with Admin privilages")
AddCheckbox("cRed y+3", "Icon_distance", "Shorten distance between icons on desktop")
AddCheckbox("Checked cGreen y+3", "Networkandmypc", "Add My PC and Network icons on desktop")
AddCheckbox("Checked cGreen y+3", "Take_ownership", "Take ownership of files and folders")
AddCheckbox("Checked cGreen y+3", "Verbose_messages", "Verbose messages during boot or shutdown")
AddCheckbox("cRed y+3", "Keyboard_speed", "Set keyboard to maximum speed")
AddCheckbox("cRed y+3", "Remove_timeline", "Empty timeline and remove saving from it")
AddCheckbox("Checked cGreen y+3", "Thumbs_bigger", "Make thumbs bigger at taskbar (preview)")
AddCheckbox("cRed y+3", "Windowarrang", "Disable Aerosnap (rearange window)")
AddCheckbox("Checked cGreen y+3", "Bigger_window_copy", "Maximize window when copying")
AddCheckbox("cRed y+3", "Disable_grouping", "Disable grouping with open windows on taskbar")
AddCheckbox("Checked cGreen y+3", "Update_context_menu", "Add Update at the top off context menu")
AddCheckbox("Checked cGreen y+3", "Copy_path", "Add to context menu COPY PATH")
AddCheckbox("cRed y+3", "Remove_intel_context_menu", "Remove Intel entries from context menu")
AddCheckbox("Checked cGreen y+3", "Add_bat_file_to_context", "Add BAT file to context NEW menu")
AddCheckbox("Checked cGreen y+3", "Turn_sticky_keys_off", "Turn sticky keys off")
AddCheckbox("Checked cGreen y+3", "Godmode", "Add godmode to context menu")
AddCheckbox("Checked cGreen y+3", "Layout_control_panel", "Change layout Control panel (big icons)")
AddCheckbox("cRed y+3", "Disbable_windows_update", "Disable Windows Update")
AddCheckbox("Checked cGreen y+3", "Disable_powerfile_on_c", "Disable and Remove hibernation file on partition")
AddCheckbox("Checked cGreen y+3", "Remove_onedrive", "Remove Onedrive from system and sidebar")
gui, Add, button, gStartbuttonregisters, Start
gui, Show, w380 h750,Installatiemenu nov 2018
return

ButtonSelectAll:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 1
return

ButtonSelectNone:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 0
return

;labels en scripts "Windows 10 instellingen"
Schijfbeheertab:
run diskmgmt.msc
MsgBox, 4096, Schijfbeheer, - Maak het venster beeldvullen`n- Schakel ALLE schijven in`n- Verander schijfletters: klik op een schijf en dan:`n  "Stationletter en paden wijzigen"`n- USB's en CDROM paden wijzigen
Return

Cmdtab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
gui, 2: +AlwaysOnTop
Gui, 2:Add, Picture, x0 y0, jpg\ins_ahk_cmd_eigenschappen_1.jpg
Gui, 2:Show, x1200, CMD eigenschappen
run cmd.exe
Return

Mapinstellingentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
gui, 3: +AlwaysOnTop
Gui, 3:Add, Picture, x0 y0, jpg\ins_ahk_mapinstellingen_1.jpg
Gui, 3:Show, x1200, Mapinstellingen
Run "lnk\w10Opties voor verkenner.lnk"
Return

Apparatenbeheertab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
gui, 4: +AlwaysOnTop
Gui, 4:Add, Picture, x0 y0, jpg\ins_ahk_apparaatbeheer_1.jpg
Gui, 4:Show, x1200, Device Manager
Run devmgmt.msc
Return

Geluidsinstellingentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
gui, 5: +AlwaysOnTop
Gui, 5:Add, Picture, x0 y0, jpg\ins_ahk_geluidinstellingen_1.jpg
Gui, 5:Show, y50 x1200, Geluidinstellingen
Run, mmsys.cpl
Return

Automatisch_afspelentab:
Run, "lnk\w10Automatisch afspelen voor alle media en apparaten starten of stoppen.lnk"
MsgBox, 4096, Windows automatisch afspelen,Zet alles uit wat met "automatisch" afspelen te maken heeft
Return

Netwerken_weergeventab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run, "lnk\w10Computers en apparaten in het netwerk weergeven.lnk"
MsgBox, 4096, Hou venster open en verplaats deze eventueel,Alleen controleren of alles werkt, onder andere J Versteeg en de HDD van de HD51 geactiveerd is
Return

Usercontrolpassword2tab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run Control.exe userpasswords2
MsgBox, 4096, Wachtwoord wijzingen of zonder wachtwoord inloggen,Gebruikers moeten een gebruiksnaam en wachtwoord opgeven, uitvinken
Return

Datumentijdtab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run "lnk\w10De indeling voor datum tijd of getallen wijzigen.lnk"
gui, 6: +AlwaysOnTop
Gui, 6:Add, Picture, x0 y0, jpg\ins_ahk_datum_en_tijd_aanpassen_1.jpg
Gui, 6:Show, x1200, Datum en tijd notatie aanpassen
Return

Naamvanpcwijzigentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run "lnk\w10De naam van deze computer wijzigen.lnk"
gui, 7: +AlwaysOnTop
Gui, 7:Add, Picture, x0 y0, jpg\ins_ahk_pcnaamgeven_1.jpg
Gui, 7:Show, x1200, PC naam geven
Return

Taakbalkwijzigentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run "lnk\w10De taakbalk aanpassen.lnk"
gui, 8: +AlwaysOnTop
Gui, 8:Add, Picture, x0 y0, jpg\ins_ahk_pictogrammen_taakbalk_1.jpg
Gui, 8:Show, x1200, Taakbalk pictogrammen verbergen of tonen
sleep 100
Return

Energiebeheertab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run "lnk\w10Een energiebeheerschema selecteren.lnk"
gui, 9: +AlwaysOnTop
Gui, 9:Add, Picture, x0 y0, jpg\ins_ahk_energiebeheer_1.jpg
Gui, 9:Show, x1200, Energiebeheer aanpassen
;MsgBox, 4096, Hou venster open en verplaats deze eventueel,Verander de pc naam, klik op "Wijzigen..." onderaan
Return

Prestatiestab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run "lnk\w10Geavanceerde systeeminstellingen weergeven.lnk"
gui, 10: +AlwaysOnTop
Gui, 10:Add, Picture, x0 y0, jpg\ins_ahk_prestaties_1.jpg
Gui, 10:Show, x1200, Prestaties aanpassen
Return

Herleidmappentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
} 
Run "lnk\w10Herleid folders naar de juiste locatie.lnk"
gui, 11: +AlwaysOnTop
Gui, 11:Add, Picture, x0 y0, jpg\ins_ahk_herleid_mappen_1.jpg
Gui, 11:Show, x1200, Herleid mappen
Return

Benchmarktesttab:
run https://www.cpuid.com/softwares/hwmonitor.html
run https://www.mersenne.org/download
run https://benchmark.unigine.com/heaven
Return

; ------------------------------------------------------------------------------------------------------- OLD AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------

Turn_sticky_keys_off_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
return

Godmodus_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
return

Voeg_bat_file_toe_aan_nieuw_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
return

Verwijder_intel_reg:
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
return

Kopieer_pad_context_menu_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync, 
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, 
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
return

Update_context_menu_reg:
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
return

Maak_eigendom_mappen_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
Return

Disable_grouping_of_taskbar_buttons_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
return

Groter_venster_bij_file_copy_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
return

WindowArrangementActive_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
return

Thumb_grootte_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
return

Powercfg_reg:
run powercfg -h off
return

Timeline_verwijderen_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
Return

Onedrive_van_explorer_verwijderen_reg:
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
Return

Keyboard_vertraging_aanpassen_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , BELANGRIJK: Uitloggen om veranderingen door te voeren, 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Mijnpc_en_netwerk_op_bureaublad_plaatsen_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
Return

UAC_op_laagste_niveau_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
Return

Verwijderpeople_icon_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
Return

Webdav_buffer_vergroten_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
Return

Opties_voor_verkenner_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Seconden_in_klok_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
Return

Folder_reset_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Sluit_explorer:
run taskkill /f /im explorer.exe
Sleep, 500
run explorer.exe
Return

taakbalkleur_dpi_transp_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
Return

Icoonafstand_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
Return

Verbose_berichten_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
Return


;Start button
Startbuttonprogrammas:
gui, Submit

if app01 = 1
 {
  MsgBox 7-Zip64 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/7-zip64.7z" --path=c:\temp
 }
if app02 = 1
 {
  MsgBox Acronis True Image 2018 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/ati2018_nl.7z" --path=c:\temp
 }
if app03 = 1
 {
  MsgBox Ammyy wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/ammyy.7z" --path=c:\temp
 }
 if app04 = 1
 {
  MsgBox Acdsee 3.1 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/acdsee31.7z" --path=c:\temp
 }
  if app05 = 1
 {
  MsgBox Bandicam 3.4 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/bandicam34.7z" --path=c:\temp
 }
 if app06 = 1
 {
  MsgBox Everthing wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/everything.7z" --path=c:\temp
 }
  if app07 = 1
 {
  MsgBox EditPlus 4.3 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/editplus43.7z" --path=c:\temp
 }
  if app08 = 1
 {
  MsgBox Daemon Tools Lite wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/daemon_tools_lite.7z" --path=c:\temp
 }
   if app09 = 1
 {
  MsgBox Ccleaner wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/ccleaner.7z" --path=c:\temp
 }
    if app10 = 1
 {
  MsgBox FileZilla wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/filezilla.7z" --path=c:\temp
 }
    if app11 = 1
 {
  MsgBox KMS Spico Windows 10 activation wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/windows/kmspico10.7z" --path=c:\temp
 }
    if app12 = 1
 {
  MsgBox Hard en Software metingen wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/hard_en_software_metingen.7z" --path=c:\temp
 }
    if app13 = 1
 {
  MsgBox Freemake Video Converter wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/freemakevideoconverter.7z" --path=c:\temp
 }
     if app14 = 1
 {
  MsgBox FL Studio Producer 12 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/fl_studio_producer12.7z" --path=c:\temp
 }
     if app15 = 1
 {
  MsgBox Photoshop 6 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/ps6.7z" --path=c:\temp
 }
      if app16 = 1
 {
  MsgBox Mini Tool Partition Wizard 10 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/mini_tool_partition_wizard10.7z" --path=c:\temp
 }
       if app17 = 1
 {
  MsgBox RealTec HD Sound Drivers wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/drivers/realtec_r281.7z" --path=c:\temp
 }
       if app18 = 1
 {
  MsgBox Image Resizer 3.1 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/image_resizer31.7z" --path=c:\temp
 }
       if app19 = 1
 {
  MsgBox Windows Iso Downloader wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/windows/windows_iso_downloader.7z" --path=c:\temp
 }
       if app20 = 1
 {
  MsgBox Winaero Tweaker wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/winaero_tweaker.7z" --path=c:\temp
 }
       if app21 = 1
 {
  MsgBox Rufus wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/windows/rufus_32.7z" --path=c:\temp
 }
        if app22 = 1
 {
  MsgBox Izotope Ozone Advance 8 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/izotope_ozone_advanced8.7z" --path=c:\temp
 }
        if app23 = 1
 {
  MsgBox Winrar 5.40 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/winrar_540_nl.7z" --path=c:\temp
 }
        if app24 = 1
 {
  MsgBox Snip wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/snip.7z" --path=c:\temp
 }
         if app25 = 1
 {
  MsgBox Perfromance Test wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/performancetest.7z" --path=c:\temp
 }
	 
	 if app30 = 1
 {
	if FileExist("c:\prgfiles\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe")
	Goto, mediaplayerclassic
	if FileExist("D:\Mijn Documenten\Installatie\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe")
	Goto, mediaplayerclassic
	runwait, "D:\Mijn Documenten\Installatie\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe"
	mediaplayerclassic:
	SoundBeep, 950, 500
	MsgBox, 4096, Programma bestaat al, Programma is al geinstalleerd...

 }

         if app31 = 1
 {
  runwait, "D:\USB Stick installatie windows\_W10 installatie\Apparaatbeheer.lnk"
 }

         if app32 = 1
 {
  runwait, "D:\USB Stick installatie windows\_W10 installatie\Audioapparaten beheren"
 }
Goto, BeginScript

; ------------------------------------------------------------------------------------------------------- NEW AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------
 Startbuttonregisters:
gui, Submit

         if Folder_reset = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	 }

	  if Folder_options = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Webdavbuffer = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Webdav buffer is extented..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Delete_people_icon = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Deleting people icon from the taskbar..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Clock_with_seconds = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Display seconds after hours and seconds at tasbar times..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if DPI_and_taskbar_color_changes = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... DPI and taskbar color changes..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if UAC_low = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set UAC to lowerst security..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if Icon_distance = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Shorten distance between icons on desktop..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if Networkandmypc = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add My PC and Network icons on desktop..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Take_ownership = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Take ownership of files and folders..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Verbose_messages = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Verbose messages during boot or shutdown..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Keyboard_speed = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set keyboard to maximum speed..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Remove_timeline = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Empty timeline and remove saving from it..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Thumbs_bigger = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Make thumbs bigger at taskbar (preview)..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Windowarrang = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Aerosnap (rearange window)..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Bigger_window_copy = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Maximize window when copying..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Disable_grouping = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable grouping with open windows on taskbar..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Update_context_menu = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Update at the top off context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Copy_path = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync, 
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, 
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Context menu copy path..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Add_bat_file_to_context = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add BAT file to context NEW menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Remove_intel_context_menu = 1
	{
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Intel entries from context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Turn_sticky_keys_off = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Turn sticky keys off..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Godmode = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add godmode to context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Layout_control_panel = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel, AllItemsIconView, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel, StartupPage, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Change layout Control panel big icons..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}


	  if Always_admin = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System, EnableLUA, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Run SOME programs with Admin privilages..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

;	  if Always_admin = 1
;	{
;RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers, D:\Portables\Everything\Everything.exe, ~ RUNASADMIN
;CoordMode, ToolTip
;ToolTip , just a second and wait till every script is loaded... Run SOME programs with Admin privilages..., 0, 20, WhichToolTip
;Sleep, 300
;ToolTip
;	}

	  if Disbable_windows_update = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate, ,
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU, NoAutoUpdate, 1
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Windows Update..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}
































	  if Remove_onedrive = 1
	{
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
Sleep, 1000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Onedrive from system and sidebar..., 0, 20, WhichToolTip
ToolTip
	}

	  if Disable_powerfile_on_c = 1
	{
run powercfg -h off
Sleep, 2000
run powercfg -h off
Sleep, 2000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable and Remove hibernation file on partition..., 0, 20, WhichToolTip
ToolTip
	}







Goto, BeginScript
return
GuiClose:
ExitApp
AddCheckbox(options, VarName, Text) {
    global
    VarNames.Push(VarName)
    Gui, Add, Checkbox, %options% v%VarName%, %Text%
}
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

24 Nov 2018, 06:48

  • For my testing of your full script, I did
    • remove the first four lines
    • remove in two places the gLabel from "Start"-buttons.
  • I see you use a variable called "path".
    This might remind the AHK interpreter sufficiently of the EnvironmentVariable "PATH".
    #NoEnv is recommended here, I think.
  • I had to change some pixel values here and there to make the window look nice, you were originally cutting off the right edge of the tabs. (at least on my screen).
  • I then took just the even/odd stuff from the second function and used it in the first function.That's a lot better with three parameters rather than a RegEx.
    I'm glad that you did not have to mass-edit anything at all. :D
  • I hope that all you have to do is test the following script as-is, and check the result.
  • If the columns are OK put back the gLabels and the Admin request.
  • I hope I did not mess up your script.

Code: Select all

path := "D:\USB Stick installatie windows"
#NoEnv

#SingleInstance Force

BeginScript:
VarNames := []
Gui, Destroy
gui, Add, Tab2,w800 h400, Registers|Windows 10 instellingen|Programs en snelkoppelingen

; starts "Programs en snelkoppelingen"
Gui, Font, s10, Verdana
gui, tab, Programs en snelkoppelingen
gui, add, checkbox, y+3 vapp30, Test 1.0 MediaPlayerClassic
gui, add, checkbox, y+3 vapp31, Test 1.0 Apparatenbeheer
gui, add, checkbox, y+3 vapp32, Test 1.0 Audioapparaten_beheren
;gui, add, checkbox, y+3 vapp23, Winrar 5.40
;gui, add, checkbox, y+2 vapp15, Photoshop CS 6
;gui, add, checkbox, y+2 vapp04, Acdsee 3.1
;gui, add, checkbox, y+2 vapp07, EditPlus 4.3
;gui, add, checkbox, y+2 vapp22, Izotope Ozone Advance 8
;gui, add, checkbox, y+2 vapp18, Image Resizer 3.11
;gui, add, checkbox, y+2 vapp14, FL Studio Producer 12
;gui, add, checkbox, y+2 vapp05, Bandicam 3.4
;gui, add, checkbox, y+2 vapp24, Snip
;gui, add, checkbox, y+2 vapp17, RealTec HD Sound Drivers                                       [driver]
;gui, add, checkbox, y+2 vapp01, 7-Zip64
;gui, add, checkbox, y+2 vapp02, Acronis True Image 2018
;gui, add, checkbox, y+2 vapp03, Ammyy
;gui, add, checkbox, y+2 vapp06, Everthing
;gui, add, checkbox, y+2 vapp08, Daemon Tools Lite
;gui, add, checkbox, y+2 vapp09, Ccleaner
;gui, add, checkbox, y+2 vapp10, FileZilla
;gui, add, checkbox, y+2 vapp11, KMS Spico Windows 10 activation
;gui, add, checkbox, y+2 vapp12, Hard en Software metingen
;gui, add, checkbox, y+2 vapp13, Freemake Video Converter
;gui, add, checkbox, y+2 vapp16, Mini Tool Partition Wizard 10
;gui, add, checkbox, y+2 vapp19, Windows Iso Downloader
;gui, add, checkbox, y+2 vapp20, Winaero Tweaker
;gui, add, checkbox, y+2 vapp21, Rufus USB Creator
;gui, add, checkbox, y+2 vapp25, Perfromance Test
gui, Add, button, , Start

; starts "Systeem basis"
gui, tab, Windows 10 instellingen
Gui, Add, Text, y+3 cBlue gApparatenbeheertab , • Apparatenbeheer schijven uitschakelen
Gui, Add, Text, y+3 cRed gAutomatisch_afspelentab , • Automatisch afspelen
Gui, Add, Text, y+3 cBlue gCmdtab , • CMD instellingen
Gui, Add, Text, y+3 cBlue gGeluidsinstellingentab , • Geluidsinstellingen
Gui, Add, Text, y+3 cBlue gHerleidmappentab , • Herleid mappen naar andere locatie
Gui, Add, Text, y+3 cBlue gMapinstellingentab , • Map instellingen
Gui, Add, Text, y+3 cRed gNetwerken_weergeventab , • Netwerken weergeven
Gui, Add, Text, y+3 cBlue gEnergiebeheertab , • Pas energie aan
Gui, Add, Text, y+3 cBlue gPrestatiestab , • Prestaties aanpassen
Gui, Add, Text, y+3 cRed gSchijfbeheertab , • Schijfbeheer
Gui, Add, Text, y+3 cBlue gTaakbalkwijzigentab , • Taakbalkpictogrammen aan of uitzetten
Gui, Add, Text, y+3 cBlue gDatumentijdtab , • Wijzig datum en tijd notatie
Gui, Add, Text, y+3 cBlue gNaamvanpcwijzigentab , • Wijzig naam van de PC
Gui, Add, Text, y+3 cRed gUsercontrolpassword2tab , • Windows opstarten zonder wachtwoord
Gui, Add, Text, y+3 cRed gBenchmarktesttab , • Test warmte en snelheid van PC onderdelen
Gui, Add, Text, y+27 cGreen gSluit_explorer , ✓ Sluit en herstart explorer

; starts "Registers"
gui, tab, Registers
Gui, Add, Button, Section , Select All
Gui, Add, Button, x+m, Select None

AddCheckbox("xs cRed y+3", "Folder_reset" , "Folder reset")
AddCheckbox("Checked cGreen y+3", "Folder_options", "Change folder options (unhide and see ext.)")
AddCheckbox("Checked cGreen y+3", "Webdavbuffer", "Make Webdav buffer bigger")
AddCheckbox("Checked cGreen y+3", "Delete_people_icon", "Delete icon -> People <- from taskbar")
AddCheckbox("Checked cGreen y+3", "Clock_with_seconds", "Put seconds after hours and minutes in taskbar")
AddCheckbox("cRed y+3", "DPI_and_taskbar_color_changes", "DPI and taskbar color changes")
AddCheckbox("cRed y+3", "UAC_low", "Set UAC to lowerst security")
AddCheckbox("cBlue y+3", "Always_admin", "Run all programs with Admin privilages")
AddCheckbox("cRed y+3", "Icon_distance", "Shorten distance between icons on desktop")
AddCheckbox("Checked cGreen y+3", "Networkandmypc", "Add My PC and Network icons on desktop")
AddCheckbox("Checked cGreen y+3", "Take_ownership", "Take ownership of files and folders")
AddCheckbox("Checked cGreen y+3", "Verbose_messages", "Verbose messages during boot or shutdown")
AddCheckbox("cRed y+3", "Keyboard_speed", "Set keyboard to maximum speed")
AddCheckbox("cRed y+3", "Remove_timeline", "Empty timeline and remove saving from it")
AddCheckbox("Checked cGreen y+3", "Thumbs_bigger", "Make thumbs bigger at taskbar (preview)")
AddCheckbox("cRed y+3", "Windowarrang", "Disable Aerosnap (rearange window)")
AddCheckbox("Checked cGreen y+3", "Bigger_window_copy", "Maximize window when copying")
AddCheckbox("cRed y+3", "Disable_grouping", "Disable grouping with open windows on taskbar")
AddCheckbox("Checked cGreen y+3", "Update_context_menu", "Add Update at the top off context menu")
AddCheckbox("Checked cGreen y+3", "Copy_path", "Add to context menu COPY PATH")
AddCheckbox("cRed y+3", "Remove_intel_context_menu", "Remove Intel entries from context menu")
AddCheckbox("Checked cGreen y+3", "Add_bat_file_to_context", "Add BAT file to context NEW menu")
AddCheckbox("Checked cGreen y+3", "Turn_sticky_keys_off", "Turn sticky keys off")
AddCheckbox("Checked cGreen y+3", "Godmode", "Add godmode to context menu")
AddCheckbox("Checked cGreen y+3", "Layout_control_panel", "Change layout Control panel (big icons)")
AddCheckbox("cRed y+3", "Disbable_windows_update", "Disable Windows Update")
AddCheckbox("Checked cGreen y+3", "Disable_powerfile_on_c", "Disable and Remove hibernation file on partition")
AddCheckbox("Checked cGreen y+3", "Remove_onedrive", "Remove Onedrive from system and sidebar")
gui, Add, button, , Start
gui, Show, x50 y50,Installatiemenu nov 2018
return

ButtonSelectAll:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 1
return

ButtonSelectNone:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 0
return

;labels en scripts "Windows 10 instellingen"
Schijfbeheertab:
run diskmgmt.msc
MsgBox, 4096, Schijfbeheer, - Maak het venster beeldvullen`n- Schakel ALLE schijven in`n- Verander schijfletters: klik op een schijf en dan:`n  "Stationletter en paden wijzigen"`n- USB's en CDROM paden wijzigen
Return

Cmdtab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 2: +AlwaysOnTop
Gui, 2:Add, Picture, x0 y0, jpg\ins_ahk_cmd_eigenschappen_1.jpg
Gui, 2:Show, x1200, CMD eigenschappen
run cmd.exe
Return

Mapinstellingentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 3: +AlwaysOnTop
Gui, 3:Add, Picture, x0 y0, jpg\ins_ahk_mapinstellingen_1.jpg
Gui, 3:Show, x1200, Mapinstellingen
Run "lnk\w10Opties voor verkenner.lnk"
Return

Apparatenbeheertab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 4: +AlwaysOnTop
Gui, 4:Add, Picture, x0 y0, jpg\ins_ahk_apparaatbeheer_1.jpg
Gui, 4:Show, x1200, Device Manager
Run devmgmt.msc
Return

Geluidsinstellingentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 5: +AlwaysOnTop
Gui, 5:Add, Picture, x0 y0, jpg\ins_ahk_geluidinstellingen_1.jpg
Gui, 5:Show, y50 x1200, Geluidinstellingen
Run, mmsys.cpl
Return

Automatisch_afspelentab:
Run, "lnk\w10Automatisch afspelen voor alle media en apparaten starten of stoppen.lnk"
MsgBox, 4096, Windows automatisch afspelen,Zet alles uit wat met "automatisch" afspelen te maken heeft
Return

Netwerken_weergeventab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run, "lnk\w10Computers en apparaten in het netwerk weergeven.lnk"
MsgBox, 4096, Hou venster open en verplaats deze eventueel,Alleen controleren of alles werkt, onder andere J Versteeg en de HDD van de HD51 geactiveerd is
Return

Usercontrolpassword2tab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run Control.exe userpasswords2
MsgBox, 4096, Wachtwoord wijzingen of zonder wachtwoord inloggen,Gebruikers moeten een gebruiksnaam en wachtwoord opgeven, uitvinken
Return

Datumentijdtab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10De indeling voor datum tijd of getallen wijzigen.lnk"
gui, 6: +AlwaysOnTop
Gui, 6:Add, Picture, x0 y0, jpg\ins_ahk_datum_en_tijd_aanpassen_1.jpg
Gui, 6:Show, x1200, Datum en tijd notatie aanpassen
Return

Naamvanpcwijzigentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10De naam van deze computer wijzigen.lnk"
gui, 7: +AlwaysOnTop
Gui, 7:Add, Picture, x0 y0, jpg\ins_ahk_pcnaamgeven_1.jpg
Gui, 7:Show, x1200, PC naam geven
Return

Taakbalkwijzigentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10De taakbalk aanpassen.lnk"
gui, 8: +AlwaysOnTop
Gui, 8:Add, Picture, x0 y0, jpg\ins_ahk_pictogrammen_taakbalk_1.jpg
Gui, 8:Show, x1200, Taakbalk pictogrammen verbergen of tonen
sleep 100
Return

Energiebeheertab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10Een energiebeheerschema selecteren.lnk"
gui, 9: +AlwaysOnTop
Gui, 9:Add, Picture, x0 y0, jpg\ins_ahk_energiebeheer_1.jpg
Gui, 9:Show, x1200, Energiebeheer aanpassen
;MsgBox, 4096, Hou venster open en verplaats deze eventueel,Verander de pc naam, klik op "Wijzigen..." onderaan
Return

Prestatiestab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10Geavanceerde systeeminstellingen weergeven.lnk"
gui, 10: +AlwaysOnTop
Gui, 10:Add, Picture, x0 y0, jpg\ins_ahk_prestaties_1.jpg
Gui, 10:Show, x1200, Prestaties aanpassen
Return

Herleidmappentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10Herleid folders naar de juiste locatie.lnk"
gui, 11: +AlwaysOnTop
Gui, 11:Add, Picture, x0 y0, jpg\ins_ahk_herleid_mappen_1.jpg
Gui, 11:Show, x1200, Herleid mappen
Return

Benchmarktesttab:
run https://www.cpuid.com/softwares/hwmonitor.html
run https://www.mersenne.org/download
run https://benchmark.unigine.com/heaven
Return

; ------------------------------------------------------------------------------------------------------- OLD AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------

Turn_sticky_keys_off_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
return

Godmodus_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
return

Voeg_bat_file_toe_aan_nieuw_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
return

Verwijder_intel_reg:
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
return

Kopieer_pad_context_menu_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
return

Update_context_menu_reg:
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
return

Maak_eigendom_mappen_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
Return

Disable_grouping_of_taskbar_buttons_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
return

Groter_venster_bij_file_copy_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
return

WindowArrangementActive_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
return

Thumb_grootte_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
return

Powercfg_reg:
run powercfg -h off
return

Timeline_verwijderen_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
Return

Onedrive_van_explorer_verwijderen_reg:
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
Return

Keyboard_vertraging_aanpassen_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , BELANGRIJK: Uitloggen om veranderingen door te voeren, 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Mijnpc_en_netwerk_op_bureaublad_plaatsen_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
Return

UAC_op_laagste_niveau_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
Return

Verwijderpeople_icon_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
Return

Webdav_buffer_vergroten_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
Return

Opties_voor_verkenner_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Seconden_in_klok_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
Return

Folder_reset_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Sluit_explorer:
run taskkill /f /im explorer.exe
Sleep, 500
run explorer.exe
Return

taakbalkleur_dpi_transp_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
Return

Icoonafstand_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
Return

Verbose_berichten_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
Return


;Start button
Startbuttonprogrammas:
gui, Submit

if app01 = 1
 {
  MsgBox 7-Zip64 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/7-zip64.7z" --path=c:\temp
 }
if app02 = 1
 {
  MsgBox Acronis True Image 2018 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/ati2018_nl.7z" --path=c:\temp
 }
if app03 = 1
 {
  MsgBox Ammyy wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/ammyy.7z" --path=c:\temp
 }
 if app04 = 1
 {
  MsgBox Acdsee 3.1 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/acdsee31.7z" --path=c:\temp
 }
  if app05 = 1
 {
  MsgBox Bandicam 3.4 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/bandicam34.7z" --path=c:\temp
 }
 if app06 = 1
 {
  MsgBox Everthing wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/everything.7z" --path=c:\temp
 }
  if app07 = 1
 {
  MsgBox EditPlus 4.3 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/editplus43.7z" --path=c:\temp
 }
  if app08 = 1
 {
  MsgBox Daemon Tools Lite wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/daemon_tools_lite.7z" --path=c:\temp
 }
   if app09 = 1
 {
  MsgBox Ccleaner wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/ccleaner.7z" --path=c:\temp
 }
    if app10 = 1
 {
  MsgBox FileZilla wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/filezilla.7z" --path=c:\temp
 }
    if app11 = 1
 {
  MsgBox KMS Spico Windows 10 activation wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/windows/kmspico10.7z" --path=c:\temp
 }
    if app12 = 1
 {
  MsgBox Hard en Software metingen wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/hard_en_software_metingen.7z" --path=c:\temp
 }
    if app13 = 1
 {
  MsgBox Freemake Video Converter wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/freemakevideoconverter.7z" --path=c:\temp
 }
     if app14 = 1
 {
  MsgBox FL Studio Producer 12 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/fl_studio_producer12.7z" --path=c:\temp
 }
     if app15 = 1
 {
  MsgBox Photoshop 6 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/ps6.7z" --path=c:\temp
 }
      if app16 = 1
 {
  MsgBox Mini Tool Partition Wizard 10 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/mini_tool_partition_wizard10.7z" --path=c:\temp
 }
       if app17 = 1
 {
  MsgBox RealTec HD Sound Drivers wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/drivers/realtec_r281.7z" --path=c:\temp
 }
       if app18 = 1
 {
  MsgBox Image Resizer 3.1 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/image_resizer31.7z" --path=c:\temp
 }
       if app19 = 1
 {
  MsgBox Windows Iso Downloader wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/windows/windows_iso_downloader.7z" --path=c:\temp
 }
       if app20 = 1
 {
  MsgBox Winaero Tweaker wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/winaero_tweaker.7z" --path=c:\temp
 }
       if app21 = 1
 {
  MsgBox Rufus wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/windows/rufus_32.7z" --path=c:\temp
 }
        if app22 = 1
 {
  MsgBox Izotope Ozone Advance 8 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/izotope_ozone_advanced8.7z" --path=c:\temp
 }
        if app23 = 1
 {
  MsgBox Winrar 5.40 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/winrar_540_nl.7z" --path=c:\temp
 }
        if app24 = 1
 {
  MsgBox Snip wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/snip.7z" --path=c:\temp
 }
         if app25 = 1
 {
  MsgBox Perfromance Test wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/performancetest.7z" --path=c:\temp
 }

	 if app30 = 1
 {
	if FileExist("c:\prgfiles\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe")
	Goto, mediaplayerclassic
	if FileExist("D:\Mijn Documenten\Installatie\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe")
	Goto, mediaplayerclassic
	runwait, "D:\Mijn Documenten\Installatie\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe"
	mediaplayerclassic:
	SoundBeep, 950, 500
	MsgBox, 4096, Programma bestaat al, Programma is al geinstalleerd...

 }

         if app31 = 1
 {
  runwait, "D:\USB Stick installatie windows\_W10 installatie\Apparaatbeheer.lnk"
 }

         if app32 = 1
 {
  runwait, "D:\USB Stick installatie windows\_W10 installatie\Audioapparaten beheren"
 }
Goto, BeginScript

; ------------------------------------------------------------------------------------------------------- NEW AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------
 Startbuttonregisters:
gui, Submit

         if Folder_reset = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	 }

	  if Folder_options = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Webdavbuffer = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Webdav buffer is extented..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Delete_people_icon = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Deleting people icon from the taskbar..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Clock_with_seconds = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Display seconds after hours and seconds at tasbar times..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if DPI_and_taskbar_color_changes = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... DPI and taskbar color changes..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if UAC_low = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set UAC to lowerst security..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if Icon_distance = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Shorten distance between icons on desktop..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if Networkandmypc = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add My PC and Network icons on desktop..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Take_ownership = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Take ownership of files and folders..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Verbose_messages = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Verbose messages during boot or shutdown..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Keyboard_speed = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set keyboard to maximum speed..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Remove_timeline = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Empty timeline and remove saving from it..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Thumbs_bigger = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Make thumbs bigger at taskbar (preview)..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Windowarrang = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Aerosnap (rearange window)..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Bigger_window_copy = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Maximize window when copying..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Disable_grouping = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable grouping with open windows on taskbar..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Update_context_menu = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Update at the top off context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Copy_path = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Context menu copy path..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Add_bat_file_to_context = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add BAT file to context NEW menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Remove_intel_context_menu = 1
	{
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Intel entries from context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Turn_sticky_keys_off = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Turn sticky keys off..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Godmode = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add godmode to context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Layout_control_panel = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel, AllItemsIconView, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel, StartupPage, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Change layout Control panel big icons..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}


	  if Always_admin = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System, EnableLUA, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Run SOME programs with Admin privilages..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

;	  if Always_admin = 1
;	{
;RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers, D:\Portables\Everything\Everything.exe, ~ RUNASADMIN
;CoordMode, ToolTip
;ToolTip , just a second and wait till every script is loaded... Run SOME programs with Admin privilages..., 0, 20, WhichToolTip
;Sleep, 300
;ToolTip
;	}

	  if Disbable_windows_update = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate, ,
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU, NoAutoUpdate, 1
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Windows Update..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}
































	  if Remove_onedrive = 1
	{
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
Sleep, 1000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Onedrive from system and sidebar..., 0, 20, WhichToolTip
ToolTip
	}

	  if Disable_powerfile_on_c = 1
	{
run powercfg -h off
Sleep, 2000
run powercfg -h off
Sleep, 2000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable and Remove hibernation file on partition..., 0, 20, WhichToolTip
ToolTip
	}







Goto, BeginScript
return
GuiClose:
ExitApp



;-------------------------------------------------------------------------------
AddCheckbox(options, VarName, Text) { ; in 2 columns
;-------------------------------------------------------------------------------
    global

    static even := True     ; initially True, since 0 is even
    if (even := not even)   ; toggle even/odd
        options := StrReplace(options, "y+3", "x400 yp")
    else
        options := "xs " options
    VarNames.Push(VarName)
    Gui, Add, Checkbox, %options% v%VarName%, %Text%
}
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 07:02

Thanx mate, you are very helpful :)

it's just the way i wanted EXCEPT the (registry) scripts don't work!! when i check 1 or more, nothing happens when i press the Start button
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

24 Nov 2018, 07:07

Have you put back the gLabels?
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 07:12

Sorry i didn't do that........ i will do it in a second...
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 07:19

It works!!! thank you very much!!
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 13:04

Dear Wolf,,

my last request {*} {thanx} var=great ;)

can i ask you just one question?

how do i make this to the other tabs aswell... the 1st is now finished, and i tried to add the changes to the other tabs, but it doesn't work well
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 16:54

Update - i think i managed... hold on, i will update further

My old message:

And if you think i'm just being lazy (not saying you do), well i am trying my best to understand the script...

For this i cut out all the non important script (which has not to do with the tabs and 2 colums...

here is where i'm at now:

Code: Select all

#NoEnv
#SingleInstance Force
VarNames := []
Gui, Destroy
gui, Add, Tab2,w980 h750, Registers|Windows 10 instellingen|Programs en snelkoppelingen

gui, tab, Programs en snelkoppelingen ; tab
gui, add, checkbox, y+3 vapp30, Test 1.0 MediaPlayerClassic
gui, add, checkbox, y+3 vapp31, Test 1.0 Apparatenbeheer
gui, Add, button, gStartbuttonprogrammas, Start

gui, tab, Windows 10 instellingen ; tab
Gui, Add, Text, y+3 cBlue gApparatenbeheertab , • Apparatenbeheer schijven uitschakelen
Gui, Add, Text, y+3 cRed gAutomatisch_afspelentab , • Automatisch afspelen

gui, tab, Registers ; tab
Gui, Add, Button, Section , Select All
Gui, Add, Button, x+m, Select None
AddCheckbox("xs cRed y+3", "Folder_reset" , "Folder reset")
AddCheckbox("Checked cGreen y+3", "Folder_options", "Change folder options (unhide and see ext.)")
gui, Add, button, gStartbuttonregisters, Start
gui, Show, w980 h750,Installatiemenu nov 2018
return

ButtonSelectAll:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 1
return

ButtonSelectNone:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 0
return

;labels en scripts "Windows 10 instellingen"
Apparatenbeheertab:
Run devmgmt.msc
Return

Automatisch_afspelentab:
MsgBox, 4096, Windows automatisch afspelen,Zet alles uit wat met "automatisch" afspelen te maken heeft
Return
; ------------------------------------------------------------------------------------------------------- OLD AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------
Startbuttonprogrammas:
gui, Submit

	 if app30 = 1
 {
	MsgBox, 4096, Programma bestaat al, Programma is al geinstalleerd...
 }

	 if app31 = 1
 {
  runwait, "D:\USB Stick installatie windows\_W10 installatie\Apparaatbeheer.lnk"
 }
Return
; ------------------------------------------------------------------------------------------------------- NEW AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------
 Startbuttonregisters:
gui, Submit

         if Folder_reset = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
	 }

	  if Folder_options = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
	}

return
GuiClose:
ExitApp
;-------------------------------------------------------------------------------
AddCheckbox(options, VarName, Text) { ; in 2 columns
;-------------------------------------------------------------------------------
    global

    static even := True     ; initially True, since 0 is even
    if (even := not even)   ; toggle even/odd
        options := StrReplace(options, "y+3", "x400 yp")
    else
        options := "xs " options
    VarNames.Push(VarName)
    Gui, Add, Checkbox, %options% v%VarName%, %Text%
}
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 18:08

Well it works........... almost.......

but when the script is finished... the select all and select none are somewhat overlapped by the lines ex: folder reset
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 18:34

here is my script, but again, with the strange situation of the buttons go a little bit off

Code: Select all

If Not A_IsAdmin
{
Run *RunAs "%A_AhkPath%" "%A_ScriptFullPath%"
ExitApp
}
path := "D:\USB Stick installatie windows"
#NoEnv

#SingleInstance Force

BeginScript:
VarNames := []
Gui, Destroy
gui, Add, Tab2,w980 h750, Registers|Windows 10 instellingen|Programs en snelkoppelingen

; starts "Programs en snelkoppelingen"
Gui, Font, s10, Verdana
gui, tab, Programs en snelkoppelingen
Gui, Add, Button, Section , Select All
Gui, Add, Button, x+m, Select None
AddCheckbox("xs cRed y+3", "app30" , "Test 1.0 MediaPlayerClassic")
AddCheckbox("Checked cGreen y+3", "app31", "Test 1.0 Apparatenbeheer")
AddCheckbox("Checked cGreen y+3", "app32", "Test 1.0 Audioapparaten_beheren")
;gui, add, checkbox, y+3 vapp23, Winrar 5.40
;gui, add, checkbox, y+2 vapp15, Photoshop CS 6
;gui, add, checkbox, y+2 vapp04, Acdsee 3.1
;gui, add, checkbox, y+2 vapp07, EditPlus 4.3
;gui, add, checkbox, y+2 vapp22, Izotope Ozone Advance 8
;gui, add, checkbox, y+2 vapp18, Image Resizer 3.11
;gui, add, checkbox, y+2 vapp14, FL Studio Producer 12
;gui, add, checkbox, y+2 vapp05, Bandicam 3.4
;gui, add, checkbox, y+2 vapp24, Snip
;gui, add, checkbox, y+2 vapp17, RealTec HD Sound Drivers                                       [driver]
;gui, add, checkbox, y+2 vapp01, 7-Zip64
;gui, add, checkbox, y+2 vapp02, Acronis True Image 2018
;gui, add, checkbox, y+2 vapp03, Ammyy
;gui, add, checkbox, y+2 vapp06, Everthing
;gui, add, checkbox, y+2 vapp08, Daemon Tools Lite
;gui, add, checkbox, y+2 vapp09, Ccleaner
;gui, add, checkbox, y+2 vapp10, FileZilla
;gui, add, checkbox, y+2 vapp11, KMS Spico Windows 10 activation
;gui, add, checkbox, y+2 vapp12, Hard en Software metingen
;gui, add, checkbox, y+2 vapp13, Freemake Video Converter
;gui, add, checkbox, y+2 vapp16, Mini Tool Partition Wizard 10
;gui, add, checkbox, y+2 vapp19, Windows Iso Downloader
;gui, add, checkbox, y+2 vapp20, Winaero Tweaker
;gui, add, checkbox, y+2 vapp21, Rufus USB Creator
;gui, add, checkbox, y+2 vapp25, Perfromance Test
gui, Add, button, gStartbuttonprogrammas, Start

; starts "Systeem basis"
gui, tab, Windows 10 instellingen
Gui, Add, Text, y+3 cBlue gApparatenbeheertab , • Apparatenbeheer schijven uitschakelen
Gui, Add, Text, y+3 cRed gAutomatisch_afspelentab , • Automatisch afspelen
Gui, Add, Text, y+3 cBlue gCmdtab , • CMD instellingen
Gui, Add, Text, y+3 cBlue gGeluidsinstellingentab , • Geluidsinstellingen
Gui, Add, Text, y+3 cBlue gHerleidmappentab , • Herleid mappen naar andere locatie
Gui, Add, Text, y+3 cBlue gMapinstellingentab , • Map instellingen
Gui, Add, Text, y+3 cRed gNetwerken_weergeventab , • Netwerken weergeven
Gui, Add, Text, y+3 cBlue gEnergiebeheertab , • Pas energie aan
Gui, Add, Text, y+3 cBlue gPrestatiestab , • Prestaties aanpassen
Gui, Add, Text, y+3 cRed gSchijfbeheertab , • Schijfbeheer
Gui, Add, Text, y+3 cBlue gTaakbalkwijzigentab , • Taakbalkpictogrammen aan of uitzetten
Gui, Add, Text, y+3 cBlue gDatumentijdtab , • Wijzig datum en tijd notatie
Gui, Add, Text, y+3 cBlue gNaamvanpcwijzigentab , • Wijzig naam van de PC
Gui, Add, Text, y+3 cRed gUsercontrolpassword2tab , • Windows opstarten zonder wachtwoord
Gui, Add, Text, y+3 cRed gBenchmarktesttab , • Test warmte en snelheid van PC onderdelen
Gui, Add, Text, y+27 cGreen gSluit_explorer , ✓ Sluit en herstart explorer

; starts "Registers"
gui, tab, Registers
Gui, Add, Button, Section , Select All
Gui, Add, Button, x+m, Select None
AddCheckbox("xs cRed y+3", "Folder_reset" , "Folder reset")
AddCheckbox("Checked cGreen y+3", "Folder_options", "Change folder options (unhide and see ext.)")
AddCheckbox("Checked cGreen y+3", "Webdavbuffer", "Make Webdav buffer bigger")
AddCheckbox("Checked cGreen y+3", "Delete_people_icon", "Delete icon -> People <- from taskbar")
AddCheckbox("Checked cGreen y+3", "Clock_with_seconds", "Put seconds after hours and minutes in taskbar")
AddCheckbox("cRed y+3", "DPI_and_taskbar_color_changes", "DPI and taskbar color changes")
AddCheckbox("cRed y+3", "UAC_low", "Set UAC to lowerst security")
AddCheckbox("cBlue y+3", "Always_admin", "Run all programs with Admin privilages")
AddCheckbox("cRed y+3", "Icon_distance", "Shorten distance between icons on desktop")
AddCheckbox("Checked cGreen y+3", "Networkandmypc", "Add My PC and Network icons on desktop")
AddCheckbox("Checked cGreen y+3", "Take_ownership", "Take ownership of files and folders")
AddCheckbox("Checked cGreen y+3", "Verbose_messages", "Verbose messages during boot or shutdown")
AddCheckbox("cRed y+3", "Keyboard_speed", "Set keyboard to maximum speed")
AddCheckbox("cRed y+3", "Remove_timeline", "Empty timeline and remove saving from it")
AddCheckbox("Checked cGreen y+3", "Thumbs_bigger", "Make thumbs bigger at taskbar (preview)")
AddCheckbox("cRed y+3", "Windowarrang", "Disable Aerosnap (rearange window)")
AddCheckbox("Checked cGreen y+3", "Bigger_window_copy", "Maximize window when copying")
AddCheckbox("cRed y+3", "Disable_grouping", "Disable grouping with open windows on taskbar")
AddCheckbox("Checked cGreen y+3", "Update_context_menu", "Add Update at the top off context menu")
AddCheckbox("Checked cGreen y+3", "Copy_path", "Add to context menu COPY PATH")
AddCheckbox("cRed y+3", "Remove_intel_context_menu", "Remove Intel entries from context menu")
AddCheckbox("Checked cGreen y+3", "Add_bat_file_to_context", "Add BAT file to context NEW menu")
AddCheckbox("Checked cGreen y+3", "Turn_sticky_keys_off", "Turn sticky keys off")
AddCheckbox("Checked cGreen y+3", "Godmode", "Add godmode to context menu")
AddCheckbox("Checked cGreen y+3", "Layout_control_panel", "Change layout Control panel (big icons)")
AddCheckbox("cRed y+3", "Disbable_windows_update", "Disable Windows Update")
AddCheckbox("cGreen y+3", "Disable_powerfile_on_c", "Disable and Remove hibernation file on partition")
AddCheckbox("cGreen y+3", "Remove_onedrive", "Remove Onedrive from system and sidebar")
gui, Add, button, gStartbuttonregisters, Start
;gui, Show, x50 y50,Installatiemenu nov 2018
gui, Show, w980 h750,Installatiemenu nov 2018
return

ButtonSelectAll:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 1
return

ButtonSelectNone:
    for each, VarName in VarNames
        GuiControl,, %VarName%, 0
return

;labels en scripts "Windows 10 instellingen"
Schijfbeheertab:
run diskmgmt.msc
MsgBox, 4096, Schijfbeheer, - Maak het venster beeldvullen`n- Schakel ALLE schijven in`n- Verander schijfletters: klik op een schijf en dan:`n  "Stationletter en paden wijzigen"`n- USB's en CDROM paden wijzigen
Return

Cmdtab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 2: +AlwaysOnTop
Gui, 2:Add, Picture, x0 y0, jpg\ins_ahk_cmd_eigenschappen_1.jpg
Gui, 2:Show, x1200, CMD eigenschappen
run cmd.exe
Return

Mapinstellingentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 3: +AlwaysOnTop
Gui, 3:Add, Picture, x0 y0, jpg\ins_ahk_mapinstellingen_1.jpg
Gui, 3:Show, x1200, Mapinstellingen
Run "lnk\w10Opties voor verkenner.lnk"
Return

Apparatenbeheertab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 4: +AlwaysOnTop
Gui, 4:Add, Picture, x0 y0, jpg\ins_ahk_apparaatbeheer_1.jpg
Gui, 4:Show, x1200, Device Manager
Run devmgmt.msc
Return

Geluidsinstellingentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
gui, 5: +AlwaysOnTop
Gui, 5:Add, Picture, x0 y0, jpg\ins_ahk_geluidinstellingen_1.jpg
Gui, 5:Show, y50 x1200, Geluidinstellingen
Run, mmsys.cpl
Return

Automatisch_afspelentab:
Run, "lnk\w10Automatisch afspelen voor alle media en apparaten starten of stoppen.lnk"
MsgBox, 4096, Windows automatisch afspelen,Zet alles uit wat met "automatisch" afspelen te maken heeft
Return

Netwerken_weergeventab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run, "lnk\w10Computers en apparaten in het netwerk weergeven.lnk"
MsgBox, 4096, Hou venster open en verplaats deze eventueel,Alleen controleren of alles werkt, onder andere J Versteeg en de HDD van de HD51 geactiveerd is
Return

Usercontrolpassword2tab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run Control.exe userpasswords2
MsgBox, 4096, Wachtwoord wijzingen of zonder wachtwoord inloggen,Gebruikers moeten een gebruiksnaam en wachtwoord opgeven, uitvinken
Return

Datumentijdtab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10De indeling voor datum tijd of getallen wijzigen.lnk"
gui, 6: +AlwaysOnTop
Gui, 6:Add, Picture, x0 y0, jpg\ins_ahk_datum_en_tijd_aanpassen_1.jpg
Gui, 6:Show, x1200, Datum en tijd notatie aanpassen
Return

Naamvanpcwijzigentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10De naam van deze computer wijzigen.lnk"
gui, 7: +AlwaysOnTop
Gui, 7:Add, Picture, x0 y0, jpg\ins_ahk_pcnaamgeven_1.jpg
Gui, 7:Show, x1200, PC naam geven
Return

Taakbalkwijzigentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10De taakbalk aanpassen.lnk"
gui, 8: +AlwaysOnTop
Gui, 8:Add, Picture, x0 y0, jpg\ins_ahk_pictogrammen_taakbalk_1.jpg
Gui, 8:Show, x1200, Taakbalk pictogrammen verbergen of tonen
sleep 100
Return

Energiebeheertab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10Een energiebeheerschema selecteren.lnk"
gui, 9: +AlwaysOnTop
Gui, 9:Add, Picture, x0 y0, jpg\ins_ahk_energiebeheer_1.jpg
Gui, 9:Show, x1200, Energiebeheer aanpassen
;MsgBox, 4096, Hou venster open en verplaats deze eventueel,Verander de pc naam, klik op "Wijzigen..." onderaan
Return

Prestatiestab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10Geavanceerde systeeminstellingen weergeven.lnk"
gui, 10: +AlwaysOnTop
Gui, 10:Add, Picture, x0 y0, jpg\ins_ahk_prestaties_1.jpg
Gui, 10:Show, x1200, Prestaties aanpassen
Return

Herleidmappentab:
IfWinExist, ahk_class CabinetWClass
{
 WinMinimize, ahk_class CabinetWClass
}
Run "lnk\w10Herleid folders naar de juiste locatie.lnk"
gui, 11: +AlwaysOnTop
Gui, 11:Add, Picture, x0 y0, jpg\ins_ahk_herleid_mappen_1.jpg
Gui, 11:Show, x1200, Herleid mappen
Return

Benchmarktesttab:
run https://www.cpuid.com/softwares/hwmonitor.html
run https://www.mersenne.org/download
run https://benchmark.unigine.com/heaven
Return

; ------------------------------------------------------------------------------------------------------- OLD AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------

Turn_sticky_keys_off_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
return

Godmodus_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
return

Voeg_bat_file_toe_aan_nieuw_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
return

Verwijder_intel_reg:
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
return

Kopieer_pad_context_menu_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
return

Update_context_menu_reg:
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
return

Maak_eigendom_mappen_reg:
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
Return

Disable_grouping_of_taskbar_buttons_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
return

Groter_venster_bij_file_copy_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
return

WindowArrangementActive_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
return

Thumb_grootte_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
return

Powercfg_reg:
run powercfg -h off
return

Timeline_verwijderen_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
Return

Onedrive_van_explorer_verwijderen_reg:
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run %SystemRoot%\SysWOW64\OneDriveSetup.exe /uninstall
Return

Keyboard_vertraging_aanpassen_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , BELANGRIJK: Uitloggen om veranderingen door te voeren, 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Mijnpc_en_netwerk_op_bureaublad_plaatsen_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
Return

UAC_op_laagste_niveau_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
Return

Verwijderpeople_icon_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
Return

Webdav_buffer_vergroten_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
Return

Opties_voor_verkenner_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Seconden_in_klok_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
Return

Folder_reset_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 0, WhichToolTip
Sleep, 5000
ToolTip
Return

Sluit_explorer:
run taskkill /f /im explorer.exe
Sleep, 500
run explorer.exe
Return

taakbalkleur_dpi_transp_reg:
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
Return

Icoonafstand_reg:
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
Return

Verbose_berichten_reg:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
Return


;Start button
Startbuttonprogrammas:
gui, Submit

if app01 = 1
 {
  MsgBox 7-Zip64 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/7-zip64.7z" --path=c:\temp
 }
if app02 = 1
 {
  MsgBox Acronis True Image 2018 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/ati2018_nl.7z" --path=c:\temp
 }
if app03 = 1
 {
  MsgBox Ammyy wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/ammyy.7z" --path=c:\temp
 }
 if app04 = 1
 {
  MsgBox Acdsee 3.1 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/acdsee31.7z" --path=c:\temp
 }
  if app05 = 1
 {
  MsgBox Bandicam 3.4 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/bandicam34.7z" --path=c:\temp
 }
 if app06 = 1
 {
  MsgBox Everthing wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/everything.7z" --path=c:\temp
 }
  if app07 = 1
 {
  MsgBox EditPlus 4.3 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/editplus43.7z" --path=c:\temp
 }
  if app08 = 1
 {
  MsgBox Daemon Tools Lite wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/daemon_tools_lite.7z" --path=c:\temp
 }
   if app09 = 1
 {
  MsgBox Ccleaner wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/ccleaner.7z" --path=c:\temp
 }
    if app10 = 1
 {
  MsgBox FileZilla wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/filezilla.7z" --path=c:\temp
 }
    if app11 = 1
 {
  MsgBox KMS Spico Windows 10 activation wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/windows/kmspico10.7z" --path=c:\temp
 }
    if app12 = 1
 {
  MsgBox Hard en Software metingen wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/hard_en_software_metingen.7z" --path=c:\temp
 }
    if app13 = 1
 {
  MsgBox Freemake Video Converter wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/freemakevideoconverter.7z" --path=c:\temp
 }
     if app14 = 1
 {
  MsgBox FL Studio Producer 12 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/fl_studio_producer12.7z" --path=c:\temp
 }
     if app15 = 1
 {
  MsgBox Photoshop 6 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/installatie/ps6.7z" --path=c:\temp
 }
      if app16 = 1
 {
  MsgBox Mini Tool Partition Wizard 10 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --username=my_username --password=my_password "/Root/portables/mini_tool_partition_wizard10.7z" --path=c:\temp
 }
       if app17 = 1
 {
  MsgBox RealTec HD Sound Drivers wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/drivers/realtec_r281.7z" --path=c:\temp
 }
       if app18 = 1
 {
  MsgBox Image Resizer 3.1 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/image_resizer31.7z" --path=c:\temp
 }
       if app19 = 1
 {
  MsgBox Windows Iso Downloader wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/windows/windows_iso_downloader.7z" --path=c:\temp
 }
       if app20 = 1
 {
  MsgBox Winaero Tweaker wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/winaero_tweaker.7z" --path=c:\temp
 }
       if app21 = 1
 {
  MsgBox Rufus wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/windows/rufus_32.7z" --path=c:\temp
 }
        if app22 = 1
 {
  MsgBox Izotope Ozone Advance 8 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/izotope_ozone_advanced8.7z" --path=c:\temp
 }
        if app23 = 1
 {
  MsgBox Winrar 5.40 wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/winrar_540_nl.7z" --path=c:\temp
 }
        if app24 = 1
 {
  MsgBox Snip wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/snip.7z" --path=c:\temp
 }
         if app25 = 1
 {
  MsgBox Perfromance Test wordt gedownload
  runwait, "D:\Portables\Mega cmd\megatools.exe" get --no-progress --username=my_username --password=my_password "/Root/installatie/performancetest.7z" --path=c:\temp
 }

	 if app30 = 1
 {
MsgBox, 4096, line 1
;if FileExist("c:\prgfiles\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe")
;	Goto, mediaplayerclassic
;	if FileExist("D:\Mijn Documenten\Installatie\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe")
;	Goto, mediaplayerclassic
;	runwait, "D:\Mijn Documenten\Installatie\K-Lite Codec Pack\MPC-HC64\mpc-hc64.exe"
;	mediaplayerclassic:
;	SoundBeep, 950, 500
;	MsgBox, 4096, Programma bestaat al, Programma is al geinstalleerd...
;
 }

         if app31 = 1
 {
MsgBox, 4096, line 2
;  runwait, "D:\USB Stick installatie windows\_W10 installatie\Apparaatbeheer.lnk"
 }

         if app32 = 1
 {
MsgBox, 4096, line 3
;  runwait, "D:\USB Stick installatie windows\_W10 installatie\Audioapparaten beheren"
 }
Goto, BeginScript

; ------------------------------------------------------------------------------------------------------- NEW AHK REGISTRY CHANGES ----------------------------------------------------------------------------------------------------------
 Startbuttonregisters:
gui, Submit

         if Folder_reset = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell, BagMRU Size, 00020000
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\Bags\AllFolders\Shell, FolderType, NotSpecified
RegWrite, REG_SZ, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, - ;hoeft misschien niet
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Folders zijn zo ingesteld dat zij allen op dezelfde manier worden vertoont..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	 }

	  if Folder_options = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowRecent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer, ShowFrequent, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\CabinetState, FullPath, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, LaunchTo, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, Hidden, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, HideFileExt, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced, ShowSuperHidden, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Opties voor verkenner zijn ingesteld zoals het zien van verborgen bestanden en extenties verbergen..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Webdavbuffer = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\WebClient\Parameters, FileAttributesLimitInBytes, 1000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Webdav buffer is extented..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Delete_people_icon = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\People , PeopleBand, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Deleting people icon from the taskbar..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Clock_with_seconds = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced , ShowSecondsInSystemClock, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Display seconds after hours and seconds at tasbar times..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if DPI_and_taskbar_color_changes = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColor, 4282927692
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, AccentColorInactive, 4288387995
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, UseDpiScaling, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\DWM, ColorPrevalence, 1
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, ColorPrevalence, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, EnableTransparency, 00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Themes\Personalize, AppsUseLightTheme, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... DPI and taskbar color changes..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if UAC_low = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , ConsentPromptBehaviorAdmin, 00000000
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , EnableLUA, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , PromptOnSecureDesktop, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set UAC to lowerst security..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if Icon_distance = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconSpacing, -1125
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics, IconVerticalSpacing, -700
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Shorten distance between icons on desktop..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

          if Networkandmypc = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {F02C1A0D-BE21-4350-88B0-7367FC96EF3C}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add My PC and Network icons on desktop..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Take_ownership = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\*\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, ,Take Ownership
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NoWorkingDirectory
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, NeverDefault
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership, HasLUAShield
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, , powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\Directory\shell\TakeOwnership\command, IsolatedCommand, powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/c takeown /f \"`%1\" /r /d y && icacls \"`%1\" /grant *S-1-3-4:F /t /c /l /q & pause' -Verb runAs"
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Take ownership of files and folders..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Verbose_messages = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System , VerboseStatus, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Verbose messages during boot or shutdown..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Keyboard_speed = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, InitialKeyboardIndicators, 2
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardDelay, 0
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Keyboard, KeyboardSpeed, 31
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Set keyboard to maximum speed..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Remove_timeline = 1
	{
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System , EnableActivityFeed, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Empty timeline and remove saving from it..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Thumbs_bigger = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MaxThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, MinThumbSizePx, 00000515
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingXPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, ThumbSpacingYPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, TopMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, BottomMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, LeftMarginPx, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband, RightMarginPx, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Make thumbs bigger at taskbar (preview)..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Windowarrang = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Desktop, WindowArrangementActive, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Aerosnap (rearange window)..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Bigger_window_copy = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\OperationStatusManager, EnthusiastMode, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Maximize window when copying..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Disable_grouping = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoTaskGrouping, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable grouping with open windows on taskbar..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Update_context_menu = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Icon, c:\\windows\\System32\\shell32.dll`,-47
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update, Position, Top
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Classes\DesktopBackground\Shell\Windows Update\Command, , explorer ms-settings:windowsupdate
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Update at the top off context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Copy_path = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CanonicalName, {707C7BC6-685A-4A4D-A275-3966A5A3EFAA}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateHandler, {3B1599F9-E00A-4BBF-AD3E-B3F99FA87779}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, CommandStateSync,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath,
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Description, @shell32.dll`,-30336
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, Icon, imageres.dll`,-5302
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, MUIVerb, @shell32.dll`,-30329
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbHandler, {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, VerbName, copyaspath
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\windows.copyaspath, InvokeCommandOnSelection, 1
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\CopyAsPathMenu, , {f3d06e7c-1e45-4a26-847e-f9fcdee59be0}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add Context menu copy path..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Add_bat_file_to_context = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\.bat\ShellNew, NullFile,
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add BAT file to context NEW menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Remove_intel_context_menu = 1
	{
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxcui
RegDelete, HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\igfxDTCM
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Intel entries from context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Turn_sticky_keys_off = 1
	{
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\StickyKeys, Flags, 506
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\Keyboard Response, Flags, 122
RegWrite, REG_SZ, HKEY_CURRENT_USER\Control Panel\Accessibility\ToggleKeys, Flags, 58
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Turn sticky keys off..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Godmode = 1
	{
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, ,God Mode
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Icon, control.exe
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode, Position,Top
RegWrite, REG_SZ, HKEY_CLASSES_ROOT\DesktopBackground\Shell\GodMode\command, , explorer shell:::{ED7BA470-8E54-465E-825C-99712043E01C}
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add godmode to context menu..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

	  if Layout_control_panel = 1
	{
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel, AllItemsIconView, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ControlPanel, StartupPage, 00000001
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Change layout Control panel big icons..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}


	  if Always_admin = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System, EnableLUA, 0
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Run SOME programs with Admin privilages..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}

;	  if Always_admin = 1
;	{
;RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers, D:\Portables\Everything\Everything.exe, ~ RUNASADMIN
;CoordMode, ToolTip
;ToolTip , just a second and wait till every script is loaded... Run SOME programs with Admin privilages..., 0, 20, WhichToolTip
;Sleep, 300
;ToolTip
;	}

	  if Disbable_windows_update = 1
	{
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate, ,
RegWrite, REG_SZ, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU, NoAutoUpdate, 1
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable Windows Update..., 0, 20, WhichToolTip
Sleep, 300
ToolTip
	}




	  if Remove_onedrive = 1
	{
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
RegWrite, REG_DWORD, HKEY_CLASSES_ROOT\Wow6432Node\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6} , System.IsPinnedToNameSpaceTree, 00000000
run c:\windows\SysWOW64\OneDriveSetup.exe /uninstall
Sleep, 1000
run c:\windows\SysWOW64\OneDriveSetup.exe /uninstall
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Remove Onedrive from system and sidebar..., 0, 20, WhichToolTip
ToolTip
	}

	  if Disable_powerfile_on_c = 1
	{
run powercfg -h off
Sleep, 2000
run powercfg -h off
Sleep, 2000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Disable and Remove hibernation file on partition..., 0, 20, WhichToolTip
ToolTip
	}



Goto, BeginScript
return
GuiClose:
ExitApp



;-------------------------------------------------------------------------------
AddCheckbox(options, VarName, Text) { ; in 2 columns
;-------------------------------------------------------------------------------
    global

    static even := True     ; initially True, since 0 is even
    if (even := not even)   ; toggle even/odd
        options := StrReplace(options, "y+3", "x400 yp")
    else
        options := "xs " options
    VarNames.Push(VarName)
    Gui, Add, Checkbox, %options% v%VarName%, %Text%
}
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

24 Nov 2018, 18:50

Well i've noticed that this line gives the problems:

Code: Select all

;-------------------------------------------------------------------------------
AddCheckbox(options, VarName, Text) { ; in 2 columns
;-------------------------------------------------------------------------------
    global

    static even := True     ; initially True, since 0 is even
    if (even := not even)   ; toggle even/odd
        options := StrReplace(options, "y+3", "x400 yp")
    else
        options := "xs " options
    VarNames.Push(VarName)
    Gui, Add, Checkbox, %options% v%VarName%, %Text%
}
if i add 1 line, the buttons are slightly shorten, when a add another (or delete one) the buttons are fine...

this is ok, i guess i can add just 1 line of scripts to it ;)

but can this be fixed easy? (if not, don't spend anymore time for me, you've done enough already)
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

24 Nov 2018, 23:35

Your script took a lot of effort to write, I imagine. Hats off :thumbup: :bravo:


I can not see an easy fix right now, sorry. :(


I discovered a mistake though, take out my leftovers from your script to fix:

Code: Select all

AddCheckbox("xs cRed y+3", "Folder_reset" , "Folder reset") ; <-- wrong
AddCheckbox("cRed y+3", "Folder_reset" , "Folder reset") ; <-- right
The surplus "xs " was needed in the very first suggestion, where there was a second Button added in the row above and no columns in sight anywhere.
With two columns, all the odd boxes need it, not just the first. I forgot to remove it when adding columns. sorry


Same thing here, "xs " it is not needed. sorry my leftovers led you to believe otherwise.

Code: Select all

AddCheckbox("xs cRed y+3", "app30" , "Test 1.0 MediaPlayerClassic") ; <-- wrong
AddCheckbox("cRed y+3", "app30" , "Test 1.0 MediaPlayerClassic") ; <-- right

However, there is a way to get all pixels perfectly right such as you desire, it is not really hard, but requires more work.

Goto causes "spaghetti" structure. In structured programming style GoTo is forbidden.
To fix the problems with pixel and sizes, you could maybe use a more structured script.
I can help you with a more structured script in case you want to try.

Return to “Ask For Help”

Who is online

Users browsing this forum: aftskin, austin4149, Bad husband, Google [Bot], mikeyww, songdg and 54 guests