GraphicsWindow.Width=800

GraphicsWindow.Height=600

For i=0 To 800 Step 10

  GraphicsWindow.DrawLine(?,?,?,?)

EndFor

GraphicsWindow.Width=800

GraphicsWindow.Height=600

For i=0 To 600 Step 10

  GraphicsWindow.DrawLine(?,?,?,?)

EndFor

GraphicsWindow.Width=800

GraphicsWindow.Height=600

For i=0 To 600 Step 10

  GraphicsWindow.DrawLine(?,?,?,?)

EndFor

GraphicsWindow.Width=600

GraphicsWindow.Height=600

For i=0 To 600 Step 10

  GraphicsWindow.DrawLine(?,?,?,?)

EndFor

GraphicsWindow.Width=600

GraphicsWindow.Height=600

For i=0 To 600 Step 10

  GraphicsWindow.DrawLine(i,0,?,?)

  GraphicsWindow.DrawLine(?,?,?,?)

EndFor

GraphicsWindow.Width=600

GraphicsWindow.Height=600

For i=0 To 500 Step 10

  GraphicsWindow.DrawEllipse(?,?,100,100)

EndFor

GraphicsWindow.Width=600

GraphicsWindow.Height=600

For i=0 To 500 Step 10

  GraphicsWindow.DrawEllipse(?,?,100,100)

  GraphicsWindow.DrawEllipse(?,?,100,100)

EndFor

GraphicsWindow.Width=600

GraphicsWindow.Height=600

For i=0 To 500 Step 10

  GraphicsWindow.DrawEllipse(?,?,100,100)

  GraphicsWindow.DrawEllipse(?,?,100,100)

  GraphicsWindow.DrawEllipse(?,?,100,100)

  GraphicsWindow.DrawEllipse(?,?,100,100)

EndFor