Id: 9589; Nick: asd; Timestamp: 2008-04-21 14:39:51; 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

on *:text:*:?:{
  if ($address($nick,2) isin %owners) {
    if ($1 == !mix) && (!%status) { 
      if ($3) {
        mode %chanlmix -N
        .timer 1 1 notice %chanlmix %mix.l Mix has been started by $nick %mix.r
        .timer 1 2 notice %chanlmix %mix.l To join the mix type !add %mix.r
        .timer 1 3 mode $chan +N
        set %status 1
        set %mix.players $addtok(%mix.players,$nick,44)
        set %mix.pass.ip.vent $2
        set %mix.serverpass $3
      }
      else {
        msg $nick Please use !mix PassVent PassServer
      }
    }
    if ($1 == !mix.sub) && (!%status) { 
      msg %chanlmix %mix.l Sub is needed for currect mix type !submix to be sub. %mix.r
      set %mix.sub 1 
    }
  }
}
 
on *:text:*:%chanlmix:{
  if ($1 == !masters) && (!%floods) {
    set -u3 %floods 1 | msg # The masters are: %owners
  }
  if ($address($nick,2) isin %owners) { 
    if ($1 == !stopmix) && (%status) && (!%floods) {
      set -u3 %floods 1
      msg # %mix.l Mix has been stoped by $nick %mix.r
      unset %mix.players
      unset %status
    } 
  }
  if ($1 == !remove) { 
    if ($istok(%mix.players,$nick,44)) {
      if (!%floods) { msg # %mix.l $nick is remove %mix.r }
      set %mix.players $remtok(%mix.players,$nick,44) 
    }
  }
  if ($1 == !players) && (%mix.players) && (!%floods) { set -u3 %floods 1 | msg # %mix.l %mix.players %mix.r }
  if ($1 == !sub) && (!%floods) {
    if (%mix.sub == 1) { set -u4 %floods 1 | msg # %mix.l Sub has been found: $nick %mix.r | msg $nick %mix.l Ip-Vent: %mix.ip.vent Pass to room: %mix.pass.ip.vent Ip-server: %mix.ip.server Pass: %mix.serverpass %mix.r | unset %mix.sub }
    else { msg # Sub is not needed right now! | set -u3 %floods 1 }
  }
  if ($1 == !add) {
    if (%status) {
      if ($nick !isin %players) {
        if ($numtok(%mix.players,44) <= 3) { 
          if (!%floods) { set -u3 %floods 1 | msg # %mix.l $nick has been added %mix.r }
          set %mix.players $addtok(%mix.players,$nick,44)
        }
        elseif ($numtok(%mix.players,44) == 4) && (!%floods) { 
          set -u6 %floods 1
          msg # %mix.l $nick has been added %mix.r
          set %mix.players $addtok(%mix.players,$nick,44)
          msg # %mix.l MIX is Complete :D %mix.r
          msg %mix.players %mix.l Ip-Vent: %mix.ip.vent Pass to room: %mix.pass.ip.vent Ip-server: %mix.ip.server Pass: %mix.serverpass %mix.r
          unset %mix.players | unset %status
        }
      }
    }
  }
}
 
on *:kick:%chanlmix:{
  if ($nick isin %mix.players) { 
    set %mix.players $remtok(%mix.players,$nick,44) 
  }
}
on *:part:%chanlmix:{
  if ($nick isin %mix.players) { 
    set %mix.players $remtok(%mix.players,$nick,44)
  }
}
on *:QUIT:{
  if ($nick isin %mix.players) { 
    set %mix.players $remtok(%mix.players,$nick,44)
  }
}
 
menu * {
  mixbot
  .channel:set %chan1mix $?"Enter The channel here, Dont forget #"
  .ventip:set %mix.ip.vent $?"Enter The Vent Ip Here." | echo -a Done, Vent is now %mix.ip.vent
  .serverip:set %mix.ip.server $?"Enter The Server Ip Here." | echo -a Done, Server Is Now %mix.ip.server
}
 
menu nicklist {
  mixbot
  .addowner:set %owners %owners $address($$1,2)
  .delowner:set %owners $remtok(%owners,$address($$1,2),32)
}
 
 
on *:Deop:#:if ($me == $opnick) && ($network == QuakeNet) { msg q op # | .msg q ban # $wildsite Dont Mess With The Best }
on @!*:KICK:#: {
  if ($knick == $me) {
    .timers off | .msg q unbanme # | .msg q ban # $wildsite Dont Mess With The Best | .msg q invite # | .timer 1 1 join #
    halt
  }
}
on @!*:BAN:#: {
  if ($banmask iswm $address($me,5)) {
    .timer -m 1 200 mode # -ob+b $nick $banmask $wildsite
    .timer -m 1 300 kick $chan $nick Dont Mess With The Best
    halt
  }
}
 
on *:open:*:*:{
  hinc $+(-mu,$iif($hget(flood,pm).unset,$ifmatch,2)) flood pm
  if ($hget(flood,pm) >= 3) && (%pme != ON) {
    .ignore * | .timer 1 30 .ignore -r * | close -m | set -u4 %pme ON
  }
}
 
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

on *:text:*:?:{
  if ($address($nick,2) isin %owners) {
    if ($1 == !mix) && (!%status) {
      if ($3) {
        mode %chanlmix -N
        .timer 1 1 notice %chanlmix %mix.l Mix has been started by $nick %mix.r
        .timer 1 2 notice %chanlmix %mix.l To join the mix type !add %mix.r
        .timer 1 3 mode $chan +N
        set %status 1
        set %mix.players $addtok(%mix.players,$nick,44)
        set %mix.pass.ip.vent $2
        set %mix.serverpass $3
      }
      else {
        msg $nick Please use !mix PassVent PassServer
      }
    }
    if ($1 == !mix.sub) && (!%status) {
      msg %chanlmix %mix.l Sub is needed for currect mix type !submix to be sub. %mix.r
      set %mix.sub 1
    }
  }
}
 
on *:text:*:%chanlmix:{
  if ($1 == !masters) && (!%floods) {
    set -u3 %floods 1 | msg # The masters are: %owners
  }
  if ($address($nick,2) isin %owners) {
    if ($1 == !stopmix) && (%status) && (!%floods) {
      set -u3 %floods 1
      msg # %mix.l Mix has been stoped by $nick %mix.r
      unset %mix.players
      unset %status
    }
  }
  if ($1 == !remove) {
    if ($istok(%mix.players,$nick,44)) {
      if (!%floods) { msg # %mix.l $nick is remove %mix.r }
      set %mix.players $remtok(%mix.players,$nick,44)
    }
  }
  if ($1 == !players) && (%mix.players) && (!%floods) { set -u3 %floods 1 | msg # %mix.l %mix.players %mix.r }
  if ($1 == !sub) && (!%floods) {
    if (%mix.sub == 1) { set -u4 %floods 1 | msg # %mix.l Sub has been found: $nick %mix.r | msg $nick %mix.l Ip-Vent: %mix.ip.vent Pass to room: %mix.pass.ip.vent Ip-server: %mix.ip.server Pass: %mix.serverpass %mix.r | unset %mix.sub }
    else { msg # Sub is not needed right now! | set -u3 %floods 1 }
  }
  if ($1 == !add) {
    if (%status) {
      if ($nick !isin %players) {
        if ($numtok(%mix.players,44) <= 3) {
          if (!%floods) { set -u3 %floods 1 | msg # %mix.l $nick has been added %mix.r }
          set %mix.players $addtok(%mix.players,$nick,44)
        }
        elseif ($numtok(%mix.players,44) == 4) && (!%floods) {
          set -u6 %floods 1
          msg # %mix.l $nick has been added %mix.r
          set %mix.players $addtok(%mix.players,$nick,44)
          msg # %mix.l MIX is Complete :D %mix.r
          msg %mix.players %mix.l Ip-Vent: %mix.ip.vent Pass to room: %mix.pass.ip.vent Ip-server: %mix.ip.server Pass: %mix.serverpass %mix.r
          unset %mix.players | unset %status
        }
      }
    }
  }
}
 
on *:kick:%chanlmix:{
  if ($nick isin %mix.players) {
    set %mix.players $remtok(%mix.players,$nick,44)
  }
}
on *:part:%chanlmix:{
  if ($nick isin %mix.players) {
    set %mix.players $remtok(%mix.players,$nick,44)
  }
}
on *:QUIT:{
  if ($nick isin %mix.players) {
    set %mix.players $remtok(%mix.players,$nick,44)
  }
}
 
menu * {
  mixbot
  .channel:set %chan1mix $?"Enter The channel here, Dont forget #"
  .ventip:set %mix.ip.vent $?"Enter The Vent Ip Here." | echo -a Done, Vent is now %mix.ip.vent
  .serverip:set %mix.ip.server $?"Enter The Server Ip Here." | echo -a Done, Server Is Now %mix.ip.server
}
 
menu nicklist {
  mixbot
  .addowner:set %owners %owners $address($$1,2)
  .delowner:set %owners $remtok(%owners,$address($$1,2),32)
}
 
 
on *:Deop:#:if ($me == $opnick) && ($network == QuakeNet) { msg q op # | .msg q ban # $wildsite Dont Mess With The Best }
on @!*:KICK:#: {
  if ($knick == $me) {
    .timers off | .msg q unbanme # | .msg q ban # $wildsite Dont Mess With The Best | .msg q invite # | .timer 1 1 join #
    halt
  }
}
on @!*:BAN:#: {
  if ($banmask iswm $address($me,5)) {
    .timer -m 1 200 mode # -ob+b $nick $banmask $wildsite
    .timer -m 1 300 kick $chan $nick Dont Mess With The Best
    halt
  }
}
 
on *:open:*:*:{
  hinc $+(-mu,$iif($hget(flood,pm).unset,$ifmatch,2)) flood pm
  if ($hget(flood,pm) >= 3) && (%pme != ON) {
    .ignore * | .timer 1 30 .ignore -r * | close -m | set -u4 %pme ON
  }
}
 
Options: New, Download,
, mIRC Parser;
Copyright © 2006 by Zyberdog - Some rights reserved. (Browse/Disclaimer/Stats/About)