GraphicsWindow.Width = 500 GraphicsWindow.Height = 500
GraphicsWindow.PenWidth = 10 For i = 0 To 500 Step 100 For z = 0 To 500 Step 100 GraphicsWindow.PenColor = "Green" GraphicsWindow.DrawLine(10+i, 10+z, 100+i, 100+z) GraphicsWindow.PenColor = "Gold" GraphicsWindow.DrawLine(10+i, 100+z, 100+i, 10+z) GraphicsWindow.PenColor = "Red" GraphicsWindow.DrawLine(50+i, 0+z, 50+i, 100+z) EndFor EndFor