SmallBasic
実行結果
プログラム
GraphicsWindow.Width = 600
GraphicsWindow.Height = 600
GraphicsWindow.BackgroundColor = “White”
For i=0 To 20
GraphicsWindow.PenColor = GraphicsWindow.GetColorFromRGB(0, 255-i*10, 0)
GraphicsWindow.DrawEllipse(100, 300-i*10, 400, i*20)
GraphicsWindow.DrawEllipse(300-i*10, 100, i*20, 400)
EndFor