dialog trade {
  title "trade"
  size -1 -1 450 166
  option pixels
  text $+ %rls $+, 115, 6 20 444 100, style center
  text $+ %section $+, 116, 5 50 444 100, style center
  button "TRADE", 101, 50 110 150 50, ok
  button "IGNORE", 102, 250 110 150 50, cancel
}

on *:dialog:trade*:*:*:{
  if ($devent == init) {
    if ($devent == ok) {
      if ($did == 101) { sockudp -n pftp %section %chains %rls }
      if ($did == 102) { halt }
      halt
    }
  }
}

alias chain  { .dialog -m $+(trade,$ticks) trade }