Screen Saver: Hack The Planet!!

#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <GDIPlus.au3>
;End

Opt("GuiOnEventMode",1)

$wi = @DesktopWidth
$he = @DesktopHeight
$Gui=GUICreate("Screen",$wi,$he,0,0,$WS_POPUP)
GUISetState()
_GDIPlus_Startup()
WinSetOnTop("Screen","",1)
$g=_GDIPlus_GraphicsCreateFromHWND($Gui)
  _GDIPlus_GraphicsClear($g)

$p=_GDIPlus_PenCreate(0xFF&Random(11,99,1)&Random(11,99,1)&Random(11,99,1))

GUISetOnEvent($GUI_EVENT_MOUSEMOVE,"Ex",$Gui)
AdlibRegister("hack",1000)

While 1
       $p=_GDIPlus_PenCreate(0xFF&Random(11,99,1)&Random(11,99,1)&Random(11,99,1),4)
       For $i = 0  to 80
       _GDIPlus_GraphicsDrawEllipse($g,Random(0,$wi,1),Random(0,$he,1),90,90,$p)
       Next
       Sleep(1000)
       _GDIPlus_GraphicsClear($g)
WEnd

_GDIPlus_Shutdown()

Func ex()
       Exit
EndFunc
Func hack()
       
       $lay = _GDIPlus_RectFCreate(Random(0,$wi,1),Random(0,$he,1))
       $fn=_GDIPlus_FontFamilyCreate("Arial")
       $fnt=_GDIPlus_FontCreate($fn,35)
       $ad=_GDIPlus_StringFormatCreate()
       $br=_GDIPlus_BrushCreateSolid(0xFFFFFFFF)
       _GDIPlus_GraphicsDrawStringEx($g,"hack the planet",$fnt,$lay,$ad,$br)
       
EndFunc