Faire une attente sous dos (batch)

Le temps d'attente va varier en fonction de la vitesse du processeur.

Un petit souci avec des conversions en octal pour les valeurs 08 et 09 m'a fait modifier cette procédure pour retirer le premier caractère de chaque valeur quand il s'agit d'un 0.
Mais sinon, la procédure semble fonctionner à merveille...

http://www.ss64.com/nt/
http://www.robvanderwoude.com/choice.html (merci Jeff)

version simplifiée de la boucle d'attente fonctionnant sur tous les ordinateurs et sans paramètres spéciaux de comportement ni programme spécifique
@echo off
echo.
echo test de boucle d'attente sous dos
echo appel de la routine pour 6 secondes d'attente

call :attente 6

echo l'attente (6secondes) est finie, le script peut continuer
pause

goto eof

:attente
rem pour appeler cette routine (temps en secondes) call :attente 5
call :calcultemps
set /a t1= %t2% + %1
:boucleattente
call :calcultemps
if "%t2%" LSS "%t1%" goto boucleattente
goto :eof
:calcultemps
set /a h1= %time:~0,2% * 3600 1>nul 2>&1
set /a m1= %time:~3,2% * 60 1>nul 2>&1
set s1=%time:~6,2% 1>nul 2>&1
set /a t2= %h1% + %m1% + %s1% 1>nul 2>&1
goto :eof

version plus complète avec prise en compte du changement de jour , affichage du temps restant, et beep final

@echo off
echo.
echo test de boucle d'attente sous dos

call :attente 12

pause
goto eof

:attente
rem pour appeler cette routine (temps en secondes) call :attente 5
set c2=.
set c3=%1
echo appel de la routine pour %1 secondes d'attente
call :calcultemps
set /a t1a= %t2%
set /a t1= %t2% + %1
rem ajouter éventuellement des 2 espaces après patienter
(Set /P paf= patienter ) <NUL

:boucleattente
call :calcultemps
set /a c1= %t2% - %t1a%
if %c1% LSS 0 (
set /a c1= 0
set /a c3= %t1% - 86400
set /a c2= %t1% - 86400
set /a t1a= 0
set /a t1= %t1% - 86400
)
:efface
rem si fonctionne pas
rem supprimer l'espace qui se met au copier coller en fin de ligne suivante : set c2=%c2:~0,-1%
set c2=%c2:~0,-1%
rem paf= caractère BS effacement arrière obtenu avec alt 008 avec notepad++
(Set /P paf=) <NUL
if not "%c2%"=="" goto efface
set /a c2=%c3% - %c1%
(Set /P paf=%c2%s ) <NUL
if not %c2% leq 0 goto boucleattente

(Set /P paf=) <NUL
echo l'attente de %1s est finie le script continue
rem son via carte mère : caractère : alt 007
echo 
rem son via la carte son
rundll32 user32.dll,MessageBeep
goto :eof

:calcultemps
set /a h1= %time:~0,2% * 3600 1>nul 2>&1
set /a m1= %time:~3,2% * 60 1>nul 2>&1
set s1=%time:~6,2% 2>&1
set /a t2= %h1% + %m1% + %s1% 1>nul 2>&1
goto :eof

La manipulation de date est une bonne idée.
En revanche on reste dans le cadre d'une boucle quasi infinie consommant du CPU.

le probleme c'est que si on veut l'integrer dans un autre programme au lieu de continuer a la fin du temp le programme se ferme

bonjour ; ça fonctionne si ça intéresse ; utilisez worpad.exe pour les accents et + :

=> Avec worpad.exe on peut enregistrer un fichier au format texte ms-dos (oem/ansi).

CRC32: 51E5549F
MD5: F78BD9F46E877C48C5E48DB09CB9F361
SHA-1: 3D1780F8DF5C5ADBD32B70AC573891305416C7D1
SHA-256: A3C85571AD1C080B58B64417D8971FC20E6A02BAEA8C97F7AC85F2C46A2C4B4F

test20120129-22h26.bat

@echo off

setlocal

cls
echo €a commence ...
echo.

set varadd=0
set varnombre=0

rem 0 = 00 to 15 ; 1 = 16 to 255
set vardecihexaright=0
rem 0 = 0x00 to 0x09 ; 1 = 0x10 to 0x0F
set varhexaright=0

rem 0 = 00 to 15 ; 1 = 16 to 255
set vardecihexaleft=0
rem 0 = 0x00 to 0x09 ; 1 = 0x10 to 0xFF
set varhexaleft=0

:astc
set /a varadd=%varnombre%+1
set varnombre=%varadd%
echo %varnombre%

set varnbrighthexa="%varnombre%"
if "%varnombre%" == "10" (set varnbrighthexa="A")
if "%varnombre%" == "11" (set varnbrighthexa="B")
if "%varnombre%" == "12" (set varnbrighthexa="C")
if "%varnombre%" == "13" (set varnbrighthexa="D")
if "%varnombre%" == "14" (set varnbrighthexa="E")
if "%varnombre%" == "15" (set varnbrighthexa="F")

set varnbrlefthexa="%varnombre%"
if "%varnombre%" == "10" (set varnbrlefthexa="A")
if "%varnombre%" == "11" (set varnbrlefthexa="B")
if "%varnombre%" == "12" (set varnbrlefthexa="C")
if "%varnombre%" == "13" (set varnbrlefthexa="D")
if "%varnombre%" == "14" (set varnbrlefthexa="E")
if "%varnombre%" == "15" (set varnbrlefthexa="F")

set stocknbrhexa=%varnbrlefthexa%%varnbrighthexa%
echo %stocknbrhexa%

rem ****
rem temporisation
rem http://support.microsoft.com/kb/460936/
rem http://www.commentcamarche.net/forum/affich-2047032-faire-une-attente-sous-dos-batch

set secondbegin=%time:~6,2%
set /a secondelay=%secondbegin%+1
set secondtest=%secondelay%
if "%secondtest%" == "60" (set secondtest=1)
if "%secondtest%" == "61" (set secondtest=2)
if "%secondtest%" == "62" (set secondtest=3)

:paustmp
rem pause
set secondactueltest=%time:~6,2%
rem echo %secondtest%
rem echo %secondactueltest%
if not %secondactueltest% geq %secondtest% (goto paustmp)
rem ****

if "%varnombre%" equ "15" (goto fin)
goto astc

goto answer%ERRORLEVEL%
:answer0
echo Le programme a retourné le code 0
goto suite
:answer1
echo Le programme a retourné le code 1
:suite
echo.
pause

:fin
endlocal
exit /B

C'est très difficile de trouver certaines erreurs comme un fichier echo qui bloque 'echo.'

à+ ; le but est de faire un compteur hexadécimale et + ...

slt re ; infos liées, (pour plus tard ; pas testée) :

"à+ ; le but est de faire un compteur hexadécimale et + ..."

Source du lien ci-dessous :

[Batch] Fonctions utiles pour des chaînes de caractères [Trucs & Astuces] - Forum des professionnels en informatique :
http://www.developpez.net/forums/d906307/general-developpement/programmation-systeme/windows/scripts-batch/fonctions-utiles-chaines-caracteres/

lien =>

New technique: Convert dec to hex with undocumented variable - alt.msdos.batch.nt | Google Groupes :
http://groups.google.com/group/alt.msdos.batch.nt/browse_thread/thread/0ceeb574d4ac4baa/bdfd22b0fe20084a#bdfd22b0fe20084a

"> > Hello, I devised a quick way to convert decimal numbers to hexadecimal
> > using undocumented =ExitCode variable.

> Thank you Carlos -- this may be the tool of the year!

> Frank

Thanks Frank. About ExitCodeAscii, this is only seted when you exit
with number between 32 and 126, this return ascii character, example
if I do exit /b 90 ExitCodeAscii is 'Z'

I want to emphasize that my last version, is more fast than Timo vbs
version. Test with timethis.exe indicate that my code delay 0,078 and
timo vbs 0,109.

This is my final version:"

@echo off
call :Dec2Hex 10554896 ret
echo.%ret%
pause
goto :eof

:Dec2Hex
"%ComSpec%" /d /c exit /b %~1 >nul
for /f "eol=0 delims=0 tokens=*" %%# in (
"%=ExitCode%") do if not "%%#"=="" (
set %~2=%%#) else (set %~2=0)
goto :eof

Avec set /a on peut faire l'inverse ; de hex vers décimale (base 10) :

Le code ci-dessous convertit la valeur hexadécimale 2F5 en décimal :

set hexa=2F5
set /a valeur=0x%hexa%
echo %valeur%

Source :

FAQ Windows Batch :
http://windows.developpez.com/faq/batch/?page=fonctions-utiles#conversion-hexa-decimal

j'aurais voulu pouvoir utiliser set /a mais pour obtenir aussi un résultat en hexadécimal.

(( POC Download avec Hash+Taille => GégènBinaire | CommentCaMarche :
http://www.commentcamarche.net/forum/affich-24282430-poc-download-avec-hash-taille-gegenbinaire ))

à vous lire

slt re : le compteur hexa fonctionne ... :
Astuce convertir DEC to HEX & danseur '.bat' | CommentCaMarche :
http://www.commentcamarche.net/forum/affich-24364049-astuce-convertir-dec-to-hex-danseur-bat
/!\ Le programme utilise "timeout /T 1 > nul" :
C:\Windows\System32\timeout.exe Windows 7 x64
CRC32: 02B42444
MD5: 68A0A50CCAD87E1EE1944410A96D066C
SHA-1: D2F730BCD081532FE2787E28408133F67F593A5F
SHA-256: 7E93723C0C34EF98444E5CE9013FEF220975B96291A79053FD4C9B3D3550AEB3
32,5 Ko (33 280 octets) taille + hash = fichier (...).
fsutil file createnew c:\timeout.exe 33280 (crée un fichier vide de 33280 octets ; Windows)
00 00 00 00 test hash du fichier ; ici de 4 octets pour la démonstration rapide.
00 00 00 01 +1 (avec un script qui pilote XVI32 (éditeur hexa) ou à la main lol) et test hash
00 00 00 02 +1 (avec un script qui pilote XVI32 (éditeur hexa) ou à la main lol) et test hash
(...)
FF FF FF FF +1 et test hash (vous devez avoir trouvé un hash correspondant ...)

Salut,

Availability
Choice.com was originally supplied on the Windows 95 install CD, however there are some issues with this version under NT - multiple concurrent invocations of CHOICE will clobber each other. CHOICE.com will also burn a lot of CPU's when in a wait state.
The NT and 2000 Resource Kits contain CHOICE.EXE which behaves a lot better.
In Windows 2003 CHOICE became a built-in command so it is no longer in the resource kit.
http://www.ss64.com/nt/choice.html

bonjour
bon script, mais ne fonctionne pas sous dos en paramètres régionaux "france" car dans time le point est remplacé par une virgule.
il faut donc ajouter la ligne suivante pour remplacer cette virgule (si elle est là) par un point
après set t1=N%%i il faut ajouter
set t1=!t1:,=.!
et après set t2=N%%i il faut ajouter
set t2=!t2:,=.!

pause affiche juste "appuyer sur une touche pour continuer..."

Oblige une interaction usager. Ce n'est pas ce qui est demandé.

Ben fallait juste lire ;-))