package provide app-halloWelt 2.0
package require Tk
package require snack

proc halloWelt {} {
    puts stdout "Hallo Welt"
    snd1 play
}

snack::sound snd1
snd1 read [file join $starkit::topdir \
    lib app-halloWelt phone.wav]

button .b -text "Hallo Welt" \
    -command halloWelt
pack .b