חיפוש ניקים בערוץ

[Ventox]

שם הקוד: Nick Searcher
יוצר: Ventox
גירסא: 1.0
תיאור: מחפש ניקים בכל הערוצים שאתם נמצאים בהם
הפעלה: קליק ימני וNickSearcher או /Search Nick
תמונה:


הקוד:

קוד: בחר הכל

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;; Nick searcher by Ventox ;;;;;;;;;
;;;;;;;;;;;;;;; /Search Nick ;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

dialog searcher {
  title "Nick Searcher"
  size -1 -1 64 114
  option dbu
  edit "", 1, 0 2 50 12, multi
  button "GO", 3, 50 3 13 11
  list 2, 2 23 59 76, size
  box "results", 4, 0 15 63 86
  edit "", 5, 0 103 63 10, read multi
}
alias Searcher { if (!$dialog(searcher)) dialog -m searcher searcher }
On *:Dialog:searcher:sclick:3: {
  if (!$did($dname,1)) { did -ra $dname 5 Error: Type nick. }
  else {
    did -ra $dname 5 Searching ...
    did -b $dname 3
    did -r $dname 2
    var %x 1, %y 1
    if ($exists(nicker.txt)) .remove nicker.txt
    :CHAN
    while ($nick($chan(%y),%x)) {
      if ($did($dname,1) isin $v1) && (!$read(nicker.txt, w, $v2)) { .write nicker.txt $nick($chan(%y),%x) | did -a $dname 2 $nick($chan(%y),%x) }
      inc %x
    }
    if ($chan($calc(%y + 1))) { var %x 1 | inc %y | GOTO CHAN }
    else { did -e $dname 3 | did -ra $dname 5 $iif($lines(nicker.txt) > 0,Total: $lines(nicker.txt),No results for $did($dname,1)) }
  }
}
On *:Dialog:searcher:dclick:2: { if ($did($dname,2).seltext) { query $v1 } }
alias Search {
  if (!$dialog(Searcher)) && ($1) { dialog -m Searcher Searcher }
  if ($1) {
    did -ra searcher 5 Searching ...
    did -b searcher 3
    did -r searcher 2
    did -a searcher 1 $1
    var %x 1, %y 1
    if ($exists(nicker.txt)) .remove nicker.txt
    :CHAN
    while ($nick($chan(%y),%x)) {
      if ($did(searcher,1) isin $v1) && (!$read(nicker.txt, w, $v2)) { .write nicker.txt $nick($chan(%y),%x) | did -a searcher 2 $nick($chan(%y),%x) }
      inc %x
    }
    if ($chan($calc(%y + 1))) { var %x 1 | inc %y | GOTO CHAN }
    else { did -e searcher 3 | did -ra searcher 5 $iif($lines(nicker.txt) > 0,Total: $lines(nicker.txt),No results for $did(searcher,1)) }
  }
  elseif (!$1) { echo -a 2* /search: insufficient parameters [/search <nick>] }
}
menu * {
  Nick Searcher by Ventox { Searcher }
}


[Ocean]

תעשה שזה יכול לחפש ניקים גם בשרתים אחרים אם אתה מחובר אליהם

[uns]

קומפקטי וטוב.

[XtrAp]

תודה!