MODULE pixel;

    IMPORT XYplane;

BEGIN
    XYplane.Open;
    XYplane.Dot(100, 100, XYplane.draw);
    REPEAT UNTIL XYplane.Key() = "q"
END pixel.