menu * { 
  RScript:dialog -md RScript RScript 
} 
dialog RScript {
  title "RScript"
  size -1 -1 238 145
  option dbu
  box "Description:", 3, 96 14 137 92
  edit "", 2, 158 111 70 12, autohs
  list 1, 11 22 75 114, size vsbar
  button "Announce", 4, 157 125 35 12
  button "Cancel", 5, 195 125 35 12
  box "Commands List:", 6, 7 15 83 125
  edit "", 7, 99 22 131 81, read multi autovs
  tab "Commands", 8, 0 0 237 145
  text "Nickname:", 9, 127 113 25 8, tab 8
}

on *:DIALOG:RScript:init:0: {
  did -ra $dname 1 !stats
  did -a $dname 1 !tracker
  did -a $dname 1 !24hours
}

on *:DIALOG:RScript:sclick:1:{
  if (!$did($dname,1).seltext) { .Halt }
  if ($did($dname,1).seltext == !stats) { .did -ra $dname 7 THIS IS A DESCRIPTION OF THE STATS CMD. Oops I forgot Caps :> }
  if ($did($dname,1).seltext == !tracker) { .did -ra $dname 7 !tracker [skill] [username] [@time] oyea! }
  else { .did -ra $dname 7 No Description Added }
}