1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
| echo off
for /f "tokens=4* delims= " %%i in ('dir /o:d "C:\travail\TEST_RANGING\ranging\*.txt" ^| findstr /i /c:".txt"') do set VrFchRcnt=%%i %%j
set files=C:\travail\TEST_RANGING\ranging\%VrFchRcnt%
echo ouverture>log_%VrFchRcnt%
rem echo %VrFchRcnt%
set compt=0
rem echo compt : %compt%
SETlocal enableDelayedExpansion
FOR /f "tokens=5 delims= " %%i in (C:\travail\TEST_RANGING\ranging\%VrFchRcnt%) do (
rem echo %%i
rem pause
rem echo %%i
rem echo compt1 : !compt!
if !compt!==0 ( set VALPREC=%%i
rem echo VALPREC1 =!VALPREC!
set /a compt=1
rem echo compt2 : !compt!
rem echo on y passe
)
rem echo VALPREC =!VALPREC!
rem pause
set Calcul=%%i - !VALPREC!
echo E = !Calcul!
echo E = !Calcul! >> __.vbs
echo WScript.Echo E >> __.vbs
rem cscript /nologo __.Vbs
for /f "tokens=*" %%y in ('cscript/nologo __.vbs') do (set y=%%y)
set delta=!y:~0,4%!
echo delta : !delta!
pause
if !delta! GEQ 0.02 ( rem c est la que cela bug
echo on y passe
echo Mesure incohérente>>log_%VrFchRcnt%)
pause
del __.vbs 2>nul
pause
set valprec=%%i
)
pause |