Check all or clear all checkboxes

Get help with using AutoHotkey (v1.1 and older) and its commands and hotkeys
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

25 Nov 2018, 06:34

You don't have say sorry, i am very thankful you helped me, it was alot of effort yes, but with great help i couldn't do anything...

i changed like you suggested and was able to fix the "test 1.0 mediaplayerclassic" section on my own, but your fix does make more sence :)

I would always like to be more structured, so here's my scripts with all the changes:

Thanx for the compliment and help mate :)

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
AddCheckbox("cRed y+3", "app30" , "Test 1.0 MediaPlayerClassic")
AddCheckbox("Checked cGreen y+3", "app33", "Test 1.0 Apparatenbeheer1")
AddCheckbox("cGreen y+3", "app31", "Test 1.0 Audioapparaten_beheren2")
AddCheckbox("cGreen y+3", "app32", "Test 1.0 Audioapparaten_beheren3")
;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("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("cGreen 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, Control Panel 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\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 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\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel, {5399E694-6CE5-4D6C-8FCE-1D8870FDCBA0}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu, {5399E694-6CE5-4D6C-8FCE-1D8870FDCBA0}, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add My PC and Control panel 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%
}
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

25 Nov 2018, 08:29

I just ran the script you posted. There are issues left we have not mentioned yet. Adding a Tab with more VarNames needs more work, currently the "Select All" function will select all checkboxes on all Tabs, not just the tab where the button is. Same with "Select None" button.

OK, I have cut your full script into 5 pieces, with the intention to facilitate working on 3 Tabs, working on AllYourWork, and working on integration, all separated into each own file. I started with the three tabs, each one get its own file, which contains a single Label and that Label is closed with a return. Please check to see I have left all the code untouched, I only wrapped them up nicely.
Spoiler
Spoiler
Spoiler
Note: The start buttons have AGAIN no gLabels. I gave them access to a global variable, and that Variable only gets created when you Enter in Admin mode. I intend to test your script myself as I go along, and all I have to do is comment out two lines. I will post that bit later as well.
Spoiler
Check how I did split the script. There are two GOTO command in all your hard work, they should be replaced later, rather can be deleted later, we don't need to replace the second one with a return, a return is already present for the second one.

As soon as you recover from the code-surgery performed, look at what's left:
Spoiler
The final bit is the piece I plan top help you with, I do not plan to touch or test any of your implementations, I want to help, and I need to have some comfort in doing so. Can you please check out how I dealt with the gLabels, it is meant to protect my system from me accidentally messing up my registry.

Just put all 5 pieces in their own file, run the glue part (which has #include lines) and test and make sure it is all as I say.
Then we tackle first the two gotos left from the huge part of the script.
That is enough for now, remember: this step is a success, if we both find all the same mistakes still happening, no attempt has been made yet to fix, all effort is put into splitting up your script. Let me know if the script works for you as intended, as I only want to check the position of the boxes, and the select all/none stuff. As soon as you are OK with the splitting, we continue.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

25 Nov 2018, 09:27

Thanx !! i always wanted to devide the scripts, but i didn't know how...

Maybe you already knew, but when select all or none, the other tabs are also checked or unchecked...

And yes, i didn't even thought the other tabs reacted to the 1st tab of the buttons: select all or none buttons. I dont think if the 1st tab all is checked, the other tabs will be performed aswel when starting the proccess..

I've done it, put these in 5 files named: AllMyWork.ahk, menu.ahk, Programs en snelkoppelingen.ahk, Registers.ahk and Systeem basis.ahk

just to make sure i've done it right here are the files individually, beginning with the main file:

menu.ahk:

Code: Select all

; wolf_II's glue for loek3000's Installatiemenu script.ahk



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

If Not A_IsAdmin {
    ;~ Run *RunAs "%A_AhkPath%" "%A_ScriptFullPath%"
    ;~ ExitApp
} else {
    Registers_Start := "gStartbuttonregisters"
    ProgramsEnSnelkoppelingen_Start := "gStartbuttonprogrammas"
}

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

goSub, ProgramsEnSnelkoppelingen
goSub, SysteemBasis
goSub,Registers
    ;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
GuiClose:
ExitApp

#Include Registers.ahk
#Include Programs en snelkoppelingen.ahk
#Include Systeem basis.ahk
#Include AllMyWork.ahk


;-------------------------------------------------------------------------------
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%
}
AllMyWork.ahk:

Code: Select all

; AllMyWork.ahk



;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\NewStartPanel , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 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\ClassicStartMenu , {20D04FE0-3AEA-1069-A2D8-08002B30309D}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel, {5399E694-6CE5-4D6C-8FCE-1D8870FDCBA0}, 00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu, {5399E694-6CE5-4D6C-8FCE-1D8870FDCBA0}, 00000000
CoordMode, ToolTip
ToolTip , just a second and wait till every script is loaded... Add My PC and Control panel 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
Programs en snelkoppelingen.ahk:

Code: Select all

; Programs en snelkoppelingen.ahk



;-------------------------------------------------------------------------------
ProgramsEnSnelkoppelingen: ; starts "Programs en snelkoppelingen"
;-------------------------------------------------------------------------------
    Gui, Tab, Programs en snelkoppelingen

    AddCheckbox("cRed y+3", "app30", "Test 1.0 MediaPlayerClassic")
    AddCheckbox("Checked cGreen y+3", "app33", "Test 1.0 Apparatenbeheer1")
    AddCheckbox("cGreen y+3", "app31", "Test 1.0 Audioapparaten_beheren2")
    AddCheckbox("cGreen y+3", "app32", "Test 1.0 Audioapparaten_beheren3")

    ;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, %ProgramsEnSnelkoppelingen_Start%, Start

return
Systeem basis.ahk

Code: Select all

; Systeem basis.ahk



;-------------------------------------------------------------------------------
SysteemBasis: ; 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

return
Registers.ahk

Code: Select all

; Registers.ahk



;-------------------------------------------------------------------------------
Registers: ; starts "Registers"
;-------------------------------------------------------------------------------

    Gui, Tab, Registers
    Gui, Add, Button, Section, Select All
    Gui, Add, Button, x+m, Select None

    AddCheckbox("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("cGreen 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, Control Panel 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, %Registers_Start%, Start

return
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

25 Nov 2018, 12:12

OK, I had a closer look at all the stuff you did, and only now noticed you have more Guis in there. I do not expect to have any side effect on these, but I would not be able to tell, so you have to be aware of that.

I found out why the "Start" buttons themselves don't line up as I wanted them to. I inserted the fix for this, it is another two occurrances of "xs", this time they are missing from the code. As before, in the sequence of events, first I put XS for the first checkbox only, (xs is used to left-align with the control above with the Section keyword. Then I wanted to put the XS for every other checkbox and not just the first one and forgot to remove the first one. I still intend to use it, but I need to use it correctly for these changes. Fix x2 included.

Next, I submit a zip-file for ease of communication. Please check: All code is essentially the same still. But I have altered FileNames, my originally chosen names were based on the Headers of the tabs. As an extra security measure, I have altered the extension of AllMyWork.ahk to AllMyWork.loek. When #Incuding such a file there is no problem, as you can see. It I is not a valid stand-alone AHK script any longer (nothing useful will happen when started) so I explore the possibilty of a home-made file extension. Feel free to suggest anything to your liking as filenames, or maybe change them in 5 years from now. I am experimenting with how to not mess up my registry.

Here is all the changes so far in one packet:
loek3000.Installatiemenu.v1.00.zip
(9.82 KiB) Downloaded 97 times
There are only two GOTO commands left, they are in a commented-out section of AllMyWork.loek
You can deal with them when you activate them. With this, we are officially structured. :D

I started thinking about a method to separate the tabs. Will there ever be a second page of checkboxes which need their own Select All/none buttons, Or is it safe to say, no you want to select All/None only for "Registers" page, we only need to make sure the other checkboxes don't get messed up?
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

25 Nov 2018, 15:47

Hi there

Is the zip file a complete working script or do i have to add stuff (like the labels) because when i press start, nothing happens

also: the start button on the gStartbuttonprogrammas is gone...
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 05:03

also: the start button on the gStartbuttonprogrammas is gone...
Maybe you used the h option in Gui, Show, h___ ?

You know, AHK has a built-in "window-painter" support. It has been criticised before, but we have it.
Using this feature is only confusing at first, you will get the hang of it eventually.
There is more than one way to see what it's doing, and one is to write Gui, Show. nothing else. Try that on a few Gui's in your collection.

When using the w or the h option, you override the size of the GUI, and AHK cuts off the GUI as told.
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 05:29

I submit a zip-file with a shorter Version of AllMyWork.ahk. This enables me to test freely.
This version fixes: "Select" all/none only applies to the current page.
This version fixes: no fooling around with home-made extensions.
This version extends function of AddCheckbox(), I am now allowed to call without parameters, and no checkbox gets added. But the even/odd flag gets toggled.
I used it to help me positioning the next page, ... you know, when it takes a lot of explaining, it is most likely badly done.
So it is a to-do item, Improve the handling of odd number of boxes, the next page will only work correctly, when the flag is reset-able, I tried and it works and it's ugly and I settle for partial success ... And so forth ...

Have a look, this script is meant to work in all circumstances.
- in test mode without privileges
- in real mode with privileges
- and (hopefully, eventually) in Real-Real mode with your work properly included.
loek3000.Installatiemenu.v2.00.zip
(4.31 KiB) Downloaded 83 times
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

26 Nov 2018, 05:54

Thank you!

I guess i don't get it... i've examed the scripts, but i don't get how it would work when pushing the start button...

i don't know where what comes....
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 06:28

I should better be more precise, the collection of files in v2.00.zip works for me:


That means, when I start the Installatiemenu.ahk as is, I will not be asked to give admin rights, I will be however be able to test.
Testing for correct position of every Control (1 Tab, 4 Buttons, 29+28 Checkboxes, 16 Texts) as expected.
Testing for correct handling of checkboxes, the "SelectXXX" buttons behave and do not interfere with other checkboxes on other pages.
These tests are all successful.
I can also test for all the other events: I expect every single click on a Text on page 2 to show a message box.
I also expect to see message boxes from the remaining two "Start" button.
These tests are all successful.

In case you were expecting something else at this stage, hold your horses.
Stage two: do the admin thing. Run some/all the tests again. I expect to see no difference yet other than now, I need admin rights to run.
Stage three: come back with your real work, make sure you use the same name AllMyWork. ahk, replacing/deleting the dummy version.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

26 Nov 2018, 06:52

Sorry to say this, but i don't get it...

when i see the script in especially AllMyWork.ahk, i dont know how and where to put the work i already made previous... and why the start buttons shows a default message... i need at least one example how to add a script that is working with the start button to match up... now the start button always runs the same routine (no scripts are running whatsoever)

But then again, i will try to understand why things work or not...
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 07:02

What do you see in stage one?
What do you see in stage two?

Assuming you have no problems, do this inside the folder:
DELETE the dummy version of AllMyWork.ahk
COPY your own AllMyWork.ahk to REPLACE the dummy.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

26 Nov 2018, 07:12

sorry mate, i didn't know it was that easy, NOW it works.... 1 thing: is it possible to get back to the menu again, when i press start, everthing stops,which is fine, but i would like to have it reloaded

I will change alot of things on the reg script side, since ive made some changed already (add more scripts only to the reg section
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 07:19

The quickest way I can think of now would be to replace 2x the return with Reload.
One each where there were before GOTO commands, getting the menu back needs more work.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

26 Nov 2018, 08:16

Oh well i will experiment with that in a later stage...

1 thing tho... when at tab 3 (programs)

i would like to have the buttons "select all", "select none" too... i've made this, but it doesn't work (i made the addbox script smaller for quicker comparising):

Code: Select all

; Registers.ahk

Registers: ; starts "Registers"
    Gui, Tab, Registers
    Gui, Add, Button, Section, Select All
    Gui, Add, Button, x+m, Select None
    A_GuiTab := "Registers" ; "fake" a variable

    ;---------------------------------------------------------------------------
    AddCheckbox("cRed y+3", "Folder_reset", "Folder reset")
    AddCheckbox("Checked cGreen y+3", "Folder_options", "Change folder options (unhide and see ext.)")
        AddCheckbox("cRed y+3", "Folder_reset2", "Folder reset")
    AddCheckbox() ; an empty call toggles the even/odd flag
    ;---------------------------------------------------------------------------

    A_GuiTab := "" ; reset the fake variable
    Gui, Add, Button, xs gStartbuttonregisters, Start
return

with this one:

Code: Select all

; Programs.ahk

Programs: ; starts "Programs en snelkoppelingen"
    Gui, Tab, Programs en snelkoppelingen
    Gui, Add, Button, Section, Select All
    Gui, Add, Button, x+m, Select None
    A_GuiTab := "Programs" ; "fake" a variable
    ;---------------------------------------------------------------------------
    AddCheckbox("cRed y+3", "app30", "Test 1.0 MediaPlayerClassic")
    AddCheckbox("Checked cGreen y+3", "app33", "Test 1.0 Apparatenbeheer1")
    AddCheckbox("cGreen y+3", "app31", "Test 1.0 Audioapparaten_beheren2")
    AddCheckbox("cGreen y+3", "app32", "Test 1.0 Audioapparaten_beheren3")
    ;---------------------------------------------------------------------------

        A_GuiTab := "" ; reset the fake variable
    Gui, Add, Button, xs gStartbuttonprogrammas, Start
return

so i just changed beginning and the end of the script...
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 11:19

To extend, we need also to have two lists of VarNames. I suggest the following changes:
my stuff in Select.ahk needs to know about the new lists.
my stuff in Installatiemenu.ahk needs to allow configuration.
your stuff is OK as far as I see, no changes there needed.
Spoiler
Spoiler
Edit: added comments
Last edited by wolf_II on 26 Nov 2018, 12:14, edited 1 time in total.
just me
Posts: 9407
Joined: 02 Oct 2013, 08:51
Location: Germany

Re: Check all or clear all checkboxes

26 Nov 2018, 12:06

A different approach you might want to try or not:

Code: Select all

#NoEnv
#SingleInstance Force
CheckBoxes := [["cRed", "Folder_reset" , "Folder reset"]
             , ["Checked cGreen", "Folder_options", "Change folder options (unhide and see ext.)"]
             , ["Checked cGreen", "Webdavbuffer", "Make Webdav buffer bigger"]
             , ["Checked cGreen", "Delete_people_icon", "Delete icon -> People <- from taskbar"]
             , ["Checked cGreen", "Clock_with_seconds", "Put seconds after hours and minutes in taskbar"]
             , ["cRed", "DPI_and_taskbar_color_changes", "DPI and taskbar color changes"]
             , ["cRed", "UAC_low", "Set UAC to lowerst security"]
             , ["cBlue", "Always_admin", "Run all programs with Admin privilages"]
             , ["cRed", "Icon_distance", "Shorten distance between icons on desktop"]
             , ["Checked cGreen", "Networkandmypc", "Add My PC and Network icons on desktop"]
             , ["Checked cGreen", "Take_ownership", "Take ownership of files and folders"]
             , ["Checked cGreen", "Verbose_messages", "Verbose messages during boot or shutdown"]
             , ["cRed", "Keyboard_speed", "Set keyboard to maximum speed"]
             , ["cRed", "Remove_timeline", "Empty timeline and remove saving from it"]
             , ["Checked cGreen", "Thumbs_bigger", "Make thumbs bigger at taskbar (preview)"]
             , ["cRed", "Windowarrang", "Disable Aerosnap (rearange window)"]
             , ["Checked cGreen", "Bigger_window_copy", "Maximize window when copying"]
             , ["cRed", "Disable_grouping", "Disable grouping with open windows on taskbar"]
             , ["Checked cGreen", "Update_context_menu", "Add Update at the top off context menu"]
             , ["Checked cGreen", "Copy_path", "Add to context menu COPY PATH"]
             , ["cRed", "Remove_intel_context_menu", "Remove Intel entries from context menu"]
             , ["Checked cGreen", "Add_bat_file_to_context", "Add BAT file to context NEW menu"]
             , ["Checked cGreen", "Turn_sticky_keys_off", "Turn sticky keys off"]
             , ["Checked cGreen", "Godmode", "Add godmode to context menu"]
             , ["Checked cGreen", "Layout_control_panel", "Change layout Control panel (big icons)"]
             , ["cRed", "Disbable_windows_update", "Disable Windows Update"]
             , ["Checked cGreen", "Disable_powerfile_on_c", "Disable and Remove hibernation file on partition"]
             , ["Checked cGreen", "Remove_onedrive", "Remove Onedrive from system and sidebar"]]
FontOpts := "S10"
FontName := "Verdana"
; --------------------------------------------------------------------------------------------------------------------------------
; Determine the maximum width of a check box control
MaxW := 0
Gui, New
Gui, Font, %FontOpts%, %FontName%
For Each, CB In CheckBoxes {
   Gui, Add, CheckBox, hwndHCB, % CB[3]
   GuiControlGet, P, Pos, %HCB%
   MaxW := Max(MaxW, PW)
}
Gui, Destroy
; --------------------------------------------------------------------------------------------------------------------------------
; Show the Gui
Gui, Font, %FontOpts%, %FontName%
Gui, Add, Tab3, , Registers
Gui, Tab, 1
Gui, Add, Button, Section gSelAll, Select All
Gui, Add, Button, x+m gSelNone, Select None
For IX, CB In CheckBoxes {
   VarName := CB[2]
   Opts := CB[1] . (IX & 1 ? " xs y+3 w" : " x+m w") . MaxW
   Gui, Add, CheckBox, %Opts% v%VarName%, %  CB[3]
}
Gui, Add, Button, xs y+3 gStartbuttonregisters, Start
Gui, Tab
Gui, Show, , Checkbox Test
Return
; --------------------------------------------------------------------------------------------------------------------------------
GuiClose:
ExitApp
; --------------------------------------------------------------------------------------------------------------------------------
SelAll:
For Each, CB In CheckBoxes {
   VarName := CB[2]
   GuiControl, , %VarName% , 1
   GuiControl, +cGreen, %VarName%
}
Return
; --------------------------------------------------------------------------------------------------------------------------------
SelNone:
For Each, CB In CheckBoxes {
   VarName := CB[2]
   GuiControl, , %VarName% , 0
   GuiControl, +cRed, %VarName%
}
Return
; --------------------------------------------------------------------------------------------------------------------------------
Startbuttonregisters:
MsgBox, OK, let's do some action!
Return
; ================================================================================================================================
It's a conceptual design for just one tab.
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

26 Nov 2018, 12:34

Thanx Just me :)

i see what it is doing -> coloring, but i dont want to screw up the main script... but then again, maybe i can use some of it (i like the coloring)

@wolf_II : thanx, again, but how can i put the "select all", "select none" in the 3rd tab too? i tried it already and submitted the result here

to add: i've done the corrections
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 12:59

I used the two edited versions of your most recent post ...
Here is v3.00 as a zip
loek3000.Installatiemenu.v3.00.zip
(3.45 KiB) Downloaded 87 times
loek3000
Posts: 146
Joined: 12 Nov 2013, 03:24

Re: Check all or clear all checkboxes

26 Nov 2018, 13:30

Thanx Wolf_II you've been a great help, it works very well and now it DONE!

Also thanx to just me <- thats a nickname, i don't want to speak like snoop dog :P

thank you thank you thank you thank you thank you thank you thank you thank you thank you thank you thank you thank you thank you
wolf_II
Posts: 2688
Joined: 08 Feb 2015, 20:55

Re: Check all or clear all checkboxes

26 Nov 2018, 13:48

Regarding Reload command as quick-fix: I have done more work, like look at your code and find Gui, Submit hides the Gui.

Step 1: replace the reload back to return (x2)
Step 2: has two sub-cases
(1) I assume you want to continue to do so, Insert a simple Gui, :1 Show, in two places, right before returning.
(2) I assume you don't care really, try Gui, Submit, NoHide. Twice.

Return to “Ask for Help (v1)”

Who is online

Users browsing this forum: Bassy, inseption86, mikeyww and 161 guests