ButtonData Poppy1 Class: PopUpButton MessageHandler: DrawShapes Menu: ( ((Clear) "Clear" "Deletes and erases entire scene.") ) Feedback: ( (MouseMoved ) ) ButtonData Poppy1 Class: PopUpButton MessageHandler: DrawShapes Menu: ( ((Thinner) "Thinner" "Makes stroke width smaller") () ((Thicker) "Thicker" "Makes stroke width larger") ) Feedback: ( (MouseMoved ) ) ButtonData Poppy1 Class: RadioButton MessageHandler: DrawShapes Name: Shape RadioButtonValue: Rectangle Feedback: ( ((MouseMoved MouseEntered) ) ((State TRUE) ((BeginButton) (LineWidth 5.0) (DashesOff) (EndButton))) ((State FALSE) ((BeginButton) (LineWidth 2.0) (DashesOff) (EndButton))) (Down ((BeginButton) (DashesFromSelection "[3 5]") (EndButton))) (Exit ) (Up ((BeginButton) (DashesOff) (EndButton))) ) ButtonData Poppy1 MessageHandler: DrawShapes Class: RadioButton Name: Shape RadioButtonValue: Circle Feedback: ( ((MouseMoved MouseEntered) ) ((State TRUE) ((BeginButton) (LineWidth 5.0) (DashesOff) (EndButton))) ((State FALSE) ((BeginButton) (LineWidth 2.0) (DashesOff) (EndButton))) (Down ((BeginButton) (DashesFromSelection "[3 5]") (EndButton))) (Exit ) (Up ((BeginButton) (DashesOff) (EndButton))) )  BJJJJJJJJJ`