mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-04 04:50:22 +00:00
Added support for ALT-numkeys to generate ASCII codes in the IDE.
This commit is contained in:
parent
9118329366
commit
463e0929af
14
qb64.bas
14
qb64.bas
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue