Продолжение движения по радианам.Прикол в том,что если заменить константу пи с 3.14 на 3.10 визуальный эффект будет немного лучше.
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
GUICreate("",700,700)

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

$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 ,15,15)
$a = $a + 5
next
wend

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

EndSwitch

WEnd