[R] Je voudrais créer un morpion

[genaille08]

bonjour a tous ^^,
sa faisait longtemps que je ne vous avez pas fait ch** avec mes questions en stoc ...

bon alors cette fois je voudrais créer un morpion, mais pour cela il me faudrait de forme de checkbox différentes, or je ne sais pas comment faire , donc ma premiere question sera : comment faire deux forme de checkbox diferentes ???

et puis ma deuxieme question ( toujours en accord avec la charte XD ), comment puis-je faire pour que quand l'utilisateur ai joué il ne puisse plus décocher la case ??

voila voila merci d'avance

[jbnh]

il y en a beaucoup sur le forum officiel, en voici un, clair et simple:

► Afficher le textedu code

Code : Tout sélectionner

#include <GUIConstants.au3>
#NoTrayIcon

Global $over=0
Global $win=0
Global $turn=1
Global $yo=0
Global $comp=0

GUICreate("Tic Tac Toe", 254, 228)

$A1 = GUICtrlCreateLabel("", 8, 8, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$A2 = GUICtrlCreateLabel("", 88, 8, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$A3 = GUICtrlCreateLabel("", 168, 8, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$B1 = GUICtrlCreateLabel("", 8, 80, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$B2 = GUICtrlCreateLabel("", 88, 80, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$B3 = GUICtrlCreateLabel("", 168, 80, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$C1 = GUICtrlCreateLabel("", 8, 152, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$C2 = GUICtrlCreateLabel("", 88, 152, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
$C3 = GUICtrlCreateLabel("", 168, 152, 76, 65, BitOR($SS_CENTER,$SS_SUNKEN))
GUIctrlsetBkColor(-1,0xFFFFFF)
GUICtrlSetFont(-1,40)
GUISetBkColor(0x000000)
GUISetState(@SW_SHOW)

Randomize()


While 1
    clear()
    Do
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                Exit
            Case $A1
                jugar($A1)     
            Case $A2
                jugar($A2)
            Case $A3
                jugar($A3)
            Case $B1
                jugar($B1) 
            Case $B2
                jugar($B2)
            Case $B3
                jugar($B3) 
            Case $C1
                jugar($C1)
            Case $C2
                jugar($C2)
            Case $C3
                jugar($C3)
        EndSwitch
        win()
    Until $win=1 OR $win=2 OR $over=1


    If $win=1 Then
        $yo+=1
        SoundPlay(@WindowsDir&"\media\tada.wav")
        MsgBox(0,"","You Won!"&@CR&@CR&"You= "&$yo&@CR&"Bot= "&$Comp)
    EndIf
    If $win=2 Then
        $comp+=1
        MsgBox(0,"","You Lost!"&@CR&@CR&"You= "&$yo&@CR&"Bot= "&$Comp)
    EndIf
    If $win=0 AND  $over=1 Then
        MsgBox(0,"","It's A Tie!"&@CR&@CR&"You= "&$yo&@CR&"Bot= "&$Comp)
    EndIf

WEnd


Func jugar($oCasi)
    GUICtrlSetData($oCasi,"X")
    GUICtrlSetState($oCasi,$GUI_DISABLE)
   
    ;TRATAR DE GANAR(EVIDENTE)
    ;Horizontal=
    If GUICtrlRead($A1)="O" AND GUICtrlRead($A2)="O" AND GUICtrlRead($A3)="" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($A2)="O" AND GUICtrlRead($A3)="O" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="O" AND GUICtrlRead($A2)="" AND GUICtrlRead($A3)="O" Then
        GUICtrlSetData($A2,"O")
        GUICtrlSetState($A2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="O" AND GUICtrlRead($B2)="O" AND GUICtrlRead($B3)="" Then
        GUICtrlSetData($B3,"O")
        GUICtrlSetState($B3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($B3)="O" Then
        GUICtrlSetData($B1,"O")
        GUICtrlSetState($B1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($B3)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf   
    If GUICtrlRead($C1)="O" AND GUICtrlRead($C2)="O" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($C1)="" AND GUICtrlRead($C2)="O" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($C1)="O" AND GUICtrlRead($C2)="" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($C2,"O")
        GUICtrlSetState($C2,$GUI_DISABLE)
        Return
    EndIf
    ;========
   
    ;Vertical=
    If GUICtrlRead($A1)="O" AND GUICtrlRead($B1)="" AND GUICtrlRead($C1)="O" Then
        GUICtrlSetData($B1,"O")
        GUICtrlSetState($B1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B1)="O" AND GUICtrlRead($C1)="O" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="O" AND GUICtrlRead($B1)="O" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf

    If GUICtrlRead($A2)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($C2)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A2)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C2)="O" Then
        GUICtrlSetData($A2,"O")
        GUICtrlSetState($A2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A2)="O" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C2)="" Then
        GUICtrlSetData($C2,"O")
        GUICtrlSetState($C2,$GUI_DISABLE)
        Return
    EndIf
   
    If GUICtrlRead($A3)="O" AND GUICtrlRead($B3)="" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($B3,"O")
        GUICtrlSetState($B3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B3)="O" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="O" AND GUICtrlRead($B3)="O" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    ;==============
   
    ;Diagonal=
    If GUICtrlRead($A1)="O" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
   
    If GUICtrlRead($A3)="O" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($C1)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C1)="O" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    ;======================
   
    ;TRATAR DE EVITAR QUE USUARIO GANE=
    ;Horizontal=
    If GUICtrlRead($A1)="X" AND GUICtrlRead($A2)="X" AND GUICtrlRead($A3)="" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($A2)="X" AND GUICtrlRead($A3)="X" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="X" AND GUICtrlRead($A2)="" AND GUICtrlRead($A3)="X" Then
        GUICtrlSetData($A2,"O")
        GUICtrlSetState($A2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="X" AND GUICtrlRead($B2)="X" AND GUICtrlRead($B3)="" Then
        GUICtrlSetData($B3,"O")
        GUICtrlSetState($B3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="" AND GUICtrlRead($B2)="X" AND GUICtrlRead($B3)="X" Then
        GUICtrlSetData($B1,"O")
        GUICtrlSetState($B1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="X" AND GUICtrlRead($B2)="" AND GUICtrlRead($B3)="X" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf   
    If GUICtrlRead($C1)="X" AND GUICtrlRead($C2)="X" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($C1)="" AND GUICtrlRead($C2)="X" AND GUICtrlRead($C3)="X" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($C1)="X" AND GUICtrlRead($C2)="" AND GUICtrlRead($C3)="X" Then
        GUICtrlSetData($C2,"O")
        GUICtrlSetState($C2,$GUI_DISABLE)
        Return
    EndIf
    ;========
   
    ;Vertical=
    If GUICtrlRead($A1)="X" AND GUICtrlRead($B1)="" AND GUICtrlRead($C1)="X" Then
        GUICtrlSetData($B1,"O")
        GUICtrlSetState($B1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B1)="X" AND GUICtrlRead($C1)="X" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="X" AND GUICtrlRead($B1)="X" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf

    If GUICtrlRead($A2)="X" AND GUICtrlRead($B2)="" AND GUICtrlRead($C2)="X" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A2)="" AND GUICtrlRead($B2)="X" AND GUICtrlRead($C2)="X" Then
        GUICtrlSetData($A2,"O")
        GUICtrlSetState($A2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A2)="X" AND GUICtrlRead($B2)="X" AND GUICtrlRead($C2)="" Then
        GUICtrlSetData($C2,"O")
        GUICtrlSetState($C2,$GUI_DISABLE)
        Return
    EndIf
   
    If GUICtrlRead($A3)="X" AND GUICtrlRead($B3)="" AND GUICtrlRead($C3)="X" Then
        GUICtrlSetData($B3,"O")
        GUICtrlSetState($B3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B3)="X" AND GUICtrlRead($C3)="X" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="X" AND GUICtrlRead($B3)="X" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    ;==============
   
    ;Diagonal=
    If GUICtrlRead($A1)="X" AND GUICtrlRead($B2)="X" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="X" AND GUICtrlRead($B2)="" AND GUICtrlRead($C3)="X" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B2)="X" AND GUICtrlRead($C3)="X" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
   
    If GUICtrlRead($A3)="X" AND GUICtrlRead($B2)="X" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="X" AND GUICtrlRead($B2)="" AND GUICtrlRead($C1)="X" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B2)="X" AND GUICtrlRead($C1)="X" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    ;======================
   
   
   
    ;TRATAR DE GANAR(NO EVIDENTE)
   
   
   
        ;Horizontal=
    If GUICtrlRead($A1)="O" AND GUICtrlRead($A2)="" AND GUICtrlRead($A3)="" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($A2)="O" AND GUICtrlRead($A3)="" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($A2)="" AND GUICtrlRead($A3)="O" Then
        GUICtrlSetData($A2,"O")
        GUICtrlSetState($A2,$GUI_DISABLE)
        Return
    EndIf
   
   
    If GUICtrlRead($B1)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($B3)="" Then
        GUICtrlSetData($B3,"O")
        GUICtrlSetState($B3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($B3)="" Then
        GUICtrlSetData($B1,"O")
        GUICtrlSetState($B1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($B1)="" AND GUICtrlRead($B2)="" AND GUICtrlRead($B3)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf   
   
   
    If GUICtrlRead($C1)="O" AND GUICtrlRead($C2)="" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($C1)="" AND GUICtrlRead($C2)="O" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($C1)="" AND GUICtrlRead($C2)="" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($C2,"O")
        GUICtrlSetState($C2,$GUI_DISABLE)
        Return
    EndIf
    ;========
   
    ;Vertical=
    If GUICtrlRead($A1)="O" AND GUICtrlRead($B1)="" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($B1,"O")
        GUICtrlSetState($B1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B1)="" AND GUICtrlRead($C1)="O" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B1)="O" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf

    If GUICtrlRead($A2)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($C2)="" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A2)="" AND GUICtrlRead($B2)="" AND GUICtrlRead($C2)="O" Then
        GUICtrlSetData($A2,"O")
        GUICtrlSetState($A2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A2)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C2)="" Then
        GUICtrlSetData($C2,"O")
        GUICtrlSetState($C2,$GUI_DISABLE)
        Return
    EndIf
   
    If GUICtrlRead($A3)="O" AND GUICtrlRead($B3)="" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($B3,"O")
        GUICtrlSetState($B3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B3)="" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B3)="O" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    ;==============
   
    ;Diagonal=
    If GUICtrlRead($A1)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($C3,"O")
        GUICtrlSetState($C3,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B2)="" AND GUICtrlRead($C3)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A1)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C3)="" Then
        GUICtrlSetData($A1,"O")
        GUICtrlSetState($A1,$GUI_DISABLE)
        Return
    EndIf
   
    If GUICtrlRead($A3)="O" AND GUICtrlRead($B2)="" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($C1,"O")
        GUICtrlSetState($C1,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B2)="" AND GUICtrlRead($C1)="O" Then
        GUICtrlSetData($B2,"O")
        GUICtrlSetState($B2,$GUI_DISABLE)
        Return
    EndIf
    If GUICtrlRead($A3)="" AND GUICtrlRead($B2)="O" AND GUICtrlRead($C1)="" Then
        GUICtrlSetData($A3,"O")
        GUICtrlSetState($A3,$GUI_DISABLE)
        Return
    EndIf
    ;======================
   
   
   
    ;AL AZAR
   
    _Random()
EndFunc;==>Jugar()

Func _Random()
        ;Random=
    $a=0
    Do
        $a+=1
        $oRan=Random(1,9,1)

        If $oRan=1 Then $iCas=$A1
        If $oRan=2 Then $iCas=$A2
        If $oRan=3 Then $iCas=$A3
        If $oRan=4 Then $iCas=$B1
        If $oRan=5 Then $iCas=$B2
        If $oRan=6 Then $iCas=$B3
        If $oRan=7 Then $iCas=$C1
        If $oRan=8 Then $iCas=$C2
        If $oRan=9 Then $iCas=$C3
           
        If GUICtrlRead($iCas)="" Then ExitLoop 
    Until $a=100
   
   
    If $a<>100 Then
        GUICtrlSetData($iCas,"O")
        GUICtrlSetState($iCas,$GUI_DISABLE)
    Else
        $over=1
    EndIf   
     Check()
EndFunc

Func win()
    ;"X"
    If GUICtrlRead($A1)="X" and GUICtrlRead($A2)="X" and GUICtrlRead($A3)="X" Then
        $win=1
        Return
    EndIf
    If GUICtrlRead($B1)="X" and GUICtrlRead($B2)="X" and GUICtrlRead($B3)="X" Then
        $win=1
        Return
    EndIf
    If GUICtrlRead($C1)="X" and GUICtrlRead($C2)="X" and GUICtrlRead($C3)="X" Then
        $win=1
        Return
    EndIf
    If GUICtrlRead($A1)="X" and GUICtrlRead($B1)="X" and GUICtrlRead($C1)="X" Then
        $win=1
        Return
       
    EndIf
    If GUICtrlRead($A2)="X" and GUICtrlRead($B2)="X" and GUICtrlRead($C2)="X" Then
        $win=1
        Return
    EndIf   
    If GUICtrlRead($A3)="X" and GUICtrlRead($B3)="X" and GUICtrlRead($C3)="X" Then
        $win=1
        Return
    EndIf
    If GUICtrlRead($A1)="X" and GUICtrlRead($B2)="X" and GUICtrlRead($C3)="X" Then
        $win=1
        Return
    EndIf
    If GUICtrlRead($A3)="X" and GUICtrlRead($B2)="X" and GUICtrlRead($C1)="X" Then
        $win=1
        Return
    EndIf
   
    ;"O"
    If GUICtrlRead($A1)="O" and GUICtrlRead($A2)="O" and GUICtrlRead($A3)="O" Then
        $win=2
        Return
    EndIf
    If GUICtrlRead($B1)="O" and GUICtrlRead($B2)="O" and GUICtrlRead($B3)="O" Then
        $win=2
        Return
    EndIf
    If GUICtrlRead($C1)="O" and GUICtrlRead($C2)="O" and GUICtrlRead($C3)="O" Then
        $win=2
        Return
    EndIf
    If GUICtrlRead($A1)="O" and GUICtrlRead($B1)="O" and GUICtrlRead($C1)="O" Then
        $win=2
        Return
    EndIf
    If GUICtrlRead($A2)="O" and GUICtrlRead($B2)="O" and GUICtrlRead($C2)="O" Then
        $win=2
        Return
    EndIf   
    If GUICtrlRead($A3)="O" and GUICtrlRead($B3)="O" and GUICtrlRead($C3)="O" Then
        $win=2
        Return
    EndIf
    If GUICtrlRead($A1)="O" and GUICtrlRead($B2)="O" and GUICtrlRead($C3)="O" Then
        $win=2
        Return
    EndIf
    If GUICtrlRead($A3)="O" and GUICtrlRead($B2)="O" and GUICtrlRead($C1)="O" Then
        $win=2
        Return
    EndIf
    Check()
EndFunc;===>Win()


Func clear()
    GUICtrlSetData($A1,"")
    GUICtrlSetState($A1,$GUI_ENABLE)
    GUICtrlSetData($A2,"")
    GUICtrlSetState($A2,$GUI_ENABLE)
    GUICtrlSetData($A3,"")
    GUICtrlSetState($A3,$GUI_ENABLE)

    GUICtrlSetData($B1,"")
    GUICtrlSetState($B1,$GUI_ENABLE)
    GUICtrlSetData($B2,"")
    GUICtrlSetState($B2,$GUI_ENABLE)
    GUICtrlSetData($B3,"")
    GUICtrlSetState($B3,$GUI_ENABLE)

    GUICtrlSetData($C1,"")
    GUICtrlSetState($C1,$GUI_ENABLE)
    GUICtrlSetData($C2,"")
    GUICtrlSetState($C2,$GUI_ENABLE)
    GUICtrlSetData($C3,"")
    GUICtrlSetState($C3,$GUI_ENABLE)
    $win=0
    $over=0
    $turn = Not $turn
    If $turn Then
        _Random()

    EndIf
EndFunc


Func Randomize()
    Sleep(200)
    GUICtrlSetData($A1,"TA")
    Sleep(200)
    GUICtrlSetData($B2,"TE")
    Sleep(200)
    GUICtrlSetData($C3,"TI")
    Sleep(200)
    GUICtrlSetData($A1,"")
    Sleep(200)
    GUICtrlSetData($B2,"")
    Sleep(200)
    GUICtrlSetData($C3,"")
    Sleep(200)
EndFunc

Func Check()
    If GUICtrlRead($A1)<>"" AND GUICtrlRead($A2)<>"" AND GUICtrlRead($A3)<>"" AND GUICtrlRead($B1)<>"" AND GUICtrlRead($B2)<>"" AND GUICtrlRead($B3)<>""AND GUICtrlRead($C1)<>"" AND GUICtrlRead($C2)<>"" AND GUICtrlRead($C3)<>"" Then
        $over=1
    EndIf
EndFunc
 

Source: Autoit Forum

Le mieux c'est encore de jeter un œil, las bas sur le forum, sous le nom de Tic Tac Toe

[genaille08]

merci bien

( GUI DISABLE )

en faite j'ai devellopé une technique imparable et donc j'aurais voulu l'integré a mon propre morpion que j'enverais a tout le monde ...
et les ( je sais plus comment qu'on dit ( les if ) ) seront pas présenter de la même maniere

[genaille08]

désolé du dooble post mais c'était pour uper
bon alors voila je voudrais que mon morpion si ils gagne affiche une image genre tete de mort fullscrenne, comment pourrais je faire ça ???
et comme mon morpion va etre envoyé a certain pote et sur des forum et blog, je voudrais que l'image ne soit pas jointe car sinon les gens vont s'en doutais, donc y'a t-il moyen que je la dissimule dans le script pour ne pas qu'on la voye ???

[jbnh]

pour l'image, fileinstall ou dll