[文本处理] 右键新建一个省点事的批处理 没人带盐 很多缺碘

@Echo off&mode con cols=15 lines=2&color 0d&if not exist %SystemRoot%\批处理.bat color 0b&goto setup
reg delete "HKCR\Directory\Background\shell\New" /f>nul&del /f /q %SystemRoot%\批处理.bat>nul&echo 卸除完毕!&ping 0 -n "2">nul&exit
:setup
reg add "HKCR\Directory\Background\shell\New" /f /ve /t REG_SZ /d "新建批处理(&B)">nul
reg add "HKCR\Directory\Background\shell\New" /f /v "Icon" /t REG_EXPAND_SZ /d "SHELL32.dll,71">nul
reg add "HKCR\Directory\Background\shell\New\command" /t REG_SZ /d "\"%SystemRoot%\批处理.bat\"" /f>nul
(echo SetLocal EnableDelayedExpansion
echo if %%time:~0,2%% lss 10 (set time=!time:~1,1!!time:~3,2!!time:~6,2!^)else set time=!time:~0,2!!time:~3,2!!time:~6,2!
echo (echo @Echo off^^^&SetLocal EnableDelayedExpansion^^^&set n=0
echo echo for /r A文件 %%%%%%%%a in (*.txt^^^)do copy "%%%%%%%%b" "%%%%%%%%a"
echo echo pause
echo echo for /l %%%%%%%%i in (1,3,99999999^^^) do set #%%%%%%%%i=1
echo echo (for /f "delims=" %%%%%%%%i in (1.txt^^^) do set /a n+=1^^^&if defined #^^^^^!n^^^^^! echo "%%%%%%%%i"^^^)^^^>2.txt
echo echo pause^)^>"%%~dp1!date:~0,4!!date:~5,2!!date:~8,2!!time!.bat")>"%SystemRoot%\批处理.bat"
echo 安装完毕!&ping 0 -n "2">nul&exit
复制代码