on *:TEXT:!addexcept*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan)  {
    writeini excepts.ini $2 exceptions on
    /msg $chan 7 $2 14has been added to the 7exceptions list14 by7 $nick $+ 14.
} }
on *:TEXT:!delexcept*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan) {
    remini excepts.ini $nick
    /msg $chan 7 $2 14has been deleted from the 7exceptions list14 by7 $nick $+ 14.
} }
on *:JOIN:#pcownz:{
  if ($nick == $me) { Halt }
  if ($readini(excepts.ini,$nick,exceptions == on)) { Halt }
  if ($readini(autovoices.ini,$nick,autovoice == on)) mode $chan +v $nick { 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 Rsn:714 %user 1? 7 Strength: 14 %strength 1? 7 Attack: 14 %attack 1? 7 Combat: 14 %combat 
    if (%combat < 100) && ($calc(%attack + %strength) < 200) { inc %kicks | ban -ku20 %channy %user 2 You don't meet reqs 100+ cmb, join #rspc for no reqs channel. 20 sec ban ? Noobs owned: %kicks }
    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 }
on $*:text:/^[`]Rule */Si:#: {
  if ($nick isop #) || ($nick ishop #) {
    /inc %kcount
    if ( $2 == 1 ) /ban -ku600 $chan $3 4U have broken rule 1 in pcownz: 7No Spamming , therefore u have been banned for 10 minutes Nubs spanked: %kcount
    if ( $2 == 2 ) /ban -ku1200 $chan $3 4U have broken rule7 2 in 4pcownz: 7No abuse to the moderators/users , 4therefore u have been banned for4 20 minutes Nubs spanked: %kcount
    if ( $2 == 3 ) /ban -ku600 $chan $3 4U have broken rule 3 in pcownz: 7Attacking portals only, 4therefore u have been banned for 710 minutes Nubs spanked: %kcount
    if ( $2 == 4 ) /ban -ku3600 $chan $3 4U have broken rule 4 in void: 7No World Leaking, 4therefore u have been banned for7 10 minutes Nubs spanked: %kcount
    if ( $2 == 5 ) /ban -ku600 $chan $3 4U have broken rule 5 in pcownz: 7Saying ANY world in the channel, 4therefore u have been banned for7 1 day Nubs spanked: %kcount
    if ( $2 == 6 ) /ban -ku3600 $chan $3 4U have broken rule 6 in pcownz: 7No Advertising channels, 4therefore u have been banned for 71 day Nubs spanked: %kcount
    if ( $2 == 7 ) /ban -ku25200 $chan $3 4U have broken rule 7 in pcownz: 7No Pures/False representations, 4therefore u have been banned for 710 minutes Nubs spanked: %kcount
    if ( $2 == 8 ) /ban -ku300 $chan $3 4U have broken rule 8 in pcownz: 7Hop on world change, 4therefore u have been banned for7 7 days Nubs spanked: %kcount
    if ( $2 == 9 ) /ban -ku3600 $chan $3 4U have broken rule 9 in pcownz: 7Only one pc channel, 4therefore u have been banned for7 1 hour Nubs spanked: %kcount
} }
 on *:TEXT:!av*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan) {
    writeini autovoices.ini $2 autovoice on
    /mode $chan +v $2
    /msg $chan 7 $2 14has been added to 7AutoVoice list14 by7 $nick $+ 14.
  } 
}
on *:TEXT:!delav*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan) {
    remini autovoices.ini $2
    /mode $chan -v $2
    /msg $chan 7 $2 14has been deleted from 7AutoVoice list14 by7 $nick $+ 14.
  } 
}
on *:JOIN:#pcownz:{ 
  if ($readini(autovoices.ini,$nick,autovoice == on)) mode $chan +v $nick
}
}
on $*:text:/^[!@]new */Si:#pcownz-mods: {
  msg #pcownz 4Everyone 7Hop To New 4World!
} }
on $*:text:/^[!@]defineworld */Si:#pcownz-mods: {
  if ($nick isop #) || ($nick ishop #) {
    set %pcc $ctime
    set %pc $2-
    set %pcwnick $nick
    msg $chan World change to %pc recognised
    msg #void 1[4PC-World Update1] 12Type7 !pcw 1(12 updated by: $+ 7 $nick $+ 1)
} }

on *:Text:!pcw*:#pcownz:{  
  inc %pcwcount
  /notice $nick 13- 12The current pc-world is:7 %pc 13- 12Last update:7 $duration($calc($ctime - %pcc)) 12ago 13- 12 updated by:7 %pcwnick 12 13-12 ... The "!pcw" command count:7 %pcwcount 1-
}
on *:TEXT:`pm*:#pcownz:{
/kick $chan $2 7Pm:4 %pm In runescape for Voice } }
on *:TEXT:,pm*:#pcownz:{
  /msg $chan 7If you want voice in 4#void 7plz. pm:4 %pm 7ingame
/msg $chan 7If you're 4muted 7please tell us so in a 4private message and we'll get a 7way to still see its you, thanks! } }
on *:TEXT:!vnames*:#pcownz:{
/notice $nick the people takings pms atm. are: %pm } }
on *:TEXT:!verify*:#pcownz:{
  /set %pm $2-
/notice $nick Verify nicks set to : %pm } }
on *:TEXT:!rules*:#pcownz: {
  /msg $nick 4The rules in7 $chan Are:
  /msg $nick 3Rule 1: 7No spamming
  /msg $nick 3Rule 2: 7No abuse to moderators/users
  /msg $nick 3Rule 3: 7Atacking Portals Only
  /msg $nick 3rule 4: 7No world leaking
  /msg $nick 3rule 5: 7No saying ANY world in the channel
  /msg $nick 3rule 6: 7No advertising Channels
  /msg $nick 3rule 7: 7No pures/false presentations
  /msg $nick 3rule 8: 7Hop on world change
/msg $nick 3rule 9: 7Only one pc channel } }
on *:TEXT:!kick*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan)  {
/kick $chan $2 $3- } }
on *:TEXT:!scout*:#: {
  if ($2) {
/msg #pcownz-mods 7Please Check Out World:4 $2 , 7it might be good. } }
on *:TEXT:!kick on*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan)  {
/mode $chan +Q } }
on *:TEXT:!kick off*:#pcownz: {
  if ($nick isop $chan || $nick ishop $chan)  {
/mode $chan -Q } }
on *:JOIN:#pcownz: {
/notice $nick 7Want to be 4voiced in 7#pcownz? 4Simply msg7 %pm ingame } }