diff options
Diffstat (limited to 'library/demos/timer')
| -rw-r--r-- | library/demos/timer | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/library/demos/timer b/library/demos/timer index 320cd0e..e10b840 100644 --- a/library/demos/timer +++ b/library/demos/timer @@ -5,6 +5,9 @@ exec wish "$0" ${1+"$@"} # timer -- # This script generates a counter with start and stop buttons. +package require Tcl 8.4 +package require Tk + label .counter -text 0.00 -relief raised -width 10 -padx 2m -pady 1m button .start -text Start -command { if {$stopped} { |