just paste this thing into remotes and type !vsc
you can go ahead and modify the on text part and the way it is displayed

on *:TEXT:*:#:{
  inc %linesother 1
  inc %keysother $len($1-)
  inc %wordsother $0
}
on *:TEXT:!VSC*:#:{
  if ($nick == Sephiroth1n6) || ($nick isop $chan) {
    msg $chan 15,1I have counted12.::.13\_/15 $+ $bytes(%linesother,bd) lines13\_/15 $+ $bytes(%keysother,bd) keys13\_/15 $+ $bytes(%wordsother,bd) words13\_/15 $+ $bytes($calc(%keysother / %wordsother),bd) keys per word13\_/15 $+ $bytes($calc(%wordsother / %linesother),bd) words per line13\_/15 $+ $bytes($calc(%keysother / %linesother),bd) keys per line13\_/12.::.15as of 08/08/07                                                                                          
  } 
  else {
    .notice $nick you cannot do this xD.
  }
}