diff options
Diffstat (limited to 'html/074keyboard.mu.html')
| -rw-r--r-- | html/074keyboard.mu.html | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/html/074keyboard.mu.html b/html/074keyboard.mu.html index 558c8d16..dc0ab783 100644 --- a/html/074keyboard.mu.html +++ b/html/074keyboard.mu.html @@ -10,16 +10,16 @@ <meta name="colorscheme" content="minimal"> <style type="text/css"> <!-- -pre { white-space: pre-wrap; font-family: monospace; color: #d0d0d0; background-color: #000000; } -body { font-family: monospace; color: #d0d0d0; background-color: #000000; } +pre { white-space: pre-wrap; font-family: monospace; color: #d0d0d0; background-color: #080808; } +body { font-family: monospace; color: #d0d0d0; background-color: #080808; } * { font-size: 1em; } -.CommentedCode { color: #6c6c6c; } -.muRecipe { color: #ff8700; } .Delimiter { color: #c000c0; } .Comment { color: #8080ff; } .Constant { color: #008080; } .Special { color: #ff6060; } .Identifier { color: #008080; } +.muRecipe { color: #ff8700; } +.CommentedCode { color: #6c6c6c; } --> </style> @@ -80,7 +80,7 @@ container keyboard <span class="Constant">[ # can't think of another word like <span class="Delimiter">{</span> <span class="Identifier">break-unless</span> x:address:keyboard <span class="Comment"># on fake keyboards 'wait-for-key' behaves just like 'read-key'</span> - c:character, x:address:keyboard<span class="Special"> <- </span>read-key x:address:keyboard + c:character, found?:boolean, x:address:keyboard<span class="Special"> <- </span>read-key x:address:keyboard <span class="Identifier">reply</span> c:character, x:address:keyboard/same-as-ingredient:0 <span class="Delimiter">}</span> c:character<span class="Special"> <- </span>wait-for-key-from-keyboard @@ -93,7 +93,7 @@ container keyboard <span class="Constant">[ # can't think of another word like chan:address:channel<span class="Special"> <- </span><span class="Identifier">next-ingredient</span> screen:address<span class="Special"> <- </span><span class="Identifier">next-ingredient</span> <span class="Delimiter">{</span> - c:character, found?:boolean<span class="Special"> <- </span>read-key keyboard:address + c:character, found?:boolean, keyboard:address<span class="Special"> <- </span>read-key keyboard:address <span class="Identifier">loop-unless</span> found?:boolean <span class="CommentedCode">#? print-integer screen:address, c:character #? 1</span> print-character screen:address, c:character |