Forums Scripts & Popups Dialog Difficulties

 
Dialog Control {
  Title "Control"
  Size -1 -1 599 525
  Tab "Topic", 1, 1 4 591 500, 
  Tab "Modes", 2
  Tab "Bans", 3
  Tab "Exceptions", 4
  Text "Current Topic:", 5, 8 35 65.4362416107383 13,  tab 1
  Edit "Current Topic Goes Here", 6, 9 51 572 19, limit 307 tab 1
  Check "c - Block messages containing mIRC color codes", 21, 3 393 393 15, tab 2
  Check "i - A user must be invited to join the channel", 22, 3 29 228 18, tab 2
  Check "m - Moderated channel (only +vhoaq users may speak)", 23, 3 53 282 13, tab 2
  Check "n - Users outside the channel can not send PRIVMSGs to the channel", 24, 2 75 354 13, tab 2
  Check "p - Private channel", 7, 3 98 114 13, tab 2
  Check "s - Secret channel", 8, 3 120 108 13, tab 2
  Check "t - Only +hoaq may change the topic", 9, 3 141 191 13, tab 2
  Check "A - Server/Net Admin only channel (Settable by Admins)", 10, 3 163 284 13, tab 2
  Check "C - No CTCPs allowed in the channel", 11, 3 185 199 13, tab 2
  Check "G - Filters out all Bad words in messages with <censored>", 12, 3 207 294 13, tab 2
  Check "M - Must be using a registered nick (+r) to talk", 13, 3 228 237 13, tab 2
  Check "K - /KNOCK is not allowed", 14, 3 248 147 13, tab 2
  Check "N - No Nickname changes are permitted in the channel", 15, 3 268 283 13, tab 2
  Check "O - IRC Operator only channel (Settable by IRCops)", 16, 3 290 264 13, tab 2
  Check "Q - No kicks allowed", 17, 3 310 123 13, tab 2
  Check "R - Only registered (+r) users may join the channel", 18, 3 331 256 13, tab 2
  Check "S - Strips mIRC color codes", 19, 3 353 151 13, tab 2
  Check "V - /INVITE is not allowed", 20, 3 373 144 13, tab 2
}
On *:DIALOG:Control:init:0:{
topic $chan  
did -ra Control 6 %dailog.topic
}
 

 raw 332:*:{
  echo $2 $asctime(10(04HH:nn:ss T10)) 10[4Topic10] $3-
  set %dailog.topic $3-
  halt
}
raw 333:*:{
  echo $2 $asctime(10(04HH:nn:ss T10))  10[4Topic10] set by $3 on $asctime($4,ddd mmm dd HH:nn:ss)
  halt
} 

 
  $gettok(%dailog.topic,6) did -c $dname 6
 

 on 1:dialog:Control:sclick:25: {
  echo $active Click
} 

 echo -s something 

 button "Get Topic", 25, 9 70 55 25, style default, tab 1 

 button "Get Topic", 25, 9 70 55 25, tab 1