@pixfarb = $screen -> GetPixel (1, 1);