Miscellany

#KCounter on

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

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

#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 "sourceX", 7, 22 54 20 8, disable
  link "http://www.mircteam.com", 8, 5 65 66 8
  text "irc.krstarica.com", 9, 88 54 40 8
  text "#mirc-help, #mircteam", 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 == 6 ) { /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 == 8 ) { /run http://www.mircteam.com }
  if ( $did == 11 ) { /close }
}
menu channel {
  Kick Counter:/kcounter