jump1

dialog jump1 {
  title "New Project"
  size -1 -1 408 36
  option dbu
  edit "INFO", 1, 51 6 335 10, center
  button "close/do", 2, 159 18 37 12, ok cancel
  button "echo", 3, 117 18 37 12
  button "set", 4, 72 18 37 12
}
on *:dialog:jump1:init:0:{
  dll $mdx SetMircVersion $version
  dll $mdx MarkDialog $dname
  dll $mdx SetDialog $dname bgcolor $rgb(0,0,0)
  dll $mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 textbg $rgb(0,0,0)
  dll $mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 background $rgb(0,0,0)
  dll $mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 text $rgb(198,227,249)
  dll $mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 400 tahoma
  dll $mdx SetBorderStyle $dname staticedge
}

on *:dialog:jump1:sclick:4:{
  /set %jumping.room $did($dname,1).text | /set %jumping.gate $did($dname,1).text | /set %jumping.nick $did($dname,1).text
}
on *:dialog:jump1:sclick:3:{
  echo -a %jumping.room %jumping.gate %jumping.nick
}

menu nicklist {
  .TESTcopy:/clipboard | /clipboard -a $+($active,$chr(32),$address($$1,1),$chr(32),$$1) | /dialog -m jump1 jump1
}