this is what im working on

dialog scankick {
  title "New Project"
  size -1 -1 132 18
  option dbu
  edit "", 1, 1 0 130 10, center
  button "X", 2, 121 10 10 8, ok cancel
  button "Get Gate", 3, 1 10 25 8
  button "Scan", 4, 25 10 25 8
  button "Ghost", 5, 49 10 25 8
  button "Kick", 6, 73 10 25 8
  button "Kick Ban", 7, 97 10 25 8
}
on *:dialog:scankick:sclick:3:{ echo -a Get Gate Clicked | /set %scan.nick $snick($active,1) | /set %echo.gate $right($address(%scan.nick,1), -6) | echo -a %scan.nick %echo.gate | did -o scankick 1 106 %echo.gate }

alias -l scan.get {
  set %adrs $$input(Enter address or IP. Search uses *wildcards*. $&
    $crlf $+ Eg. 127 would match all IP's that have 127 in them. $&
    $crlf $+ NOTE : Input may consist of both letters and numbers.,ew,Enter Address For Scan&Kick!)
}
alias -l dialog.get {
  set %adrs $did(182).text
}

alias scan {
  if ($1 == +k) {
    if ($me isop %scan.chan) {
      var %scan.cmd kick
      if ($2 != $null) var %adrs $2
      else scan.get
    }
    else { echo -a [Ranged IP Kick] You are not OP on %scan.chan $+ . | return }
  }
  elseif ($1 == +k1) {
    if ($me isop $chan) {
      var %scan.cmd Ghost
      if ($2 != $null) var %adrs $2
      else scan.get
    }
    else { echo -a [Ranged IP Kick] You are not OP on $chan $+ . | return }
  }
  elseif ($1 == +kb) {
    if ($me isop $chan) {
      var %scan.cmd ban
      if ($2 != $null) var %adrs $2
      else scan.get
    }
    else { echo -a [Ranged IP Ban] You are not OP on $chan $+ . | return }
  }
  elseif ($1 == $null) scan.get
  else var %adrs $1
  var %i $nick($chan,0)
  while (%i) {
    if (%adrs isin $address($nick($chan,%i),0)) {
      if (!%scan.cmd) echo -a 4Scan Result for 3* $+ %adrs $+ * !!! $nick($chan,%i) $address($nick($chan,%i),1)
      elseif (%scan.cmd == kick) kick $chan $nick($chan,%i) IP matches with requested IP for kicking : 3* $+ %adrs $+ *
      elseif (%scan.cmd == Ghost) kick $chan $nick($chan,%i) I Ghosting on Channel Plz return Ty : 3* $+ %adrs $+ *
      elseif (%scan.cmd == ban) { var %xx = $nick($chan,%i) | access $chan add deny $address(%xx,3) | kick $chan %xx }
      inc %scan.found
    }
    dec %i
  }
  if (%scan.found == $null) echo -a 4Scan Result NOT found for 3* $+ %adrs $+ * !!!
  unset %scan.found
  unset %adrs
}

menu channel {
  [Ranged IP ScanKicker]
  .My Dialog:/dialog -m scankick scankick
  .Scan on $chan:scan
  .ScanKick on $chan:scan +k
  .GhostKick on $chan:scan +k1
  .ScanKickBan on $chan:scan +kb
}