Me

on *:text:!addexcept*:#: { 
  if (!$2) $nick $nick Please specify a user to add to the exeption list 
  elseif ($nick isop $chan) || ($nick ishop $chan) || ($nick == kakadu55) {
    /writeini pc.ini pc $address($2,2) pc 
    msg $chan 4,1 $2 11,1was added to exeption list. 
  } 
  else { 
    notice $nick $nick You need atleast Half-op to add to exeption list. 
  } 
} 

on *:text:!delexcept*:#: { 
  if (!$2) $nick $nick Please specify a user to remove from exeption list 
  elseif ($nick isop $chan) || ($nick ishop $chan) || ($nick == Kakadu55) {
    /remini pc.ini pc $address($2,2) 
    msg $chan 4,1 $2 11,1was removed from exeption list. 
  } 
  else { 
    notice $nick $nick You need atleast Half-op to remove from exeption list.
  } 
} 

on *:JOIN:#goodpcw:{ if ($readini(pc.ini,pc,$address($nick,2))) { 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*:{ 
  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 11,1RSN:4,1 %user 11,1¤ Strength:4,1 %strength 11,1¤  Attack:4,1 %attack 11,1¤  Combat:4,1 %combat 
    if (%combat < 90) && ($calc(%attack + %strength) < 155) { inc %kicks | ban -ku30 %channy %user Use your RSN or Train! 15¤ %kicks } 
    if (%combat > 90) {  Congratulations,You meet Reqs :P | %user } 
    if ($calc(%attack + %strength) > 155) {  Congratulations,You meet Reqs :P | %user } 
    if ($calc(%attack + %strength) == 155) {  Congratulations,You meet Reqs :P | %user }  
    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 }