added new procedure to click-draw shapes on the screen.