Logo Timer

Given, you have a text box on the screen named "time," the following makes a nice timer:
to start
make "seconds "60
repeat 61
[time, pr :seconds
wait 10
ct
make "seconds :seconds - 1]
end