﻿#NoTrayIcon
#include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt('GUIOnEventMode', 1)
_GDIPlus_Startup()
Global Const $aData[] = [ _
		0x22, 0x70, 0x20, 0xF2, 0x79, 0x3C, 0x22, 0xF0, 0x44, 0x1E, 0xF1, 0x7C, 0x22, 0x0E, 0x0F, 0x22, _
		0x14, 0x88, 0x60, 0x13, 0x88, 0x44, 0x22, 0x08, 0x44, 0x22, 0x09, 0x10, 0x36, 0x91, 0x00, 0x14, _
		0x6B, 0xF8, 0xA0, 0x72, 0x78, 0x3C, 0x1C, 0x08, 0x7C, 0x1E, 0x71, 0x10, 0x2A, 0x1F, 0x07, 0x6B, _
		0x14, 0x88, 0x20, 0x12, 0x88, 0x44, 0x10, 0x08, 0x44, 0x22, 0x81, 0x10, 0x22, 0x11, 0x08, 0x14, _
		0x22, 0x88, 0x20, 0xF2, 0x89, 0x44, 0x0C, 0xF0, 0x44, 0x22, 0x79, 0x10, 0x22, 0x91, 0x07, 0x22, _
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, _
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, _
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, _
		0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, _
		0x38, 0x22, 0x0F, 0x38, 0x10, 0x71, 0x3C, 0x1E, 0x11, 0x44, 0x3E, 0x11, 0x44, 0x3E, 0x8E, 0x07, _
		0x44, 0x26, 0x11, 0x44, 0x10, 0x89, 0x44, 0x22, 0x11, 0x4C, 0x02, 0x11, 0x44, 0x02, 0x91, 0x08, _
		0x7C, 0x2A, 0x11, 0x7C, 0xF0, 0xF9, 0x3C, 0x1E, 0x0E, 0x54, 0x0E, 0x15, 0x38, 0x0E, 0x9F, 0x07, _
		0x44, 0x32, 0x11, 0x44, 0x10, 0x89, 0x04, 0x02, 0x08, 0x64, 0x02, 0x1B, 0x20, 0x02, 0x91, 0x08, _
		0x44, 0x22, 0x0F, 0x44, 0x10, 0x89, 0x04, 0x02, 0x06, 0x44, 0x3E, 0x11, 0x18, 0x3E, 0x91, 0x08]
Global $hGui = GUICreate('We wish you...', 800, 150, -1, -1, BitOR($WS_POPUPWINDOW, $WS_CAPTION))
GUISetOnEvent($GUI_EVENT_CLOSE, '_CloseGui')
GUISetBkColor(0x000000)
GUISetIcon('imageres.dll', -204)
GUISetState()
Global $aColors[] = [0xFFFFFFFF, 0xFFFF9999, 0xFF99FF99, 0xFF99FFFF, 0xFFFFFF99, 0xFF9999FF]
Global $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGui)
_GDIPlus_GraphicsSetInterpolationMode($hGraphic, $GDIP_INTERPOLATIONMODE_HIGHQUALITYBICUBIC)
_GDIPlus_GraphicsSetSmoothingMode($hGraphic, $GDIP_SMOOTHINGMODE_HIGHQUALITY)
Global $hBrush = _GDIPlus_BrushCreateSolid($aColors[0])
While Sleep(60)
	For $i = 0 To Int(UBound($aData) / 16) - 1
		For $j = 0 To 15
			For $k = 0 To 7
				If BitAND($aData[$i * 16 + $j], Int(2 ^ $k)) Then
					_GDIPlus_GraphicsFillEllipse($hGraphic, 20 + $j * 48 + $k * 6, 24 + $i * 7, 4, 4, $hBrush)
					_GDIPlus_BrushSetSolidColor($hBrush, $aColors[Random(0, UBound($aColors) - 1, 1)])
				EndIf
			Next
		Next
	Next
WEnd
Func _CloseGui()
	_GDIPlus_BrushDispose($hBrush)
	_GDIPlus_GraphicsDispose($hGraphic)
	_GDIPlus_Shutdown()
	GUIDelete($hGui)
	Exit
EndFunc