Someone

#KCounter on

on *:kick:#:if ( $nick == $me ) inc %kicks 1 

alias kick { if ($me isop $1) && ($2 ison $1) { kick $1 $2 $3- 4,1Kick:15 • $+ %kicks $+ •  } } 

#KCounter End 

alias kcounter { dialog -m kcounter kcounter } 
dialog kcounter { 
  title "Kick Counter" 
  size -1 -1 138 73 
  option dbu 
  button "Clear Kicks", 6, 87 33 37 12 
  box "Power", 1, 6 3 50 50 
  button "On", 2, 12 13 37 12 
  button "Off", 3, 12 33 37 12 
  box "Options", 4, 81 3 50 50 
  button "Echo", 5, 87 13 37 12 
  text "FallenQ", 7, 22 54 20 8, 
  text "copyrighted 2006-2010", 8, 5 65 66 8 
  text "irc.swiftirc.net", 9, 88 54 40 8 
  text "#Fallen", 10, 82 64 55 8 
  button "Close", 11, 58 25 21 12, ok 
} 
on 1:DIALOG:kcounter:sclick:*: { 
  if ( $did == 2 ) { /.enable #KCounter | echo -a 4,1K14,1ick 4C14,1ounter 4I14,1s 4N14,1ow 4T14,1urned 4O14,1n } 
  if ( $did == 3 ) { /.disable #KCounter | echo -a 4,1K14,1ick 4C14,1ounter 4I14,1s 4N14,1ow 4T14,1urned 4O14,1ff } 
  if ( $did == 5 ) { /echo -a $chan 4,1I 4,1K14,1icked3 %kicks 4,1T14,1imes 4,1S14,1o 4,1F14,1ar } 
  if ( $did == 3 ) { /clear %kicks |  /echno -a 4,1T14,1he 4,1N14,1umber 4,1O14,1f 4,1K14,1icks 4,1Y14,1ou 4,1H14,1ad, 4,1H14,1as 4,1B14,1een 4,1C14,1leared } 
  if ( $did == 14 ) { /close } 
} 
menu channel { 
  Kick Counter:/kcounter