Advertisement
SaNCaK

miRC Counters

Feb 9th, 2025
175
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 6.59 KB | None | 0 0
  1. on *:load: {
  2.   echo -a 9>>> 12Counters v1.2 successfully loaded...
  3.   set %counter.joins 0
  4.   set %counter.parts 0
  5.   set %counter.kicks 0
  6.   set %counter.bans 0
  7.   set %counter.ops 0
  8.   set %counter.deops 0
  9.   set %counter.voices 0
  10.   set %counter.devoices 0
  11. }
  12. alias counter { dialog -m counter counter }
  13. dialog counter {
  14.   title "Counters v2.1"
  15.   size -1 -1 156 170
  16.   option dbu
  17.   text "You have seen:", 1, 6 8 39 8
  18.   box "View counters:", 2, 3 0 151 90
  19.   text "You have seen:", 3, 6 18 39 8
  20.   text "You have seen:", 5, 6 28 39 8
  21.   text "You have seen:", 6, 6 38 39 8
  22.   text "You have seen:", 7, 6 48 39 8
  23.   text "You have seen:", 8, 6 58 39 8
  24.   text "You have seen:", 9, 6 68 39 8
  25.   text "You have seen:", 10, 6 78 39 8
  26.   edit "", 12, 47 7 19 10, read center
  27.   edit "", 13, 47 17 19 10, read center
  28.   edit "", 15, 47 27 19 10, read center
  29.   edit "", 16, 47 37 19 10, read center
  30.   edit "", 17, 47 47 19 10, read center
  31.   edit "", 18, 47 57 19 10, read center
  32.   edit "", 19, 47 67 19 10, read center
  33.   edit "", 20, 47 77 19 10, read center
  34.   text "Joins totally", 11, 67 9 30 8
  35.   text "Parts totally", 21, 67 19 31 8
  36.   text "Kicks totally", 23, 67 29 30 8
  37.   text "Bans totally", 24, 67 39 30 8
  38.   text "OPed totally", 25, 67 49 31 8
  39.   text "Deoped totally", 26, 67 59 36 8
  40.   text "Voiced totally", 27, 67 69 34 8
  41.   text "Devoiced totally", 28, 67 79 40 8
  42.   button "Reset Joins", 29, 110 8 41 9
  43.   button "Reset Parts", 30, 110 18 41 9
  44.   button "Reset Kicks", 32, 110 28 41 9
  45.   button "Reset Bans", 33, 110 38 41 9
  46.   button "Reset Oped", 34, 110 48 41 9
  47.   button "Reset Deoped", 35, 110 58 41 9
  48.   button "Reset Voiced", 36, 110 68 41 9
  49.   button "Reset Devoiced", 37, 110 78 41 9
  50.   tab "Options", 38, 3 92 150 65
  51.   box "On/Off:", 40, 9 108 55 22, tab 38
  52.   radio "On", 41, 13 116 22 10, tab 38, push
  53.   radio "Off", 42, 38 116 22 10, tab 38, push
  54.   box "Reset All:", 54, 75 108 69 22, tab 38
  55.   button "Reset All Counters", 55, 79 116 61 10, tab 38
  56.   box "Unload:", 56, 9 131 69 23, tab 38
  57.   button "Unload Counters v2.1", 57, 12 139 62 10, tab 38
  58.   tab "Display", 39
  59.   box "Display in the active channel:", 43, 7 108 143 46, tab 39
  60.   button "Joins", 44, 14 116 28 10, tab 39
  61.   button "Parts", 45, 47 116 28 10, tab 39
  62.   button "Kicks", 47, 81 116 28 10, tab 39
  63.   button "Bans", 48, 14 128 28 10, tab 39
  64.   button "OPed", 49, 47 128 28 10, tab 39
  65.   button "Deoped", 50, 81 128 28 10, tab 39
  66.   button "Voiced", 51, 114 128 28 10, tab 39
  67.   button "Devoiced", 52, 114 116 28 10, tab 39
  68.   button "Display All Counters", 53, 14 140 61 10, tab 39
  69.   button "Close", 58, 129 160 27 10, cancel
  70.   button "Help", 59, 100 160 27 10
  71. }
  72. on *:dialog:counter:init:*: {
  73.   did -a counter 12 %counter.joins
  74.   did -a counter 13 %counter.parts
  75.   did -a counter 15 %counter.kicks
  76.   did -a counter 16 %counter.bans
  77.   did -a counter 17 %counter.ops
  78.   did -a counter 18 %counter.deops
  79.   did -a counter 19 %counter.voices
  80.   did -a counter 20 %counter.devoices
  81.   if (%counter.st == on) { did -c counter 41 }
  82.   elseif (%counter.st == off) { did -c counter 42 }
  83. }
  84. on *:dialog:counter:sclick:*: {
  85.   if ($did == 29) { set %counter.joins 0 | did -ra counter 12 %counter.joins | echo -a 9>>> 12Join Counter has been: Reset }
  86.   if ($did == 30) { set %counter.parts 0 | did -ra counter 13 %counter.parts | echo -a 9>>> 12Part Counter has been: Reset }
  87.   if ($did == 32) { set %counter.kicks 0 | did -ra counter 15 %counter.kicks | echo -a 9>>> 12Kick Counter has been: Reset }
  88.   if ($did == 33) { set %counter.bans 0 | did -ra counter 16 %counter.bans | echo -a 9>>> 12Ban Counter has been: Reset }
  89.   if ($did == 34) { set %counter.ops 0 | did -ra counter 17 %counter.ops | echo -a 9>>> 12OP Counter has been: Reset }
  90.   if ($did == 35) { set %counter.deops 0 | did -ra counter 18 %counter.deops | echo -a 9>>> 12Deop Counter has been: Reset }
  91.   if ($did == 36) { set %counter.voices 0 | did -ra counter 19 %counter.voices | echo -a 9>>> 12Voice Counter has been: Reset }
  92.   if ($did == 37) { set %counter.devoices 0 | did -ra counter 20 %counter.devoices | echo -a 9>>> 12Devoice Counter has been: Reset }
  93.   if ($did == 55) { set %counter.joins 0 | did -ra counter 12 %counter.joins | set %counter.parts 0 | did -ra counter 13 %counter.parts | set %counter.kicks 0 | did -ra counter 15 %counter.kicks |  set %counter.bans 0 | did -ra counter 16 %counter.bans | set %counter.ops 0 | did -ra counter 17 %counter.ops | set %counter.deops 0 | did -ra counter 18 %counter.deops | set %counter.voices 0 | did -ra counter 19 %counter.voices | set %counter.devoices 0 | did -ra counter 20 %counter.devoices | echo -a 9>>> 12All Counters have been: Reset }
  94.   if ($did == 41) { set %counter.st on | echo -a 9>>> 12Counters are now turned: ON }
  95.   if ($did == 42) { set %counter.st off | echo -a 9>>> 12Counters are now turned: OFF }
  96.   if ($did == 44) { msg $active $color I have seen: %counter.joins Joins, since i started counting... }
  97.   if ($did == 45) { msg $active $color I have seen: %counter.parts Parts, since i started counting... }
  98.   if ($did == 47) { msg $active $color I have seen: %counter.kicks Kicks, since i started counting... }
  99.   if ($did == 52) { msg $active $color I have seen: %counter.bans Bans, since i started counting... }
  100.   if ($did == 48) { msg $active $color I have seen: %counter.ops OPs, since i started counting... }
  101.   if ($did == 49) { msg $active $color I have seen: %counter.deops Deops, since i started counting... }
  102.   if ($did == 50) { msg $active $color I have seen: %counter.voices Voices, since i started counting... }
  103.   if ($did == 51) { msg $active $color I have seen: %counter.devoices Devoices, since i started counting... }
  104.   if ($did == 53) { msg $active $color I have seen: %counter.joins Joins, %counter.parts Parts, %counter.kicks Kicks, %counter.bans Bans, %counter.ops OPs, %counter.deops Deops, %counter.voices Voices and %counter.devoices Devoices so far.. }
  105.   if ($did == 57) { unload -rs $scriptdir\counter.mrc }
  106.   if ($did == 59) { counterhelp }
  107. }
  108. on *:join:#: {
  109.   if (%counter.st == on) {
  110.     inc %counter.joins
  111.   }
  112. }
  113. on *:part:#: {
  114.   if (%counter.st == on) {
  115.     inc %counter.parts
  116.   }
  117. }
  118. on *:kick:#: {
  119.   inc %counter.kicks
  120. }
  121.  
  122. on *:ban:#: {
  123.   if (%counter.st == on) {
  124.     inc %counter.bans
  125.   }
  126. }
  127. on *:op:#: {
  128.   if (%counter.st == on) {
  129.     inc %counter.ops
  130.   }
  131. }
  132. on *:deop:#: {
  133.   if (%counter.st == on) {
  134.     inc %counter.deops
  135.   }
  136. }
  137. on *:voice:#: {
  138.   if (%counter.st == on) {
  139.     inc %counter.voices
  140.   }
  141. }
  142. on *:devoice:#: {
  143.   if (%counter.st == on) {
  144.     inc %counter.devoices
  145.   }
  146. }
  147.  
  148. Menu channel,status,menubar {
  149.   Counters:/counter
  150. }
  151.  
Tags: mirc irc Counters
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement