menu * {
Blackjack:/dialog -m bj bj
}
dialog bj {
  title "BlackJack"
  size -1 -1 150 130
  button "Deal", 1, 17 5 50 20
  button "Hit", 2, 17 30 50 20
  button "Stay", 3, 17 55 50 20
  button "Split", 4, 17 80 50 20
  button "Double", 5, 17 105 50 20
  button "End", 6, 80 5 50 20
  button "Reset", 7, 80 30 50 20
  button "Request", 8, 80 55 50 20
  button "Yes", 9, 80 80 50 20
  button "No", 10, 80 105 50 20

}
on *:dialog:bj:sclick:*: {
  if ($did == 1) { /msg $active !bj deal }
  if ($did == 2) { /msg $active !hit }
  if ($did == 3) { /msg $active !stay }
  if ($did == 4) { /msg $active !split }
  if ($did == 5) { /msg $active !double }
  if ($did == 6) { /msg $active !bj end }
  if ($did == 7) { /msg $active !bj reset }
  if ($did == 8) { /msg $active !blackjack $$?="Name?:" }
  if ($did == 9) { /msg $active !bjack yes }
  if ($did == 10) { /msg $active !bjack no }
}