mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-28 11:17:46 +00:00
Extra visual clue to when ctrlk mode is engaged (using DarkenFGBG).
This commit is contained in:
parent
11293bb324
commit
a9d7daef23
1 changed files with 2 additions and 0 deletions
|
@ -4886,6 +4886,7 @@ FUNCTION ide2 (ignore)
|
||||||
IF menu$(m, s) = "Insert #Quick Keycode... Ctrl+K" THEN
|
IF menu$(m, s) = "Insert #Quick Keycode... Ctrl+K" THEN
|
||||||
PCOPY 3, 0: SCREEN , , 3, 0
|
PCOPY 3, 0: SCREEN , , 3, 0
|
||||||
ideQuickKeycode:
|
ideQuickKeycode:
|
||||||
|
dummy = DarkenFGBG(1)
|
||||||
COLOR 7, 1: LOCATE idewy - 3, 2: PRINT SPACE$(idewx - 2);: LOCATE idewy - 2, 2: PRINT SPACE$(idewx - 2);: LOCATE idewy - 1, 2: PRINT SPACE$(idewx - 2); 'clear status window
|
COLOR 7, 1: LOCATE idewy - 3, 2: PRINT SPACE$(idewx - 2);: LOCATE idewy - 2, 2: PRINT SPACE$(idewx - 2);: LOCATE idewy - 1, 2: PRINT SPACE$(idewx - 2); 'clear status window
|
||||||
LOCATE idewy - 3, 2
|
LOCATE idewy - 3, 2
|
||||||
PRINT "Press any key to insert its _KEYHIT/_KEYDOWN code..."
|
PRINT "Press any key to insert its _KEYHIT/_KEYDOWN code..."
|
||||||
|
@ -4914,6 +4915,7 @@ FUNCTION ide2 (ignore)
|
||||||
idesetline idecy, text$
|
idesetline idecy, text$
|
||||||
idecx = idecx + len(tempk$)
|
idecx = idecx + len(tempk$)
|
||||||
idechangemade = 1
|
idechangemade = 1
|
||||||
|
dummy = DarkenFGBG(0)
|
||||||
PCOPY 3, 0: SCREEN , , 3, 0: idewait4mous: idewait4alt
|
PCOPY 3, 0: SCREEN , , 3, 0: idewait4mous: idewait4alt
|
||||||
retval = 1
|
retval = 1
|
||||||
KCTRL = 0: KCONTROL = 0
|
KCTRL = 0: KCONTROL = 0
|
||||||
|
|
Loading…
Reference in a new issue