Skip to content
This repository has been archived by the owner on Sep 21, 2023. It is now read-only.

Commit

Permalink
Disable BingSearch in Start Menu Search
Browse files Browse the repository at this point in the history 
This adds in the feature to disable Bing Search for issue #326
  • Loading branch information
@Sycnex
Sycnex authored Mar 20, 2021
1 parent 79e8f39 commit a3091bf
Showing 1 changed file with 74 additions and 42 deletions.
116 changes: 74 additions & 42 deletions Windows10DebloaterGUI.ps1
View file
Original file line number Diff line number Diff line change
Expand Up @@ -35,6 +35,7 @@ If (!([Security.Principal.WindowsPrincipal][Security.Principal.WindowsIdentity]:
}
}


#Unnecessary Windows 10 AppX apps that will be removed by the blacklist.
$global:Bloatware = @(
"Microsoft.PPIProjection"
Expand Down Expand Up @@ -194,7 +195,7 @@ Function dotInclude() {
}
if ( test-path $scriptPath\$includeFile ) {
# import and immediately execute the requested file
. $scriptPath\$includeFile
.$scriptPath\$includeFile
}
}

Expand All @@ -217,7 +218,7 @@ $Form.FormBorderStyle = 'FixedSingle'
$Form.MinimizeBox = $false
$Form.MaximizeBox = $false
$Form.ShowIcon = $false
$Form.text = "Windows10Debloader"
$Form.text = "Windows10Debloater"
$Form.TopMost = $false
$Form.BackColor = [System.Drawing.ColorTranslator]::FromHtml("#252525")

Expand Down Expand Up @@ -269,7 +270,7 @@ $Debloat.ForeColor = [System.Drawing.ColorTranslator]::FromHtml("#

$CustomizeBlacklist = New-Object system.Windows.Forms.Button
$CustomizeBlacklist.FlatStyle = 'Flat'
$CustomizeBlacklist.text = "CUSTOMISE BLACKLIST"
$CustomizeBlacklist.text = "CUSTOMISE BLOCKLIST"
$CustomizeBlacklist.width = 460
$CustomizeBlacklist.height = 30
$CustomizeBlacklist.Anchor = 'top,right,left'
Expand All @@ -289,7 +290,7 @@ $RemoveAllBloatware.ForeColor = [System.Drawing.ColorTranslator]::FromHtml("#

$RemoveBlacklistedBloatware = New-Object system.Windows.Forms.Button
$RemoveBlacklistedBloatware.FlatStyle = 'Flat'
$RemoveBlacklistedBloatware.text = "REMOVE BLOATWARE WITH CUSTOM BLACKLIST"
$RemoveBlacklistedBloatware.text = "REMOVE BLOATWARE WITH CUSTOM BLOCKLIST"
$RemoveBlacklistedBloatware.width = 460
$RemoveBlacklistedBloatware.height = 30
$RemoveBlacklistedBloatware.Anchor = 'top,right,left'
Expand Down Expand Up @@ -488,6 +489,10 @@ Else {

Start-Transcript -OutputDirectory "${DebloatFolder}"

Write-Output "Creating System Restore Point if one does not already exist. If one does, then you will receive a warning. Please wait..."
Checkpoint-Computer -Description "Before using W10DebloaterGUI.ps1"


#region gui events {
$CustomizeBlacklist.Add_Click( {
$CustomizeForm = New-Object System.Windows.Forms.Form
Expand All @@ -497,7 +502,7 @@ $CustomizeBlacklist.Add_Click( {
$CustomizeForm.MinimizeBox = $false
$CustomizeForm.MaximizeBox = $false
$CustomizeForm.ShowIcon = $false
$CustomizeForm.Text = "Customize Whitelist and Blacklist"
$CustomizeForm.Text = "Customize Allowlist and Blocklist"
$CustomizeForm.TopMost = $false
$CustomizeForm.AutoScroll = $false
$CustomizeForm.BackColor = [System.Drawing.ColorTranslator]::FromHtml("#252525")
Expand All @@ -513,7 +518,7 @@ $CustomizeBlacklist.Add_Click( {

$SaveList = New-Object System.Windows.Forms.Button
$SaveList.FlatStyle = 'Flat'
$SaveList.Text = "Save custom Whitelist and Blacklist to custom-lists.ps1"
$SaveList.Text = "Save custom Allowlist and Blocklist to custom-lists.ps1"
$SaveList.width = 480
$SaveList.height = 30
$SaveList.Location = New-Object System.Drawing.Point(10, 530)
Expand All @@ -523,18 +528,18 @@ $CustomizeBlacklist.Add_Click( {
$CustomizeForm.controls.AddRange(@($SaveList,$ListPanel))

$SaveList.Add_Click( {
$ErrorActionPreference = 'SilentlyContinue'
# $ErrorActionPreference = 'SilentlyContinue'

'$global:WhiteListedApps = @(' | Out-File -FilePath $PSScriptRoot\custom-lists.ps1 -Encoding utf8
@($ListPanel.controls) | ForEach {
@($CustomizeForm.controls) | ForEach {
if ($_ -is [System.Windows.Forms.CheckBox] -and $_.Enabled -and !$_.Checked) {
" ""$( $_.Text )""" | Out-File -FilePath $PSScriptRoot\custom-lists.ps1 -Append -Encoding utf8
}
}
')' | Out-File -FilePath $PSScriptRoot\custom-lists.ps1 -Append -Encoding utf8

'$global:Bloatware = @(' | Out-File -FilePath $PSScriptRoot\custom-lists.ps1 -Append -Encoding utf8
@($ListPanel.controls) | ForEach {
@($CustomizeForm.controls) | ForEach {
if ($_ -is [System.Windows.Forms.CheckBox] -and $_.Enabled -and $_.Checked) {
" ""$($_.Text)""" | Out-File -FilePath $PSScriptRoot\custom-lists.ps1 -Append -Encoding utf8
}
Expand Down Expand Up @@ -670,7 +675,7 @@ $RemoveBlacklistedBloatware.Add_Click( {
Write-Host "...and the final cleanup..."
Get-AppxPackage -AllUsers | Where-Object Name -cmatch $global:BloatwareRegex | Remove-AppxPackage
}
Write-Host "`n`n`n`n`n`n`n`n`n`n`n`n`n`n`n`n`nRemoving blacklisted Bloatware.`n"
Write-Host "`n`n`n`n`n`n`n`n`n`n`n`n`n`n`n`n`nRemoving blocklisted Bloatware.`n"
DebloatBlacklist
Write-Host "Bloatware removed!"
})
Expand Down Expand Up @@ -841,6 +846,11 @@ $RemoveAllBloatware.Add_Click( {
Set-ItemProperty $Suggestions SystemPaneSuggestionsEnabled -Value 0
}

Write-Host "Disabling Bing Search when using Search via the Start Menu"
$BingSearch = 'HKCU:\SOFTWARE\Policies\Microsoft\Windows\Explorer'
If (Test-Path $BingSearch) {
Set-ItemProperty $BingSearch DisableSearchBoxSuggestions -Value 1
}

Write-Host "Removing CloudStore from registry if it exists"
$CloudStore = 'HKCU:\Software\Microsoft\Windows\CurrentVersion\CloudStore'
Expand All @@ -849,6 +859,7 @@ $RemoveAllBloatware.Add_Click( {
Remove-Item $CloudStore -Recurse -Force
Start-Process Explorer.exe -Wait
}


#Loads the registry keys/values below into the NTUSER.DAT file which prevents the apps from redownloading. Credit to a60wattfish
reg load HKU\Default_User C:\Users\Default\NTUSER.DAT
Expand All @@ -868,43 +879,64 @@ $RemoveAllBloatware.Add_Click( {
}

Function UnpinStart {
#Credit to Vikingat-Rage
#https://superuser.com/questions/1068382/how-to-remove-all-the-tiles-in-the-windows-10-start-menu
#Unpins all tiles from the Start Menu
Write-Host "Unpinning all tiles from the start menu"
(New-Object -Com Shell.Application).
NameSpace('shell:::{4234d49b-0245-4df3-b780-3893943456e1}').
Items() |
% { $_.Verbs() } |
? { $_.Name -match 'Un.*pin from Start' } |
% { $_.DoIt() }
}
# https://superuser.com/a/1442733
# Requires -RunAsAdministrator

$START_MENU_LAYOUT = @"
<LayoutModificationTemplate xmlns:defaultlayout="http://schemas.microsoft.com/Start/2014/FullDefaultLayout" xmlns:start="http://schemas.microsoft.com/Start/2014/StartLayout" Version="1" xmlns:taskbar="http://schemas.microsoft.com/Start/2014/TaskbarLayout" xmlns="http://schemas.microsoft.com/Start/2014/LayoutModification">
<LayoutOptions StartTileGroupCellWidth="6" />
<DefaultLayoutOverride>
<StartLayoutCollection>
<defaultlayout:StartLayout GroupCellWidth="6" />
</StartLayoutCollection>
</DefaultLayoutOverride>
</LayoutModificationTemplate>
"@

$layoutFile="C:\Windows\StartMenuLayout.xml"

#Delete layout file if it already exists
If(Test-Path $layoutFile)
{
Remove-Item $layoutFile
}

#Creates the blank layout file
$START_MENU_LAYOUT | Out-File $layoutFile -Encoding ASCII

$regAliases = @("HKLM", "HKCU")

Function Remove3dObjects {
#Removes 3D Objects from the 'My Computer' submenu in explorer
Write-Output "Removing 3D Objects from explorer 'My Computer' submenu"
$Objects32 = "HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}"
$Objects64 = "HKLM:\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}"
If (Test-Path $Objects32) {
Remove-Item $Objects32 -Recurse
#Assign the start layout and force it to apply with "LockedStartLayout" at both the machine and user level
foreach ($regAlias in $regAliases){
$basePath = $regAlias + ":\SOFTWARE\Policies\Microsoft\Windows"
$keyPath = $basePath + "\Explorer"
IF(!(Test-Path -Path $keyPath)) {
New-Item -Path $basePath -Name "Explorer"
}
Set-ItemProperty -Path $keyPath -Name "LockedStartLayout" -Value 1
Set-ItemProperty -Path $keyPath -Name "StartLayoutFile" -Value $layoutFile
}
If (Test-Path $Objects64) {
Remove-Item $Objects64 -Recurse

#Restart Explorer, open the start menu (necessary to load the new layout), and give it a few seconds to process
Stop-Process -name explorer
Start-Sleep -s 5
$wshell = New-Object -ComObject wscript.shell; $wshell.SendKeys('^{ESCAPE}')
Start-Sleep -s 5

#Enable the ability to pin items again by disabling "LockedStartLayout"
foreach ($regAlias in $regAliases){
$basePath = $regAlias + ":\SOFTWARE\Policies\Microsoft\Windows"
$keyPath = $basePath + "\Explorer"
Set-ItemProperty -Path $keyPath -Name "LockedStartLayout" -Value 0
}
}


Function CheckDMWService {
#Restart Explorer and delete the layout file
Stop-Process -name explorer

Param([switch]$Debloat)

If (Get-Service dmwappushservice | Where-Object { $_.StartType -eq "Disabled" }) {
Set-Service dmwappushservice -StartupType Automatic
}
# Uncomment the next line to make clean start menu default for all new users
#Import-StartLayout -LayoutPath $layoutFile -MountPath $env:SystemDrive\

If (Get-Service dmwappushservice | Where-Object { $_.Status -eq "Stopped" }) {
Start-Service dmwappushservice
}
Remove-Item $layoutFile
}

Function CheckInstallService {
Expand All @@ -921,7 +953,7 @@ $RemoveAllBloatware.Add_Click( {
DebloatAll
Write-Host "Removing leftover bloatware registry keys."
Remove-Keys
Write-Host "Checking to see if any Whitelisted Apps were removed, and if so re-adding them."
Write-Host "Checking to see if any Allowlisted Apps were removed, and if so re-adding them."
FixWhitelistedApps
Write-Host "Stopping telemetry, disabling unneccessary scheduled tasks, and preventing bloatware from returning."
Protect-Privacy
Expand Down

0 comments on commit a3091bf

Please sign in to comment.