Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
_CONSOLEINPUT is blocking
#11
Actually it is not a replacement but a new function compatible with _KEYHIT

You can call it like this:
Code: (Select All)
Function checkKey&
  $If _CONSOLE_ = 2 Then
    Declare Library "./cKeyhit"
      Function cKeyhit ()
    End Declare
    checkKey& = cKeyhit
  $Else
    checkKey& = _Keyhit
  $End If
End Function
45y and 2M lines of MBASIC>BASICA>QBASIC>QBX>QB64 experience
Reply
#12
Just curious, but wouldn't it have just been easier to write the substitution code in pure basic and just make it a Function?
Reply
#13
That was the initial plan, but turned out I also needed UnicodeChar for normal characters. Otherwise my case statements needed to include mapping for all normal keys also
45y and 2M lines of MBASIC>BASICA>QBASIC>QBX>QB64 experience
Reply
#14
And I've replaced bailing wire with floss, because it's easier on my gums when removing the chewing gum residue.

+ 1 to Rho for the immediate chewing gum and bailing wire solution, and looking forward to the perm fix in the next issue. You rock!

Pete
Reply




Users browsing this thread: 8 Guest(s)