on *: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,
) 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 } } }