Advertisement
Kiliandeca

Trouve le Nombre 2

Mar 19th, 2014
489
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.74 KB | None | 0 0
  1. @Echo off
  2.  
  3. :MenuJoin
  4. cls
  5. echo ----------------------------------------------------------------------
  6. echo Bienvenue sur Trouve Le Nombre II
  7. echo ----------------------------------------------------------------------
  8. echo 1 - Jouer
  9. echo 2 - Astuces
  10. echo 3 - Credits
  11. echo 4 - Quitter
  12. echo ----------------------------------------------------------------------
  13.  
  14. choice /c:1234 /m "Que voulez vous faire"
  15. if %ERRORLEVEL%==1 goto :MenuJouer
  16. if %ERRORLEVEL%==2 goto :Astuces
  17. if %ERRORLEVEL%==3 goto :Credit
  18. if %ERRORLEVEL%==4 goto :Leave
  19.  
  20. :MenuJouer
  21. cls
  22. echo ----------------------------------------------------------------------
  23. echo Nombre a trouvé compris entre :
  24. echo 1- 1-10
  25. echo 2- 1-100
  26. echo 3- 1-1000
  27. echo 4- 1-10000
  28. echo 5- 1-Choix perso
  29. echo ----------------------------------------------------------------------
  30.  
  31. choice /c:12345
  32. if %ERRORLEVEL%==1 goto :Jeu10
  33. if %ERRORLEVEL%==2 goto :Jeu100
  34. if %ERRORLEVEL%==3 goto :Jeu1000
  35. if %ERRORLEVEL%==4 goto :Jeu10000
  36. if %ERRORLEVEL%==5 goto :Jeuperso
  37.  
  38. :Jeu10
  39. set NombreMax=10
  40. goto :JeuVarNombre
  41.  
  42. :Jeu100
  43. set NombreMax=100
  44. goto :JeuVarNombre
  45.  
  46. :Jeu1000
  47. set NombreMax=1000
  48. goto :JeuVarNombre
  49.  
  50. :Jeu10000
  51. set NombreMax=10000
  52. goto :JeuVarNombre
  53.  
  54. :Jeuperso
  55. cls
  56. echo ----------------------------------------------------------------------
  57. echo Choisisez votre valeur maximal
  58. echo ----------------------------------------------------------------------
  59. set /p NombreMax=
  60. goto :JeuVarNombre
  61.  
  62. :JeuVarNombre
  63. set /a Nombre=%random% %%%NombreMax%
  64. :Jeu0
  65. cls
  66. echo ----------------------------------------------------------------------
  67. echo Entrez un nombre compris entre 1 et %NombreMax%
  68. echo ----------------------------------------------------------------------
  69. :JeuB
  70. set /p JeuRep=
  71. set /a Tentatives=%Tentatives%+1
  72. if %JeuRep% LSS %Nombre% goto :Grand
  73. if %JeuRep% GTR %Nombre% goto :Petit
  74. if %JeuRep% EQU %Nombre% goto :Bingo
  75.  
  76. :Grand
  77. echo ----------------------------------------------------------------------
  78. echo Le nombre est plus grand que %JeuRep% !
  79. echo C'est votre %tentatives%e tentative !
  80. echo ----------------------------------------------------------------------
  81. goto :JeuB
  82.  
  83. :Petit
  84. echo ----------------------------------------------------------------------
  85. echo Le nombre est plus Petit que %JeuRep% !
  86. echo C'est votre %tentatives%e tentative !
  87. echo ----------------------------------------------------------------------
  88. goto :JeuB
  89. :Bingo
  90. cls
  91. echo ----------------------------------------------------------------------
  92. echo BRAVO !
  93. echo Felicitation, le nombre etait bien %JeuRep%
  94. echo Vous avez reussit en %Tentatives% tentatives
  95. echo ----------------------------------------------------------------------
  96. choice /c:yn /M "Voulez vous rejouer"
  97.  
  98. if %ERRORLEVEL%==1 goto MenuJouer
  99. goto :MenuJoin
  100.  
  101. :Astuces
  102. cls
  103. echo ----------------------------------------------------------------------
  104. echo La meilleur methode est de reduire par deux le nombre
  105. echo de posibilites a chaque fois.
  106. echo ----------------------------------------------------------------------
  107. choice /c:y /M "Retourner au menu"
  108. if %ERRORLEVEL%==1 goto :MenuJoin
  109.  
  110. :Credit
  111. cls
  112. echo ----------------------------------------------------------------------
  113. echo Jeu cree par Decaderincourt.K
  114. echo Contact : Kilian.Decaderincourt@gmail.com
  115. echo ----------------------------------------------------------------------
  116. choice /c:y /M "Voulez vous retourner au menu"
  117. if %ERRORLEVEL%==1 goto :MenuJoin
  118.  
  119. :Leave
  120. cls
  121. echo ----------------------------------------------------------------------
  122. echo Voulez vous quitter le programme ?
  123. echo ----------------------------------------------------------------------
  124.  
  125. choice /c:yn /M "Quitter"
  126. if %ERRORLEVEL%==1 goto :exit
  127. goto :MenuJoin
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement