GraphicsWindow.DrawResizedImage("F:\Image0705.jpg",0,0,100,100)
gw = GraphicsWindow.Width
gh = GraphicsWindow.Height


For i = 0 To gw
  For j = 1 To gh
    a[i][j] = GraphicsWindow.GetPixel(i,j)
    TextWindow.WriteLine("Ok")
  EndFor
EndFor

GraphicsWindow.Clear()

For i = 0 To gw
  For j = 1 To gh
    GraphicsWindow.PenColor = a[i][j]
    GraphicsWindow.DrawEllipse(i,j,1,1)
  EndFor
EndFor