diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-04-25 22:27:19 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-04-25 22:27:19 -0700 |
commit | 32b8fac2799ac7cec613e84a3eb9c009141b6a3a (patch) | |
tree | 11f56c1a235abf7b626ea8983fff3d2edb1fcf98 /html/083scenario_screen_test.mu.html | |
parent | 224972ee9871fcb06ee285fa5f3d9528c034d414 (diff) | |
download | mu-32b8fac2799ac7cec613e84a3eb9c009141b6a3a.tar.gz |
2866
Diffstat (limited to 'html/083scenario_screen_test.mu.html')
-rw-r--r-- | html/083scenario_screen_test.mu.html | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/html/083scenario_screen_test.mu.html b/html/083scenario_screen_test.mu.html index d5c7b2f5..63afa9bf 100644 --- a/html/083scenario_screen_test.mu.html +++ b/html/083scenario_screen_test.mu.html @@ -34,7 +34,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color assume-screen <span class="Constant">3/width</span>, <span class="Constant">2/height</span> run [ <span class="Constant">1</span>:character<span class="Special"> <- </span>copy <span class="Constant">97/a</span> - screen:address:shared:screen<span class="Special"> <- </span>print screen:address:shared:screen, <span class="Constant">1</span>:character/a + screen:address:screen<span class="Special"> <- </span>print screen:address:screen, <span class="Constant">1</span>:character/a ] screen-should-contain [ <span class="Constant"> .a .</span> @@ -47,11 +47,11 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color run [ <span class="Comment"># print a character</span> <span class="Constant">1</span>:character<span class="Special"> <- </span>copy <span class="Constant">97/a</span> - screen:address:shared:screen<span class="Special"> <- </span>print screen:address:shared:screen, <span class="Constant">1</span>:character/a + screen:address:screen<span class="Special"> <- </span>print screen:address:screen, <span class="Constant">1</span>:character/a <span class="Comment"># move cursor to start of line</span> - screen:address:shared:screen<span class="Special"> <- </span>move-cursor screen:address:shared:screen, <span class="Constant">0/row</span>, <span class="Constant">0/column</span> + screen:address:screen<span class="Special"> <- </span>move-cursor screen:address:screen, <span class="Constant">0/row</span>, <span class="Constant">0/column</span> <span class="Comment"># clear line</span> - screen:address:shared:screen<span class="Special"> <- </span>clear-line screen:address:shared:screen + screen:address:screen<span class="Special"> <- </span>clear-line screen:address:screen ] screen-should-contain [ <span class="Constant"> . .</span> |