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
}
}
|