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 }