J'ai actuellement un petit jeu de débutant en construction mais mes connaissances ne me permettent pas de faire exactement ce que je voudrais, voila ce qu'il me faudrait encore:
-
- L'utilisateur ne doit pas pouvoir mettre autre chose que des chiffre entier sinon --> Message d'erreur!
- L'utilisateur doit absolument mettre dans "Chiffre le plus grand" un chiffre plus grand quand dans "chiffre le plus petit" (Ce qui est logique!) sinon --> Message d'erreur!
Voila mon script:
► Afficher le texte
Code : Tout sélectionner
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Beta
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GuiButton.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1_1 = GUICreate("Jeu de Michaël", 773, 475, 665, 348)
GUISetFont(8, 400, 0, "Copperplate Gothic Bold")
GUISetBkColor(0xA6CAF0)
Global $Input1 = GUICtrlCreateInput("", 320, 80, 113, 21)
Global $Input2 = GUICtrlCreateInput("", 320, 120, 113, 21)
Global $Input3 = GUICtrlCreateInput("", 320, 160, 113, 21)
Global $Button1 = GUICtrlCreateButton("Valider", 500, 112, 113, 41, $WS_GROUP)
GUICtrlSetCursor (-1, 0)
Global $Button2 = GUICtrlCreateButton("Valider", 500, 112, 113, 41, $WS_GROUP)
GUICtrlSetState($Button2, $GUI_HIDE)
GUICtrlSetCursor (-1, 0)
Global $Button3 = GUICtrlCreateButton("Réessayer !!!", 500, 112, 113, 41, $WS_GROUP)
GUICtrlSetState($Button3, $GUI_HIDE)
GUICtrlSetCursor (-1, 0)
Global $Label1 = GUICtrlCreateLabel("Le jeu du Plus ou du Moins", 124, 16, 539, 43)
GUICtrlSetFont(-1, 22, 800, 0, "Ravie")
Global $Label2 = GUICtrlCreateLabel("Chiffre le plus petit:", 104, 88, 155, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Copperplate Gothic Bold")
Global $Label3 = GUICtrlCreateLabel("Chiffre le plus grand:", 104, 128, 167, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Copperplate Gothic Bold")
Global $Label4 = GUICtrlCreateLabel("Nombre de coup(s) Maximum:", 104, 168, 207, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Copperplate Gothic Bold")
Global $Label5 = GUICtrlCreateLabel("", 60, 224, 268, 132)
GUICtrlSetFont(-1, 12, 400, 0, "Copperplate Gothic Bold")
Global $Progress1 = GUICtrlCreateProgress(47, 408, 680, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
HotKeySet("{ENTER}", "Clickit")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$chiffrePremier = GUICtrlRead($Input1)
$chiffreDeuxieme = GUICtrlRead($Input2)
$maximum = GUICtrlRead($Input3)
Global $chiffreH = Random($chiffrePremier, $chiffreDeuxieme, 1)
GUICtrlSetData($Progress1, 25)
Sleep(500)
GUICtrlSetData($Label5, "C'est bon, essayez de trouver le nombre mystère maintenant!")
Global $i = 0
GUICtrlDelete($Input1)
GUICtrlDelete($Input2)
GUICtrlDelete($Input3)
GUICtrlDelete($Button1)
GUICtrlDelete($Label4)
If ($maximum <= 1) Then
Global $Label4 = GUICtrlCreateLabel("Nombre de coup restant:", 104, 168, 207, 19)
Else
Global $Label4 = GUICtrlCreateLabel("Nombre de coups restant:", 104, 168, 207, 19)
EndIf
GUICtrlSetFont(-1, 10, 400, 0, "Copperplate Gothic Bold")
Global $Label7 = GUICtrlCreateLabel($chiffrePremier, 320, 80, 400, 21)
GUICtrlSetFont(-1, 16, 400, 0, "Copperplate Gothic Bold")
Global $Label8 = GUICtrlCreateLabel($chiffreDeuxieme, 320, 120, 400, 21)
GUICtrlSetFont(-1, 16, 400, 0, "Copperplate Gothic Bold")
Global $Label9 = GUICtrlCreateLabel($maximum, 320, 160, 400, 21)
GUICtrlSetFont(-1, 16, 400, 0, "Copperplate Gothic Bold")
Global $Label6 = GUICtrlCreateLabel("Nombre Mystère:", 392, 248, 129, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Copperplate Gothic Bold")
Global $Input4 = GUICtrlCreateInput("", 544, 248, 113, 21)
GUICtrlSetState($Button2, $GUI_SHOW )
HotKeySet("{ENTER}", "Clickit2")
Case $Button2
$i = $i + 1
$maximum = $maximum -1
$reponse = GUICtrlRead($Input4)
$reponse = Number($reponse)
GUICtrlDelete($Label4)
If ($maximum <= 1) Then
Global $Label4 = GUICtrlCreateLabel("Nombre de coup restant:", 104, 168, 207, 19)
Else
Global $Label4 = GUICtrlCreateLabel("Nombre de coups restant:", 104, 168, 207, 19)
EndIf
GUICtrlSetFont(-1, 10, 400, 0, "Copperplate Gothic Bold")
If ($reponse > $chiffreH) Then
GUICtrlSetData($Progress1, 60)
Sleep(500)
GUICtrlSetData($Label5, "Pas mal... mais c'est un peu moins !" & @CRLF & @CRLF & @CRLF & "Nombre tenté : " & $reponse)
ElseIf ($reponse < $chiffreH) Then
GUICtrlSetData($Progress1, 60)
Sleep(500)
GUICtrlSetData($Label5, "Pas mal... mais c'est un peu plus !" & @CRLF & @CRLF & @CRLF & "Nombre tenté : " & $reponse)
ElseIf ($reponse = $chiffreH) Then
Sleep(500)
GUICtrlSetData($Progress1, 100)
If ($i = 1) Then
GUICtrlSetData($Label5, "Vous avez réussi ! Extraordinaire vous avez fait " & $i & " coup! Bravo ! Bip Bip Bip Fin du programme.")
Else
GUICtrlSetData($Label5, "Vous avez réussi ! Extraordinaire vous avez fait " & $i & " coups! Bravo ! Bip Bip Bip Fin du programme.")
EndIf
GUICtrlDelete($Button2)
GUICtrlDelete($Input4)
Global $Label10 = GUICtrlCreateLabel($reponse, 544, 245, 113, 21)
GUICtrlSetFont(-1, 16, 400, 0, "Copperplate Gothic Bold")
GUICtrlSetState($Button3, $GUI_SHOW )
HotKeySet("{ENTER}", "Clickit3")
EndIf
If ($maximum > 0) Then
GUICtrlDelete($Label9)
Global $Label9 = GUICtrlCreateLabel($maximum, 320, 160, 400, 21)
GUICtrlSetFont(-1, 16, 400, 0, "Copperplate Gothic Bold")
ElseIf ($maximum <= 0) Then
GUICtrlDelete($Label9)
Global $Label9 = GUICtrlCreateLabel("0", 320, 160, 400, 21)
GUICtrlSetFont(-1, 16, 400, 0, "Copperplate Gothic Bold")
GUICtrlSetColor(-1, 0xFF0000)
EndIf
Case $Button3
ShellExecute("gui.exe")
Exit
EndSwitch
WEnd
Func Clickit()
_GUICtrlButton_Click($Button1)
EndFunc
Func Clickit2()
_GUICtrlButton_Click($Button2)
EndFunc
Func Clickit3()
_GUICtrlButton_Click($Button3)
EndFuncMerci d'avance pour votre aide.
Cordialement Fatal
