diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index d92c4e07a..7718dffcd 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -4885,6 +4885,7 @@ FUNCTION ide2 (ignore)
 
             IF menu$(m, s) = "Insert Quick Keycode...  Ctrl+K" THEN
                ideQuickKeycode:
+               tempk$ = ""
                DO: tempk = _KEYHIT: _LIMIT 30: LOOP UNTIL tempk = 0 'wait for key release
                DO 'get the next key hit
                   PCOPY 3, 0
@@ -4893,8 +4894,18 @@ FUNCTION ide2 (ignore)
                   tempk = _KEYHIT
                   IF tempk > 0 THEN tempk$ = STR$(tempk)
                   _LIMIT 30
-               LOOP UNTIL tempk$ <> ""
-               tempk$ = tempk$ + " "
+               LOOP UNTIL tempk > 0
+               IF tempk = 100303 OR tempk = 100304 THEN 'shift key
+                  DO 'get the next key hit
+                     PCOPY 3, 0
+                     LOCATE idewy - 3, 2
+                     PRINT "PRESS ANY KEY TO INSERT _KEYHIT/_KEYDOWN CODE"
+                     tempk = _KEYHIT 'see what the next key is, and use it
+                     IF tempk <> 0 THEN tempk$ = STR$(ABS(tempk)) 'if it's the SHFT UP code, then return the value for shift
+                     _LIMIT 30
+                  LOOP UNTIL tempk <> 0
+               END IF
+               tempk$ = _trim$(tempk$)
                a$ = idegetline(idecy)
                l$ = LEFT$(a$, idecx - 1): r$ = RIGHT$(a$, LEN(a$) - idecx + 1)
                text$ = l$ + tempk$ + r$