heed: Refactor help window (ESC)

programs/develop/heed/trunk/heed.asm

@@ -24,7 +24,7 @@
 ; Ctrl+F                - ¯®¨áª (+Tab ¤«ï OptionBox)
 ; Ctrl+G                - ¯¥à¥å®¤ ­  ᬥ饭¨¥ (+Tab ¤«ï OptionBox)
 ; Ctrl+B                - ¢ë¤¥«¨âì ¡«®ª
-; ESC                   - á­ïâì ¢ë¤¥«¥­¨¥
+; ESC                   - á­ïâì ¢ë¤¥«¥­¨¥/¢ë室
 ; Ctrl+C		- ª®¯¨à®¢ âì ¡«®ª
 ; Ctrl+V		- ¢áâ ¢¨âì ¢ ¢ë¤¥«¥­­ãî ®¡« áâì
 ; Ctrl+X		- ¢ë१ âì ¢ë¤¥«¥­­ãî ®¡« áâì (¢ ¡ãä¥à)
@@ -2699,7 +2699,8 @@ Ctrl_END:
 	jmp	red
 ;--------------------------------------------------------------------
 ESC:
-	btr	[flags],8
+	btr	[flags], 8
+	jnc	close_prog
 	jmp	red
 ;--------------------------------------------------------------------
 copy_to_buf:
@@ -3236,7 +3237,7 @@ if lang eq ru_RU
  db 'Ctrl+F              - ¯®¨áª                        '
  db 'Ctrl+G              - ¯¥à¥å®¤ ­  ᬥ饭¨¥          '
  db 'Ctrl+B              - ¢ë¤¥«¨âì ¡«®ª                '
- db 'ESC                 - á­ïâì ¢ë¤¥«¥­¨¥              '
+ db 'ESC                 - á­ïâì ¢ë¤¥«¥­¨¥/¢ë室        '
  db 'Ctrl+C              - ª®¯¨à®¢ âì ¡«®ª              '
  db 'Ctrl+V              - ¢áâ ¢¨âì ¢ ¢ë¤¥«¥­­ãî ®¡« áâì'
  db 'Ctrl+X              - ¢ë१ âì ¢ ¡ãä¥à             '
@@ -3258,7 +3259,7 @@ else ; Default to en_US
  db 'Ctrl+F              - find                         '
  db 'Ctrl+G              - go to offset                 '
  db 'Ctrl+B              - select area                  '
- db 'ESC                 - deselect area                '
+ db 'ESC                 - deselect area/exit           '
  db 'Ctrl+C              - copy area                    '
  db 'Ctrl+V              - past into area from buf      '
  db 'Ctrl+X              - cut area into buffer         '