/ScriptServ

on *:LOAD:{
  set %menubar.st 0
  set %status.st 0
  set %nicklist.st 0
  set %channel.st 0
  set %query.st 0
  set %times-script-opened 0
  .echo -a [4:: 2m4IRC General Statistics addon loaded 4::]
  .echo -a [4:: Made by 14Q[--_--]D 5(undernet5) 4::]
  .echo -a [4:: For any bug reports you can find me in 4#V-MaX on undernet 4::]
  .echo -a [4:: Thanks, and have fun using it :-) 4::]
}
alias generalstats { if ($dialog(script-stats)) dialog -v script-stats | else dialog -md script-stats script-stats | .did -f script-stats 1 }
dialog script-stats {
  title "General Script Statistics"
  icon genstats/stats.ico
  size -1 -1 254 176
  option pixels
  box "", 1, 5 -1 244 145
  text "Times Script Opened: ------", 2, 10 15 136 17
  edit %times-script-opened, 3, 151 13 50 19, read center
  button "Reset", 4, 202 12 39 22
  edit %menubar.st, 5, 151 34 50 19, read center
  edit %channel.st, 6, 151 55 50 19, read center
  edit %nicklist.st, 7, 151 76 50 19, read center
  edit %query.st, 8, 151 97 50 19, read center
  button "Reset", 9, 202 33 39 22
  button "Reset", 10, 202 54 39 22
  button "Reset", 11, 202 75 39 22
  button "Reset", 12, 202 96 39 22
  text "Times Menubar opened: ---", 13, 10 38 137 17
  text "Times right-clicked in channel", 14, 10 58 141 17
  text "Times right-clicked in nicklist:", 15, 10 79 137 17
  text "Times right-clicked in query: -", 16, 10 99 137 17
  edit %status.st, 17, 151 118 50 20, read center
  button "Reset", 18, 202 117 39 22
  text "Times right-clicked in status:", 19, 10 120 137 17
  box "", 20, 5 142 140 30
  box "", 21, 149 142 100 30
  text "[:::Made by Q[--_--]D:::]", 22, 10 153 130 17, disable center
  button "Close", 23, 154 151 89 20, cancel
}
on *:DIALOG:script-stats:init:*:{
  dll mdx.dll SetMircVersion $version
  dll mdx.dll MarkDialog $dname
  dll mdx.dll SetBorderStyle $dname 23 clientedge
  dll mdx.dll SetColor $dname 3,5,6,7,8,17 text $rgb(128,0,64)
  dll mdx.dll SetColor $dname 2,13,14,15,16,19 text $rgb(0,0,128)
}
on *:DIALOG:script-stats:sclick:*:{
  if ($did == 4) { .set %times-script-opened 0 | .did -r $dname 3 | .did -a $dname 3 0 }
  if ($did == 9) { .set %menubar.st 0 | .did -r $dname 5 | .did -a $dname 5 0 }
  if ($did == 10) { .set %channel.st 0 | .did -r $dname 6 | .did -a $dname 6 0 }
  if ($did == 11) { .set %nicklist.st 0 | .did -r $dname 7 | .did -a $dname 7 0 }
  if ($did == 12) { .set %query.st 0 | .did -r $dname 8 | .did -a $dname 8 0 }
  if ($did == 18) { .set %status.st 0 | .did -r $dname 17 | .did -a $dname 17 0 }
}
alias menubar-> {
  inc %menubar.st 1
}
alias status-> {
  inc %status.st 1
}
alias nicklist-> {
  inc %nicklist.st 1
}
alias channel-> {
  inc %channel.st 1
}
alias query-> {
  inc %query.st 1
}
menu menubar {
  $menubar->
}
menu nicklist {
  $nicklist->
}
menu query {
  $query->
}
menu channel {
  $channel->
}
menu status {
  $status->
}
on *:START:{ inc %times-script-opened 1 }

menu * {
-
General Stats:/generalstats
-
}