Linux joypad input in tcl/tk, demonstration