Windows10Debloater/Windows10DebloaterGUI.ps1
2019-04-20 23:58:38 -07:00

212 lines
12 KiB
PowerShell

Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
$ErrorPreference = 'SilentlyContinue'
$VerbosePreference = 'Continue'
$form = New-Object System.Windows.Forms.Form
$form.Text = 'Windows10Debloater'
$form.Size = New-Object System.Drawing.Size(800,600)
$form.StartPosition = 'CenterScreen'
$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Point(275,40)
$OKButton.Size = New-Object System.Drawing.Size(225,23)
$OKButton.Text = 'Remove Selected Bloatware Packages'
$OKButton.DialogResult = [System.Windows.Forms.DialogResult]::OK
$form.AcceptButton = $OKButton
$form.Controls.Add($OKButton)
$RemoveKeys = New-Object system.Windows.Forms.Button
$RemoveKeys.text = "Remove registry keys associated with Bloatware"
$RemoveKeys.width = 265
$RemoveKeys.height = 23
$RemoveKeys.location = New-Object System.Drawing.Point(275,400)
$form.Controls.Add($RemoveKeys)
#$WhitelistDebloat.Font = 'Microsoft Sans Serif,10'
$label = New-Object System.Windows.Forms.Label
$label.Location = New-Object System.Drawing.Point(10,20)
$label.Size = New-Object System.Drawing.Size(280,20)
$label.Text = 'Select Default Bloatware Packages To Remove:'
$form.Controls.Add($label)
$listBox = New-Object System.Windows.Forms.ListBox
$listBox.Location = New-Object System.Drawing.Point(10,40)
$listBox.Size = New-Object System.Drawing.Size(260,500)
#$listBox.Height = 80
$label2 = New-Object System.Windows.Forms.Label
$label2.Location = New-Object System.Drawing.Point(275,145)
$label2.Size = New-Object System.Drawing.Size(280,30)
$label2.Text = 'This is used to remove other packages besides the ones chosen on the left hand side'
$form.Controls.Add($label2)
$label3 = New-Object System.Windows.Forms.Label
$label3.Location = New-Object System.Drawing.Point(275,285)
$label3.Size = New-Object System.Drawing.Size(500,15)
$label3.Text = '_______________________________________________________________________________'
$form.Controls.Add($label3)
$label4 = New-Object System.Windows.Forms.Label
$label4.Location = New-Object System.Drawing.Point(275,265)
$label4.Size = New-Object System.Drawing.Size(500,100)
$label4.Text = 'ADVANCED OPTIONS BELOW'
$form.Controls.Add($label4)
$WhitelistDebloat = New-Object system.Windows.Forms.Button
$WhitelistDebloat.text = "Remove extra packages besides the default bloatware"
$WhitelistDebloat.width = 285
$WhitelistDebloat.height = 30
$WhitelistDebloat.location = New-Object System.Drawing.Point(275,175)
#$WhitelistDebloat.Font = 'Microsoft Sans Serif,10'
$Form.controls.AddRange(@($WhitelistDebloat,$RemoveKeys))
$WhitelistDebloat.Add_Click({
Function DebloatAll {
#Removes AppxPackages
#Credit to /u/GavinEke for a modified version of my whitelist code
$WhitelistedApps = 'Microsoft.ScreenSketch|Microsoft.Paint3D|Microsoft.WindowsCalculator|Microsoft.WindowsStore|Microsoft.Windows.Photos|CanonicalGroupLimited.UbuntuonWindows|`
Microsoft.XboxGameCallableUI|Microsoft.XboxGamingOverlay|Microsoft.Xbox.TCUI|Microsoft.XboxGamingOverlay|Microsoft.XboxIdentityProvider|Microsoft.MicrosoftStickyNotes|Microsoft.MSPaint|Microsoft.WindowsCamera|.NET|Framework|`
Microsoft.HEIFImageExtension|Microsoft.ScreenSketch|Microsoft.StorePurchaseApp|Microsoft.VP9VideoExtensions|Microsoft.WebMediaExtensions|Microsoft.WebpImageExtension|Microsoft.DesktopAppInstaller|WindSynthBerry|MIDIBerry|Slack'
#NonRemovable Apps that where getting attempted and the system would reject the uninstall, speeds up debloat and prevents 'initalizing' overlay when removing apps
$NonRemovable = '1527c705-839a-4832-9118-54d4Bd6a0c89|c5e2524a-ea46-4f67-841f-6a9465d9d515|E2A4F912-2574-4A75-9BB0-0D023378592B|F46D4000-FD22-4DB4-AC8E-4E1DDDE828FE|InputApp|Microsoft.AAD.BrokerPlugin|Microsoft.AccountsControl|`
Microsoft.BioEnrollment|Microsoft.CredDialogHost|Microsoft.ECApp|Microsoft.LockApp|Microsoft.MicrosoftEdgeDevToolsClient|Microsoft.MicrosoftEdge|Microsoft.PPIProjection|Microsoft.Win32WebViewHost|Microsoft.Windows.Apprep.ChxApp|`
Microsoft.Windows.AssignedAccessLockApp|Microsoft.Windows.CapturePicker|Microsoft.Windows.CloudExperienceHost|Microsoft.Windows.ContentDeliveryManager|Microsoft.Windows.Cortana|Microsoft.Windows.NarratorQuickStart|`
Microsoft.Windows.ParentalControls|Microsoft.Windows.PeopleExperienceHost|Microsoft.Windows.PinningConfirmationDialog|Microsoft.Windows.SecHealthUI|Microsoft.Windows.SecureAssessmentBrowser|Microsoft.Windows.ShellExperienceHost|`
Microsoft.Windows.XGpuEjectDialog|Microsoft.XboxGameCallableUI|Windows.CBSPreview|windows.immersivecontrolpanel|Windows.PrintDialog|Microsoft.VCLibs.140.00|Microsoft.Services.Store.Engagement|Microsoft.UI.Xaml.2.0'
Get-AppxPackage -AllUsers | Where {$_.Name -NotMatch $WhitelistedApps -and $_.Name -NotMatch $NonRemovable} | Remove-AppxPackage
Get-AppxPackage | Where {$_.Name -NotMatch $WhitelistedApps -and $_.Name -NotMatch $NonRemovable} | Remove-AppxPackage
Get-AppxProvisionedPackage -Online | Where {$_.Name -NotMatch $WhitelistedApps -and $_.Name -NotMatch $NonRemovable} | Remove-AppxProvisionedPackage -Online
}
Debloatall
})
$RemoveKeys.Add_Click({
Function Remove-Keys {
#These are the registry keys that it will delete.
$Keys = @(
#Remove Background Tasks
"HKCR:\Extensions\ContractId\Windows.BackgroundTasks\PackageId\46928bounde.EclipseManager_2.2.4.51_neutral__a5h4egax66k6y"
"HKCR:\Extensions\ContractId\Windows.BackgroundTasks\PackageId\ActiproSoftwareLLC.562882FEEB491_2.6.18.18_neutral__24pqs290vpjk0"
"HKCR:\Extensions\ContractId\Windows.BackgroundTasks\PackageId\Microsoft.MicrosoftOfficeHub_17.7909.7600.0_x64__8wekyb3d8bbwe"
"HKCR:\Extensions\ContractId\Windows.BackgroundTasks\PackageId\Microsoft.PPIProjection_10.0.15063.0_neutral_neutral_cw5n1h2txyewy"
"HKCR:\Extensions\ContractId\Windows.BackgroundTasks\PackageId\Microsoft.XboxGameCallableUI_1000.15063.0.0_neutral_neutral_cw5n1h2txyewy"
"HKCR:\Extensions\ContractId\Windows.BackgroundTasks\PackageId\Microsoft.XboxGameCallableUI_1000.16299.15.0_neutral_neutral_cw5n1h2txyewy"
#Windows File
"HKCR:\Extensions\ContractId\Windows.File\PackageId\ActiproSoftwareLLC.562882FEEB491_2.6.18.18_neutral__24pqs290vpjk0"
#Registry keys to delete if they aren't uninstalled by RemoveAppXPackage/RemoveAppXProvisionedPackage
"HKCR:\Extensions\ContractId\Windows.Launch\PackageId\46928bounde.EclipseManager_2.2.4.51_neutral__a5h4egax66k6y"
"HKCR:\Extensions\ContractId\Windows.Launch\PackageId\ActiproSoftwareLLC.562882FEEB491_2.6.18.18_neutral__24pqs290vpjk0"
"HKCR:\Extensions\ContractId\Windows.Launch\PackageId\Microsoft.PPIProjection_10.0.15063.0_neutral_neutral_cw5n1h2txyewy"
"HKCR:\Extensions\ContractId\Windows.Launch\PackageId\Microsoft.XboxGameCallableUI_1000.15063.0.0_neutral_neutral_cw5n1h2txyewy"
"HKCR:\Extensions\ContractId\Windows.Launch\PackageId\Microsoft.XboxGameCallableUI_1000.16299.15.0_neutral_neutral_cw5n1h2txyewy"
#Scheduled Tasks to delete
"HKCR:\Extensions\ContractId\Windows.PreInstalledConfigTask\PackageId\Microsoft.MicrosoftOfficeHub_17.7909.7600.0_x64__8wekyb3d8bbwe"
#Windows Protocol Keys
"HKCR:\Extensions\ContractId\Windows.Protocol\PackageId\ActiproSoftwareLLC.562882FEEB491_2.6.18.18_neutral__24pqs290vpjk0"
"HKCR:\Extensions\ContractId\Windows.Protocol\PackageId\Microsoft.PPIProjection_10.0.15063.0_neutral_neutral_cw5n1h2txyewy"
"HKCR:\Extensions\ContractId\Windows.Protocol\PackageId\Microsoft.XboxGameCallableUI_1000.15063.0.0_neutral_neutral_cw5n1h2txyewy"
"HKCR:\Extensions\ContractId\Windows.Protocol\PackageId\Microsoft.XboxGameCallableUI_1000.16299.15.0_neutral_neutral_cw5n1h2txyewy"
#Windows Share Target
"HKCR:\Extensions\ContractId\Windows.ShareTarget\PackageId\ActiproSoftwareLLC.562882FEEB491_2.6.18.18_neutral__24pqs290vpjk0"
)
#This writes the output of each key it is removing and also removes the keys listed above.
ForEach ($Key in $Keys) {
Write-Verbose "Removing $Key from registry"
Remove-Item $Key -Recurse
}
Remove-Keys
}
})
$listBox.SelectionMode = 'MultiExtended'
[void] $listBox.Items.Add('Microsoft.BingNews')
[void] $listBox.Items.Add('Microsoft.GetHelp')
[void] $listBox.Items.Add('Microsoft.Getstarted')
[void] $listBox.Items.Add('Microsoft.Messaging')
[void] $listBox.Items.Add('Microsoft.Microsoft3DViewer')
[void] $listBox.Items.Add('Microsoft.MicrosoftOfficeHub')
[void] $listBox.Items.Add('Microsoft.MicrosoftSolitaireCollection')
[void] $listBox.Items.Add('Microsoft.NetworkSpeedTest')
[void] $listBox.Items.Add('Microsoft.News')
[void] $listBox.Items.Add('Microsoft.Office.Lens')
[void] $listBox.Items.Add('Microsoft.Office.OneNote')
[void] $listBox.Items.Add('Microsoft.Office.Sway')
[void] $listBox.Items.Add('Microsoft.OneConnect')
[void] $listBox.Items.Add('Microsoft.People')
[void] $listBox.Items.Add('Microsoft.Print3D')
[void] $listBox.Items.Add('Microsoft.RemoteDesktop')
[void] $listBox.Items.Add('Microsoft.SkypeApp')
[void] $listBox.Items.Add('Microsoft.StorePurchaseApp')
[void] $listBox.Items.Add('Microsoft.Office.Todo.List')
[void] $listBox.Items.Add('Microsoft.Whiteboard')
[void] $listBox.Items.Add('Microsoft.WindowsAlarms')
[void] $listBox.Items.Add('Microsoft.WindowsCamera')
[void] $listBox.Items.Add('microsoft.windowscommunicationsapps')
[void] $listBox.Items.Add('Microsoft.WindowsFeedbackHub')
[void] $listBox.Items.Add('Microsoft.WindowsMaps')
[void] $listBox.Items.Add('Microsoft.WindowsSoundRecorder')
[void] $listBox.Items.Add('Microsoft.Xbox.TCUI')
[void] $listBox.Items.Add('Microsoft.XboxApp')
[void] $listBox.Items.Add('Microsoft.XboxGameOverlay')
[void] $listBox.Items.Add('Microsoft.XboxIdentityProvider')
[void] $listBox.Items.Add('Microsoft.XboxSpeechToTextOverlay')
[void] $listBox.Items.Add('Microsoft.ZuneMusic')
[void] $listBox.Items.Add('Microsoft.ZuneVideo')
[void] $listBox.Items.Add('*EclipseManager*')
[void] $listBox.Items.Add('*ActiproSoftwareLLC*')
[void] $listBox.Items.Add('*AdobeSystemsIncorporated.AdobePhotoshopExpress*')
[void] $listBox.Items.Add('*Duolingo-LearnLanguagesforFree*')
[void] $listBox.Items.Add('*PandoraMediaInc*')
[void] $listBox.Items.Add('*CandyCrush*')
[void] $listBox.Items.Add('*Wunderlist*')
[void] $listBox.Items.Add('*Flipboard*')
[void] $listBox.Items.Add('*Twitter*')
[void] $listBox.Items.Add('*Facebook*')
[void] $listBox.Items.Add('*Spotify*')
[void] $listBox.Items.Add('*Minecraft*')
[void] $listBox.Items.Add('*Royal Revolt*')
[void] $listBox.Items.Add('*Sway*')
[void] $listBox.Items.Add('*Speed Test*')
[void] $listBox.Items.Add('*Dolby*')
[void] $listBox.Items.Add('*Windows.CBSPreview*')
[void] $listBox.Items.Add('*Microsoft.Advertising.Xaml_10.1712.5.0_x64__8wekyb3d8bbwe*')
[void] $listBox.Items.Add('*Microsoft.Advertising.Xaml_10.1712.5.0_x86__8wekyb3d8bbwe*')
[void] $listBox.Items.Add('*Microsoft.BingWeather*')
[void] $listBox.Items.Add('*Microsoft.MSPaint*')
[void] $listBox.Items.Add('*Microsoft.MicrosoftStickyNotes*')
[void] $listBox.Items.Add('*Microsoft.Windows.Photos*')
[void] $listBox.Items.Add('*Microsoft.WindowsCalculator*')
[void] $listBox.Items.Add('*Microsoft.WindowsStore*')
$form.Controls.Add($listBox)
$form.Topmost = $true
$result = $form.ShowDialog()
if ($result -eq [System.Windows.Forms.DialogResult]::OK)
{
$x = $listBox.SelectedItems
foreach ($x in $x) {
Get-AppxPackage -Name $x| Remove-AppxPackage
Get-AppxProvisionedPackage -Online | Where-Object DisplayName -like $x | Remove-AppxProvisionedPackage -Online
Write-Verbose "Trying to remove $x."
}
}