AutoIt

Code :

#include <Misc.au3>

GUICreate("",1000,500)

$Edit = GUICtrlCreateEdit(">",0,0,1000,500)

GUICtrlSetColor($Edit,0xFFFFFF)

GUICtrlSetBkColor($Edit,0x000000)

GUISetState(@SW_SHOW)

GUICtrlSetData($Edit,"")

MsgBox(0, "Info","Ce script est un simple test,"&@CRLF&"il n'effectura aucun changement."&@CRLF&@CRLF&"Appuyez sur "&'"'&"Ok"&'"'&" pour continuer.")

GUICtrlSetData($Edit,GUICtrlRead($Edit)&"TEST DE LA CONSOLE !"&@CRLF&"Test des conditions..."&@CRLF&@CRLF&"Condition : Variable1(123) = 123 ?"&@CRLF)

If (123=123) Then

MsgBox(0,"Info","La condition est vraie !")

EndIf

If (123<>123) Then

MsgBox(0,"Info","La condition n'est pas vraie !")

EndIf

GUICtrlSetData($Edit,GUICtrlRead($Edit)&@CRLF&"Condition : Variable2(456) = 123 ?"&@CRLF)

If (456=123) Then

MsgBox(0,"Info","La condition est vraie !")

EndIf

If (456<>123) Then

MsgBox(0,"Info","La condition n'est pas vraie !")

EndIf

GUICtrlSetData($Edit,GUICtrlRead($Edit)&@CRLF&"Affichage de la Variable3..."&@CRLF)

MsgBox(0,"Info","La Variable3 vaut :"&@CRLF&"Hello World!")

GUICtrlSetData($Edit,GUICtrlRead($Edit)&@CRLF&"Fin du test..."&@CRLF)

GUICtrlSetData($Edit,GUICtrlRead($Edit)&"ART-OS est en pause, appuyez sur Entrée pour continuer."&@CRLF)

While (1)

If _IsPressed("0D") Then ExitLoop

WEnd

GUICtrlSetData($Edit,GUICtrlRead($Edit)&"ART-OS est en pause pour une durée déterminée de 100 milli-secocondes."&@CRLF)

Sleep(100)

GUICtrlSetData($Edit,"")