diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2021-05-23 22:14:55 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2021-05-23 22:17:05 -0700 |
| commit | d3103378c5f4d52f7f5833583defe1a76bccac4d (patch) | |
| tree | 9958d3e086f4eab85dcbe5f52f7753db04fe3197 | |
| parent | d474128db1a6f0605e34cb9072fab7feb1e89585 (diff) | |
| download | mu-d3103378c5f4d52f7f5833583defe1a76bccac4d.tar.gz | |
.
| -rw-r--r-- | shell/sandbox.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/shell/sandbox.mu b/shell/sandbox.mu index 65dd6c4e..5addec61 100644 --- a/shell/sandbox.mu +++ b/shell/sandbox.mu @@ -79,7 +79,7 @@ fn write-sandbox out: (addr stream byte), _self: (addr sandbox) { ## fn render-sandbox screen: (addr screen), _self: (addr sandbox), xmin: int, ymin: int, xmax: int, ymax: int { - clear-rect screen, xmin, ymin, xmax, ymax, 0xc5/bg=blue-bg=black + clear-rect screen, xmin, ymin, xmax, ymax, 0xc5/bg=blue-bg add-to xmin, 1/padding-left add-to ymin, 1/padding-top subtract-from xmax, 1/padding-right @@ -154,7 +154,7 @@ fn clear-sandbox-output screen: (addr screen), _self: (addr sandbox), xmin: int, var cursor-in-sandbox?/ebx: (addr boolean) <- get self, cursor-in-data? x, y <- render-gap-buffer-wrapping-right-then-down screen, data, x, y, xmax, ymax, *cursor-in-sandbox?, 3/fg, 0xc5/bg=blue-bg y <- increment - clear-rect screen, xmin, y, xmax, ymax, 0xc5/bg=blue-bg=black + clear-rect screen, xmin, y, xmax, ymax, 0xc5/bg=blue-bg } fn maybe-render-empty-screen screen: (addr screen), _self: (addr sandbox), xmin: int, ymin: int -> _/ecx: int { @@ -408,7 +408,7 @@ fn render-sandbox-menu screen: (addr screen), _self: (addr sandbox) { y <- decrement var height/ebx: int <- copy y height <- increment - clear-rect screen, 0/x, y, width, height, 0xc5/bg=blue-bg=black + clear-rect screen, 0/x, y, width, height, 0xc5/bg=blue-bg set-cursor-position screen, 0/x, y draw-text-rightward-from-cursor screen, " ctrl+... ", width, 0xf/fg, 0xc5/bg=blue-bg draw-text-rightward-from-cursor screen, " r ", width, 0/fg, 0x5c/bg=black @@ -446,7 +446,7 @@ fn render-keyboard-menu screen: (addr screen) { y <- decrement var height/edx: int <- copy y height <- increment - clear-rect screen, 0/x, y, width, height, 0xc5/bg=blue-bg=black + clear-rect screen, 0/x, y, width, height, 0xc5/bg=blue-bg set-cursor-position screen, 0/x, y draw-text-rightward-from-cursor screen, " ctrl+... ", width, 0xf/fg, 0xc5/bg=blue-bg draw-text-rightward-from-cursor screen, " r ", width, 0/fg, 0x5c/bg=black |