diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-05-30 19:30:33 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-05-30 19:37:02 -0700 |
commit | 4bbd3ded0b767ae0919551776e4c17189140e735 (patch) | |
tree | 29300d13dc2b869378fbde7f5456b1cfb519482d /html/074keyboard.mu.html | |
parent | 06f3cebe3eb627e18910b6394bfde88c806c8f91 (diff) | |
download | mu-4bbd3ded0b767ae0919551776e4c17189140e735.tar.gz |
1517
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 |