about summary refs log tree commit diff stats
path: root/html/500fake-screen.mu.html
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2021-05-18 13:01:59 -0700
committerKartik Agaram <vc@akkartik.com>2021-05-18 13:04:33 -0700
commit5396e24cba8390ca2d70d99c7e8772eee4ec3a11 (patch)
treeb266edbb6c21db7904370d082a7966783fb9e9d4 /html/500fake-screen.mu.html
parentb4c0b12542c1f1a1e141ed0c8db2f6165af06e0f (diff)
downloadmu-5396e24cba8390ca2d70d99c7e8772eee4ec3a11.tar.gz
.
Diffstat (limited to 'html/500fake-screen.mu.html')
-rw-r--r--html/500fake-screen.mu.html71
1 files changed, 55 insertions, 16 deletions
diff --git a/html/500fake-screen.mu.html b/html/500fake-screen.mu.html
index 81f96915..edf7b8f5 100644
--- a/html/500fake-screen.mu.html
+++ b/html/500fake-screen.mu.html
@@ -154,7 +154,7 @@ if ('onhashchange' in window) {
 <span id="L96" class="LineNr"> 96 </span>  <span class="muComment"># fake screen</span>
 <span id="L97" class="LineNr"> 97 </span>  <span class="PreProc">var</span> idx/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> <a href='500fake-screen.mu.html#L120'>screen-cell-index</a> <a href='500fake-screen.mu.html#L14'>screen</a>, x, y
 <span id="L98" class="LineNr"> 98 </span>  <span class="PreProc">var</span> data-ah/<span class="Constant">eax</span>: (addr handle array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, data
-<span id="L99" class="LineNr"> 99 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *data-ah
+<span id="L99" class="LineNr"> 99 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *data-ah
 <span id="L100" class="LineNr">100 </span>  <span class="PreProc">var</span> offset/<span class="Constant">ecx</span>: (offset <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> compute-offset data, idx
 <span id="L101" class="LineNr">101 </span>  <span class="PreProc">var</span> dest-cell/<span class="Constant">ecx</span>: (addr <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> index data, offset
 <span id="L102" class="LineNr">102 </span>  <span class="PreProc">var</span> dest-grapheme/<span class="Constant">eax</span>: (addr grapheme) <span class="Special">&lt;-</span> get dest-cell, data
@@ -180,26 +180,26 @@ if ('onhashchange' in window) {
 <span id="L122" class="LineNr">122 </span>  <span class="Delimiter">{</span>
 <span id="L123" class="LineNr">123 </span>    compare x, <span class="Constant">0</span>
 <span id="L124" class="LineNr">124 </span>    <span class="PreProc">break-if-&gt;=</span>
-<span id="L125" class="LineNr">125 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: negative x&quot;</span>
+<span id="L125" class="LineNr">125 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: negative x&quot;</span>
 <span id="L126" class="LineNr">126 </span>  <span class="Delimiter">}</span>
 <span id="L127" class="LineNr">127 </span>  <span class="Delimiter">{</span>
 <span id="L128" class="LineNr">128 </span>    <span class="PreProc">var</span> xmax/<span class="Constant">eax</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, width
 <span id="L129" class="LineNr">129 </span>    <span class="PreProc">var</span> xcurr/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy x
 <span id="L130" class="LineNr">130 </span>    compare xcurr, *xmax
 <span id="L131" class="LineNr">131 </span>    <span class="PreProc">break-if-&lt;</span>
-<span id="L132" class="LineNr">132 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: x too high&quot;</span>
+<span id="L132" class="LineNr">132 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: x too high&quot;</span>
 <span id="L133" class="LineNr">133 </span>  <span class="Delimiter">}</span>
 <span id="L134" class="LineNr">134 </span>  <span class="Delimiter">{</span>
 <span id="L135" class="LineNr">135 </span>    compare y, <span class="Constant">0</span>
 <span id="L136" class="LineNr">136 </span>    <span class="PreProc">break-if-&gt;=</span>
-<span id="L137" class="LineNr">137 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: negative y&quot;</span>
+<span id="L137" class="LineNr">137 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: negative y&quot;</span>
 <span id="L138" class="LineNr">138 </span>  <span class="Delimiter">}</span>
 <span id="L139" class="LineNr">139 </span>  <span class="Delimiter">{</span>
 <span id="L140" class="LineNr">140 </span>    <span class="PreProc">var</span> ymax/<span class="Constant">eax</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, height
 <span id="L141" class="LineNr">141 </span>    <span class="PreProc">var</span> ycurr/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy y
 <span id="L142" class="LineNr">142 </span>    compare ycurr, *ymax
 <span id="L143" class="LineNr">143 </span>    <span class="PreProc">break-if-&lt;</span>
-<span id="L144" class="LineNr">144 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: y too high&quot;</span>
+<span id="L144" class="LineNr">144 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: y too high&quot;</span>
 <span id="L145" class="LineNr">145 </span>  <span class="Delimiter">}</span>
 <span id="L146" class="LineNr">146 </span>  <span class="PreProc">var</span> width-addr/<span class="Constant">eax</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, width
 <span id="L147" class="LineNr">147 </span>  <span class="PreProc">var</span> result/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy y
@@ -314,7 +314,7 @@ if ('onhashchange' in window) {
 <span id="L256" class="LineNr">256 </span>  <span class="Delimiter">}</span>
 <span id="L257" class="LineNr">257 </span>  <a href='500fake-screen.mu.html#L169'>set-cursor-position</a> <a href='500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">0</span>, <span class="Constant">0</span>
 <span id="L258" class="LineNr">258 </span>  <span class="PreProc">var</span> pixels-ah/<span class="Constant">eax</span>: (addr handle array byte) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, pixels
-<span id="L259" class="LineNr">259 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *pixels-ah
+<span id="L259" class="LineNr">259 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *pixels-ah
 <span id="L260" class="LineNr">260 </span>  <span class="PreProc">var</span> i/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
 <span id="L261" class="LineNr">261 </span>  <span class="PreProc">var</span> max/<span class="Constant">edx</span>: int <span class="Special">&lt;-</span> length pixels
 <span id="L262" class="LineNr">262 </span>  <span class="Delimiter">{</span>
@@ -355,7 +355,7 @@ if ('onhashchange' in window) {
 <span id="L297" class="LineNr">297 </span>    <span class="PreProc">loop</span>
 <span id="L298" class="LineNr">298 </span>  <span class="Delimiter">}</span>
 <span id="L299" class="LineNr">299 </span>  <span class="PreProc">var</span> pixels-ah/<span class="Constant">eax</span>: (addr handle array byte) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, pixels
-<span id="L300" class="LineNr">300 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *pixels-ah
+<span id="L300" class="LineNr">300 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *pixels-ah
 <span id="L301" class="LineNr">301 </span>  <span class="PreProc">var</span> y/<span class="Constant">ebx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
 <span id="L302" class="LineNr">302 </span>  <span class="PreProc">var</span> height-addr/<span class="Constant">edx</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, height
 <span id="L303" class="LineNr">303 </span>  <span class="PreProc">var</span> height/<span class="Constant">edx</span>: int <span class="Special">&lt;-</span> copy *height-addr
@@ -471,7 +471,7 @@ if ('onhashchange' in window) {
 <span id="L413" class="LineNr">413 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='500fake-screen.mu.html#L413'>screen-grapheme-at-idx</a></span> _screen: (addr <a href='500fake-screen.mu.html#L14'>screen</a>), idx-on-stack: int<span class="PreProc"> -&gt; </span>_/<span class="Constant">eax</span>: grapheme <span class="Delimiter">{</span>
 <span id="L414" class="LineNr">414 </span>  <span class="PreProc">var</span> <a href='500fake-screen.mu.html#L14'>screen</a>/<span class="Constant">esi</span>: (addr <a href='500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> copy _screen
 <span id="L415" class="LineNr">415 </span>  <span class="PreProc">var</span> data-ah/<span class="Constant">eax</span>: (addr handle array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, data
-<span id="L416" class="LineNr">416 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *data-ah
+<span id="L416" class="LineNr">416 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *data-ah
 <span id="L417" class="LineNr">417 </span>  <span class="PreProc">var</span> idx/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy idx-on-stack
 <span id="L418" class="LineNr">418 </span>  <span class="PreProc">var</span> offset/<span class="Constant">ecx</span>: (offset <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> compute-offset data, idx
 <span id="L419" class="LineNr">419 </span>  <span class="PreProc">var</span> cell/<span class="Constant">eax</span>: (addr <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> index data, offset
@@ -489,7 +489,7 @@ if ('onhashchange' in window) {
 <span id="L431" class="LineNr">431 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='500fake-screen.mu.html#L431'>screen-color-at-idx</a></span> _screen: (addr <a href='500fake-screen.mu.html#L14'>screen</a>), idx-on-stack: int<span class="PreProc"> -&gt; </span>_/<span class="Constant">eax</span>: int <span class="Delimiter">{</span>
 <span id="L432" class="LineNr">432 </span>  <span class="PreProc">var</span> <a href='500fake-screen.mu.html#L14'>screen</a>/<span class="Constant">esi</span>: (addr <a href='500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> copy _screen
 <span id="L433" class="LineNr">433 </span>  <span class="PreProc">var</span> data-ah/<span class="Constant">eax</span>: (addr handle array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, data
-<span id="L434" class="LineNr">434 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *data-ah
+<span id="L434" class="LineNr">434 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *data-ah
 <span id="L435" class="LineNr">435 </span>  <span class="PreProc">var</span> idx/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy idx-on-stack
 <span id="L436" class="LineNr">436 </span>  <span class="PreProc">var</span> offset/<span class="Constant">ecx</span>: (offset <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> compute-offset data, idx
 <span id="L437" class="LineNr">437 </span>  <span class="PreProc">var</span> cell/<span class="Constant">eax</span>: (addr <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> index data, offset
@@ -508,7 +508,7 @@ if ('onhashchange' in window) {
 <span id="L450" class="LineNr">450 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='500fake-screen.mu.html#L450'>screen-background-color-at-idx</a></span> _screen: (addr <a href='500fake-screen.mu.html#L14'>screen</a>), idx-on-stack: int<span class="PreProc"> -&gt; </span>_/<span class="Constant">eax</span>: int <span class="Delimiter">{</span>
 <span id="L451" class="LineNr">451 </span>  <span class="PreProc">var</span> <a href='500fake-screen.mu.html#L14'>screen</a>/<span class="Constant">esi</span>: (addr <a href='500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> copy _screen
 <span id="L452" class="LineNr">452 </span>  <span class="PreProc">var</span> data-ah/<span class="Constant">eax</span>: (addr handle array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, data
-<span id="L453" class="LineNr">453 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *data-ah
+<span id="L453" class="LineNr">453 </span>  <span class="PreProc">var</span> data/<span class="Constant">eax</span>: (addr array <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *data-ah
 <span id="L454" class="LineNr">454 </span>  <span class="PreProc">var</span> idx/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy idx-on-stack
 <span id="L455" class="LineNr">455 </span>  <span class="PreProc">var</span> offset/<span class="Constant">ecx</span>: (offset <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> compute-offset data, idx
 <span id="L456" class="LineNr">456 </span>  <span class="PreProc">var</span> cell/<span class="Constant">eax</span>: (addr <a href='500fake-screen.mu.html#L25'>screen-cell</a>) <span class="Special">&lt;-</span> index data, offset
@@ -527,11 +527,11 @@ if ('onhashchange' in window) {
 <span id="L469" class="LineNr">469 </span>  <span class="muComment"># fake screen</span>
 <span id="L470" class="LineNr">470 </span>  <span class="PreProc">var</span> <a href='500fake-screen.mu.html#L14'>screen</a>/<span class="Constant">esi</span>: (addr <a href='500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> copy <a href='500fake-screen.mu.html#L14'>screen</a>
 <span id="L471" class="LineNr">471 </span>  <span class="PreProc">var</span> pixels-ah/<span class="Constant">eax</span>: (addr handle array byte) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, pixels
-<span id="L472" class="LineNr">472 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L226'>lookup</a> *pixels-ah
+<span id="L472" class="LineNr">472 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *pixels-ah
 <span id="L473" class="LineNr">473 </span>  <span class="Delimiter">{</span>
 <span id="L474" class="LineNr">474 </span>    compare pixels, <span class="Constant">0</span>
 <span id="L475" class="LineNr">475 </span>    <span class="PreProc">break-if-!=</span>
-<span id="L476" class="LineNr">476 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;pixel graphics not enabled for this screen&quot;</span>
+<span id="L476" class="LineNr">476 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;pixel graphics not enabled for this screen&quot;</span>
 <span id="L477" class="LineNr">477 </span>  <span class="Delimiter">}</span>
 <span id="L478" class="LineNr">478 </span>  <span class="PreProc">var</span> idx/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> <a href='500fake-screen.mu.html#L484'>pixel-index</a> <a href='500fake-screen.mu.html#L14'>screen</a>, x, y
 <span id="L479" class="LineNr">479 </span>  <span class="PreProc">var</span> dest/<span class="Constant">ecx</span>: (addr byte) <span class="Special">&lt;-</span> index pixels, idx
@@ -544,7 +544,7 @@ if ('onhashchange' in window) {
 <span id="L486" class="LineNr">486 </span>  <span class="Delimiter">{</span>
 <span id="L487" class="LineNr">487 </span>    compare x, <span class="Constant">0</span>
 <span id="L488" class="LineNr">488 </span>    <span class="PreProc">break-if-&gt;=</span>
-<span id="L489" class="LineNr">489 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: negative x&quot;</span>
+<span id="L489" class="LineNr">489 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: negative x&quot;</span>
 <span id="L490" class="LineNr">490 </span>  <span class="Delimiter">}</span>
 <span id="L491" class="LineNr">491 </span>  <span class="Delimiter">{</span>
 <span id="L492" class="LineNr">492 </span>    <span class="PreProc">var</span> xmax-a/<span class="Constant">eax</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, width
@@ -552,12 +552,12 @@ if ('onhashchange' in window) {
 <span id="L494" class="LineNr">494 </span>    xmax <span class="Special">&lt;-</span> shift-left <span class="Constant">3</span>/log2-font-width
 <span id="L495" class="LineNr">495 </span>    compare x, xmax
 <span id="L496" class="LineNr">496 </span>    <span class="PreProc">break-if-&lt;</span>
-<span id="L497" class="LineNr">497 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: x too high&quot;</span>
+<span id="L497" class="LineNr">497 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: x too high&quot;</span>
 <span id="L498" class="LineNr">498 </span>  <span class="Delimiter">}</span>
 <span id="L499" class="LineNr">499 </span>  <span class="Delimiter">{</span>
 <span id="L500" class="LineNr">500 </span>    compare y, <span class="Constant">0</span>
 <span id="L501" class="LineNr">501 </span>    <span class="PreProc">break-if-&gt;=</span>
-<span id="L502" class="LineNr">502 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: negative y&quot;</span>
+<span id="L502" class="LineNr">502 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: negative y&quot;</span>
 <span id="L503" class="LineNr">503 </span>  <span class="Delimiter">}</span>
 <span id="L504" class="LineNr">504 </span>  <span class="Delimiter">{</span>
 <span id="L505" class="LineNr">505 </span>    <span class="PreProc">var</span> ymax-a/<span class="Constant">eax</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, height
@@ -565,7 +565,7 @@ if ('onhashchange' in window) {
 <span id="L507" class="LineNr">507 </span>    ymax <span class="Special">&lt;-</span> shift-left <span class="Constant">4</span>/log2-font-height
 <span id="L508" class="LineNr">508 </span>    compare y, ymax
 <span id="L509" class="LineNr">509 </span>    <span class="PreProc">break-if-&lt;</span>
-<span id="L510" class="LineNr">510 </span>    <a href='501draw-text.mu.html#L481'>abort</a> <span class="Constant">&quot;screen-cell-index: y too high&quot;</span>
+<span id="L510" class="LineNr">510 </span>    <a href='317abort.subx.html#L5'>abort</a> <span class="Constant">&quot;screen-cell-index: y too high&quot;</span>
 <span id="L511" class="LineNr">511 </span>  <span class="Delimiter">}</span>
 <span id="L512" class="LineNr">512 </span>  <span class="PreProc">var</span> width-addr/<span class="Constant">eax</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, width
 <span id="L513" class="LineNr">513 </span>  <span class="PreProc">var</span> result/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy y
@@ -574,6 +574,45 @@ if ('onhashchange' in window) {
 <span id="L516" class="LineNr">516 </span>  result <span class="Special">&lt;-</span> add x
 <span id="L517" class="LineNr">517 </span>  <span class="PreProc">return</span> result
 <span id="L518" class="LineNr">518 </span><span class="Delimiter">}</span>
+<span id="L519" class="LineNr">519 </span>
+<span id="L520" class="LineNr">520 </span><span class="muComment"># double-buffering primitive</span>
+<span id="L521" class="LineNr">521 </span><span class="muComment"># 'screen' must be a fake screen. 'target-screen' is usually real.</span>
+<span id="L522" class="LineNr">522 </span><span class="muComment"># Both screens must have the same size.</span>
+<span id="L523" class="LineNr">523 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='500fake-screen.mu.html#L523'>copy-pixels</a></span> _screen: (addr <a href='500fake-screen.mu.html#L14'>screen</a>), target-screen: (addr <a href='500fake-screen.mu.html#L14'>screen</a>) <span class="Delimiter">{</span>
+<span id="L524" class="LineNr">524 </span>  <span class="PreProc">var</span> <a href='500fake-screen.mu.html#L14'>screen</a>/<span class="Constant">esi</span>: (addr <a href='500fake-screen.mu.html#L14'>screen</a>) <span class="Special">&lt;-</span> copy _screen
+<span id="L525" class="LineNr">525 </span>  <span class="PreProc">var</span> pixels-ah/<span class="Constant">eax</span>: (addr handle array byte) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, pixels
+<span id="L526" class="LineNr">526 </span>  <span class="PreProc">var</span> _pixels/<span class="Constant">eax</span>: (addr array byte) <span class="Special">&lt;-</span> <a href='120allocate.subx.html#L223'>lookup</a> *pixels-ah
+<span id="L527" class="LineNr">527 </span>  <span class="PreProc">var</span> pixels/<span class="Constant">edi</span>: (addr array byte) <span class="Special">&lt;-</span> copy _pixels
+<span id="L528" class="LineNr">528 </span>  <span class="PreProc">var</span> width-a/<span class="Constant">edx</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, width
+<span id="L529" class="LineNr">529 </span>  <span class="PreProc">var</span> width/<span class="Constant">edx</span>: int <span class="Special">&lt;-</span> copy *width-a
+<span id="L530" class="LineNr">530 </span>  width <span class="Special">&lt;-</span> shift-left <span class="Constant">3</span>/log2-font-width
+<span id="L531" class="LineNr">531 </span>  <span class="PreProc">var</span> height-a/<span class="Constant">ebx</span>: (addr int) <span class="Special">&lt;-</span> get <a href='500fake-screen.mu.html#L14'>screen</a>, height
+<span id="L532" class="LineNr">532 </span>  <span class="PreProc">var</span> height/<span class="Constant">ebx</span>: int <span class="Special">&lt;-</span> copy *height-a
+<span id="L533" class="LineNr">533 </span>  height <span class="Special">&lt;-</span> shift-left <span class="Constant">4</span>/log2-font-height
+<span id="L534" class="LineNr">534 </span>  <span class="PreProc">var</span> i/<span class="Constant">esi</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
+<span id="L535" class="LineNr">535 </span>  <span class="PreProc">var</span> y/<span class="Constant">ecx</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
+<span id="L536" class="LineNr">536 </span>  <span class="Delimiter">{</span>
+<span id="L537" class="LineNr">537 </span>    <span class="muComment"># screen top left pixels x y width height</span>
+<span id="L538" class="LineNr">538 </span>    compare y, height
+<span id="L539" class="LineNr">539 </span>    <span class="PreProc">break-if-&gt;=</span>
+<span id="L540" class="LineNr">540 </span>    <span class="PreProc">var</span> x/<span class="Constant">eax</span>: int <span class="Special">&lt;-</span> copy <span class="Constant">0</span>
+<span id="L541" class="LineNr">541 </span>    <span class="Delimiter">{</span>
+<span id="L542" class="LineNr">542 </span>      compare x, width
+<span id="L543" class="LineNr">543 </span>      <span class="PreProc">break-if-&gt;=</span>
+<span id="L544" class="LineNr">544 </span>      <span class="Delimiter">{</span>
+<span id="L545" class="LineNr">545 </span>        <span class="PreProc">var</span> color-addr/<span class="Constant">ebx</span>: (addr byte) <span class="Special">&lt;-</span> index pixels, i
+<span id="L546" class="LineNr">546 </span>        <span class="PreProc">var</span> color/<span class="Constant">ebx</span>: byte <span class="Special">&lt;-</span> copy-byte *color-addr
+<span id="L547" class="LineNr">547 </span>        <span class="PreProc">var</span> color2/<span class="Constant">ebx</span>: int <span class="Special">&lt;-</span> copy color
+<span id="L548" class="LineNr">548 </span>        <a href='500fake-screen.mu.html#L462'>pixel</a> target-screen, x, y, color2
+<span id="L549" class="LineNr">549 </span>      <span class="Delimiter">}</span>
+<span id="L550" class="LineNr">550 </span>      x <span class="Special">&lt;-</span> increment
+<span id="L551" class="LineNr">551 </span>      i <span class="Special">&lt;-</span> increment
+<span id="L552" class="LineNr">552 </span>      <span class="PreProc">loop</span>
+<span id="L553" class="LineNr">553 </span>    <span class="Delimiter">}</span>
+<span id="L554" class="LineNr">554 </span>    y <span class="Special">&lt;-</span> increment
+<span id="L555" class="LineNr">555 </span>    <span class="PreProc">loop</span>
+<span id="L556" class="LineNr">556 </span>  <span class="Delimiter">}</span>
+<span id="L557" class="LineNr">557 </span><span class="Delimiter">}</span>
 </pre>
 </body>
 </html>