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
|
n *:part:%lamer.chans:{ if ($istok(%lamer.nicks,$nick,32)) { invite $nick # } }
on !@*:kick:%lamer.chans:{ if ($istok(%lamer.nicks,$knick,32)) { invite $knick # } }
on @*:join:#:{
;if ($istok(%lamer.chans,#,32)) && (m isincs $chan(#).mode) && ($istok(%lamer.nicks,$nick,32)) { mode # -v $nick }
if (*cz*@* iswm $address) { set %lamer.nicks $addtok(%lamer.nicks,$nick,32) }
}
on *:text:Its Simple to use, Simply for you.:#:{ set %lamer.nicks $addtok(%lamer.nicks,$nick,32) }
on *:quit:{
if ($istok(%lamer.nicks,$nick,32)) { ils.remlamer $nick }
}
on *:nick:{
if ($istok(%lamer.nicks,$nick,32)) {
set %lamer.nicks $reptok(%lamer.nicks,$nick,$newnick,1,32)
}
}
alias invnoobs {
var %i 1,%c = 0
while ($gettok(%lamer.nicks,%i,32)) {
if ($v1 !ison $1) {
.timer 1 $calc(%c * 2) invite $v1 $v2
inc %c
}
inc %i
}
.timer 1 $calc(%c * 2) ils.echo Done.
}
menu channel {
Invite Lamers Script $+ $chr(9) Lamer Count - $numtok(%lamer.nicks,32)
.Channels:
..Add Channel {
set %lamer.chans $addtok(%lamer.chans,$$input(Please enter the channel you'd like to activate the script on.,edq,Invite Lamers Script - Channel Input,#),44)
ils.echo Added channel $! succesfully.
}
..Del Channel
...Delete All:unset %lamer.chans | ils.echo Removed all channels.
...-
...$submenu($ils.delchan($1))
.Lamers:
..Update Lamer List:ils.update
..Add Lamer:set %lamer.nicks $addtok(%lamer.nicks,$$input(Please enter the nickname you'd like to add.,edq,Invite Lamers Script - Lamer Input),32)
..Del Lamer
...Delete All:unset %lamer.nicks | ils.echo Removed all Lamers.
...Delete all lamers who are not on #:ils.remall
...-
...$submenu($ils.dellamer($1))
.-
.$iif($me isop #,Invite all Lamers into the active channel):invnoobs #
.$iif($me isop #,Invite one Lamer into the active channel)
..$submenu($ils.invite($1))
.kick Lamers on # $+ :
..$submenu($ils.list($1))
}
alias ils.dvall {
var %i = 1
while ($gettok(%lamer.nicks,%i,32)) {
if ($v1 isvoice $1) {
var %nicks = %nicks $v1
}
if ($numtok(%nicks,32) == $modespl) { mode # - $+ $str(v,$modespl) %nicks | var %nicks }
inc %i
}
if (%nicks) { mode # - $+ $str(v,$numtok(%nicks,32)) %nicks }
}
alias ils.remall {
var %i = 1,%d = 0
while ($gettok(%lamer.nicks,%i,32)) {
if ($v1 !ison $active) { set %lamer.nicks $deltok(%lamer.nicks,%i,32) | inc %d | goto noinc }
inc %i
:noinc
}
ils.echo Removed %d users.
}
alias ils.update {
var %i 1
unset %lamer.nicks
while ($ial(*!*cz*@*,%i).nick) {
var %v1 = $v1
if (!$istok(%lamer.nicks,$v1,32)) {
set %lamer.nicks $addtok(%lamer.nicks,%v1,32)
}
inc %i
}
ils.echo Lamer List Updated Succesfully.
}
alias ils.echo {
echo -agect info * Invite Lamers Script: $1-
}
alias ils.delchan {
if ($1 != 0) {
if ($1 == begin) return -
if ($1 isnum) && ($gettok(%lamer.chans,$1,44)) { return $1. $v1 $+ :ils.remchan $v1 $(|) ils.echo Succesfully Removed $v1 $+ . }
if ($1 == end) return -
}
}
alias ils.remchan {
set %lamer.chans $remtok(%lamer.chans,$1,32)
}
alias ils.dellamer {
if ($1 != 0) {
if ($1 == begin) return -
if ($1 isnum) && ($gettok(%lamer.nicks,$1,32)) { return $v1 $+ :ils.remlamer $v1 $(|) ils.echo Succesfully Removed $v1 $+ . }
if ($1 == end) return -
}
}
alias ils.remlamer {
set %lamer.nicks $remtok(%lamer.nicks,$1,32)
}
alias ils.invite {
if ($1 != 0) {
if ($1 == begin) return -
if ($1 isnum) && ($gettok(%lamer.nicks,$1,32)) {
return $iif($v1 !ison $active,$v1) $+ :invite $v1 $active $(|) ils.echo Succesfully Invited $v1 $+ .
}
if ($1 == end) return -
}
}
alias ils.list {
if ($1 != 0) {
if ($1 == begin) return -
if ($1 isnum) && ($gettok(%lamer.nicks,$1,32)) {
return $iif($v1 ison $active,$v1) $+ :ban -ku5 $active $v1 2 Bye Lamer.
}
if ($1 == end) return -
}
}
raw 401:*:{
set %lamer.nicks $remtok(%lamer.nicks,$2,32)
}
|