home *** CD-ROM | disk | FTP | other *** search
/ PC-X 1997 October / pcx14_9710.iso / shutils / internet / irc / script / glitch.exe / INI / MASS.INI < prev    next >
Encoding:
INI File  |  1997-06-21  |  2.7 KB  |  85 lines
  1. [aliases]
  2. n0=/mkb {
  3. n1=  set %a 1
  4. n2=  :begin
  5. n3=  if (%mass.vars == all) { set %mass $nick(%a,#) | goto start }
  6. n4=  if (%mass.vars == noop) { set %mass $nopnick(%a,#) | goto start }
  7. n5=  if (%mass.vars == op) { set %mass $opnick(%a,#) | goto start }
  8. n6=  :start
  9. n7=  if (%mass == $null) { goto end }
  10. n8=  if (%mass != $me) { ban # %mass 3 | kick # %mass Mass Kick/Ban %glitch }
  11. n9=  inc %a 1
  12. n10=  goto begin
  13. n11=  :end
  14. n12=  unset %mass.vars
  15. n13=}
  16. n14=/massop {
  17. n15=  set %massop.chan #
  18. n16=  set %massop.var 1
  19. n17=  set %massop.flag 1
  20. n18=  :loop
  21. n19=  if ($nick(%massop.chan,%massop.var) == $me) { inc %massop.var | goto loop }
  22. n20=  set %massop.nicks %massop.nicks $nick(%massop.chan,%massop.var)
  23. n21=  if (%massop.flag >= 4) {
  24. n22=    if ($$1 == o) { mode %massop.chan +oooo %massop.nicks }
  25. n23=  if ($$1 == d) { mode %massop.chan -oooo %massop.nicks } }
  26. n24=  if ($nick(%massop.chan,%massop.var) == $null) {
  27. n25=    if ($opnick(%massop.chan,0) <= 3) {
  28. n26=      if ($$1 == o) { mode %massop.chan +oooo %massop.nicks }
  29. n27=    if ($$1 == d) { mode %massop.chan -oooo %massop.nicks } }
  30. n28=  unset %massop.* | halt }
  31. n29=  inc %massop.var
  32. n30=  inc %massop.flag
  33. n31=  goto loop
  34. n32=}
  35. n33=/addkick {
  36. n34=  set %addkick $address($$1,%1st.chan)
  37. n35=  set %b 1
  38. n36=  :begin
  39. n37=  set %nick $nick(%b,%1st.chan)
  40. n38=  set %addkick2 $address(%nick,%1st.chan)
  41. n39=  if (%nick == $me) { inc %b 1 | goto begin }
  42. n40=  if (%nick == $null) { goto end }
  43. n41=  if ($mask(%addkick2,2) == $mask(%addkick,2) ) { kick %1st.chan %nick  $+ %glitch $+  }
  44. n42=  inc %b 1
  45. n43=  goto begin
  46. n44=  :end
  47. n45=  unset %b %nick %1st.chan
  48. n46=}
  49. n47=/filterkick {
  50. n48=  set %fk.add $$1
  51. n49=  set %fk.var 1
  52. n50=  :start
  53. n51=  if ($nick(%fk.var,#) == $me) { inc %fk.var | goto start }
  54. n52=  if (%fk.add iswm $address($nick(#,%fk.var),1)) {
  55. n53=    kick # $nick(#,%fk.var) Filter Kick
  56. n54=  }
  57. n55=  if (%fk.var == $nick(#,0)) { unset %fk* | halt }
  58. n56=  inc %fk.var
  59. n57=  goto start
  60. n58=}
  61. n59=/filterkickban {
  62. n60=  set %fk.add $$1
  63. n61=  set %fk.var 1
  64. n62=  mode # +b $$1
  65. n63=  :start
  66. n64=  if ($nick(%fk.var,#) == $me) { inc %fk.var | goto start }
  67. n65=  if (%fk.add iswm $address($nick(#,%fk.var),1)) {
  68. n66=    kick # $nick(#,%fk.var) Filter Kick
  69. n67=  }
  70. n68=  if (%fk.var == $nick(#,0)) { unset %fk* | halt }
  71. n69=  inc %fk.var
  72. n70=  goto start
  73. n71=}
  74. n72=/minvite {
  75. n73=  check.c
  76. n74=  if (*1 == $null) { echo 12 ½(GLiTCH)╗1 You must enter a channel to invite to | halt }
  77. n75=  set %c 1
  78. n76=  :begin
  79. n77=  set %mass $nopnick(%c,#)
  80. n78=  if (%mass == $null) { echo 12 # ½(GLiTCH)╗1 Completed Mass Invite on # $+ ! | unset %c | halt }
  81. n79=  if (%mass != $me) { .timer 1 %c .invite %mass $$1 }
  82. n80=  inc %c 1
  83. n81=  goto begin
  84. n82=}
  85.