#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUICreate("",700,700)

Local $r = 350
Local $a = 0
Local $a1 = 360
Local $sz = 15

$elemgr = GUICtrlCreateGraphic(0, 0, 500, 500)

GUICtrlSetGraphic(-1, $GUI_GR_COLOR, 0x000000, 0xffff00)
Local $iter = 0
while $iter < 5
$iter = $iter + 1
for $a = 0 to 360
$x1 = 350 + ($r-$iter*50)*sin($a*(3.14/180))
$y2 = 350 + ($r-$iter*50)*cos($a*(3.14/180))
GUICtrlSetGraphic(-1, $GUI_GR_ELLIPSE, $x1,$y2 ,$sz,$sz)
$a = $a + 5
$sz = random(25,50,1)

next

wend

GUISetState(@SW_SHOW)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop

EndSwitch

WEnd