Pyro4816

alias aov {
  dialog -ma aov aov
}
dialog add {
  title "add"
  size -1 -1 196 119
  option dbu
  edit "", 1, 6 31 180 13
  text "Host mask", 2, 7 21 45 8
  text "Nickname", 3, 6 46 39 8
  edit "", 4, 5 56 181 11
  text "#channel", 5, 6 69 25 8
  edit "", 6, 4 79 182 12
  text "Op, Hop, Admin, or Voice", 7, 7 1 73 8
  edit "", 8, 6 10 180 12
  button "Ok", 9, 41 101 37 12
  button "Cancel", 10, 83 101 37 12, cancel
}
dialog AOV {
  title "AOV"
  size -1 -1 196 226
  option dbu
  box "PyroBot AOV list", 1, 11 12 56 50
  text "PyroBtot Aov dialog V1.0", 2, 14 20 46 38, center
  list 3, 5 81 185 127, size
  text "Aov List", 4, 10 70 37 8
  list 5, 103 22 85 50, size
  text "Chans", 6, 119 12 25 8
  button "Close", 7, 9 210 37 12, cancel
  button "Add ", 8, 51 210 37 12
  button "Delete", 9, 93 210 37 12
  button "Clear", 10, 138 210 37 12
}
on *:DIALOG:AOV:init:*:{
  var %i = 0
  while (%i < $ini(aov.ini,0)) {
    inc %i 1
    did -a $dname 5 $ini(aov.ini,%i)
  }
}
on *:DIALOG:aov:sclick:5:{
  did -r $dname 3
  var %i = 0
  while (%i < $ini(aov.ini,$did($dname,5).seltext,0) {
    inc %i 1
    did -a $dname 3 $ini(aov.ini,$did($dname,5).seltext,%i) $+ = $+ $readini(aov.ini,$did($dname,5).seltext,$ini(aov.ini,$did($dname,5).seltext,%i))
  }
}
on *:DIALOG:aov:sclick:8:{
  dialog -ma add add
}
on *:DIALOG:aov:sclick:9:{
  remini aov.ini $did($dname,5).seltext $did($dname,3).seltext
  did -d $dname 3 $did($dname,3,1).sel
}
on *:DIALOG:aov:sclick:10:{
  remini aov.ini $did($dname,5).seltext %i
  did -d $dname 5 $did($dname,5,1).sel
}
on *:DIALOG:add:sclick:9:{
  If ( $did($dname,1) == null ) || ( $did($dname,4) == null ) || ( $did($dname,6) == null ) || ( $did($dname,8) == null ) { halt }
  elseif ( $did($dname,1) == null ) && ( $did($dname,4) == null ) && ( $did($dname,6) == null ) && ( $did($dname,8) == null ) { writeini aov.ini $did($dname,6) $did($dname,1) $did($dname,8) }
  cancel
}