[Ex] Petit jeu de clic

[Dididj]

Voici un petit jeu que je viens de faire.

Le but est de cliquer de sur le smiley.

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#Include <Misc.au3>

$imageX = Random(0,485,1)
$imageY = Random(0,395,1)
$numeroclik = 0



$fenetre = GUICreate("Cliquer",500,450)
$gobtn = GUICtrlCreateButton("Go",420,410,60)
$stopbtn = GUICtrlCreateButton("Stop",420,410,60)
GUICtrlSetState($stopbtn,$GUI_HIDE)
$image = GUICtrlCreatePic ("icon.gif",$imageX,$imageY,15,15)
GUICtrlSetState($image,$GUI_HIDE)
GUISetState()




While 1
    $msg = GUIGetMsg()
    Select
        Case $gui_event_close = $msg
            Exit
        Case $gobtn = $msg
                $numeroclik = 1
                GUICtrlSetState($image,$GUI_SHOW)
                GUICtrlSetState($stopbtn,$GUI_SHOW)
                GUICtrlSetState($gobtn,$GUI_HIDE)
                $temps = TimerInit()
            Case $stopbtn = $msg
                $numeroclik = 0
                GUICtrlSetState($image,$GUI_HIDE)
                GUICtrlSetState($stopbtn,$GUI_HIDE)
                GUICtrlSetState($gobtn,$GUI_SHOW)
                $temps2 = TimerDiff($temps)
    EndSelect
    If $numeroclik = 1 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 2
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 2 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 3
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 3 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 4
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 4 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 5
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 5 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 6
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 6 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 7
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 7 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 8
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 8 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    $imageX = Random(0,485,1)
                    $imageY = Random(0,395,1)
                    GUICtrlSetPos ($image,$imageX,$imageY)
                    $numeroclik = 9
                EndIf
            EndIf
        EndIf
    EndIf
    If $numeroclik = 9 Then
        If _IsPressed(01) Then
            $possouris = MouseGetPos()
            $posfenetre = WinGetPos($fenetre)
            $pos = $posfenetre[0] - $possouris[0]
            $pos2 = $posfenetre[1] - $possouris[1]
            If -$imageX-3 = $pos Or -$imageX-4 = $pos Or -$imageX-5 = $pos Or -$imageX-6 = $pos Or -$imageX-7 = $pos Or -$imageX-8 = $pos Or -$imageX-9 = $pos Or -$imageX-10 = $pos Or -$imageX-11 = $pos Or -$imageX-12 = $pos Or -$imageX-13 = $pos Or -$imageX-14 = $pos Or -$imageX-15 = $pos Or -$imageX-16 = $pos Or -$imageX-17 = $pos Or -$imageX-18 = $pos Then
                If -$imageY-23 = $pos2 Or -$imageY-24 = $pos2 Or -$imageY-25 = $pos2 Or -$imageY-26 = $pos2 Or -$imageY-27 = $pos2 Or -$imageY-28 = $pos2 Or -$imageY-29 = $pos2 Or -$imageY-30 = $pos2 Or -$imageY-31 = $pos2 Or -$imageY-32 = $pos2 Or -$imageY-33 = $pos2 Or -$imageY-34 = $pos2 Or -$imageY-35 = $pos2 Or -$imageY-36 = $pos2 Or -$imageY-37 = $pos2 Or -$imageY-38 = $pos2 Then
                    GUICtrlSetState($image,$GUI_HIDE)
                    GUICtrlSetState($stopbtn,$GUI_HIDE)
                    GUICtrlSetState($gobtn,$GUI_SHOW)
                    $temps2 = TimerDiff($temps)
                    $resultat = 9 / $temps2
                    $resultat = $resultat * 60000
                    $resultat = Round($resultat, 0.1)
                    MsgBox(0,"",$resultat & " Clics / minute !")
                EndIf
            EndIf
        EndIf
    EndIf



WEnd


 

P.S : Mettre l'image dans le même répertoire que le script ( ou modifier dans le code )

[Habibsbib]

Lol ^^ Ben alors voila un script pour tout le temps gagner à ton jeu ^^ Il clique sur GO, et apres il clique systèmatiquement sur le smiley, et si il ne le trouve plus, il quitte !
Imparable ^^ :

Code : Tout sélectionner

WinActivate ( "Cliquez !" )
MouseClick ( "left", 1000, 693, 1, 0 )
While 1
$smiley=PixelSearch ( 548, 247, 1055, 725, "0xFE9D00" )
if not @error Then 
    MouseClick ( "left", $smiley[0], $smiley[1], 1, 0 )
EndIf
if @error Then
    MsgBox ( 0, "Gagné !", "C'est gagné patron !" )
        Exit 0
EndIf
WEnd 

Quand je le lance, ton programme me met : 1892clics/min ^^
EDIT : étrange.. ca varie entre 1800 et 1950 clics ! c'est zarb !