Id: 9691; Nick: asd; Timestamp: 2008-04-24 15:49:50; Pasted as: mIRC
Description: asd 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

alias clearchanlev {
  set -u20 %zxzxx 1
  if ($left($1,1) == $chr(35)) {
    unset %temp | unset %zxx | unset %mylevel | unset %clear
    if ($2) {
      set -u60 %clear $1 $2 | set %mylevel ON | msg q chanlev $1
    }
    else {
      set -u60 %clear $1 amovgt | set %mylevel ON | msg q chanlev $1
    }
  }
  else {
    echo -a Please type "#" in the beggining
  }
}
 
on *:notice:*:?:{
  if (%mylevel == ON) {
    if ($nick == Q) {
      if ($1 == $remove($gettok($address($me,2),1,45),*!*@,.users.quakenet.org)) {
        .timer 1 5 set -u50 %mylevel $v2 $2 | .timer 1 6 msg q chanlev $gettok(%clear,1,32)
      }
    }
  }
  else {
    if ($nick == Q) {
      if (!%zxx) { set %zxx 1 }
      if (*known* !iswm $1-) && (*username* !iswm $1-) && (*end* !iswm $1-) && (*total* !iswm $1-) && ($1 != $gettok(%mylevel,1,32)) && (n !isin $2) {
        if ($left($2,1) == $chr(43)) && ($gettok(%clear,2,32) isin $2) { set %temp %temp $chr(35) $+ $1 | .timercheckwhat 1 6 checkwhat }
        if ($numtok(%temp,32) >= 16) { .timer 1 %zxx .msg q removeuser $gettok(%clear,1,32) %temp | unset %temp | inc %zxx 2 }
      }
    }
  }
}
 
alias checkwhat {
  if ($numtok(%temp,32) < 16) { .timer 1 %zxx .msg q removeuser $gettok(%clear,1,32) %temp | unset %temp | unset %zxx | unset %mylevel | unset %clear }
}
 
Parsed for bracket errors and indented: 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

alias clearchanlev {
  set -u20 %zxzxx 1
  if ($left($1,1) == $chr(35)) {
    unset %temp | unset %zxx | unset %mylevel | unset %clear
    if ($2) {
      set -u60 %clear $1 $2 | set %mylevel ON | msg q chanlev $1
    }
    else {
      set -u60 %clear $1 amovgt | set %mylevel ON | msg q chanlev $1
    }
  }
  else {
    echo -a Please type "#" in the beggining
  }
}
 
on *:notice:*:?:{
  if (%mylevel == ON) {
    if ($nick == Q) {
      if ($1 == $remove($gettok($address($me,2),1,45),*!*@,.users.quakenet.org)) {
        .timer 1 5 set -u50 %mylevel $v2 $2 | .timer 1 6 msg q chanlev $gettok(%clear,1,32)
      }
    }
  }
  else {
    if ($nick == Q) {
      if (!%zxx) { set %zxx 1 }
      if (*known* !iswm $1-) && (*username* !iswm $1-) && (*end* !iswm $1-) && (*total* !iswm $1-) && ($1 != $gettok(%mylevel,1,32)) && (n !isin $2) {
        if ($left($2,1) == $chr(43)) && ($gettok(%clear,2,32) isin $2) { set %temp %temp $chr(35) $+ $1 | .timercheckwhat 1 6 checkwhat }
        if ($numtok(%temp,32) >= 16) { .timer 1 %zxx .msg q removeuser $gettok(%clear,1,32) %temp | unset %temp | inc %zxx 2 }
      }
    }
  }
}
 
alias checkwhat {
  if ($numtok(%temp,32) < 16) { .timer 1 %zxx .msg q removeuser $gettok(%clear,1,32) %temp | unset %temp | unset %zxx | unset %mylevel | unset %clear }
}
 
Options: New, Download,
, mIRC Parser;
Copyright © 2006 by Zyberdog - Some rights reserved. (Browse/Disclaimer/Stats/About)