Forums Scripts & Popups volume control dialog scroll bar how?

 dialog Mp3Diag {
  title "Mp3Diag"
  size -1 -1 130 73
  option dbu
  scroll "", 1, 111 7 8 57, range 0 65535
  box "Vol", 2, 105 0 20 70
  edit "", 3, 75 2 25 10, read center
}
menu * {
  Mp3: dialog $iif(!$dialog(Mp3Diag),-md,-ev) Mp3Diag Mp3Diag
}
on *:dialog:Mp3Diag:scroll:1:{
  did -ra $dname 3 $did(1).sel
}
 

dialog Mp3Diag {
  title "Mp3Diag"
  size -1 -1 130 30
  option dbu
  scroll "", 1, 5 8 120 10, range 0 65535 horizontal
  box "Vol", 2, 2 0 125 25
}
on *:dialog:mp3Diag:init:0:{
  did -c $dname 1 $vol(mp3)
}
on *:dialog:Mp3Diag:scroll:1:{
  vol -p $did(1).sel
}