on $*:TEXT:!Kingson*:#D.Kings: {
  if ($nick isreg $chan) || ($nick isvoice $chan) { /notice $nick ERROR: Access Denied }
  elseif ( $me == [DK]iSpy) {
    set %king [DK]iSpy
    msg $chan 15X14,15X15,14X1,14X14,1X1,1-15,1[[4JOIN KICK15]] 0Online 14,1X1,14X15,14X14,15X15,0X0
  }
}
on $*:TEXT:!Kingsoff*:#D.Kings: {
  if ($nick isreg $chan) || ($nick isvoice $chan) { /notice $nick ERROR: Access Denied }
  elseif ( $me == [DK]iSpy) { 
    set %king off
    msg $chan 15X14,15X15,14X1,14X14,1X1,1-15,1[[4JOIN KICK15]] 0Offline 14,1X1,14X15,14X14,15X15,0X0
  }
}
on *:JOIN:#D.Kings: { 
  if ( $me == %king ) {
    if ($nick == $me) mode #D.Kings +h-o $me $me || ($nick == [-Tidus-]) || ($nick == Dagannoth-King) { 
      halt
    }
    else { 
      inc %num
      set %cbnick. [ $+ [ %lvl ] ] $nick  
      sockopen cb.sock- [ $+ [ %lvl ] ] 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 <= 120) {
        ban -ku600 #D.Kings %cbnick. [ $+ [ %lvl ] ] 2 Sorry, you are not 120+ combat [10 min ban] 
      } 
      else { 
        mode #D.Kings +v $nick
        msg #D.Kings  1Player Name:4 %cbnick. [ $+ [ %lvl ] ] 
        msg #D.Kings  1Combat Level:4 $7 $8 Based) 
        unset %cb.reader.
        sockclose $sockname 
      } 
    } 
    elseif (*does not feature in the hiscores.* iswm %cb.reader.) {
      ban -ku10 #D.Kings %cbnick. [ $+ [ %lvl ] ] 2 Please use your runescape name when joining this channel. [10 sec ban]
    } 
  }
}