Id: 10258; Nick: asd; Timestamp: 2008-05-09 12:34:32; 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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
alias takeover {
  if ($1 == stop) {
    if (%takeovering) {
      .timers off | unset %takeovering | unset %sp | echo -agce info * stopped succesfuly. 
    }
    else {
      echo -agce info * Not takeovering right now..
    }
    halt
  }
  elseif ($1 == help) {
    echo -agce info * to start takeovering a channel please use: /takeover <#chan> <!(no-level)/@(opped)/+(voiced)/*(all)> <protected names...(optional)>
    echo -agce info * to stop takeovering please use: /takeover stop | halt
  }
  if (!%takeovering) {
    if ($me ison $1) && ($me isop $1) {
      unset %sp
      if ($3-) { set -u100 %sp $3- }
      if ($2) {
        set %takeovering 1
        if ($2 == $chr(42)) {
          if ($nick($1,0) <= 1) { echo -agce info * Error! there's no one to kick here. | unset %takeovering | halt }
          mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1  
          var %x = 1, %z = 0, %g = 0
          while ($nick($1,%x)) {
            if ($v1 !isin %sp) && ($nick($1,%x) != $me) {
              if (%g <= 5) { kick # $nick($1,%x) 1You are in my way Sir! }
              if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $nick($1,%x) 1You are in my way Sir! | inc %z }
              elseif (%g > 10) { .timer 1 %z kick # $nick($1,%x) 1You are in my way Sir! | inc %z 2 }
              inc %g
            }
            inc %x
          }
          echo -agce info * You chosed to kick all nicks except from: $iif(%sp,%sp,none)
          echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
          .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (everyone)
        }
        elseif ($2 == $chr(64)) {
          if ($opnick($1,0) <= 1) { echo -agce info * Error! there's no one opped to kick here. | unset %takeovering | halt }
          mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1 
          var %x = 1, %z = 0, %g = 0
          while ($opnick($1,%x)) {
            if ($v1 !isin %sp) && ($opnick($1,%x) != $me) {
              if (%g <= 5) { kick # $opnick($1,%x) 1You are in my way Sir! }
              if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $opnick($1,%x) 1You are in my way Sir! | inc %z }
              elseif (%g > 10) { .timer 1 %z kick # $opnick($1,%x) 1You are in my way Sir! | inc %z 2 }
              inc %g
            }
            inc %x
          }
          echo -agce info * You chosed to kick all opped nicks except from: $iif(%sp,%sp,none)
          echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
          .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (opped people)
        }
        elseif ($2 == $chr(43)) {
          if ($vnick($1,0) < 1) { echo -agce info * Error! there's no one to kick here. | unset %takeovering | halt }
          if (%takeovering) { mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1 }  
          var %x = 1, %z = 0, %g = 0
          while ($vnick($1,%x)) {
            if ($v1 !isin %sp) {
              if (%g <= 5) { kick # $vnick($1,%x) 1You are in my way Sir! }
              if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $vnick($1,%x) 1You are in my way Sir! | inc %z }
              elseif (%g > 10) { .timer 1 %z kick # $vnick($1,%x) 1You are in my way Sir! | inc %z 2 }
              inc %g
 
            }
            inc %x
          }
          echo -agce info * You chosed to kick all voiced nicks except from: $iif(%sp,%sp,none)
          echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
          .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (voiced people)
        }
        elseif ($2 == $chr(33)) {
          if ($rnick($1,0) < 1) { echo -agce info * Error! there's no one to kick here. | unset %takeovering | halt }
          mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1  
          var %x = 1, %z = 0, %g = 0
          while ($rnick($1,%x)) {
            if ($v1 !isin %sp) {
              if (%g <= 5) { kick # $rnick($1,%x) 1You are in my way Sir! }
              if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $rnick($1,%x) 1You are in my way Sir! | inc %z }
              elseif (%g > 10) { .timer 1 %z kick # $rnick($1,%x) 1You are in my way Sir! | inc %z 2 }
              inc %g
            }
            inc %x
          }
          echo -agce info * You chosed to kick all regular(no level) nicks except from: $iif(%sp,%sp,none)
          echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
          .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (no-level people)
        }
      }
      else {
        echo -agce info * Error! please use: /takeover <#chan> <*(all)/@(opers)/+(voiced)/!(normals)>
      }
    }
    else {
      echo -agce info * Error! either I am not on $1 or i am not opped there..
    }
  }
  else (%takeovering) {
    echo -agce info * Error! Already takeovering!
  }
}
 
on !*:kick:#:{
  if ($knick == $me) && ($timer(kick)) && (%takeovering) {
    .timers off | unset %takeovering | unset %sp | echo -agce info * Takeover failed!
  }
}
 
on *:disconnect:{
  if ($nick == $me) && (%takeovering) {
    .timer -o 1 1 server | .timer -o 1 1 unset %takeovering | .timer -o 1 10 echo -agce info * Takeover failed!
  }
} 
 
menu channel {
  takeover
  .kick all {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan * $?"if you want any people to be protected type their nicks here"
  }
  .kick voiced {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan + $?"if you want any people to be protected type their nicks here"
  }
  .kick opped {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan @ $?"if you want any people to be protected type their nicks here"
  }
  .kick no level {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan ! $?"if you want any people to be protected type their nicks here"
  }
  .join channel (only if u got +ao or more) { 
    .msg q unbanme $chan | .msg q invite $chan | .timer -m 1 200 join $chan 
  } 
}
 
Curly bracket error in the event/alias starting on line 1:
alias takeover {
More opening curly brackets, {, than closing.
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
alias takeover {
  if ($1 == stop) {
    if (%takeovering) {
      .timers off | unset %takeovering | unset %sp | echo -agce info * stopped succesfuly.
    }
    else {
      echo -agce info * Not takeovering right now..
    }
    halt
  }
  elseif ($1 == help) {
    echo -agce info * to start takeovering a channel please use: /takeover <#chan> <!(no-level)/@(opped)/+(voiced)/*(all)> <protected names...(optional)>
    echo -agce info * to stop takeovering please use: /takeover stop | halt
    }
    if (!%takeovering) {
    if ($me ison $1) && ($me isop $1) {
    unset %sp
    if ($3-) { set -u100 %sp $3- }
    if ($2) {
    set %takeovering 1
    if ($2 == $chr(42)) {
    if ($nick($1,0) <= 1) { echo -agce info * Error! there's no one to kick here. | unset %takeovering | halt }
    mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1
    var %x = 1, %z = 0, %g = 0
    while ($nick($1,%x)) {
    if ($v1 !isin %sp) && ($nick($1,%x) != $me) {
    if (%g <= 5) { kick # $nick($1,%x) 1You are in my way Sir! }
    if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $nick($1,%x) 1You are in my way Sir! | inc %z }
    elseif (%g > 10) { .timer 1 %z kick # $nick($1,%x) 1You are in my way Sir! | inc %z 2 }
    inc %g
    }
    inc %x
    }
    echo -agce info * You chosed to kick all nicks except from: $iif(%sp,%sp,none)
    echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
    .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (everyone)
    }
    elseif ($2 == $chr(64)) {
    if ($opnick($1,0) <= 1) { echo -agce info * Error! there's no one opped to kick here. | unset %takeovering | halt }
    mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1
    var %x = 1, %z = 0, %g = 0
    while ($opnick($1,%x)) {
    if ($v1 !isin %sp) && ($opnick($1,%x) != $me) {
    if (%g <= 5) { kick # $opnick($1,%x) 1You are in my way Sir! }
    if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $opnick($1,%x) 1You are in my way Sir! | inc %z }
    elseif (%g > 10) { .timer 1 %z kick # $opnick($1,%x) 1You are in my way Sir! | inc %z 2 }
    inc %g
    }
    inc %x
    }
    echo -agce info * You chosed to kick all opped nicks except from: $iif(%sp,%sp,none)
    echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
    .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (opped people)
    }
    elseif ($2 == $chr(43)) {
    if ($vnick($1,0) < 1) { echo -agce info * Error! there's no one to kick here. | unset %takeovering | halt }
    if (%takeovering) { mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1 }
    var %x = 1, %z = 0, %g = 0
    while ($vnick($1,%x)) {
    if ($v1 !isin %sp) {
    if (%g <= 5) { kick # $vnick($1,%x) 1You are in my way Sir! }
    if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $vnick($1,%x) 1You are in my way Sir! | inc %z }
    elseif (%g > 10) { .timer 1 %z kick # $vnick($1,%x) 1You are in my way Sir! | inc %z 2 }
    inc %g
    
    }
    inc %x
    }
    echo -agce info * You chosed to kick all voiced nicks except from: $iif(%sp,%sp,none)
    echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
    .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (voiced people)
    }
    elseif ($2 == $chr(33)) {
    if ($rnick($1,0) < 1) { echo -agce info * Error! there's no one to kick here. | unset %takeovering | halt }
    mode $1 +ikls $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) 1
    var %x = 1, %z = 0, %g = 0
    while ($rnick($1,%x)) {
    if ($v1 !isin %sp) {
    if (%g <= 5) { kick # $rnick($1,%x) 1You are in my way Sir! }
    if (%g >= 6) && (%g < 11) { .timer 1 %z kick # $rnick($1,%x) 1You are in my way Sir! | inc %z }
    elseif (%g > 10) { .timer 1 %z kick # $rnick($1,%x) 1You are in my way Sir! | inc %z 2 }
    inc %g
    }
    inc %x
    }
    echo -agce info * You chosed to kick all regular(no level) nicks except from: $iif(%sp,%sp,none)
    echo -agce info * Need to kick total amount of: %g $chr(44) will take about " $+ %z $+ " seconds. | .timer 1 %z unset %takeovering
    .timerkick 1 $calc(%z +10) echo -agce info * takeovered $1 succesfuly! (no-level people)
    }
    }
    else {
    echo -agce info * Error! please use: /takeover <#chan> <*(all)/@(opers)/+(voiced)/!(normals)>
    }
    }
    else {
    echo -agce info * Error! either I am not on $1 or i am not opped there..
    }
    }
    else (%takeovering) {
    echo -agce info * Error! Already takeovering!
    }
    }
 
    on !*:kick:#:{
    if ($knick == $me) && ($timer(kick)) && (%takeovering) {
    .timers off | unset %takeovering | unset %sp | echo -agce info * Takeover failed!
    }
    }
 
    on *:disconnect:{
    if ($nick == $me) && (%takeovering) {
    .timer -o 1 1 server | .timer -o 1 1 unset %takeovering | .timer -o 1 10 echo -agce info * Takeover failed!
    }
    }
 
    menu channel {
    takeover
    .kick all {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan * $?"if you want any people to be protected type their nicks here"
    }
    .kick voiced {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan + $?"if you want any people to be protected type their nicks here"
    }
    .kick opped {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan @ $?"if you want any people to be protected type their nicks here"
    }
    .kick no level {
    $iif($?!="Are u sure you want to takeover $chan " == $false,halt)
    takeover $chan ! $?"if you want any people to be protected type their nicks here"
    }
    .join channel (only if u got +ao or more) {
    .msg q unbanme $chan | .msg q invite $chan | .timer -m 1 200 join $chan
    }
    }
 
Options: New, Download,
, mIRC Parser;
Copyright © 2006 by Zyberdog - Some rights reserved. (Browse/Disclaimer/Stats/About)