diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-08-06 19:15:57 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-08-06 19:15:57 -0700 |
commit | eaeb955212eb3b133fd98d98457f17bfea8891d1 (patch) | |
tree | 4dbf20c0a79c460ea0ed129594670c58818a2dd4 /html/071print.mu.html | |
parent | 5d1699c2c75adc9670bf14404466c8056910b709 (diff) | |
download | mu-eaeb955212eb3b133fd98d98457f17bfea8891d1.tar.gz |
1949
Diffstat (limited to 'html/071print.mu.html')
-rw-r--r-- | html/071print.mu.html | 18 |
1 files changed, 7 insertions, 11 deletions
diff --git a/html/071print.mu.html b/html/071print.mu.html index 8e21896f..1c860732 100644 --- a/html/071print.mu.html +++ b/html/071print.mu.html @@ -15,12 +15,12 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } * { font-size: 1.05em; } .muControl { color: #c0a020; } .muRecipe { color: #ff8700; } -.muScenario { color: #00af00; } +.Delimiter { color: #a04060; } +.CommentedCode { color: #6c6c6c; } .Comment { color: #9090ff; } .Constant { color: #00a0a0; } .Special { color: #ff6060; } -.CommentedCode { color: #6c6c6c; } -.Delimiter { color: #a04060; } +.muScenario { color: #00af00; } --> </style> @@ -468,13 +468,12 @@ container screen-cell [ <span class="Delimiter">{</span> <span class="muControl">break-unless</span> sc <span class="Delimiter">{</span> - <span class="Comment"># if row < height-1</span> + <span class="Comment"># increment row unless it's already all the way down</span> height:number<span class="Special"> <- </span>get *sc, <span class="Constant">num-rows:offset</span> row:address:number<span class="Special"> <- </span>get-address *sc, <span class="Constant">cursor-row:offset</span> max:number<span class="Special"> <- </span>subtract height, <span class="Constant">1</span> at-bottom?:boolean<span class="Special"> <- </span>greater-or-equal *row, max <span class="muControl">break-if</span> at-bottom? - <span class="Comment"># row = row+1</span> *row<span class="Special"> <- </span>add *row, <span class="Constant">1</span> <span class="Delimiter">}</span> <span class="muControl">reply</span> sc/same-as-ingredient:<span class="Constant">0</span> @@ -491,11 +490,10 @@ container screen-cell [ <span class="Delimiter">{</span> <span class="muControl">break-unless</span> sc <span class="Delimiter">{</span> - <span class="Comment"># if row > 0</span> + <span class="Comment"># decrement row unless it's already all the way up</span> row:address:number<span class="Special"> <- </span>get-address *sc, <span class="Constant">cursor-row:offset</span> at-top?:boolean<span class="Special"> <- </span>lesser-or-equal *row, <span class="Constant">0</span> <span class="muControl">break-if</span> at-top? - <span class="Comment"># row = row-1</span> *row<span class="Special"> <- </span>subtract *row, <span class="Constant">1</span> <span class="Delimiter">}</span> <span class="muControl">reply</span> sc/same-as-ingredient:<span class="Constant">0</span> @@ -512,13 +510,12 @@ container screen-cell [ <span class="Delimiter">{</span> <span class="muControl">break-unless</span> sc <span class="Delimiter">{</span> - <span class="Comment"># if column < width-1</span> + <span class="Comment"># increment column unless it's already all the way to the right</span> width:number<span class="Special"> <- </span>get *sc, <span class="Constant">num-columns:offset</span> column:address:number<span class="Special"> <- </span>get-address *sc, <span class="Constant">cursor-column:offset</span> max:number<span class="Special"> <- </span>subtract width, <span class="Constant">1</span> at-bottom?:boolean<span class="Special"> <- </span>greater-or-equal *column, max <span class="muControl">break-if</span> at-bottom? - <span class="Comment"># column = column+1</span> *column<span class="Special"> <- </span>add *column, <span class="Constant">1</span> <span class="Delimiter">}</span> <span class="muControl">reply</span> sc/same-as-ingredient:<span class="Constant">0</span> @@ -535,11 +532,10 @@ container screen-cell [ <span class="Delimiter">{</span> <span class="muControl">break-unless</span> sc <span class="Delimiter">{</span> - <span class="Comment"># if column > 0</span> + <span class="Comment"># decrement column unless it's already all the way to the left</span> column:address:number<span class="Special"> <- </span>get-address *sc, <span class="Constant">cursor-column:offset</span> at-top?:boolean<span class="Special"> <- </span>lesser-or-equal *column, <span class="Constant">0</span> <span class="muControl">break-if</span> at-top? - <span class="Comment"># column = column-1</span> *column<span class="Special"> <- </span>subtract *column, <span class="Constant">1</span> <span class="Delimiter">}</span> <span class="muControl">reply</span> sc/same-as-ingredient:<span class="Constant">0</span> |