@echo off

:START

set YYYY=%DATE:~-4%
set MM=%DATE:~3,2%
set DD=%DATE:~0,2%

set HH=%TIME: =0%
set HH=%HH:~0,2%
set MI=%TIME:~3,2%
set SS=%TIME:~6,2%
set FF=%TIME:~9,2%

ping -n 1 www.orange.fr > nul -w 1000

if %errorlevel% == 1 (
  echo %DD%/%MM%/%YYYY% %HH%:%MI%:%SS%::%FF% Internet down >> D:\Internet.txt
)

REM Timeout /t 30
@set errorlevel = 0

GOTO START