diff options
-rw-r--r-- | sys/boot/forth/menu.4th | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/sys/boot/forth/menu.4th b/sys/boot/forth/menu.4th index 3ba7683..dcfc94f 100644 --- a/sys/boot/forth/menu.4th +++ b/sys/boot/forth/menu.4th @@ -935,23 +935,23 @@ create init_text8 255 allot s" menu_caption[x][y]" \ cycle_menuitem caption -rot 2dup 13 + c! rot \ replace 'x' - 49 -rot + 48 -rot begin 16 2over rot + c! \ replace 'y' 2dup unsetenv - rot 1+ dup 56 > 2swap rot + rot 1+ dup 57 > 2swap rot until 2drop drop s" ansi_caption[x][y]" \ cycle_menuitem ANSI caption -rot 2dup 13 + c! rot \ replace 'x' - 49 -rot + 48 -rot begin 16 2over rot + c! \ replace 'y' 2dup unsetenv - rot 1+ dup 56 > 2swap rot + rot 1+ dup 57 > 2swap rot until 2drop drop |