ChristianEthics-VSIXc V3.1
Updated Sept 2006 to work on VSIXc Chat Network
www.VSIXc.com
_________________________________________________________________________
E-mail: ChristianEthics2@yahoo.ca 
Messenger: ChristianEthics@hotmail.com 
Home page: http://ca.geocities.com/christianethics2
Message Board: http://groups.yahoo.com/group/ChristianEthics_BibleBotDownloadZone/
__________________________________________________________________________

Nick Kick Counter April 23, 2006.
;--partial code posted by warrior124 on techgear forums.
-----------------------------------------------------------------------

;--name files/kickcounterNICK.txt
;--set on global: kickcounter.wa.st 
;--set on room specific: kickcounter.wa.rm
;--set echo: kickcounter.wa.ec 
;--set msg: kickcounter.wa.mg 
;--set off: kickcounter.wa.off 
;-----------------------------------------------------------------------

on *:KICK:#:{ if (%kickcounter.wa.off == On) {
    if (%kickcounter.wa.st == On) {
      if ($knick != $me) {
        if (!$readini(Lists/Kicks.ini,$ial($knick).addr,$ial($knick).addr)) { 
          writeini Lists/Kicks.ini $ial($knick).addr $ial($knick).addr 1
          if (%kickcounter.wa.mg == On) { msg $chan This is the first time $knick has been kicked by me. 
          }
          else { echo $color(kick text) -at [This is the first time $knick has been kicked] 
          }
        }
        elseif ($readini(Lists/Kicks.ini,$ial($knick).addr,$ial($knick).addr)) { 
          set %totalnum. [ $+ [ $knick ] ] $calc($readini(Lists/Kicks.ini,$ial($knick).addr,$ial($knick).addr) + 1) 
          writeini Lists/Kicks.ini $ial($knick).addr $ial($knick).addr %totalnum. [ $+ [ $knick ] ] 
          if (%kickcounter.wa.mg == On) { msg $chan $knick has been kicked %totalnum. [ $+ [ $knick ] ] $+   times
          }
          else { echo $color(kick text) -at [ $+ $knick has been kicked %totalnum. [ $+ [ $knick ] ] $+   times]
          }
        }
      }
    }
    if ($knick != $me) { if (%kickcounter.wa.rm == On) {
        if (!$readini(Lists/Kicks.ini,$ial($knick).addr,$chan)) { 
          writeini Lists/Kicks.ini $ial($knick).addr $chan 1 
          if (%kickcounter.wa.mg == On) { msg $chan This is $knick $+ 's first time recorded kick in this room. 
          }
          else { echo $color(kick text) -at [This is $knick $+ 's first time recorded kick in this room] 
          }

        }
        elseif ($readini(Lists/Kicks.ini,$ial($knick).addr,$chan)) { 
          set %totalnum. [ $+ [ $knick ] ] $calc($readini(Lists/Kicks.ini,$ial($knick).addr,$chan) + 1) 
          writeini Lists/Kicks.ini $ial($knick).addr $chan %totalnum. [ $+ [ $knick ] ] 
          if (%kickcounter.wa.mg == On) { msg $chan $knick has been kicked %totalnum. [ $+ [ $knick ] ] $+   times in this room.
          } 
          else { echo $color(kick text) -at [ $+ $knick has been kicked %totalnum. [ $+ [ $knick ] ] $+   times in this room]
          } 
        }
      }
    }
  }
}
menu * { halt
  -
  Kick Counter
  .Information: /echo $color(info2 text) -at [Nick Kick Counter Information] | echo $color(info text) -at Nick Kick Counter will keep track of the number of times each person has been kicked. | echo $color(info text) -at It will echo the total to you privately, or msg the whole room. | echo $color(info text) -at You can set it to combine kick counts, or calculate the room kicks seperately.
  .-
  .$iif(%kickcounter.wa.st = On, $style(1) On - Global,On - Global):  /set %kickcounter.wa.off On | /set %kickcounter.wa.rm Off | /set %kickcounter.wa.st On | /echo $color(info2 text) -at [Global Nick Kick Counter is now on] | /load -rs files/kickcounterNICK.txt
  .$iif(%kickcounter.wa.rm = On, $style(1) On -  Room Specific,On - Room Specific): /set %kickcounter.wa.off On | /set %kickcounter.wa.st Off | /set %kickcounter.wa.rm On | /echo $color(info2 text) -at [Room Specific Nick Kick Counter is now on] | /load -rs files/kickcounterNICK.txt
  .-
  .$iif(%kickcounter.wa.off = Off, $style(1) Off,Off): /set %kickcounter.wa.off Off | /set %kickcounter.wa.st Off | /set %kickcounter.wa.rm Off | /echo $color(info2 text) -at [Nick Kick Counter is now off]
  .-
  .$iif(%kickcounter.wa.mg = On, $style(1) Notify Room,Notify Room): /set %kickcounter.wa.ec Off | /set %kickcounter.wa.mg On | echo $color(info2 text) -at [Nick Kick Counter will now message the kick total to the whole room.]
  .$iif(%kickcounter.wa.ec = On, $style(1) Echo Self,Echo Self): /set %kickcounter.wa.mg Off | /set %kickcounter.wa.ec On | echo $color(info2 text) -at [Nick Kick Counter will now only echo the kick total to you.]
  ;.-
  ;.$iif(%kickcounter.wa.st = On, $style(1) Global,Global): /set %kickcounter.wa.rm Off | /set %kickcounter.wa.st On |  echo $color(info2 text) -at [Nick Kick Counter will now keep track of kicks on a Global basis.]
  ;.$iif(%kickcounter.wa.rm = On, $style(1) Room Specific,Room Specific): /set %kickcounter.wa.st Off | /set %kickcounter.wa.rm On | echo $color(info2 text) -at [Nick Kick Counter will now keep track of kicks on a Room Specific basis.]
  -
}

on *:LOAD:{ set %kickcounter.wa.off On | set %kickcounter.wa.st $=kc On  | set %kickcounter.wa.rm $=kc Off | set %kickcounter.wa.ec $=kc On | set %kickcounter.wa.mg $=kc Off  
}
on *:UNLOAD:{  set %kickcounter.wa.off Off | set %kickcounter.wa.st $=kc Of  | set %kickcounter.wa.rm $=kc Off | set %kickcounter.wa.ec $=kc Off | set %kickcounter.wa.mg $=kc Off  
}
