#!/usr/bin/tclsh
package require Tk
button .b -text "Hello OOMMF!"
label .l -text "The button above should have text in it.\n"
pack .b .l