diff options
Diffstat (limited to 'prototypes/browse/15-headers-broken.mu')
-rw-r--r-- | prototypes/browse/15-headers-broken.mu | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/prototypes/browse/15-headers-broken.mu b/prototypes/browse/15-headers-broken.mu index 65fbda44..59566e56 100644 --- a/prototypes/browse/15-headers-broken.mu +++ b/prototypes/browse/15-headers-broken.mu @@ -49,7 +49,7 @@ fn render in: (addr buffered-file), nrows: int, ncols: int { var leftcol/edx: int <- copy 5 # page-margin var rightcol/ebx: int <- copy leftcol rightcol <- add 0x40 # page-width = 64 characters - start-color 0xec, 7 # 236 = darkish gray + start-color-on-screen 0xec, 7 # 236 = darkish gray { compare rightcol, ncols break-if->= @@ -71,7 +71,7 @@ $line-loop: { compare row, botrow break-if->= var col/edx: int <- copy leftcol - move-cursor row, col + move-cursor-on-screen row, col $char-loop: { compare col, rightcol break-if->= @@ -86,7 +86,7 @@ $change-state: { { break-if-!= # r->current-state == 0 && c == '*' => bold text - start-bold + start-bold-on-screen copy-to *state, 1 break $change-state } @@ -94,7 +94,7 @@ $change-state: { { break-if-!= # r->current-state == 0 && c == '_' => bold text - start-bold + start-bold-on-screen copy-to *state, 1 break $change-state } @@ -123,8 +123,8 @@ $change-state: { # r->current-state == 1 && c == '*' => print c, then normal text print-byte-to-screen c col <- increment - reset-formatting - start-color 0xec, 7 # 236 = darkish gray + reset-formatting-on-screen + start-color-on-screen 0xec, 7 # 236 = darkish gray copy-to *state, 0 loop $char-loop } @@ -134,8 +134,8 @@ $change-state: { # r->current-state == 1 && c == '_' => print c, then normal text print-byte-to-screen c col <- increment - reset-formatting - start-color 0xec, 7 # 236 = darkish gray + reset-formatting-on-screen + start-color-on-screen 0xec, 7 # 236 = darkish gray copy-to *state, 0 loop $char-loop } @@ -150,8 +150,8 @@ $change-state: { var s/eax: (addr boolean) <- get r, start-of-line? copy-to *s, 1 # true # switch to normal text - reset-formatting - start-color 0xec, 7 # 236 = darkish gray + reset-formatting-on-screen + start-color-on-screen 0xec, 7 # 236 = darkish gray # no need to print newlines break $char-loop } @@ -178,7 +178,7 @@ fn clear toprow: int, leftcol: int, botrow: int, rightcol: int { compare row, botrow break-if->= var col/edx: int <- copy leftcol - move-cursor row, col + move-cursor-on-screen row, col { compare col, rightcol break-if->= |