GraphicsWindow.BackgroundColor = "Black" GraphicsWindow.PenColor = "LightBlue" GraphicsWindow.Width = 480 For i = 0 To 6.4 Step 0.17 x = Math.Sin(i) * 100 + 200 'Seno' y = Math.Cos(i) * 100 + 200 'Coseno' DibujarCírculoUsandoCentro() EndFor Sub DibujarCírculoUsandoCentro comienzoX = x - 40 comienzoY = y - 40 GraphicsWindow.DrawEllipse(comienzoX, comienzoY, 120, 120) EndSub