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
|
alias script {
var %davar 1
set %chkvar $readini(mirc.ini, rfiles, n4)
set %lines $lines(%chkvar)
:CLOOP
set %scripts $read(%chkvar, %davar)
if (%readlines >= %lines) {
//echo Total scripts: %totscr
unset %totscr
unset %readlines
unset %lines
unset %scripts
unset %chkvar
halt
}
else {
if (on *: isin %scripts) || (on 1: isin %scripts) || (on 10000: isin %scripts) {
inc %totscr
inc %davar
inc %readlines
GOTO CLOOP
}
else {
inc %davar
inc %readlines
GOTO CLOOP
}
}
}
|