just to try things out I did this:
Code:
on *:open:*:{
  if ($nick == $me) {
    if ($dialog(new_table) != $null) { did -a new_table 8 $1- }
    if ($dialog(new_table) == $null) { dialog -m new_table new_table | did -a new_table 8 $1- }
  }
}
alias new_table dialog -m new_table new_table
dialog new_table {
  Title "New Table"
  Size -1 -1 100 200
  option dbu
  button "", 999, 0 0 0 0, cancel
  list 8, 1 1 80 190
}