Advertisement
Guest User

Untitled

a guest
Jun 25th, 2017
81
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.84 KB | None | 0 0
  1. on 5:TEXT:*:*: {
  2.  
  3.  
  4. }
  5. var %string = $strip($1-)
  6. .tokenize 32 %string
  7. if ($1 == ~op) {
  8. if ($2 == $null) {
  9. .mode $chan +o $nick
  10. }
  11. else {
  12. .mode $chan +o $2
  13. }
  14. }
  15. if ($1 == ~deop) {
  16. if ($2 == $null) {
  17. .mode $chan -o $nick
  18. }
  19. else {
  20. .mode $chan -o $2
  21. }
  22. }
  23. if ($1 == ~kick) {
  24. if ($2 == $null) {
  25. .msg $chan kick WHO?
  26. }
  27. else {
  28. .kick $chan $2 kicked by $nick $+ : $3-
  29. }
  30. }
  31. if ($1 == ~mode) {
  32. .mode $chan $2-
  33. }
  34. if ($1 == ~kb) {
  35. .mode $chan +b $address($2,4)
  36. .kick $chan $2 $3- (BANNED)
  37. }
  38. if ($1 == ~kickall) {
  39. /kickall $chan
  40. }
  41. if ($1 == ~allowentry) {
  42. .mode $chan -k mafboyz
  43. /msg $chan password removed
  44. }
  45. if ($1 == ~addop) {
  46. if ($2 == $null) {
  47. /msg $nick add WHO to ops?
  48. }
  49. else {
  50. .auser 5 $address($2, 4)
  51. }
  52. }
  53. if ($1 == ~removeop) {
  54. if $level($nick > 90) {
  55. if ($2 == $null) {
  56. /msg $nick remove WHO to ops?
  57. }
  58. else {
  59. .ruser $address($2, 4)
  60. .mode $chan -o $2
  61. }
  62. }
  63. else {
  64. /msg $chan $nick, you aren't part of the official staff... so, yeah... fuck you!
  65. }
  66. }
  67. if ($1 == ~flood) {
  68. if (%floodactive == on) {
  69. set %floodactive off
  70. /msg $chan flood protection DEACTIVATED
  71. }
  72. else {
  73. set %floodactive on
  74. /msg $chan flood protection ACTIVATED
  75. }
  76. }
  77. if ($1 == ~setflood) {
  78. var %acb = $2
  79. .dec %acb
  80. set %floodlines %acb
  81. msg $chan Flood lines now set to $2.
  82. }
  83. if ($1 == ~topic) { /topic $chan $2- }
  84. if ($1 == ~status) {
  85. /bb
  86. var %a = 1
  87. var %b = 1
  88. var %c = KICKALL NAMES:
  89. while ([ % [ $+ [ c [ $+ [ %a ] ] ] ] ] != $null) {
  90. inc %a
  91. }
  92. while (%b < %a) {
  93. if (KICKED isin [ % [ $+ [ c [ $+ [ %b ] ] ] ] ]) {
  94. %c = %c $+ $chr(32) $+ $remove([ % [ $+ [ c [ $+ [ %b ] ] ] ] ], KICKED)
  95. }
  96. inc %b
  97. }
  98. var %fl = %floodlines 8
  99. msg $chan FLOOD PROTECTION: %floodactive AT: %fl lines; %c
  100. }
  101. on *:MODE:*: {
  102. if (G isin $1-) {
  103. .mode $chan -G
  104. }
  105. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement