on $*:TEXT:!joinon*:#DK: {
  if ($nick isreg $chan) || ($nick isvoice $chan) { /notice $nick ERROR: Access Denied }
  elseif ( $me == [DK]iSpy) {
    set %join [DK]iSpy
    msg $chan 15X14,15X15,14X1,14X14,1X1,1-15,1[[4JOIN KICK15]] 0Online 14,1X1,14X15,14X14,15X15,0X0
  }
}
on $*:TEXT:!joinoff*:#DK: {
  if ($nick isreg $chan) || ($nick isvoice $chan) { /notice $nick ERROR: Access Denied }
  elseif ( $me == [DK]iSpy) { 
    set %join Joinoff
    msg $chan 15X14,15X15,14X1,14X14,1X1,1-15,1[[4JOIN KICK15]] 0Offline 14,1X1,14X15,14X14,15X15,0X0
  }
}
on *:JOIN:#DK: { 
  if ( $me == %join ) {
    if ($readini(autoexempt.ini,$chan,$address($nick,2))) { 
      halt
    }
    else { 
      inc %num
      set %cb.nick. [ $+ [ %num ] ] $nick  
      sockopen cb.sock. [ $+ [ %num ] ] www.slushpuppy.silverinterlocution.org 80 
    } 
  }
}
on *:SOCKOPEN:cb.sock.*: { 
  sockwrite -nt $sockname GET /rsstats.php?stats= $+ %cb.nick. [ $+ [ %num ] ] HTTP/1.1 
  sockwrite -nt $sockname Host: www.slushpuppy.silverinterlocution.org 
  sockwrite -nt $sockname $crlf 
} 
on *:SOCKREAD:cb.sock.*: { 
  if ($sockerr) { halt } 
  else { 
    var %cb.reader 
    sockread %cb.reader 
    if (*The Combat level for* iswm %cb.reader) { 
      tokenize 32 %cb.reader 
      if ($7 <= 95) {
        ban -ku600 #DK %cb.nick. [ $+ [ %num ] ] 2 Sorry, you are not 95+ combat [10 min ban] 
      } 
      else { 
        msg #DK  1Player Name:4 %cb.nick. [ $+ [ %num ] ] 
        msg #DK  1Combat Level:4 $7 $8 Based) 
        unset %cb.*
        sockclose $sockname 
      } 
    } 
    elseif (*does not feature in the hiscores.* iswm %cb.reader) {
      ban -ku10 #DK %cb.nick. [ $+ [ %num ] ] 2 Please use your runescape name when joining this channel. [10 sec ban]
    } 
  }
}