Keyboard input/Flush the keyboard buffer: Difference between revisions
Content added Content deleted
(Added Axe) |
m (Added the Sidef language) |
||
Line 385: | Line 385: | ||
ignore(getc(KEYBOARD)); |
ignore(getc(KEYBOARD)); |
||
end while;</lang> |
end while;</lang> |
||
=={{header|Sidef}}== |
|||
{{trans|Perl}} |
|||
<lang ruby>var k = frequire('Term::ReadKey'); |
|||
k.ReadMode('restore'); # Flush the keyboard and returns input stream to initial state |
|||
# ReadMode 0; # Numerical equivalent of keyboard restore (move comment marker to use instead) |
|||
# A more complete example for use in keyboard handler programming. |
|||
# We should also check we are being used in an interactive context (not done here). |
|||
k.ReadMode('cbreak'); |
|||
# Flush the keyboard in terminal character break mode |
|||
while (k.ReadKey(-1) != nil) { |
|||
# Do nothing |
|||
} |
|||
# Don't forget to restore the readmode, when we are finished using the keyboard |
|||
k.ReadMode('restore');</lang> |
|||
=={{header|Tcl}}== |
=={{header|Tcl}}== |