diff options
| author | Kartik Agaram <vc@akkartik.com> | 2020-10-12 10:07:55 -0700 |
|---|---|---|
| committer | Kartik Agaram <vc@akkartik.com> | 2020-10-12 10:07:55 -0700 |
| commit | 855431280d047000c8f90868603025631a0f3c5b (patch) | |
| tree | d48f719097d4966a3a64ef10ea96cf75517f24f8 | |
| parent | 4d985cda1e703315f4b91640ea860492ee019570 (diff) | |
| download | mu-855431280d047000c8f90868603025631a0f3c5b.tar.gz | |
7009 - tile: real hotkey to quit
| -rw-r--r-- | apps/tile/environment.mu | 5 | ||||
| -rw-r--r-- | apps/tile/main.mu | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/apps/tile/environment.mu b/apps/tile/environment.mu index ab3a30d8..c0cdb2f7 100644 --- a/apps/tile/environment.mu +++ b/apps/tile/environment.mu @@ -833,6 +833,11 @@ fn clear-canvas _env: (addr environment) { var repl-col/ecx: int <- copy *_repl-col draw-vertical-line screen, 1, *nrows, repl-col # wordstar-style cheatsheet of shortcuts + move-cursor screen, *nrows, 0 + start-reverse-video screen + print-string screen, " ctrl-q " + reset-formatting screen + print-string screen, " quit " var menu-start/ecx: int <- copy repl-col menu-start <- subtract 0x2c # 44 = half the size of the menu move-cursor screen, *nrows, menu-start diff --git a/apps/tile/main.mu b/apps/tile/main.mu index 457fef83..f3e8a34a 100644 --- a/apps/tile/main.mu +++ b/apps/tile/main.mu @@ -61,7 +61,7 @@ fn interactive { draw-screen env { var key/eax: grapheme <- read-key-from-real-keyboard - compare key, 0x71 # 'q' + compare key, 0x11 # 'ctrl-q' break-if-= process env, key render env |