帮我写一个bat运行文件需求是ping同文件夹内的1txt文件列表内的所有地址只要有返回一次都算成功1txt内的列表地址格式为一行一个把成功的写出到同目录2txt文件内

@echo off setlocal enabledelayedexpansion

set "input_file=1.txt" set "output_file=2.txt" set "success=false"

for /f "usebackq delims=" %%a in ("%input_file%") do ( ping -n 1 %%a >nul if !errorlevel! equ 0 ( set "success=true" echo %%a>>"%output_file%" ) )

if not %success% equ true ( echo No successful pings found. )

pause>nul