Stats script, Op, deop etc.

By [DX] on Jan 13, 2008

copy/paste to REMOTE

type /statistics help for help :)

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
  }
}

[DX]

Like Page Follow Author

Comments

Sign in to comment.
[DX]   -  Nov 19, 2008

explain a lil bit

 Respond  
edward_cullen   -  Nov 18, 2008

you should make it where it does +v -v +h and so on...

 Respond  
[DX]   -  Jan 18, 2008

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

 Respond  
guest598594   -  Jan 16, 2008

keeps track of channel statistics

 Respond  
Selfish   -  Jan 16, 2008

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

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.