let ucolor = [|Graphics.white; Graphics.red; Graphics.green; Graphics.blue|]