rendered paste bodyon *:SOCKOPEN:socket67187: {
13.
sockwrite -nt $sockname GET /rsstats.php?stats= $+ %joinnick HTTP/1.1
14.
sockwrite -nt $sockname Host: www.slushpuppy.silverinterlocution.org
15.
sockwrite -nt $sockname $crlf
16.
}
17.
on *:SOCKREAD:socket67187: {
18.
if ($sockerr) {
19.
msg %chan Socket Error: $sockname $+ . Error code: $sockerr Please inform $me of this error message.
20.
halt
21.
}
22.
else {
23.
var %sockreader
24.
sockread %sockreader
25.
if (*The Combat level for* iswm %sockreader) {
26.
var %tempvar $remove(%sockreader,<br>)
27.
var %sockreader2 | sockread %sockreader2
28.
if (*Overall:* iswm %sockreader2) {
29.
Set %att $gettok(%sockreader2,4,32)
30.
Set %str $gettok(%sockreader2,8,32)
31.
Set %combat $gettok(%tempvar,7,32)
32.
set %attnstr $calc(%att + %str)
33.
msg %chan Attack + Strength = %attnstr Combat = %combat
34.
cbcheck
35.
}
36.
}
37.
if (* $+ %joinnick does not feature in the hiscores.* iswm %sockreader) {
38.
ban -ku60 %chan %joinnick 10Please use your 5rs10 name 5110 min ban!
39.
sockclose $sockname
40.
}
41.
}
42.
}
43.
44.
alias cbcheck {
45.
if (%attnstr < 145) {
46.
set %under 5
47.
if (%combat < 90) {
48.
set %under2 5
49.
set %under3 $calc(%under + %under2)
50.
if (%under3 > 9) {
51.
ban -ku600 %chan %joinnick 13Sorry you dont meet 9reqs13 please come back when you do.
52.
}
53.
unset %under
54.
unset %under2
55.
unset %joinnick
56.
unset %attnstr
57.
unset %combat
58.
unset %att
59.
unset %str
60.
}
61.
else {
62.
msg %chan %joinnick 10Meets the 4reqs10!
63.
unset %under
64.
unset %under2
65.
unset %joinnick
66.
unset %attnstr
67.
unset %combat
unset %att
unset %str
}
}
}