Keyboard input/Keypress check: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: added syntax colouring the hard way) |
No edit summary |
||
Line 968: | Line 968: | ||
If keypress(32) then k$=" " |
If keypress(32) then k$=" " |
||
</lang> |
</lang> |
||
=={{header|Mathematica}}== |
|||
This will create a little panel, once the panel has focus the keys are captured and displayed inside the panel. |
|||
<lang Mathematica>i = {}; |
|||
EventHandler[Panel[Dynamic[i], |
|||
ImageSize -> {300, 300}], {"KeyDown" :> |
|||
AppendTo[i, CurrentValue["EventKey"]]}]</lang> |
|||
=={{header|MiniScript}}== |
=={{header|MiniScript}}== |