Je suis un peu nouveau dans la création de scripts via Autoit, et je me suis lancé dans un projet plutôt ambitieux pour mon niveau de connaissance, mais on fait avec
Je suis admin d'un serveur Minecraft, et ayant besoin d'un launcher spécifique, je me suis tourné vers ce soft plutôt facile a prendre en main.Mais voilà, grand traumatisé des fonctions, j'ai tout fait pour les esquiver, mais cela ne m'ayant apporté que des bugs, j'ai décider de les affronter.
J'ai donc plusieurs fichiers, chacun correspondants a un bouton ;
- Jouer
- Mettre à Jour
- Forum
- Option
et un Launcher qui contient la fonction main qui gère la fenêtre principale.
En principe
Il créer la fenêtre, les boutons, etc
Il télécharge sur un site un ConfigS.ini
Lis Config.ini (sur le pc) et le ConfigS.ini
Il stock les différentes données dans des variables
Et envoie les données utiles a chaque fonction, évitant de télécharger 500 fois le même .ini
Voici le code principal :
Code : Tout sélectionner
#cs ----------------------------------------------------------------------------
Launcher - Serveur Sinan V1.0
Codeur : Keenuts
#ce ----------------------------------------------------------------------------
#include <GuiConstantsEx.au3>
#include <IE.au3>
#include <_Transinput.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <update.au3>
;=============== MENU PRINCIPAL
Main()
Func main ()
GuiCreate("Bienvenue au Sinan", 400, 400)
GuiSetIcon("Data\icone.ico", 1)
GUISetState(@SW_SHOW)
;Boutons
Local $bouton_jouer, $bouton_update, $bouton_forum, $bouton_options
$bouton_jouer = GuiCtrlCreateButton("Jouer !", 140, 200, 120, 35)
$bouton_update = GuiCtrlCreateButton("Mise a Jour", 140, 240, 120, 25)
$bouton_forum = GuiCtrlCreateButton("Forum", 325, 20, 70, 20)
$bouton_options = GuiCtrlCreateButton("Options", 325, 2, 70, 20)
;Fond
GuiCtrlCreatePic("Data\logo.jpg",0,0, 400,400)
GUISetBkColor(0x006666)
;News
InetGet("http://web_469440.verygames.net/ConfigS.ini", "ConfigS.ini", 1)
$news1 = IniRead( "ConfigS.ini", "News", "news-1", "Erreur")
$news2 = IniRead( "ConfigS.ini", "News", "news-2", "Erreur")
$news3 = IniRead( "ConfigS.ini", "News", "news-3", "Erreur")
$label0 = GUICtrlCreateLabel( "News :", 40, 290,500)
_TransInput_Create($label0,12)
$label1 = GUICtrlCreateLabel( $news1, 100, 300,500)
_TransInput_Create($label1,12)
$label2 = GUICtrlCreateLabel( $news2, 100, 320,500)
_TransInput_Create($label2,12)
$label3 = GUICtrlCreateLabel( $news3, 100, 340,500)
_TransInput_Create($label3,12)
;================================================================ Lecture du configS.Ini
$version_serveur = IniRead( "ConfigS", "Serveur-Side", "version", "Erreur")
;================================================================ BOUTONS FONCTIONS
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $bouton_jouer
;jouer()
msgbox(0, "Serveur Sinan", "En Cours...")
Case $bouton_update
update($version_serveur)
Case $bouton_forum
;forum()
msgbox(0, "Serveur Sinan", "En Cours...")
Case $bouton_options
;options()
msgbox(0, "Serveur Sinan", "En Cours...")
Case Else
ExitLoop
EndSwitch
WEnd
;============= Nettoyage Fichiers Temporaires
FileDelete("ConfigS.ini")
;============= Loop Test
GuiSetState()
While GuiGetMsg() <> $GUI_EVENT_CLOSE
wend
EndFunc
Code : Tout sélectionner
#cs ----------------------------------------------------------------------------
Launcher - Serveur Sinan V1.0
Codeur : Keenuts
#ce ----------------------------------------------------------------------------
func update($version_serveur)
;# initialisation des variables
$version_client = IniRead( "Data\Config.ini", "Client-Side", "version", "Erreur")
;# Fin initialisation des variables
If $version_client = $version_serveur Then
msgbox(0, "Serveur Sinan", "Votre Version est a jour !")
Else
msgbox(0,"Serveur Sinan", "Une Mise à Jour est disponible !" & @CRLF & "La Télécharger ?")
EndIf
main()
EndFunc
Je sèche un peu...
Merci d'avance
Kee
