Stats script, Op, deop etc.

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	0.0
Scores Submitted	0
Date Added	Jan 13, 2008
Last Updated	Jan 13, 2008
Tags	channel dehalfop dehop deop devoice halfop hop op reset script statistics stats voice vop

Introduction

copy/paste to REMOTE

type /statistics help for help :)

Grab the Code

on *:BAN:#: { 
  if ($nick == $me) { 
    inc %.all.bans
    inc % [ $+ [ $chan ] $+ ] .bans 
    writeini stats.ini $chan BAN % [ $+ [ $chan ] $+ ] .bans 
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL BAN %.all.bans
  } 
}
on *:KICK:#: { 
  if ($nick == $me) { 
    inc %.all.kicks
    inc % [ $+ [ $chan ] $+ ] .kicks 
    writeini stats.ini $chan KICK % [ $+ [ $chan ] $+ ] .kicks
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL KICK %.all.kicks
  }
}
on *:OP:#: { 
  if ($nick == $me) { 
    inc %.all.ops
    inc % [ $+ [ $chan ] $+ ] .ops 
    writeini stats.ini $chan OP % [ $+ [ $chan ] $+ ] .ops 
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL OP %.all.ops
  } 
}
on *:DEOP:#: {
  if ($nick == $me) { 
    inc %.all.deops
    inc % [ $+ [ $chan ] $+ ] .deops 
    writeini stats.ini $chan DEOP % [ $+ [ $chan ] $+ ] .deops
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL DEOP %.all.deops
  } 
}
on *:VOICE:#: { 
  if ($nick == $me) { 
    inc %.all.vops 
    inc % [ $+ [ $chan ] $+ ] .vops 
    writeini stats.ini $chan VOICE % [ $+ [ $chan ] $+ ] .vops
    writeini stats.ini $chan SIGNAL ON 
    writeini stats.ini ALL VOICE %.all.vops
  }
}
on *:DEVOICE:#: { 
  if ($nick == $me) { 
    inc %.all.devops
    inc % [ $+ [ $chan ] $+ ] .devops 
    writeini stats.ini $chan DEVOICE % [ $+ [ $chan ] $+ ] .devops 
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL DEVOICE %.all.devops
  }
}
on *:HELP:#: {
  if ($nick == $me) { 
    inc %.all.hops
    inc % [ $+ [ $chan ] $+ ] .hops 
    writeini stats.ini $chan HALFOP % [ $+ [ $chan ] $+ ] .hops
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL HALFOP %.all.hops
  }
}
on *:DEHELP:#: {
  if ($nick == $me) { 
    inc %.all.dehops
    inc % [ $+ [ $chan ] $+ ] .dehops 
    writeini stats.ini $chan DEHALFOP % [ $+ [ $chan ] $+ ] .dehops
    writeini stats.ini $chan SIGNAL ON
    writeini stats.ini ALL DEHALFOP %.all.dehops
  }
}
alias statistics {
  clear @statistics
  window -ad @statistics 150 200 700 400
  aline @statistics + Last resetion was at $readini(stats.ini,reset,time) on $readini(stats.ini,reset,date)
  aline @statistics $chr(160)
  if ((!$2) && ($regex($1,/op|deop|halfop|dehalfop|voice|devoice|ban|kick/i))) {
    aline @statistics + ERROR + Please specify channel name + Syntax: /statistics STAT CHANNEL
    aline @statistics + ERROR + *** STAT: OP DEOP HALFOP DEHALFOP VOICE DEVOICE BAN KICK
    halt
  }
  if ($1 == op) {
    if (!$readini(stats.ini,$2,op)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + OP STATS for channel $2 $+ : $readini(stats.ini,$2,op)  }
    halt
  }
  if ($1 == deop) {
    if (!$readini(stats.ini,$2,deop)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + DEOP STATS for channel $2 $+ : $readini(stats.ini,$2,deop)  }
    halt
  }
  if ($1 == halfop) {
    if (!$readini(stats.ini,$2,halfop)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + HALFOP STATS for channel $2 $+ : $readini(stats.ini,$2,halfop)  }
    halt
  }
  if ($1 == dehalfop) {
    if (!$readini(stats.ini,$2,dehalfop)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + DEHALFOP STATS for channel $2 $+ : $readini(stats.ini,$2,dehalfop)  }
    halt
  }
  if ($1 == voice) {
    if (!$readini(stats.ini,$2,voice)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + VOICE STATS for channel $2 $+ : $readini(stats.ini,$2,voice)  }
    halt
  }
  if ($1 == devoice) {
    if (!$readini(stats.ini,$2,devoice)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + DEVOICE STATS for channel $2 $+ : $readini(stats.ini,$2,devoice)  }
    halt
  }
  if ($1 == ban) {
    if (!$readini(stats.ini,$2,ban)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + BAN STATS for channel $2 $+ : $readini(stats.ini,$2,ban)  }
    halt
  }
  if ($1 == kick) {
    if (!$readini(stats.ini,$2,kick)) { aline @statistics + No STATS founded for channel $2 in memory. }
    else { aline @statistics + KICK STATS for channel $2 $+ : $readini(stats.ini,$2,kick)  }
    halt
  }
  if ($1 == all) {
    if (!$regex($2,/op|deop|halfop|dehalfop|voice|devoice|ban|kick|any/i)) { aline @statistics + ERROR + Command syntax: /statistics ALL OP|DEOP|HALFOP|DEHALFOP|VOICE|DEVOICE|BAN|KICK|ANY }
    if (!$2) { aline @statistics + ERROR + Please specify parameters + Syntax: /statistics ALL OP|DEOP|HALFOP|DEHALFOP|VOICE|DEVOICE|BAN|KICK|ANY }
    if ($2 == op) { aline @statistics + ALL OP STATS + Oped Users: $iif(!$readini(stats.ini,all,op),0) $readini(stats.ini,all,op) }
    if ($2 == deop) { aline @statistics + ALL DEOP STATS + DeOped Users: $iif(!$readini(stats.ini,all,deop),0) $readini(stats.ini,all,deop) }
    if ($2 == halfop) { aline @statistics + ALL HALFOP STATS + Halfoped Users: $iif(!$readini(stats.ini,all,halfop),0) $readini(stats.ini,all,halfop) }
    if ($2 == dehalfop) { aline @statistics + ALL DEHALFOP STATS + Dehalfoped Users: $iif(!$readini(stats.ini,all,dehalfop),0) $readini(stats.ini,all,dehalfop) }
    if ($2 == voice) { aline @statistics + ALL VOICE STATS + Voiced Users: $iif(!$readini(stats.ini,all,voice),0) $readini(stats.ini,all,voice) }
    if ($2 == devoice) { aline @statistics + ALL DEVOICE STATS + Devoiced Users: $iif(!$readini(stats.ini,all,devoice),0) $readini(stats.ini,all,devoice) }
    if ($2 == ban) { aline @statistics + ALL BAN STATS + Banned Users: $iif(!$readini(stats.ini,all,ban),0) $readini(stats.ini,all,ban) }
    if ($2 == kick) { aline @statistics + ALL KICK STATS + Kicked Users: $iif(!$readini(stats.ini,all,kick),0) $readini(stats.ini,all,kick) }
    if ($2 == any) {
      aline @statistics + ALL STATS counted from $readini(stats.ini,reset,time) on $readini(stats.ini,reset,date)
      aline @statistics $chr(160)
      aline @statistics + ALL OP STATS + Oped Users: $iif(!$readini(stats.ini,all,op),0) $readini(stats.ini,all,op)
      aline @statistics + ALL DEOP STATS + DeOped Users: $iif(!$readini(stats.ini,all,deop),0) $readini(stats.ini,all,deop)
      aline @statistics + ALL HALFOP STATS + Halfoped Users: $iif(!$readini(stats.ini,all,halfop),0) $readini(stats.ini,all,halfop)
      aline @statistics + ALL DEHALFOP STATS + Dehalfoped Users: $iif(!$readini(stats.ini,all,dehalfop),0) $readini(stats.ini,all,dehalfop)
      aline @statistics + ALL VOICE STATS + Voiced Users: $iif(!$readini(stats.ini,all,voice),0) $readini(stats.ini,all,voice)
      aline @statistics + ALL DEVOICE STATS + Devoiced Users: $iif(!$readini(stats.ini,all,devoice),0) $readini(stats.ini,all,devoice)
      aline @statistics + ALL BAN STATS + Banned Users: $iif(!$readini(stats.ini,all,ban),0) $readini(stats.ini,all,ban)
      aline @statistics + ALL KICK STATS + Kicked Users: $iif(!$readini(stats.ini,all,kick),0) $readini(stats.ini,all,kick)
    }
    halt
  }
  if ($1 == list) {
    if (!$2) { aline @statistics + ERROR + Please specify channel name + Syntax: /statistics LIST CHANNEL }
    else {
      if (!$readini(stats.ini,$2,signal)) { aline @statistics + ERROR + No STATS founded for channel $2 in memory. }
      else {
        aline @statistics + Listing Stats for channel $2
        aline @statistics $chr(160)
        aline @statistics + OP + $iif(!$readini(stats.ini,$2,op),0) $readini(stats.ini,$2,op)
        aline @statistics + DEOP + $iif(!$readini(stats.ini,$2,deop),0) $readini(stats.ini,$2,deop)
        aline @statistics + HALFOP + $iif(!$readini(stats.ini,$2,halfop),0) $readini(stats.ini,$2,halfop)
        aline @statistics + DEHALFOP + $iif(!$readini(stats.ini,$2,dehalfop),0) $readini(stats.ini,$2,dehalfop)
        aline @statistics + VOICE + $iif(!$readini(stats.ini,$2,voice),0) $readini(stats.ini,$2,voice)
        aline @statistics + DEVOICE + $iif(!$readini(stats.ini,$2,devoice),0) $readini(stats.ini,$2,devoice)
        aline @statistics + BAN + $iif(!$readini(stats.ini,$2,ban),0) $readini(stats.ini,$2,ban)
        aline @statistics + KICK + $iif(!$readini(stats.ini,$2,kick),0) $readini(stats.ini,$2,kick)
        aline @statistics $chr(160)
      }
    }
    halt
  }
  if ($1 == help) { 
    aline @statistics + HELP + Listing stats for channel /statistics OP|DEOP|HALFOP|DEHALFOP|VOICE|DEVOICE|BAN|KICK CHANNEL 
    aline @statistics + HELP + Listing all stats for all channels /statistics ALL OP|DEOP|HALFOP|DEHALFOP|VOICE|DEVOICE|BAN|KICK
    aline @statistics + HELP + Listing all stats for channel /statistics LIST CHANNEL
    aline @statistics + HELP + This help info /statistics HELP
    aline @statistics + HELP + Reseting counting info /statistics RESET NOW|VIEW
    halt
  }
  if ($1 == reset) {
    if ($2 == now) { 
      removeini stats.ini
      writeini stats.ini RESET Time $time 
      writeini stats.ini RESET Date $date
      aline @statistics + All info has been deleted. + New Counting time starts from $time $+ , $date
      halt
    }
    if ($2 == view) {
      aline @statistics + All info has been deleted. + New Counting time starts from $time $+ , $date
      halt
    }
    if (!$2) {
      aline @statistics + ERROR + Syntax: /statistics RESET NOW|VIEW
      halt
    }
    if (!$regex($2,/now|view/i)) {
      aline @statistics + ERROR + Syntax: /statistics RESET NOW|VIEW
      halt
    }
  }
  if (!$1) { 
    aline @statistics + HELP + Listing stats for channel /statistics OP|DEOP|HALFOP|DEHALFOP|VOICE|DEVOICE|BAN|KICK CHANNEL 
    aline @statistics + HELP + Listing all stats for all channels /statistics ALL OP|DEOP|HALFOP|DEHALFOP|VOICE|DEVOICE|BAN|KICK
    aline @statistics + HELP + Listing all stats for channel /statistics LIST CHANNEL
    aline @statistics + HELP + This help info /statistics HELP
    aline @statistics + HELP + Reseting counting info /statistics RESET NOW|VIEW
    halt
  }
  if ((!$2) && (!$regex($1,/op|deop|halfop|dehalfop|voice|devoice|ban|kick/i))) {
    aline @statistics + ERROR + Unknown command syntax: $1
    aline @statistics + ERROR + Please type /statistics HELP for more info.
    halt
  }
}

Comments

(3) RSS

Go to Bottom

Selfish

Comments: 9

mIRC Snippet: Stats script, Op, deop etc.
Posted on Jan 16, 2008 6:41 am

I don't really want to copy and paste the script to find out what it does, why can't you just say here?

mountaindew

Comments: 1,645

mIRC Snippet: Stats script, Op, deop etc.
Posted on Jan 16, 2008 1:57 pm

keeps track of channel statistics

[DX]

Comments: 20

mIRC Snippet: Stats script, Op, deop etc.
Posted on Jan 18, 2008 8:55 pm

Tracks your ops, deops, halfops, halfdeops, voices, devoices, bans, kicks giving for one channel and for all channels

Stats script, Op, deop etc.

Introduction

Grab the Code

Comments

[DX]

My Snippet Tags

Contact

Friends (1)

Sponsors


Last seen: Oct 09, 2008 Profile Friends (1) Snippets (11) Images (1) Comments Received (28) Comments Submitted (20) Forum Posts (509)