1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-03 07:41:21 +00:00

Added support for ALT-numkeys to generate ASCII codes in the IDE.

This commit is contained in:
SMcNeill 2014-07-04 11:44:28 -04:00
parent 9118329366
commit 463e0929af

View file

@ -28599,6 +28599,20 @@ DO
END IF
IF KALT AND KB >= 48 AND KB <= 57 THEN
STATIC ASCvalue$
ASCvalue$ = ASCvalue$ + CHR$(KB)
GOTO specialchar
END IF
IF NOT KALT THEN
IF LEN(ASCvalue$) THEN
KB = VAL(RIGHT$(ASCvalue$, 3))
ASCvalue$ = ""
IF KB > 0 AND KB < 256 THEN K$ = CHR$(KB) ELSE GOTO specialchar
END IF
END IF
IF mCLICK THEN
IF mX > 1 AND mX < idewx AND mY > 2 AND mY < (idewy - 5) THEN 'inside text box
ideselect = 1