@echo off
setlocal EnableExtensions EnableDelayedExpansion
title Microsoft Edge Kaldirma Araci - Bilgisayar Borsasi

rem Bilgisayar Borsasi - bilgisayarborsasi.com.tr/rehber/windows-11-edge-kaldirma
rem Yontem: Edge'in kendi kaldiricisi (setup.exe --uninstall --force-uninstall).
rem Microsoft, Turkiye gibi AEA disi bolgelerde bu kaldiriciyi "Windows cagirmadi" diyerek
rem reddeder. Arac, acik kaynak ave9858/UninstallEdge.ps1 (CC0) yontemini uygular:
rem  1) EdgeUpdateDev\AllowUninstall degeri yazilir
rem  2) Kaldirici, dllhost.exe adli gecici bir cmd kopyasi uzerinden baslatilir
rem  3) Eski Edge klasorune bos bir MicrosoftEdge.exe konur, is bitince silinir
rem WebView2 KALDIRILMAZ (bircok uygulama ona ihtiyac duyar). Kisisel veri silinmez.

net session >nul 2>&1
if errorlevel 1 (
  echo Yonetici izni isteniyor...
  powershell -NoProfile -Command "Start-Process -FilePath '%~f0' -Verb RunAs"
  exit /b
)

echo.
echo  MICROSOFT EDGE KALDIRMA ARACI
echo  -----------------------------
echo  Bu arac Microsoft Edge tarayicisini kaldirir. WebView2 ve kisisel
echo  dosyalariniz silinmez. Edge'i istediginiz zaman microsoft.com/edge
echo  adresinden geri kurabilirsiniz.
echo.
echo  Once baska bir tarayici (Chrome, Firefox vb.) kurulu oldugundan emin olun.
echo.
set /p ONAY=Devam etmek icin E yazip Enter'a basin: 
if /i not "!ONAY!"=="E" (
  echo Iptal edildi.
  pause
  exit /b 0
)

set "UNINST="
for /f "tokens=2,*" %%A in ('reg query "HKLM\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Microsoft Edge" /v UninstallString 2^>nul ^| %SystemRoot%\System32\find.exe /i "UninstallString"') do set "UNINST=%%B"
if not defined UNINST (
  echo.
  echo SONUC: Microsoft Edge kurulu gorunmuyor. Yapilacak bir sey yok.
  pause
  exit /b 1
)

echo.
echo [1/4] Edge kapatiliyor...
taskkill /f /im msedge.exe >nul 2>&1

echo [2/4] Kaldirma izni hazirlaniyor...
reg delete "HKLM\SOFTWARE\WOW6432Node\Microsoft\EdgeUpdate\ClientState\{56EB18F8-B008-4CBD-B6D2-8C97FE7E9062}" /v experiment_control_labels /f >nul 2>&1
reg add "HKLM\SOFTWARE\WOW6432Node\Microsoft\EdgeUpdateDev" /v AllowUninstall /t REG_SZ /d "" /f >nul

set "TMPD=%SystemRoot%\SystemTemp"
if not exist "%TMPD%\" set "TMPD=%SystemRoot%\Temp"
copy /y "%SystemRoot%\System32\cmd.exe" "%TMPD%\dllhost.exe" >nul

set "UWP=%SystemRoot%\SystemApps\Microsoft.MicrosoftEdge_8wekyb3d8bbwe"
set "MADE=0"
if not exist "%UWP%\" (
  mkdir "%UWP%" >nul 2>&1
  set "MADE=1"
)
if not exist "%UWP%\MicrosoftEdge.exe" type nul > "%UWP%\MicrosoftEdge.exe"

echo [3/4] Edge kaldiriliyor (1-2 dakika surebilir)...
"%TMPD%\dllhost.exe" /c "!UNINST! --force-uninstall"

echo [4/4] Gecici dosyalar temizleniyor...
del /f /q "%UWP%\MicrosoftEdge.exe" >nul 2>&1
if "!MADE!"=="1" rmdir "%UWP%" >nul 2>&1
del /f /q "%TMPD%\dllhost.exe" >nul 2>&1

echo.
if exist "%ProgramFiles(x86)%\Microsoft\Edge\Application\msedge.exe" (
  echo SONUC: Edge hala kurulu gorunuyor.
  echo Bilgisayari yeniden baslatip araci bir kez daha calistirin. Yine olmazsa
  echo rehberdeki "Olmadiysa" bolumune bakin.
) else (
  echo SONUC: Microsoft Edge kaldirildi. Bilgisayari yeniden baslatin.
  echo Geri kurmak isterseniz: microsoft.com/edge
)
echo.
pause
exit /b 0