diff options
author | Kartik Agaram <vc@akkartik.com> | 2021-04-21 08:28:00 -0700 |
---|---|---|
committer | Kartik Agaram <vc@akkartik.com> | 2021-04-21 08:28:00 -0700 |
commit | a8fb537a88fdbe77cdcbaa05ee28d1cad94550da (patch) | |
tree | d0fad5f8da140435dcf05b631a4b3f315e0c1f86 /html/rpn.mu.html | |
parent | d27994a9d73f970a7b54ec71f4ae457da3734daa (diff) | |
download | mu-a8fb537a88fdbe77cdcbaa05ee28d1cad94550da.tar.gz |
.
Diffstat (limited to 'html/rpn.mu.html')
-rw-r--r-- | html/rpn.mu.html | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/html/rpn.mu.html b/html/rpn.mu.html index 84ef0bc2..d1341481 100644 --- a/html/rpn.mu.html +++ b/html/rpn.mu.html @@ -7,11 +7,11 @@ <meta name="plugin-version" content="vim8.1_v1"> <meta name="syntax" content="none"> <meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy="> -<meta name="colorscheme" content="minimal-light"> +<meta name="colorscheme" content="minimal-dark"> <style type="text/css"> <!-- -pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #c6c6c6; } -body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; } +pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #a8a8a8; } +body { font-size:12pt; font-family: monospace; color: #000000; background-color: #a8a8a8; } a { color:inherit; } * { font-size:12pt; font-size: 1em; } .PreProc { color: #c000c0; } @@ -65,7 +65,7 @@ if ('onhashchange' in window) { <span id="L7" class="LineNr"> 7 </span><span class="muComment"># $ ./translate rpn.mu</span> <span id="L8" class="LineNr"> 8 </span><span class="muComment">#</span> <span id="L9" class="LineNr"> 9 </span><span class="muComment"># Example session:</span> -<span id="L10" class="LineNr"> 10 </span><span class="muComment"># $ qemu-system-i386 disk.img</span> +<span id="L10" class="LineNr"> 10 </span><span class="muComment"># $ qemu-system-i386 code.img</span> <span id="L11" class="LineNr"> 11 </span><span class="muComment"># > 4</span> <span id="L12" class="LineNr"> 12 </span><span class="muComment"># 4</span> <span id="L13" class="LineNr"> 13 </span><span class="muComment"># > 5 3 -</span> @@ -73,7 +73,7 @@ if ('onhashchange' in window) { <span id="L15" class="LineNr"> 15 </span><span class="muComment">#</span> <span id="L16" class="LineNr"> 16 </span><span class="muComment"># Error handling is non-existent. This is just a prototype.</span> <span id="L17" class="LineNr"> 17 </span> -<span id="L18" class="LineNr"> 18 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='rpn.mu.html#L18'>main</a></span> <a href='500text-screen.mu.html#L9'>screen</a>: (addr <a href='500text-screen.mu.html#L9'>screen</a>), keyboard: (addr keyboard), data-disk: (addr disk) <span class="Delimiter">{</span> +<span id="L18" class="LineNr"> 18 </span><span class="PreProc">fn</span> <span class="muFunction"><a href='rpn.mu.html#L18'>main</a></span> <a href='500fake-screen.mu.html#L14'>screen</a>: (addr <a href='500fake-screen.mu.html#L14'>screen</a>), keyboard: (addr keyboard), data-disk: (addr disk) <span class="Delimiter">{</span> <span id="L19" class="LineNr"> 19 </span> <span class="PreProc">var</span> in-storage: (stream byte <span class="Constant">0x80</span>) <span id="L20" class="LineNr"> 20 </span> <span class="PreProc">var</span> in/<span class="Constant">esi</span>: (addr stream byte) <span class="Special"><-</span> address in-storage <span id="L21" class="LineNr"> 21 </span> <span class="PreProc">var</span> y/<span class="Constant">ecx</span>: int <span class="Special"><-</span> copy <span class="Constant">0</span> @@ -81,12 +81,12 @@ if ('onhashchange' in window) { <span id="L23" class="LineNr"> 23 </span> <span class="muComment"># read-eval-print loop</span> <span id="L24" class="LineNr"> 24 </span> <span class="Delimiter">{</span> <span id="L25" class="LineNr"> 25 </span> <span class="muComment"># print prompt</span> -<span id="L26" class="LineNr"> 26 </span> <span class="PreProc">var</span> x/<span class="Constant">eax</span>: int <span class="Special"><-</span> <a href='501draw-text.mu.html#L100'>draw-text-rightward</a> <a href='500text-screen.mu.html#L9'>screen</a>, <span class="Constant">"> "</span>, <span class="Constant">0</span>/x, <span class="Constant">0x80</span>/xmax, y, <span class="Constant">3</span>/fg/cyan, <span class="Constant">0</span>/bg -<span id="L27" class="LineNr"> 27 </span> <a href='500text-screen.mu.html#L133'>set-cursor-position</a> <a href='500text-screen.mu.html#L9'>screen</a>, x, y +<span id="L26" class="LineNr"> 26 </span> <span class="PreProc">var</span> x/<span class="Constant">eax</span>: int <span class="Special"><-</span> <a href='501draw-text.mu.html#L100'>draw-text-rightward</a> <a href='500fake-screen.mu.html#L14'>screen</a>, <span class="Constant">"> "</span>, <span class="Constant">0</span>/x, <span class="Constant">0x80</span>/xmax, y, <span class="Constant">3</span>/fg/cyan, <span class="Constant">0</span>/bg +<span id="L27" class="LineNr"> 27 </span> <a href='500fake-screen.mu.html#L169'>set-cursor-position</a> <a href='500fake-screen.mu.html#L14'>screen</a>, x, y <span id="L28" class="LineNr"> 28 </span> <span class="muComment"># read line from keyboard</span> <span id="L29" class="LineNr"> 29 </span> <a href='106stream.subx.html#L20'>clear-stream</a> in <span id="L30" class="LineNr"> 30 </span> <span class="Delimiter">{</span> -<span id="L31" class="LineNr"> 31 </span> <a href='500text-screen.mu.html#L180'>draw-cursor</a> <a href='500text-screen.mu.html#L9'>screen</a>, space +<span id="L31" class="LineNr"> 31 </span> <a href='500fake-screen.mu.html#L216'>draw-cursor</a> <a href='500fake-screen.mu.html#L14'>screen</a>, space <span id="L32" class="LineNr"> 32 </span> <span class="PreProc">var</span> key/<span class="Constant">eax</span>: byte <span class="Special"><-</span> <a href='102keyboard.subx.html#L21'>read-key</a> keyboard <span id="L33" class="LineNr"> 33 </span> compare key, <span class="Constant">0xa</span>/newline <span id="L34" class="LineNr"> 34 </span> <span class="PreProc">break-if-=</span> @@ -95,17 +95,17 @@ if ('onhashchange' in window) { <span id="L37" class="LineNr"> 37 </span> <span class="PreProc">var</span> key2/<span class="Constant">eax</span>: int <span class="Special"><-</span> copy key <span id="L38" class="LineNr"> 38 </span> <a href='115write-byte.subx.html#L12'>append-byte</a> in, key2 <span id="L39" class="LineNr"> 39 </span> <span class="PreProc">var</span> g/<span class="Constant">eax</span>: grapheme <span class="Special"><-</span> copy key2 -<span id="L40" class="LineNr"> 40 </span> <a href='501draw-text.mu.html#L84'>draw-grapheme-at-cursor</a> <a href='500text-screen.mu.html#L9'>screen</a>, g, <span class="Constant">0xf</span>/fg, <span class="Constant">0</span>/bg +<span id="L40" class="LineNr"> 40 </span> <a href='501draw-text.mu.html#L84'>draw-grapheme-at-cursor</a> <a href='500fake-screen.mu.html#L14'>screen</a>, g, <span class="Constant">0xf</span>/fg, <span class="Constant">0</span>/bg <span id="L41" class="LineNr"> 41 </span> <a href='501draw-text.mu.html#L16'>move-cursor-right</a> <span class="Constant">0</span> <span id="L42" class="LineNr"> 42 </span> <span class="PreProc">loop</span> <span id="L43" class="LineNr"> 43 </span> <span class="Delimiter">}</span> <span id="L44" class="LineNr"> 44 </span> <span class="muComment"># clear cursor</span> -<span id="L45" class="LineNr"> 45 </span> <a href='501draw-text.mu.html#L84'>draw-grapheme-at-cursor</a> <a href='500text-screen.mu.html#L9'>screen</a>, space, <span class="Constant">3</span>/fg/never-used, <span class="Constant">0</span>/bg +<span id="L45" class="LineNr"> 45 </span> <a href='501draw-text.mu.html#L84'>draw-grapheme-at-cursor</a> <a href='500fake-screen.mu.html#L14'>screen</a>, space, <span class="Constant">3</span>/fg/never-used, <span class="Constant">0</span>/bg <span id="L46" class="LineNr"> 46 </span> <span class="muComment"># parse and eval</span> <span id="L47" class="LineNr"> 47 </span> <span class="PreProc">var</span> out/<span class="Constant">eax</span>: int <span class="Special"><-</span> <a href='rpn.mu.html#L63'>simplify</a> in <span id="L48" class="LineNr"> 48 </span> <span class="muComment"># print</span> <span id="L49" class="LineNr"> 49 </span> y <span class="Special"><-</span> increment -<span id="L50" class="LineNr"> 50 </span> out, y <span class="Special"><-</span> <a href='501draw-text.mu.html#L319'>draw-int32-decimal-wrapping-right-then-down</a> <a href='500text-screen.mu.html#L9'>screen</a>, out, <span class="Constant">0</span>/xmin, y, <span class="Constant">0x80</span>/xmax, <span class="Constant">0x30</span>/ymax, <span class="Constant">0</span>/x, y, <span class="Constant">7</span>/fg, <span class="Constant">0</span>/bg +<span id="L50" class="LineNr"> 50 </span> out, y <span class="Special"><-</span> <a href='501draw-text.mu.html#L319'>draw-int32-decimal-wrapping-right-then-down</a> <a href='500fake-screen.mu.html#L14'>screen</a>, out, <span class="Constant">0</span>/xmin, y, <span class="Constant">0x80</span>/xmax, <span class="Constant">0x30</span>/ymax, <span class="Constant">0</span>/x, y, <span class="Constant">7</span>/fg, <span class="Constant">0</span>/bg <span id="L51" class="LineNr"> 51 </span> <span class="muComment"># newline</span> <span id="L52" class="LineNr"> 52 </span> y <span class="Special"><-</span> increment <span id="L53" class="LineNr"> 53 </span> <span class="muComment">#</span> |