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
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
on *:text:*:%chan:{
if ($1 == !add) {
if (!%status) && (!%flooder) { set -u3 %flooder 1 | msg # 3,1Mix is off, cant add! | halt }
if ($istok(%mixme,$nick,44)) && (!%flooder) { set -u3 %flooder 1 | msg # 3,1 $+ $nick 0,1- your already on the mix. | halt }
if ($numtok(%mixme,44) == 5) { unset %status | msg # 3,1mix been over. | msg # 3,1Players are: %mixme | msg %mixme 3,1Vent is:0,1 %vent <><><><><> 3,1ROOM:0,1 %room <><><><><> 3,1PassRoom:0,1 %passroom | halt }
if ($numtok(%mixme,44) <= 5) { set %mixme $addtok(%mixme,$nick,44) | if (!%flooder) { set -u3 %flooder1 | msg # 3,1 $+ $nick 0,1been added to the mix. } }
}
if ($1 == !remove) && ($istok(%mixme,$nick,44)) { set %mixme $remtok(%mixme,$nick,44) | if (!%flooder) { set -u3 %flooder 1 | msg # 3,1 $+ $nick 0,1- you been removed. } }
if (%status) && (%mixme) && (!%flooder) && ($1 == !players) || ($1 == !status) { set -u3 %flooder 1 | msg # 3,1players are:0,1 %mixme }
if ($1 == !vent) && (!%flooder) { set -u3 %flooder 1 | msg # 3,1The Vent Is:0,1 %vent }
if ($1 == !sub) && (!%flooder) {
if (%subneed) { set -u3 %flooder 1 | msg # 3,1Sub Has Been Found....0,1 $nick | msg $nick 3,1The Vent Is: 0,1 $+ %vent <><><><><> 3,1ROOM:0,1 %room <><><><><> 3,1PassRoom:0,1 %passroom | timersub off | unset %subneed }
else { msg # 3,1Sub is not needed! | set -u3 %flooder 1 }
}
if ($1 == !masters) { checkstatus | msg %chan 0,1 ADMINS: 3,1( $+ $numtok(%on,32) $+ / $+ $calc($numtok(%on,32) + $numtok(%off,32)) $+ ) %on %off }
}
on *:text:*:?:{ if (!%pflood) {
if ($1 == !login) {
set -u4 %pflood 1
var %x = 1
while ($ini(admins.ini,%x)) {
if ($nick isin $readini(admins.ini,$v1,nick)) {
msg $nick 3,1You Are ALREADY Logged in a user! | halt
}
inc %x
}
if ($readini(admins.ini,$2,status) != ON) {
if ($3 == $readini(admins.ini,$2,password)) {
msg $nick 3,1You have succesfuly Logged into admin acount0,1 $2 3,1with the password0,1 $3
writeini admins.ini $2 address $wildsite | writeini admins.ini $2 status ON | writeini admins.ini $2 nick $nick
msg %chan 0,1 $+ $nick 3,1Has just Logged into his admin accout0,1 $2 3,1( $+ $wildsite $+ )
halt
}
}
else {
msg $nick 3,1You Are ALready Online!
}
}
if ($1 == !logout) || ($1 == !logoff) {
set -u4 %pflood 1
if ($readini(admins.ini,$2,status) == ON) {
writeini admins.ini $2 status OFF
remini admins.ini $2 nick
msg $nick 3,1You have succesfuly Logged out!
}
}
if ($nick == $logged($nick)) {
if ($1 == !mix) && (!%status) {
if ($3) {
unset %mixme
set %status 1
mode %chan +m
set %room $2
set %passroom $3
.timer 1 1 msg %chan 3,1mix about to start.
.timer 1 1 msg %chan 3,1Players For mix Is Needed !
.timer 1 2 msg %chan 3,1Type: !add to join the mix.
.timer 1 4 mode %chan -m
}
else {
msg $nick 3,1Error! Please use it like that: !mix ROOM PASSROOM
}
}
if ($1 == !sub) && (%status) && (!%flooder) {
if (!%subneed) {
set -u3 %flooder 1
msg %chan 3,1A Sub Is Needed > < type !sub to be subtituter.
.timersub 0 100 msg %chan 3,1A Sub Is Needed > < type !sub to be subtituter.
set %subneed 1
}
else {
msg $nick 3,1ALready Searching for sub.... | set -u3 %flooder 1
}
}
if ($1- == !sub off) && (!%flooder) {
if (%subneed) { msg # 3,1The Sub Searching has been Stopped! | msg $nick 3,1Done, Stop Searching for sub. | set -u3 %flooder 1 }
else { msg $nick 3,1Not Searching for sub right now!. }
}
if ($1 == !stop) && (%status) {
unset %mixme | unset %status
msg %chan 3,1mix been stopped by:0,1 $nick
}
if ($1 == !add-admin) || ($1 == !add-a) {
if ($2 == %masterpass) && ($4) { writeini admins.ini $3 password $4 | msg $nick 3,1Done,0,1 $3 3,1Is now an admin! to login: 0,1/msg $me !login $3 $4 }
}
if ($1 == !del-admin) || ($1 == !del-a) {
if ($2 == %masterpass) && ($3) { remini admins.ini $3 | msg $nick 3,1Done0,1 $3 3,1is no longer admin. }
}
}
}
}
menu * {
mix bot
.setchan:set %chan $?"Enter the channel here, dont forget #"
.set vent:set %vent $?"Enter The Vent Ip here."
.addowner - user + pass:writeini admins.ini $?"Enter The User Name Here" password $?"Enter The Password Here"
.delowner - user:remini admins.ini $?"Enter The User Name You Want To Remove."
.show admins:$iif($exists(admins.ini),run Admins.ini,echo -a There is no admins)
.master pass:set %masterpass $?"Enter The password here.."
}
on !*:deop:%chan:{
if ($opnick == $me) {
if ($address($$1,2) !isin %owners) && (*quakenet* !iswm $nick) && (Q !iswm $nick) {
msg q op %chan | timer -m 1 200 ban -ku120 %chan $nick 2 Dont Deop me!
}
else {
msg q op %chan
}
}
else {
if ($address($$1,2) !isin %owners) && (Q !iswm $nick) && (*quakenet* !iswm $nick) {
if ($me isop %chan) {
mode %chan -o+b $opnick $wildsite | kick %chan $nick Dont Deop here!
}
}
}
}
on *:nick:{
var %x = 1
while (%x <= $ini(admins.ini,0)) {
if ($readini(admins.ini,$ini(admins.ini,%x),nick) == $nick) {
writeini admins.ini $ini(admins.ini,%x) nick $newnick
}
inc %x
}
}
alias logged {
if ($1) {
var %x = 1
while ($ini(admins.ini,%x)) {
if ($readini(admins.ini,$v1,nick) == $1) && ($readini(admins.ini,$v1,status) == ON) {
return $1
}
inc %x
}
}
}
alias checkstatus {
var %x = 1 | unset %on | unset %off
while (%x <= $ini(admins.ini,0)) {
if ($readini(admins.ini,$ini(admins.ini,%x),status) == ON) {
set %on %on 3,1 $+ * $+ 0,1 $+ $ini(admins.ini,%x)
}
else {
set %off %off 4,1 $+ * $+ 0,1 $+ $ini(admins.ini,%x)
}
inc %x
}
}
|