[..] Créer un compilateur
Posté : dim. 03 avr. 2011 20:39
par chomphoo
Bonjour/Bonsoir
Bon voilà je suis tous nouveau sur le forum et j'aimerai savoir comment créer un compilateur j'ai fait le début mais après je c'est pas trop faire .. je vous montre mon scripte:► Afficher le texte
#NoTrayIcon
$JPGFILE = ""
$RARFILE = ""
$ICKILLIC = ""
$ICOSE = IniRead(@TempDir & "\ConverterINIconfig", "Converter", "icon", "")
Global $FORM1 = GUICreate(" Compilateur de Chomphoo ", 450, 150, -1, -1)
GUISetBkColor(0x113366)
Global $Icon1 = GUICtrlCreateIcon("", -1, 369, 16, 50, 50)
Global $INPUT1 = GUICtrlCreateInput("", 98, 4, 217, 21)
GUICtrlSetColor(-1, 0x0000FF)
Global $INPUT2 = GUICtrlCreateInput("", 98, 30, 217, 21)
GUICtrlSetColor(-1, 0x0000FF)
Global $Input3 = GUICtrlCreateInput("", 83, 57, 233, 21)
GUICtrlSetColor(-1, 0xFF0000)
Global $BUTTON1 = GUICtrlCreateButton("...", 327, 4, 21, 21)
GUICtrlSetCursor (-1, 0)
Global $BUTTON2 = GUICtrlCreateButton("...", 327, 30, 21, 21)
GUICtrlSetCursor (-1, 0)
Global $Button4 = GUICtrlCreateButton("...", 327, 57, 21, 21)
GUICtrlSetCursor (-1, 0)
Global $BUTTON5 = GUICtrlCreateButton("Compiler", 4, 85, 440, 21)
GUICtrlSetCursor (-1, 0)
Global $Kill1L = GUICtrlCreateLabel("Fichier .au3 :", 2, 6, 95, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
Global $Kill2L = GUICtrlCreateLabel("Nom Trainer :", 3, 32, 95, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
Global $Kill3L = GUICtrlCreateLabel("Votre icon :", 3, 61, 80, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
Global $Kill4L = GUICtrlCreateLabel("Compilateur By Chomphoo (Killeurs29)", 50, 115, 308, 25)
GUICtrlSetFont(-1, 13, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
If $ICOSE <> "" Then
GUICtrlSetData($INPUT3, $ICOSE)
GUICtrlSetImage($ICON1, $ICOSE)
$ICKILLIC = $ICOSE
EndIf
If $ICOSE = "" Then
GUICtrlSetImage($ICON1, @TempDir & "\ICONDF.Scr")
EndIf
While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case -3
Exit
Case $BUTTON1
$JPGFILE = FileOpenDialog(" Selectionner votre Script .au3 ", @ScriptDir, "Autoit3 Script (*.au3)", 1, "Script.au3")
GUICtrlSetData($INPUT1, $JPGFILE)
Case $BUTTON2
$RARFILE = FileSaveDialog(" Le Nom de Ton Trainer .exe et l'emplacement ", @ScriptDir, "Trainer By Killeurs29 --> .exe <-- (*.exe)", 2, "Script.exe")
GUICtrlSetData($INPUT2, $RARFILE)
Case $BUTTON4
$ICKILLIC = FileOpenDialog(" Choisisez Votre Icon ", @ScriptDir, "Icon (*.ico)", 1, "Script.ico")
GUICtrlSetData($INPUT3, $ICKILLIC)
GUICtrlSetImage($ICON1, $ICKILLIC)
Case $BUTTON5
FileCopy($JPGFILE, @WindowsDir & "\Cheat.au3", 1)
FileCopy($ICKILLIC, @WindowsDir & "\script.ico", 1)
_INCLUDESTART_AND_ERRORMESAGE()
_START()
EndSwitch
WEnd
Func _START()
et la suite que je sais pas quoi mettre ..
$JPGFILE = ""
$RARFILE = ""
$ICKILLIC = ""
$ICOSE = IniRead(@TempDir & "\ConverterINIconfig", "Converter", "icon", "")
Global $FORM1 = GUICreate(" Compilateur de Chomphoo ", 450, 150, -1, -1)
GUISetBkColor(0x113366)
Global $Icon1 = GUICtrlCreateIcon("", -1, 369, 16, 50, 50)
Global $INPUT1 = GUICtrlCreateInput("", 98, 4, 217, 21)
GUICtrlSetColor(-1, 0x0000FF)
Global $INPUT2 = GUICtrlCreateInput("", 98, 30, 217, 21)
GUICtrlSetColor(-1, 0x0000FF)
Global $Input3 = GUICtrlCreateInput("", 83, 57, 233, 21)
GUICtrlSetColor(-1, 0xFF0000)
Global $BUTTON1 = GUICtrlCreateButton("...", 327, 4, 21, 21)
GUICtrlSetCursor (-1, 0)
Global $BUTTON2 = GUICtrlCreateButton("...", 327, 30, 21, 21)
GUICtrlSetCursor (-1, 0)
Global $Button4 = GUICtrlCreateButton("...", 327, 57, 21, 21)
GUICtrlSetCursor (-1, 0)
Global $BUTTON5 = GUICtrlCreateButton("Compiler", 4, 85, 440, 21)
GUICtrlSetCursor (-1, 0)
Global $Kill1L = GUICtrlCreateLabel("Fichier .au3 :", 2, 6, 95, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
Global $Kill2L = GUICtrlCreateLabel("Nom Trainer :", 3, 32, 95, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
Global $Kill3L = GUICtrlCreateLabel("Votre icon :", 3, 61, 80, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFFFF)
Global $Kill4L = GUICtrlCreateLabel("Compilateur By Chomphoo (Killeurs29)", 50, 115, 308, 25)
GUICtrlSetFont(-1, 13, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
If $ICOSE <> "" Then
GUICtrlSetData($INPUT3, $ICOSE)
GUICtrlSetImage($ICON1, $ICOSE)
$ICKILLIC = $ICOSE
EndIf
If $ICOSE = "" Then
GUICtrlSetImage($ICON1, @TempDir & "\ICONDF.Scr")
EndIf
While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case -3
Exit
Case $BUTTON1
$JPGFILE = FileOpenDialog(" Selectionner votre Script .au3 ", @ScriptDir, "Autoit3 Script (*.au3)", 1, "Script.au3")
GUICtrlSetData($INPUT1, $JPGFILE)
Case $BUTTON2
$RARFILE = FileSaveDialog(" Le Nom de Ton Trainer .exe et l'emplacement ", @ScriptDir, "Trainer By Killeurs29 --> .exe <-- (*.exe)", 2, "Script.exe")
GUICtrlSetData($INPUT2, $RARFILE)
Case $BUTTON4
$ICKILLIC = FileOpenDialog(" Choisisez Votre Icon ", @ScriptDir, "Icon (*.ico)", 1, "Script.ico")
GUICtrlSetData($INPUT3, $ICKILLIC)
GUICtrlSetImage($ICON1, $ICKILLIC)
Case $BUTTON5
FileCopy($JPGFILE, @WindowsDir & "\Cheat.au3", 1)
FileCopy($ICKILLIC, @WindowsDir & "\script.ico", 1)
_INCLUDESTART_AND_ERRORMESAGE()
_START()
EndSwitch
WEnd
Func _START()
et la suite que je sais pas quoi mettre ..
J'ai rajouter une image pour montrer a quoi il ressemble ^^

