#!/usr/bin/wish button .b -text $argv -command exit -background blue label .lab -text [clock format [clock seconds] -format "%H:%M"] -background blue .lab configure -relief groove -borderwidth 2 pack .b .lab -side top -fill x
