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
}