rendered paste bodyon *:JOIN:#pang: {
set %joinnick $nick
if ($sock(socket67187)) .sockclose socket67187
set %chan $chan
sockopen socket67187 www.slushpuppy.silverinterlocution.org 80
}
on *:SOCKOPEN:socket67187: {
sockwrite -nt $sockname GET /rsstats.php?stats= $+ %joinnick HTTP/1.1
sockwrite -nt $sockname Host: www.slushpuppy.silverinterlocution.org
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:socket67187: {
if ($sockerr) {
msg %chan Socket Error: $sockname $+ . Error code: $sockerr Please inform $me of this error message.
halt
}
else {
var %sockreader
sockread %sockreader
if (*The Combat level for* iswm %sockreader) {
var %tempvar $remove(%sockreader,<br>)
var %sockreader2 | sockread %sockreader2
if (*Overall:* iswm %sockreader2) {
Set %att $gettok(%sockreader2,4,32)
Set %str $gettok(%sockreader2,8,32)
Set %combat $gettok(%tempvar,7,32)
set %attnstr $calc(%att + %str)
msg %chan Attack + Strength = %attnstr Combat = %combat
unset %chan
unset %joinnick
sockclose $sockname
}
}
}
}
on *:JOIN:#pang: {
if (%check == on) && ($nick !isop $chan) && ($nick !ishop $chan) {
if (%attnstr < 170) {
var %under $nick
}
}
else {
msg $chan $nick Meets reqs
}
if (%under != $nick) { HALT }
else {
if (%combat < 100) {
ban -ku600 $nick $chan Sorry you dont meet reqs come back when you do 10min ban!
}
else {
msg $chan $nick Meets reqs
}
}
}