Text Counter

By jakobLUVSpizza on Sep 10, 2008

it will count the number of msgs on whatever/all channels you on
you just need to tell it what chan you want use it on or just leave it as #
example (straight from my variables):

%textdj801 10531
%textDnTVideos 498
%textAdmin 2
%textDear 16
%textGlobalServ 408
%textTeressa 3
%textHawk 2
%textTIMMEHS 1
%textAngel_Tears 79
%textchris93 4
%textsick0 30
%textDustin 19
%textAlex 22
%textp3ngu1n0 2
%textGHP-Bot 5
%textdj801` 75
%textGHPUserName 6
%textRCP 4
%textRelurk 2139
%textnapa182 126
%textWidlePidle 4
%textrName 2
%textGummo 3
%textRCP 1
%textHoebag46312 3
%textpie 18
%textZTecWiz 2
%textiBook 18
%textcooldude13233 6
%textHoebag489 1

=========================================================================================
                                     Text Counter
=========================================================================================
on *:TEXT:*:#: {
  inc %text [ $+ [ $nick ] ]
}

Like Page Follow Author

Comments

Soulkeeper - Sep 17, 2008

My God, This script is a work of sheer genius. I shall use it from now on. 10/10

Respond

napa182 - Sep 17, 2008

why not make it count words typed and also use an ini file instead of vars cuz vars will just fill up ur list. at lest make somthing out of it.. maybe somthing like

on *:text:*:#:{ 
  $iif(!$readini(wcount.ini,$nick,$+($server,.,$chan)),writeini wcount.ini $nick $+($server,.,$chan) $numtok($1-,32),writeini wcount.ini $nick $+($server,.,$chan) $calc($readini(wcount.ini,$nick,$+($server,.,$chan)) + $numtok($1-,32))) 
  if ($strip($1) == !wordcount && !$($+(%,wcount,.,flood,.,$nick),2)) {
    set -u3 $+(%,wcount,.,flood,.,$nick) $nick
    if (!$2)  { msg # ERROR! please type !wordcount nick ex: !wordcount sick0 }
    else { msg # $2 Has typed $iif(!$readini(wcount.ini,$2,$+($server,.,$chan)),0,$readini(wcount.ini,$2,$+($server,.,$chan))) words in Channel # }
  }
}

Respond

Jonesy44 - Sep 11, 2008

mIRC scripter, Paul, that's mIRC ..

Respond

Paul_1337noob - Sep 11, 2008

holy 5h17 we got a rocket scientist!

Respond

PuNkTuReD - Sep 11, 2008

on *:TEXT:*:#: {
  if ($($+(%,text,$nick),2) == $null) { set $($+(%,text,$nick),2) 1 }
  else { 
    if ($($+(%,text,$nick),2) == 500) { msg $chan Gee you've got a mouth on ya $nick $+ ! | inc $($+(%,text,$nick),2) }
    else {
      inc $($+(%,text,$nick),2)
    }
  }
}

Respond