on *:dialog:chain:mouse:*: {
  if ($mouse.x isnum x1-x2) && ($mouse.y isnum y1-y2) { goto next }
  halt 
  :next
  if (did == 1000 ) { set %box did(1000) } 
  if (did == 1001 ) { set %box did(1001) }
  if (did == 1002 ) { set %box did(1002) }
}