Deop/Kick/Ban Protect

alias Snicks {
  did -r SearchNicks 1
  if ($1) {
    var %x 1
    while ($nick(%chanlnick,%X)) { 
      if (* [ $+ [ $1 ] $+ ] * iswm $left($v1,$len($1))) { $eval(%echoa,4) | did -i SearchNicks 1 1 $nick(%chanlnick,%X),-1) }
      inc %x
    }
  }
}
dialog SearchNicks {
  title "Search Nicks"
  size -1 -1 108 90
  option dbu
  edit "", 1, 4 18 60 56,read autovs autohs vsbar multi hsbar
  button "Search", 2, 67 7 37 8
  edit "", 3, 4 6 60 10
  button "Msg", 4, 67 19 37 12
  button "Notice", 6, 67 33 37 12
  button "Kick", 7, 67 47 37 12
  button "Ban Kick", 8, 67 61 37 12
  box "", 5, 1 1 105 87
  edit "", 9, 4 75 99 10
}
on *:dialog:SearchNicks:*:*:{ 
  if ($devent == close) { unset %echoa | unset %chanlnick }
  if ($devent == init) { did -b SearchNicks 9 } 
  if ($devent == edit) { 
    if ($did == 3) { Snicks $did(3).text | did -e SearchNicks 9 } 
  } 
  if ($devent == sclick) { 
    if ($did == 4) && ($did(9).text) { set %echoa $eval(//msg $nick(%chanlnick,%X) $did(9).text,-1) | Snicks $did(3).text } 
    if ($did == 6) && ($did(9).text) { set %echoa $eval(//notice $nick(%chanlnick,%X) $did(9).text,-1) | Snicks $did(3).text } 
    if ($did == 7) || ($did == 8) {
      if ($Me isop %chanlnick) {
        if ($did == 7) { set %echoa $eval(kick %chanlnick $nick(%chanlnick,%X),-1) | Snicks } 
        if ($did == 8) { set %echoa $eval(//ban -k %chanlnick $nick(%chanlnick,%X),-1) | Snicks } 
      } 
      else { did -ra SearchNicks 1 You not have OP in it chanl }
    }
  }
} 
menu * {
 Search Nicks:/dialog -mdo SearchNicks SearchNicks | set %chanlnick $chan
}