Mine

on *:TEXT:!cmb-on*:#:{ if ($nick isop $chan || $nick ishop $chan) { msg $chan 8,4Reqs for $chan are currently runnning
  set %pc.kicker $+ $chan ON  }
}
on *:TEXT:!cmb-off*:#:{ if ($nick isop $chan || $nick ishop $chan) { msg $chan 8,4Reqs for $chan are currently OFF
  set %pc.kicker $+ $chan OFF  }
}
on *:text:!reqs*:#:{ if ($nick isop $chan || $nick ishop $chan) {
    notice $nick REQS are turned on as $2 +
    set %cmb $+ $chan $2
  }
}
on *:JOIN:#:{
  if (%pc.kicker [ $+ [ $chan ] ] == OFF) { Halt }
  if ($nick == Dash|bot) { 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 (<b> isin %sockread) {
    set %attack $gettok($htmlfree(%sockread),4,32)
    set %strength $gettok($htmlfree(%sockread),8,32) 
  }
  if (<br> isin %sockread) {
    var %combat = $htmlfree(%sockread)
    %pc.msg 4Rsn:7 %user 4¤ Strength:7 %strength 4¤  Attack:7 %attack 4¤  Combat:7 %combat
    if (%combat < %cmb ) && ($calc(%attack + %strength) < 1999) { inc %kicks | ban -ku30 %channy %user 4You 7dont 4meet 7Reqs 4For 7this 4channel!7 ¤4 %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,&nbsp;)
return %x }



alias -l htmlfree {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
return %x }