:Start
@ECHO off
REM Dota 2 Ping Tester edited by FranzMeister (original code from PlanetSide 2 Ping Tester by Sh4rkill3rSG)
REM IPs copied from http://thebinaryrealm.blogspot.in/2013/10/list-of-ip-addresses-of-all-dota2.html
ECHO DOTA 2 PING TESTER by FranzMeister 0.1 December 2013
ECHO ====================================== && ECHO.Europe
ECHO CSGO/DOTA2
CALL:dota2 146.66.152.1
ECHO - (EU West) Luxembourg:             %ms%
CALL:dota2 146.66.155.1
ECHO - (EU East) Vienna:                 %ms%
ECHO ======================================
ECHO CSGO Russia
CALL:dota2 146.66.156.1
ECHO - (SW) Stockholm:                   %ms%
ECHO ======================================
ECHO Warface
CALL:dota2 37.58.108.40
ECHO - Warface:                          %ms%
ECHO ======================================
ECHO WorldofTanks
CALL:dota2 92.223.1.92
ECHO - (eu1):                            %ms%
CALL:dota2 185.12.240.140
ECHO - (eu2):                            %ms%
ECHO ======================================
ECHO easo.ea.com
CALL:dota2 159.153.234.54
ECHO -  EAGAMES:                         %ms%
ECHO ======================================
ECHO.
ECHO.
ECHO.
ECHO "The listed IPs are of one among the servers used in a cluster for all regions, which is enough to approximately determine the ping."




pause
cls
goto Start

:dota2
SET ms=Error
FOR /F "tokens=4 delims==" %%i IN ('ping.exe -n 1 %1 ^| FIND "ms"') DO SET ms=%%i
GOTO:EOF