KCounter on 

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

alias kick { if ($me isop $1) && ($2 ison $1) { kick $1 $2 $3- 14(2 %kicks 14) } } 

#KCounter End 

alias kcounter { dialog -m kcounter kcounter } 
dialog KCounter { 
title "Kick Counter" 
size -1 -1 138 73 
option dbu 
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 
button "Clear Kicks", 6, 87 33 37 12 
text "CaRtOs", 7, 22 54 20 8, disable 
link " [i]", 8, 5 65 66 8 
text "irc.voila.fr", 9, 88 54 40 8 
text "CaRtOs", 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 Kick Counter Is Now Turned On } 
if ( $did == 3 ) { /.disable #KCounter | echo -a Kick Counter Is Now Turned Off } 
if ( $did == 5 ) { /echo -a $chan I Kicked6 %kicks 1Times So Far } 
if ( $did == 6 ) { /clear %kicks | /echno -a The Number Of Kicks You Had, Has Been Cleared } 
if ( $did == 8 ) { /run www.google.fr } 
if ( $did == 11 ) { /close } 
}