[Ex] Automatisation de poules

#1

Bon, je doute que des personnes soient intéressées par ce genre de script mais je l'avais fait pour une connaissance.

En clair, on choisit le nombre de participants dans une poule (le script va de 1 à 5 équipes) et le script donne le code HMTL du tableau de la poule et de toutes les possibilités de match.

Ca peut s'avérer pratique dans certains cas.

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstants.au3>

Opt("GUIOnEventMode", 1)  ; Change to OnEvent mode 

$number= InputBox("Poules", "Nombre d'équipes dans la poule ?")



If Number($number) Then
    If $number > 5 Then
    msgbox(0,'','Le programme ne va pas au dela de 5')
    exit
    Endif
    
$height = number(35+$number*40)
$gui1 = GUICreate("Poules", 450, $height)
$acces=1

If $number = 1 Then
              GUICtrlCreatelabel("Equipe 1", 10, 5)
     $pays1 = GUICtrlCreateCombo("fr", 55, 5, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team1 = GUICtrlCreateInput("", 105, 5, 300, 20)
     
     
Endif

If $number = 2 Then
                  GUICtrlCreatelabel("Equipe 1", 10, 5)
     $pays1 = GUICtrlCreateCombo("fr", 55, 5, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team1 = GUICtrlCreateInput("", 105, 5, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 2", 10, 45)
     $pays2 = GUICtrlCreateCombo("fr", 55, 45, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team2 = GUICtrlCreateInput("", 105, 45, 300, 20)
Endif

If $number = 3 Then
    
                  GUICtrlCreatelabel("Equipe 1", 10, 5)
     $pays1 = GUICtrlCreateCombo("fr", 55, 5, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team1 = GUICtrlCreateInput("", 105, 5, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 2", 10, 45)
     $pays2 = GUICtrlCreateCombo("fr", 55, 45, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team2 = GUICtrlCreateInput("", 105, 45, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 3", 10, 85)
     $pays3 = GUICtrlCreateCombo("fr", 55, 85, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team3 = GUICtrlCreateInput("", 105, 85, 300, 20)
Endif

If $number = 4 Then
    
                  GUICtrlCreatelabel("Equipe 1", 10, 5)
     $pays1 = GUICtrlCreateCombo("fr", 55, 5, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team1 = GUICtrlCreateInput("", 105, 5, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 2", 10, 45)
     $pays2 = GUICtrlCreateCombo("fr", 55, 45, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team2 = GUICtrlCreateInput("", 105, 45, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 3", 10, 85)
     $pays3 = GUICtrlCreateCombo("fr", 55, 85, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team3 = GUICtrlCreateInput("", 105, 85, 300, 20)
    
                  GUICtrlCreatelabel("Equipe 4", 10, 125)
     $pays4 = GUICtrlCreateCombo("fr", 55, 125, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team4 = GUICtrlCreateInput("", 105, 125, 300, 20)
     
Endif

If $number = 5 Then
    
                  GUICtrlCreatelabel("Equipe 1", 10, 5)
     $pays1 = GUICtrlCreateCombo("fr", 55, 5, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team1 = GUICtrlCreateInput("", 105, 5, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 2", 10, 45)
     $pays2 = GUICtrlCreateCombo("fr", 55, 45, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team2 = GUICtrlCreateInput("", 105, 45, 300, 20)
     
                  GUICtrlCreatelabel("Equipe 3", 10, 85)
     $pays3 = GUICtrlCreateCombo("fr", 55, 85, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team3 = GUICtrlCreateInput("", 105, 85, 300, 20)
    
                  GUICtrlCreatelabel("Equipe 4", 10, 125)
     $pays4 = GUICtrlCreateCombo("fr", 55, 125, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team4 = GUICtrlCreateInput("", 105, 125, 300, 20)
    
                  GUICtrlCreatelabel("Equipe 5", 10, 165)
     $pays5 = GUICtrlCreateCombo("fr", 55, 165, 45, 20) 
              GUICtrlSetData(-1, "be|de|se|dk") 
     $team5 = GUICtrlCreateInput("", 105, 165, 300, 20)
    
Endif
$valider = GUICtrlCreateButton("Créer",200,number($height-35),55)
GUICtrlSetOnEvent($valider,"Creation_gui2")
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
GUISetState(@SW_SHOW)

While 1
  sleep(100)
Wend


Else
    
msgbox(0,'', "Il faut entrer un chiffre, et autre que 0...")
exit
EndIf

func Creation_gui2()
            If $number = 1 Then
                If GUICtrlRead($team1) = "" Then
                msgbox (0,"","T'as oublier un champ fieu")
                $acces = 0
                Else
                $text='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" />&nbsp;<strong>'&GUICtrlRead($team1)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $footer = ""
                Endif
            Endif   

            If $number = 2 Then
                If GUICtrlRead($team1) = "" OR GUICtrlRead($team2) = "" Then
                msgbox (0,"","T'as oublier un champ fieu")
                $acces = 0
                Else
                $textpart1='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" />&nbsp;<strong>'&GUICtrlRead($team1)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart2='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<strong>'&GUICtrlRead($team2)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $text = $textpart1&@CRLF&$textpart2
                $footer = '<u>A remettre dans l''ordre chrono<br />'&@CRLF&'<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team2)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<br />'

                Endif
            Endif   
            
            If $number = 3 Then
                If GUICtrlRead($team1) = "" OR GUICtrlRead($team2) = "" OR GUICtrlRead($team3) = "" Then
                msgbox (0,"","T'as oublier un champ fieu")
                $acces = 0
                Else
                $textpart1='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" />&nbsp;<strong>'&GUICtrlRead($team1)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart2='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<strong>'&GUICtrlRead($team2)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart3='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<strong>'&GUICtrlRead($team3)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                
                $text = $textpart1&@CRLF&$textpart2&@CRLF&$textpart3
                
                $footerpart1 = '<u>A remettre dans l''ordre chrono<br />'&@CRLF&'<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team2)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<br />'
                $footerpart2 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team3)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<br />'
                $footerpart3 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u>&nbsp;'&GUICtrlRead($team2)&' [xx:xx]&nbsp;'&GUICtrlRead($team3)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<br />'
                $footer = $footerpart1&@CRLF&$footerpart2&@CRLF&$footerpart3
                Endif
            Endif   
            
            If $number = 4 Then
                If GUICtrlRead($team1) = "" OR GUICtrlRead($team2) = "" OR GUICtrlRead($team3) = "" OR GUICtrlRead($team4) = "" Then
                msgbox (0,"","T'as oublier un champ fieu")
                $acces = 0
                Else
                $textpart1='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" />&nbsp;<strong>'&GUICtrlRead($team1)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart2='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<strong>'&GUICtrlRead($team2)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart3='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<strong>'&GUICtrlRead($team3)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart4='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<strong>'&GUICtrlRead($team4)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                
                $text = $textpart1&@CRLF&$textpart2&@CRLF&$textpart3&@CRLF&$textpart4
                
                $footerpart1 = '<u>A remettre dans l''ordre chrono<br />'&@CRLF&'<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team2)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<br />'
                $footerpart2 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team3)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<br />'
                $footerpart3 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team4)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<br />'
                $footerpart4 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u>&nbsp;'&GUICtrlRead($team2)&' [xx:xx]&nbsp;'&GUICtrlRead($team3)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<br />'
                $footerpart5 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u>&nbsp;'&GUICtrlRead($team2)&' [xx:xx]&nbsp;'&GUICtrlRead($team4)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<br />'
                $footerpart6 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /></u>&nbsp;'&GUICtrlRead($team3)&' [xx:xx]&nbsp;'&GUICtrlRead($team4)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<br />'
                
                $footer = $footerpart1&@CRLF&$footerpart2&@CRLF&$footerpart3&@CRLF&$footerpart4&@CRLF&$footerpart5&@CRLF&$footerpart6
                Endif
            Endif
            
            If $number = 5 Then
                If GUICtrlRead($team1) = "" OR GUICtrlRead($team2) = "" OR GUICtrlRead($team3) = "" OR GUICtrlRead($team4) = "" OR GUICtrlRead($team5) = "" Then
                msgbox (0,"","T'as oublier un champ fieu")
                $acces = 0
                Else
                $textpart1='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" />&nbsp;<strong>'&GUICtrlRead($team1)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart2='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<strong>'&GUICtrlRead($team2)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart3='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<strong>'&GUICtrlRead($team3)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart4='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<strong>'&GUICtrlRead($team4)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                $textpart5='<tr height="20">'&@CRLF&'<td>'&@CRLF&'<p align="left"><img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" />&nbsp;<strong>'&GUICtrlRead($team5)&'</strong></p>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'<td align="center" width="20">0</td>'&@CRLF&'</tr>'
                
                $text = $textpart1&@CRLF&$textpart2&@CRLF&$textpart3&@CRLF&$textpart4&@CRLF&$textpart5
                
                $footerpart1 = '<u>A remettre dans l''ordre chrono<br />'&@CRLF&'<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team2)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" />&nbsp;<br />'
                $footerpart2 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team3)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<br />'
                $footerpart3 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team4)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<br />'
                $footerpart4 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u>&nbsp;'&GUICtrlRead($team1)&' [xx:xx]&nbsp;'&GUICtrlRead($team5)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" />&nbsp;<br />'
                $footerpart5 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u>&nbsp;'&GUICtrlRead($team2)&' [xx:xx]&nbsp;'&GUICtrlRead($team3)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" />&nbsp;<br />'
                $footerpart6 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u>&nbsp;'&GUICtrlRead($team2)&' [xx:xx]&nbsp;'&GUICtrlRead($team4)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<br />'
                $footerpart7 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u>&nbsp;'&GUICtrlRead($team2)&' [xx:xx]&nbsp;'&GUICtrlRead($team5)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" />&nbsp;<br />'
                $footerpart8 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /></u>&nbsp;'&GUICtrlRead($team3)&' [xx:xx]&nbsp;'&GUICtrlRead($team4)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" />&nbsp;<br />'
                $footerpart9 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /></u>&nbsp;'&GUICtrlRead($team3)&' [xx:xx]&nbsp;'&GUICtrlRead($team5)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" />&nbsp;<br />'
                $footerpart10 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /></u>&nbsp;'&GUICtrlRead($team4)&' [xx:xx]&nbsp;'&GUICtrlRead($team5)&'&nbsp;<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" />&nbsp;<br />'
                
                $footer = $footerpart1&@CRLF&$footerpart2&@CRLF&$footerpart3&@CRLF&$footerpart4&@CRLF&$footerpart5&@CRLF&$footerpart6&@CRLF&$footerpart7&@CRLF&$footerpart8&@CRLF&$footerpart9&@CRLF&$footerpart10
                Endif
            Endif
            
            
            If $acces <> 0 Then
            Global $gui2= GUICreate("HTML", 500, 600, -1,-1,-1,-1)
            $head = '<center>'&@CRLF&'<table cellspacing="0" cellpadding="0" width="250">'&@CRLF&'<tbody>'&@CRLF&'<tr bgcolor="#673337" height="20">'&@CRLF&'<td align="left" width="188">'&@CRLF&'<font color="#ffffff"><strong>Groupe D</strong></font>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">'&@CRLF&'<strong><font color="#ffffff">W</font></strong>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">'&@CRLF&'<strong><font color="#ffffff">D</font></strong>'&@CRLF&'</td>'&@CRLF&'<td align="center" width="20">'&@CRLF&'<strong><font color="#ffffff">L</font></strong>'&@CRLF&'</td>'&@CRLF&'</tr>'&$text&@CRLF&'</tr>'&@CRLF&'</tbody>'&@CRLF&'</table>'&@CRLF&'</center>'
            
             GUICtrlCreateEdit($head&@CRLF&@CRLF&'<br /><br />'&@CRLF&@CRLF&$footer,5,10,490,580)
            
            GUISetState(@SW_SHOW)
            GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEgui2")
            Endif


EndFunc

Func CLOSEgui2()
      GUIDelete($gui2)
EndFunc
 
Func CLOSEClicked()
      Exit
EndFunc