diff --git a/src/libsrc/apple/conio.pla b/src/libsrc/apple/conio.pla index 6de3e35..ef2f2bd 100644 --- a/src/libsrc/apple/conio.pla +++ b/src/libsrc/apple/conio.pla @@ -287,18 +287,16 @@ def a3keypressed byte count dev_status(cmdsys.devcons, 5, @count) - if count and !a3keyqueue + if count a3keyqueue = getc fin - return a3keyqueue | $80 + return a3keyqueue ?? a3keyqueue | $80 :: 0 end def a3getkey byte keycode repeat randnum = randnum + 123 - if !a3keyqueue - a3keypressed - fin + a3keypressed keycode = a3keyqueue until keycode a3keyqueue = 0