All pastes #485368 Raw Edit

Stuff

public text v1 · immutable
·published 2007-05-13 00:17 UTC
rendered paste body
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 (<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: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,&nbsp;)
return %x }



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