All pastes #552216 Raw Edit

Unnamed

public text v1 · immutable
·published 2007-06-09 05:02 UTC
rendered paste body
alias blacklist {
  dialog -md blacklist blacklist
}
dialog blacklist { 
  title "Blacklist"
  size -1 -1 92 107
  option dbu
  text "Nick:", 1, 5 15 19 8
  edit "", 2, 30 14 57 10
  text "Delete:", 3, 5 42 18 8
  edit "", 4, 30 40 57 10
  text "Add:", 5, 5 24 15 8
  edit "", 6, 30 24 57 10
  button "Add", 7, 7 56 37 12 
  button "Delete", 8, 51 56 37 12
  button "ok", 9, 51 72 37 12, ok
  button "clear", 10, 7 72 37 12
  text "Made by Bubblez6000", 13, 16 89 60 15, center
}
on *:Dialog:blacklist:*:*: {
  if ($devent = sclick) {
    if ($did == 7) {
      .writeini blacklist.ini ADRESSESS $address($did(2).text,2) $true  |  var %x = 1 | while ($comchan($did(2),%x)) { mode $v1 +b $address($did(2),2) | inc %x }
    }
    elseif ($did == 8) {
      remini blacklist.ini ADRESSESS $address($did(2).text,2) $true
    }
    elseif ($did == 10) {
      did -r $dname 2,4,6
    }
  }
}