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
|
on *:text:!nazicheck*:#eropid:{
if ($level($fulladdress) < 10000) {
notice $nick This is an admin command, no access.
}
else {
if ($2 == $null) || ($3 == $null) {
notice $nick Command: !nazicheck Searchstring [Write HTML, 0 or 1 (take longer timer)] For example: !Nazicheck Hitler 0
}
else {
set %nazihtmlresults 0
set %naziHTML $3
set %nazistring $2
set %nazidate $asctime(yyyy.mm.dd)
set %nazidir C:\Servers\AimServer\cstrike\cstrike\addons\amxmodx\logs\ $+ %nazidate $+ .htm
set %nazilines $lines(%nazidir)
set %nazireadline 1
write -c C:\Webserver\Checkresults.htm
:NAZI
%naziread = $read(%nazidir, %nazireadline)
if (%nazistring isin %naziread) {
%naziread = $mid(%naziread,10,1000)
%naziread = $replace(%naziread,<, ,><, : ,>, $+ $chr(32) $+ : $+ $chr(32) $+ ,<font color=green>, ,<font color=blue>, ,<font color=red>, ,</font>, ,<br>, )
msg $chan 7,1Word %nazistring found on line %nazireadline in $chr(36) $+ amxmodxdir\logs\ $+ %nazidate $+ .htm
msg $chan 4,1 %naziread
GOTO WRITENAZIHTML
}
else {
if (%nazireadline >= %nazilines) {
msg $chan 7,1Word %nazistring not found, halting. (Looked through4,1 %nazilines 7,1lines.)
halt
}
else {
inc %nazireadline
GOTO NAZI
}
:WRITENAZIHTML
if (%naziHTML != 1) {
halt
}
else {
if (%nazireadline >= %nazilines) {
msg $chan 7,1See http://90.230.58.246/Checkresults.htm for all results (Looked through4,1 %nazilines 7,1lines and found4,1 %nazihtmlresults 7,1other results)
halt
}
else {
inc %nazireadline
%naziread = $read(%nazidir, %nazireadline)
if (%nazistring isin %naziread) {
write C:\Webserver\Checkresults.htm %naziread
inc %nazihtmlresults
GOTO WRITENAZIHTML
}
else {
GOTO WRITENAZIHTML
}
}
}
}
}
}
}
|