Guess My Number Game

[Hok]

Hey everyone. This is my first contribution, but it isn't very useful. It is a simple GuessMyNumber game where you guess a number between 1 and 100. Check it out and please give me feedback.

Hok

GuessMyNumberGUI.au3

[d2addict4]

cool for a newbage

[TnTProductions]

cool for a newbage

agreed

[d4rk]

8 tries for "21", I'm OK

[Kip]

6 tries for 35

[i542]

3 tries for 89.

[Kip]

Edited May 17, 2008 by Kip

[i542]

expandcollapse popup

Func Test()
$Guess=GUICtrlRead($input1)
If ($guess > $Random) then
        $Label2 = GUICtrlCreateLabel("Status: Checking...", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        Sleep(Random(500, 1000))
        $Label2 = GUICtrlCreateLabel("Status: The Number is Lower!", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        $Counter=$Counter+1
    EndIf
If ($guess < $Random) then
    $Label2 = GUICtrlCreateLabel("Status: Checking...", 8, 168, 376, 48)
    GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        Sleep(Random(500, 1000))
        $Label2 = GUICtrlCreateLabel("Status: The Number is Higher!", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        $Counter=$Counter+1
        EndIf
    If ($guess == $Random) then
        $Label2 = GUICtrlCreateLabel("Status: Checking...", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        Sleep(Random(500, 1000))
        If $Counter<5 Then
            $Phrase=" You are pro!"
        EndIf
        If $Counter >= 5 Then
            $Phrase=" You are OK..."
        EndIf
        If $Counter>10 Then
            $Phrase=" You are awful!"
        EndIf
        
        $Label2 = GUICtrlCreateLabel("Nice! You got it! It took you " &$Counter &" tries!" &$Phrase, 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        $Counter=$Counter+1
        Sleep(2000)
    EndIf
EndFunc

Now it can say "You're a pro"

Edited May 17, 2008 by i542

[Kip]

and what if you have 5?

the script only uses: Larger than 5, and smaller than 5. Not: if larger or equals.

[Hok]

I'm seeing a lot of...

I got ___ tries for ___. Any better way I could've written the code?

[Vossen]

expandcollapse popup

Func Test()
    $Guess = GUICtrlRead($Input1)
    If $Guess > 100 or $Guess < 1 Then
        MsgBox(64,"Guess invalid","The guess has to be a number from 1 to 100. " & $Guess & " is not within that range.")
    Else
    If ($Guess > $Random) Then
        $Label2 = GUICtrlCreateLabel("Status: Checking...", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        Sleep(Random(500, 1000))
        $Label2 = GUICtrlCreateLabel("Status: The Number is Lower!", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        $Counter = $Counter + 1
    EndIf
    If ($Guess < $Random) Then
        $Label2 = GUICtrlCreateLabel("Status: Checking...", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        Sleep(Random(500, 1000))
        $Label2 = GUICtrlCreateLabel("Status: The Number is Higher!", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        $Counter = $Counter + 1
    EndIf
    If ($Guess == $Random) Then
        $Label2 = GUICtrlCreateLabel("Status: Checking...", 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        Sleep(Random(500, 1000))
        If $Counter < 5 Then
            $Phrase = " You are pro!"
        EndIf
        If $Counter < 10 Then
            $Phrase = " You are OK..."
        EndIf
        If $Counter > 10 Then
            $Phrase = " You are awful!"
        EndIf
        
        $Label2 = GUICtrlCreateLabel("Nice! You got it! It took you " & $Counter & " tries!" & $Phrase, 8, 168, 376, 48)
        GUICtrlSetFont(-1, 15, 800, 0, "Toxica")
        $Counter = $Counter + 1
        Sleep(2000)
    EndIf
    EndIf
EndFunc

Now it will give an error if the guess in invalid.

Edited May 19, 2008 by Vossen

[Gillboss]

5 tries xD

i have secret technique, i cant public it

[AlmarM]

Nice! You got it! It took you 1 tries! You are OK... It was 5 >.<

Nice program

[ACS]

Nice first shot for a program.

I have a few suggestion to make it a bit more user-friendly.

After a guess, the program should clear the input field so the user can just type another guess. Of course the message should report the guessed number, i.e. "The number is higher than (guess)!"

After the user correctly guesses the number, the "Guess" button should reset the game so the user can play again. For example, the button text can change to "New game" or something similar, and when the user clicks it the button reverts back to its original "Guess" state and the status message informs the user its ready for a new guess.

On that same note, when the program first starts up the status message should say it's waiting for the user to make a guess.

Just some suggestions from a GUI nazi.