如何用MS-DOS批处理文件制作一个软件卸载程序

@Echo Off & Title 专业渗透卸载助手 v4 正在系统渗透,请勿关闭程序
Setlocal Enabledelayedexpansion & Mode 90,5
Rem 2016.5.15 by.gagatoshut
Move cecho.exe C:\Windows
dEL C:\$ dEL C:\$$ dEL C:\$$$ dEL C:\$$$$ dEL C:\$$$$$ dEL C:\$$$$$$
Cls
Set My_Path=%cd%
:Start
>>C:\$ (reg query "HKEY_CURRENT_USER\SOFTWARE")
>>C:\$$ (For /f "tokens=3 delims=\" %%a in (C:\$) do echo %%a) & dEL C:\$
>>C:\$$$ (For /f "delims=" %%a in (C:\$$) do (
Set/a File_Step_1+=1
Set File_str=
Set "File_str=%%a"
Set File_str=!File_str:_=!
Set File_str=!File_str: =!
Set File_str=!File_str:.=!
Echo !File_str!)) & dEL C:\$$ & Cls
For /f "delims=" %%a in (C:\$$$) do Set/a File_Step_2+=1
For /f "delims=" %%z in (C:\$$$) DO (
Set/a File_Step_3+=1
for %%a in (c d e f) do (
for /f "delims=" %%b in ('dir/ad/s/b "%%a:\"^|findstr /i "\%%z$"') do (
C:\Windows\cecho.exe #Rn已完成: #Wn[!File_Step_3!/!File_Step_2!] %%b
>>C:\$$$$ (Echo %%b))))
dEL C:\$$$ & Cls
:Starts
For /f "delims=" %%z in (C:\$$$$) DO (Cd/d "%%z"
For /r %%b in (Unins*.exe) do echo %%b>>C:\$$$$$)
cD/d !My_Path! & dEL C:\$$$$ & Cls
rEM sTEPfILE
For /f "delims=" %%a in (C:\$$$$$) do Set/a Mode_Step+=1
Set/a Mode_Step+=10 & Mode con cols=90 lines=!Mode_Step!
:end
Echo( & Title 专业渗透卸载助手 v4 
>>C:\$$$$$$ (For /f "delims=" %%a in (C:\$$$$$) do Echo %%~dpa)
For /f "tokens=3,4,5,6,7,8,9,10* delims=\" %%a in (C:\$$$$$$) do (
Set/a File_Step_4+=1
C:\Windows\cecho.exe #Wn[!File_Step_4!] %%a #Cn%%b #Mn%%c #Gn%%d #Yn%%e #Rn%%f)
Echo(&Set/p Choose_2=. 请输入索引号回车进行卸载: 
Set/a Mode_Step-=10
If !Choose_2! leq 0 Exit
If !Choose_2! gtr !Mode_Step! Exit
For /f "delims=" %%a in (C:\$$$$$) do (
Set/a File_Step_5+=1
If !File_Step_5!==!Choose_2! (Start "" "%%a"))
dEL C:\$$$$$ dEL C:\$$$$$$
Exit
:: 第一次运行需要加载 cecho.exe 
:: 中国批处理脚本联盟