Discussion :

[AZzjeioafh]

Bonjour, comment faire un batch qui permet de proposer le mot ordinateur (par exemple) mais en le cachant et c'est en tapant des lettres qui composent ce mot qu'on va le découvrir (une sorte de pendu)??
merci
a+

[AZzjeioafh]

Et si possible sa http://heliomass.free.fr/pendu.png

(le pendu qui se pend au fur et a mesure des mauvaises réponses)

[Mac LAK]

Pas d'images en BATCH, faudrait jouer avec les CLS et de l'Ascii-art.

Quant à cacher le mot, si ce n'est pas un mot entré par l'utilisateur, il faudra jouer avec les substitutions de variables (cf. aide de la commande "set").

[AZzjeioafh]

Oui je n'ai pas précisé: est ce que ce serait possible (pas l'image) mais de faire le mec qui se pend mais avec des echo (si tu voit un peu se ke je veux dire)
pour ce que tu as dit, je vais voir. Je te tiens au courant
a+

[Mac LAK]

Oui je n'ai pas précisé: est ce que ce serait possible (pas l'image) mais de faire le mec qui se pend mais avec des echo (si tu voit un peu se ke je veux dire)

Oui, c'est possible sans problème, c'est juste long et pénible car il faudra "découper" le dessin ligne par ligne en Ascii-art (ou faire un type sur un fichier contenant déjà le dessin).

[AZzjeioafh]

ok merci je vais voir tout sa et je te dis

[AZzjeioafh]

Salut, (désolé pour le temps que j'ai mis) j' ai (enfin) trouvé qq chose de pas mal (pour l'instant, il n'y a que le mot "Banane")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
@echo off 

:ETABLIR
cls
set /a STEPS=0
set /a B=0
set /a A=0
set /a N=0
set /a E=0
goto :BANANE

:VER
cls
IF %B% == 0 goto BANANE
IF %A% == 0 goto BANANE
IF %N% == 0 goto BANANE
IF %E% == 0 goto BANANE
goto :GAGNE

:BANANE
cls
echo.
echo   %B%%A%%N%%A%%N%%E%   /   Essais: %STEPS%
echo.
echo   Tapez une Lettre:
echo.
set /p LETTRE=
IF %LETTRE% == B set B=B 
IF %LETTRE% == A set A=A 
IF %LETTRE% == N set N=N 
IF %LETTRE% == E set E=E 
IF %LETTRE% == b set B=B 
IF %LETTRE% == a set A=A 
IF %LETTRE% == n set N=N 
IF %LETTRE% == e set E=E 
set /a STEPS+=1
goto :VER

:GAGNE
cls
echo.
echo   %B%%A%%N%%A%%N%%E%   /   Essais: %STEPS%
echo.
echo                Gagne!!!
echo.
pause>nul

PS: Pour le personnage qui se pend au fur et a mesure des erreurs, je vais essayer de me débrouiller

Merci pour tout

[AZzjeioafh]

Ca y est , pour le dessin c'est terminé (j'ai utilisé la cmd TYPE):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
@echo off 
cls

:STARTVER
cls
IF NOT EXIST PENDU1.TXT goto ERROR
IF NOT EXIST PENDU2.TXT goto ERROR
IF NOT EXIST PENDU3.TXT goto ERROR
IF NOT EXIST PENDU4.TXT goto ERROR
IF NOT EXIST PENDU5.TXT goto ERROR
IF NOT EXIST PENDU6.TXT goto ERROR
IF NOT EXIST PENDU7.TXT goto ERROR
IF NOT EXIST PENDU8.TXT goto ERROR
IF NOT EXIST PENDU9.TXT goto ERROR
IF NOT EXIST PENDU10.TXT goto ERROR
IF NOT EXIST PENDU11.TXT goto ERROR
IF NOT EXIST PENDU12.TXT goto ERROR
goto :START

:START
cls
echo.
echo   Appuyez sur n importe quelle touche pour commencer     
echo.
pause>nul
goto :BAN

:BAN
cls
set /a ESSAIS=11
set /a ERROR=0
set /a B=0
set /a A=0
set /a N=0
set /a E=0
goto :BANANE

:VERPER
cls
IF %ERROR% == 11 goto PERDU
goto :VERBAN

:VERBAN
cls
IF %B% == 0 goto BANANE
IF %A% == 0 goto BANANE
IF %N% == 0 goto BANANE
IF %E% == 0 goto BANANE
goto :GAGNE

:BANANE
cls
IF %ERROR% == 0 TYPE PENDU1.TXT
IF %ERROR% == 1 TYPE PENDU2.TXT
IF %ERROR% == 2 TYPE PENDU3.TXT
IF %ERROR% == 3 TYPE PENDU4.TXT
IF %ERROR% == 4 TYPE PENDU5.TXT
IF %ERROR% == 5 TYPE PENDU6.TXT
IF %ERROR% == 6 TYPE PENDU7.TXT
IF %ERROR% == 7 TYPE PENDU8.TXT
IF %ERROR% == 8 TYPE PENDU9.TXT
IF %ERROR% == 9 TYPE PENDU10.TXT
IF %ERROR% == 10 TYPE PENDU11.TXT
echo.
echo   %B%%A%%N%%A%%N%%E% / Erreurs: %ERROR% / Essais Restants: %ESSAIS% 
echo.
echo   Tapez une Lettre:
echo.
set /p LETTRE=
IF %LETTRE% == B set B=B & goto :VERBAN
IF %LETTRE% == A set A=A & goto :VERBAN
IF %LETTRE% == N set N=N & goto :VERBAN
IF %LETTRE% == E set E=E & goto :VERBAN
IF %LETTRE% == b set B=B & goto :VERBAN
IF %LETTRE% == a set A=A & goto :VERBAN
IF %LETTRE% == n set N=N & goto :VERBAN
IF %LETTRE% == e set E=E & goto :VERBAN
set /a ERROR+=1
set /a ESSAIS-=1
GOTO :VERPER

:GAGNE
cls
echo.
echo   %B%%A%%N%%A%%N%%E%   /   Erreurs: %ERROR%
echo.
echo                Gagne!!!
echo.
pause>nul
goto :START

:ERROR
cls
echo.
echo   Un ou des fichiers sont manquants!
echo   Veuillez placer les fichiers de PENDU1.TXT jusqu a
echo   PENDU12.TXT dans ce repertoire...
echo.
pause>nul
exit  

:PERDU
cls
TYPE "PENDU12.TXT"
echo.
echo   Vous avez Perdu!  
echo.
echo   Le mot etait: B A N A N E
echo.
echo   Erreurs: %ERROR% 
echo.
pause>nul
goto :START

Les fichiers PENDU1.TXT, PENDU2.TXT etc.. sont les images du personnage qui se pend

[Ryuk_dieuDeLaMort]

Bonsoir à tous, alors je répond à la demande de pierreh51 car j'ai à peux près la même demande mais un peut plus complexe, je suis étudiant en informatique et on apprend la programmation en batch actuellement et l'idée du prof était de faire le jeu du pendu en batch avec sur le côté un fichier dico.txt. L'ennui ma programmation est faite et correcte jusqu'au moment ou le pc doit sélectionner un mot dans la liste. Il reste figé et je dois quitter le ms-dos.
Je vous met la partie du code ou il fait la sélection :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
echo bienvenu dans le jeu du pendu %pseudo%
setlocal enableDelayedExpansion
set I=0
    for /f %%I in (type "dico.txt"') do set /a nbrLigne+=1
    set /a numMot=%random%%%!nbrLigne!
    for /f "tokens=1 delims=\  %%I in (type "dico.txt"') do (
        set /a i+=1
        if !i!==!numMot! set mot=%%I

J'ai tester différent code source trouver sur internet mais sans résultat.
Je remercie d'avance ceux qui pourront m'aider.
Bien à vous