<html><head><meta http-equiv="content-type" content="text/html; charset=utf-8"></head><body dir="auto"><div>Peter</div><div><br></div><div>Read chapter 4.6 in</div><div><a href="http://www.inf.ethz.ch/personal/wirth/ProjectOberon/PO.System.pdf">http://www.inf.ethz.ch/personal/wirth/ProjectOberon/PO.System.pdf</a></div><div><br></div><div>Standard Oberon display has a User track on the left and a System track on the right.</div><div>W0 is the width of the User track, DW-W0 is the width of the System track.</div><div><br></div><div>br, Jörg</div><div><br>Am 16.05.2014 um 21:44 schrieb &lt;<a href="mailto:peter@easthope.ca">peter@easthope.ca</a>&gt;:<br><br></div><blockquote type="cite"><div><span>When a display is wider than 640 pixels, Oberon.OpenDisplay </span><br><span>opens the left boundary of the displayed area a distance to the </span><br><span>right of the y axis. &nbsp;Specifically, Oberon.Mod has  &nbsp; &nbsp;</span><br><span> &nbsp; &nbsp;W0 := DW DIV 8 * 5;</span><br><span> &nbsp; &nbsp;IF W0 &lt; 400 THEN W0 := 0 END;</span><br><span> &nbsp; &nbsp;OpenDisplay(W0, DW - W0, DH);</span><br><span></span><br><span>For example, if &nbsp;DW = 1024 and DH = 768</span><br><span>then W0 = 640 and </span><br><span> &nbsp; &nbsp;OpenDisplay(640, 380, 768);</span><br><span>is executed.</span><br><span></span><br><span>Why not just</span><br><span> &nbsp; &nbsp;OpenDisplay(0, 1024, 768);</span><br><span>or, in general, &nbsp;</span><br><span> &nbsp; &nbsp;OpenDisplay(0, DW , DH);</span><br><span>for any size of display?</span><br><span></span><br><span>There must be a sound reason but it escapes me at present.</span><br><span></span><br><span>Thanks, &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;... Peter E.</span><br><span></span><br><span>-- </span><br><span>123456789 123456789 123456789 123456789 123456789 123456789 123456789 12</span><br><span>Tel +1 360 639 0202 &nbsp;<a href="http://carnot.yi.org/">http://carnot.yi.org/</a> &nbsp;Bcc: peter at easthope. ca</span><br><span></span><br><span></span><br><span>--</span><br><span><a href="mailto:Oberon@lists.inf.ethz.ch">Oberon@lists.inf.ethz.ch</a> mailing list for ETH Oberon and related systems</span><br><span><a href="https://lists.inf.ethz.ch/mailman/listinfo/oberon">https://lists.inf.ethz.ch/mailman/listinfo/oberon</a></span><br></div></blockquote></body></html>