[Ex] Automatisation de poules
Posté : ven. 31 juil. 2009 00:02
par jbnh
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.
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" /> <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" /> <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" /> <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> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team2)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /> <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" /> <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" /> <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" /> <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> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team2)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /> <br />'
$footerpart2 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team3)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /> <br />'
$footerpart3 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u> '&GUICtrlRead($team2)&' [xx:xx] '&GUICtrlRead($team3)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /> <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" /> <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" /> <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" /> <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" /> <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> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team2)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /> <br />'
$footerpart2 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team3)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /> <br />'
$footerpart3 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team4)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /> <br />'
$footerpart4 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u> '&GUICtrlRead($team2)&' [xx:xx] '&GUICtrlRead($team3)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /> <br />'
$footerpart5 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u> '&GUICtrlRead($team2)&' [xx:xx] '&GUICtrlRead($team4)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /> <br />'
$footerpart6 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /></u> '&GUICtrlRead($team3)&' [xx:xx] '&GUICtrlRead($team4)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /> <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" /> <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" /> <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" /> <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" /> <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" /> <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> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team2)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /> <br />'
$footerpart2 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team3)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /> <br />'
$footerpart3 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team4)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /> <br />'
$footerpart4 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays1)&'.png" /></u> '&GUICtrlRead($team1)&' [xx:xx] '&GUICtrlRead($team5)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" /> <br />'
$footerpart5 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u> '&GUICtrlRead($team2)&' [xx:xx] '&GUICtrlRead($team3)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /> <br />'
$footerpart6 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u> '&GUICtrlRead($team2)&' [xx:xx] '&GUICtrlRead($team4)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /> <br />'
$footerpart7 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays2)&'.png" /></u> '&GUICtrlRead($team2)&' [xx:xx] '&GUICtrlRead($team5)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" /> <br />'
$footerpart8 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /></u> '&GUICtrlRead($team3)&' [xx:xx] '&GUICtrlRead($team4)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /> <br />'
$footerpart9 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays3)&'.png" /></u> '&GUICtrlRead($team3)&' [xx:xx] '&GUICtrlRead($team5)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" /> <br />'
$footerpart10 = '<img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays4)&'.png" /></u> '&GUICtrlRead($team4)&' [xx:xx] '&GUICtrlRead($team5)&' <img alt="" border="0" src="http://team-aaa.com/images/drapeaux/'&GUICtrlRead($pays5)&'.png" /> <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