setup "up"
test the controlKey is "up"
teardown


setup "down"
create button

put "on mouseDown|set the cControlKey of me to controlKey()|end mouseDown" into tScript
replace "|" with return in tScript
set the script of the last button to tScript

click at the loc of the last button with controlKey
test the cControlKey of the last button is "down"
teardown
