on *:TEXT:!cmb-on*:#super_pcw:{ if ($nick isop $chan || $nick ishop $chan || $nick == Lastrites) { msg $chan 8,4Reqs for $chan are currently runnning set %pc.kicker $+ $chan ON } } on *:TEXT:!cmb-off*:#super_pcw:{ if ($nick isop $chan || $nick ishop $chan || $nick == Lastrites) { msg $chan 8,4Reqs for $chan are currently OFF set %pc.kicker $+ $chan OFF } } on *:text:!reqs*:#super_pcw:{ if (%pc.kicker [ $+ [ $chan ] ] == OFF) { Halt } if ($nick isop $chan || $nick ishop $chan) { if (!$2) { notice $nick Hey you need an attack and str combo as well! ;(!reqs 100 180 where 180 is att n str combined) } else { msg $chan 4,14REQS for $chan are now12 $2 set %cmb $2 set %aas $3 } } } on *:TEXT:!wl *:#super_pcw:{ if (($nick isop $chan) || ($nick ishop $chan) { inc %whitelist [ $+ [ $chan ] ] } } on *:JOIN:#super_pcw:{ if (%pc.kicker [ $+ [ $chan ] ] == OFF) { Halt } if ($nick == $me) { Halt } set %channy $chan set %user $nick set %pc.msg msg $chan sockopen pestkick www.slushpuppy.silverinterlocution.org 80 } on *:SOCKOPEN:pestkick*:{ sockwrite -nt $sockname GET /pestcontrol.php?pestcontrol= $+ %user HTTP/1.1 sockwrite -nt $sockname Host: www.slushpuppy.silverinterlocution.org sockwrite -nt $sockname $crlf } on *:SOCKREAD:pestkick*:{ if (%pc.kicker [ $+ [ $chan ] ] == OFF) { Halt } var %sockread sockread %sockread if ( isin %sockread) { set %attack $gettok($htmlfree(%sockread),4,32) set %strength $gettok($htmlfree(%sockread),8,32) } if (
isin %sockread) { var %combat = $htmlfree(%sockread) %pc.msg 4Rsn:14 %user 4¤ Strength:14 %strength 4¤ Attack:14 %attack 4¤ Combat:14 %combat if (%combat < %cmb ) && ($calc(%attack + %strength) < %aas) { inc %kicks | ban -ku30 %channy %user 12You 4dont 12meet 4Reqs 12For 4this 12channel!4 ¤12 %kicks } if (%combat > %cmb ) { Notice %user 7Congratulations,4You 7meet 4Reqs } sockclose $sockname | unset %combat.3 | unset %channy | unset %user | unset %attack | unset %strength | unset %pc.msg } } on *:Sockclose:pestkick*:{ Sockclose $sockname unset %combat | unset %channy | unset %user | unset %attack | unset %strength | unset %pc.msg } alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) return %x } alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) return %x }