diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2021-04-25 17:55:17 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2021-04-25 17:55:17 -0700 |
| commit | 8e89dd5a787fcc4c161c491a40cf7ae690c64254 (patch) | |
| tree | ef3c35bff13675951e71be1d670c6935fbc690cd | |
| parent | 35a6f3cc996c0ba3cfd06231aba8c06c71fd429f (diff) | |
| download | mu-8e89dd5a787fcc4c161c491a40cf7ae690c64254.tar.gz | |
devote 2/3rds of screen to definitions
| -rw-r--r-- | shell/main.mu | 4 | ||||
| -rw-r--r-- | shell/sandbox.mu | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/shell/main.mu b/shell/main.mu index 01a46e8a..e89a0906 100644 --- a/shell/main.mu +++ b/shell/main.mu @@ -10,8 +10,8 @@ fn main screen: (addr screen), keyboard: (addr keyboard), data-disk: (addr disk) initialize-sandbox sandbox, 1/with-screen load-state data-disk, sandbox, globals $main:loop: { - render-globals screen, globals, 0/x, 0/y, 0x40/xmax, 0x2f/screen-height-without-menu - render-sandbox screen, sandbox, 0x41/sandbox-left-margin, 1/y, 0x80/screen-width, 0x2f/screen-height-without-menu + render-globals screen, globals, 0/x, 0/y, 0x55/xmax, 0x2f/screen-height-without-menu + render-sandbox screen, sandbox, 0x56/sandbox-left-margin, 1/y, 0x80/screen-width, 0x2f/screen-height-without-menu { var key/eax: byte <- read-key keyboard compare key, 0 diff --git a/shell/sandbox.mu b/shell/sandbox.mu index aa8ed819..2fdbab8e 100644 --- a/shell/sandbox.mu +++ b/shell/sandbox.mu @@ -573,7 +573,7 @@ fn edit-sandbox _self: (addr sandbox), key: byte, globals: (addr global-table), { compare tweak-real-screen?, 0/false break-if-= - clear-sandbox-output real-screen, self, 0x41/sandbox-left-margin, 1/y, 0x80/screen-width, 0x2f/screen-height-without-menu + clear-sandbox-output real-screen, self, 0x56/sandbox-left-margin, 1/y, 0x80/screen-width, 0x2f/screen-height-without-menu } var screen-cell/eax: (addr handle cell) <- get self, screen-var clear-screen-cell screen-cell |