Task

Create a window and draw a pixel in it, subject to the following:

  the window is 320 x 240
  the color of the pixel must be red (255,0,0)
  the position of the pixel is x = 100, y = 100
MODULE pixel;
 
	IMPORT XYplane;
 
BEGIN
	XYplane.Open;
	XYplane.Dot(100, 100, XYplane.draw);
	REPEAT UNTIL XYplane.Key() = "q"
END pixel.
 