@echo off

cd /d %~dp0
setlocal enabledelayedexpansion
%1 mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&&exit /b
DEL /A/S/F/Q "C:\Program Files\Portable\Tools\DefenderSW.exe"
Reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Directory\background\shell\DefenderSW" /f
pause >nul