Как изменить скрипт чтобы он выполнялся быстрее ?

Здравствуйте,
Подскажите пожалуйста, как изменить скрипт чтобы он выполнялся быстрее ?

Код:

@echo off

SetLocal 

set /a per=0

@echo. >log_speed_v.2.1.txt

date /t >>log_speed_v.2.1.txt

time /t >>log_speed_v.2.1.txt

date /t >log_speed_bad.txt

time /t >>log_speed_bad.txt

For /f "tokens=1,2,3 delims=," %%i in (my.txt) do (

set /a per=0

@echo. %%j >>log_speed_v.2.1.txt

ping %%i -n 1 | find "Ответ" >>log_speed_v.2.1.txt

ping %%i -n 1 | find "TTL=" >>log_speed_v.2.1.txt || if %per% == 0 ( 

@echo. %%j BaD

@echo. >>log_speed_bad.txt

@echo. %%i >>log_speed_bad.txt 

@echo. %%j >>log_speed_bad.txt

)  

@echo. %%k

@echo. >>log_speed_v.2.1.txt 

)

date /t >>log_speed_v.2.1.txt

time /t >>log_speed_v.2.1.txt 

@echo. >>log_speed_v.2.1.txt 

EndLocal



@echo off

SetLocal 

echo. >res_ok.txt

Set a=0

for /F "delims=" %%a in (log_speed_v.2.1.txt) do call :convert %%a 

:convert

chcp 1251 >nul

@echo. %* >>res_ok.txt

chcp 866 >nul

EndLocal



@echo off

SetLocal

Set k=0

@echo. >res_bad.txt

for /F "delims=" %%k in (log_speed_bad.txt) do call :convert %%k 

:convert

chcp 1251 >nul

@echo. %* >>res_bad.txt 

chcp 866 >nul