.c itemconfig $g(item) -text $g(expected)
        
    }}
 bind . <F1> {console show}

----
[SS] 7Sep2004: Very interesting! but I think it should count it as an error when the user presses the mouse button before the box become green, otherwise to cheat is too easy.