langs a-z

2013-04-10 22:43:41 -07:00 · 2013-04-10 22:43:41 -07:00 · d066446780
commit d066446780
parent db842d013d
11389 changed files with 98361 additions and 1020 deletions
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/BASIC/keyboard-input-flush-the-keyboard-buffer-1.basic
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/BASIC/keyboard-input-flush-the-keyboard-buffer-1.basic
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/BASIC/keyboard-input-flush-the-keyboard-buffer-2.basic
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/BASIC/keyboard-input-flush-the-keyboard-buffer-2.basic
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/PowerShell/keyboard-input-flush-the-keyboard-buffer.psh
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/PowerShell/keyboard-input-flush-the-keyboard-buffer.psh
@ -0,0 +1,3 @@
+while ($Host.UI.RawUI.KeyAvailable) {
+    $Host.UI.RawUI.ReadKey() | Out-Null
+}
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/PureBasic/keyboard-input-flush-the-keyboard-buffer.purebasic
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/PureBasic/keyboard-input-flush-the-keyboard-buffer.purebasic
@ -0,0 +1 @@
+While Inkey(): Wend
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/Seed7/keyboard-input-flush-the-keyboard-buffer.seed7
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/Seed7/keyboard-input-flush-the-keyboard-buffer.seed7
@ -0,0 +1,3 @@
+while keypressed(KEYBOARD) do
+  ignore(getc(KEYBOARD));
+end while;
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/Vedit-macro-language/keyboard-input-flush-the-keyboard-buffer.vedit
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/Vedit-macro-language/keyboard-input-flush-the-keyboard-buffer.vedit
@ -0,0 +1 @@
+Key_Purge()
--- a/Task/Keyboard-input-Flush-the-keyboard-buffer/XPL0/keyboard-input-flush-the-keyboard-buffer.xpl0
+++ b/Task/Keyboard-input-Flush-the-keyboard-buffer/XPL0/keyboard-input-flush-the-keyboard-buffer.xpl0
@ -0,0 +1,2 @@
+code OpenI=13;
+OpenI(0)