[Oberon] Oberon.OpenDisplay

[peter at easthope.ca]

When a display is wider than 640 pixels, Oberon.OpenDisplay 
opens the left boundary of the displayed area a distance to the 
right of the y axis.  Specifically, Oberon.Mod has 	
	W0 := DW DIV 8 * 5;
	IF W0 < 400 THEN W0 := 0 END;
	OpenDisplay(W0, DW - W0, DH);

For example, if  DW = 1024 and DH = 768
then W0 = 640 and 
	OpenDisplay(640, 380, 768);
is executed.

Why not just
	OpenDisplay(0, 1024, 768);
or, in general,  
	OpenDisplay(0, DW , DH);
for any size of display?

There must be a sound reason but it escapes me at present.

Thanks,                         ... Peter E.

-- 
123456789 123456789 123456789 123456789 123456789 123456789 123456789 12
Tel +1 360 639 0202  http://carnot.yi.org/  Bcc: peter at easthope. ca