dialog -l helloworld {
title "Hello world!"
size -1 -1 100 50
option dbu
text "Hello world!", 1, 0 10 100 8, center
button "HALP!", 2, 0 38 100 12
}
alias helloworld noop $dialog(helloworld,helloworld,-2)
on *:dialog:helloworld*:*:*: {
if ($devent == close) noop $dialog(helloworld $+ $ticks,helloworld,-2)
elseif ($devent == sclick) && ($did == 2) dialog -x $dname
}