Advertisement
Guest User

Untitled

a guest
Jul 26th, 2017
86
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.05 KB | None | 0 0
  1. on me:*:quit:savehsh
  2. on me:*:part:#:savehsh
  3. on *:exit:savehsh
  4. on *:disconnect:savehsh
  5. alias -l savehsh {
  6. hsave offense offense.txt
  7. hsave violators violators.txt
  8. }
  9. alias view {
  10. echo -a * Violator(s) Recorded:
  11. var %x = 1
  12. while (%x <= $hget(violators,0).item) {
  13. echo -a $hget(violators,%x).data
  14. inc %x
  15. }
  16. }
  17. alias viewip {
  18. play $+(-,$iif((#* !iswm $1) || ($1 == $null),e),$iif(#* !iswm $1,$+(t,$1))) $iif(#* iswm $1,$1) ipadd.ini
  19. }
  20. alias addname {
  21. hadd -m offense $$1 $2-
  22. hadd -m violators name $addtok($hget(violators,name),$$1,32)
  23. echo -a * The violator $+(",$1,") has been added successfully!
  24. }
  25. alias addip {
  26. if ($2 == $null) {
  27. echo 4Syntax Error: /addip *!*@IP.ADD Offense/Ban Reason
  28. halt
  29. }
  30. elseif ($2 != $null) {
  31. writeini ipadd.ini $1 IP $1
  32. writeini ipadd.ini $1 Offense $2-
  33. echo 12IP Address " $+ $1 $+ " successfully added to Autoban by IP Add.
  34. halt
  35. }
  36. }
  37. alias delete {
  38. if ($istok($hget(violators,name),$$1,32)) {
  39. hdel offense $1
  40. hadd -m violators name $remtok($hget(violators,name),$1,1,32)
  41. echo -a * The violator $+(",$1,") has been deleted successfully!
  42. }
  43. }
  44. alias delip {
  45. remini ipadd.ini $1
  46. echo 12IP Address " $+ $1 $+ " successfully removed to Autoban.
  47. }
  48. on *:nick: {
  49. if ($gettok($address,1,$asc(@)) === PLDTPlaySS && ($istok($hget(violators,name),$newnick,32) || Guest isincs $nick)) {
  50. whois $newnick
  51. }
  52. else {
  53. somecode $newnick $address
  54. }
  55. }
  56. on *:start: {
  57. if (!$hget(offense)) { hmake offense 200 }
  58. if (!$hget(violators)) { hmake violators 200 }
  59. if ($isfile(offense.txt)) { hload offense offense.txt }
  60. if ($isfile(violators.txt)) { hload violators violators.txt }
  61. }
  62. on *:join:#cstrike: {
  63. if ($me !isvoice #mod && $me !isop #mod && CoolaServ ison #mod) {
  64. ; *** MODIFY Nick and Password BELOW!!! XD *** Zzz_(-.-) ("\(-_-)/") (-.-)_zzZ <- READ!
  65. var %mynick =
  66. var %mypass =
  67. if ($me != %mynick)
  68. nickserv recover
  69. nickserv release
  70. part #mod
  71.  
  72. nick
  73. nickserv identify
  74. timerJoin 1 1 joinchannels $nick $address
  75. }
  76. else {
  77. nickserv identify
  78. msg #mod !voice
  79. chanserv op #cstrike
  80. somecode $nick $address
  81. }
  82. }
  83. else {
  84. somecode $nick $address
  85. }
  86. }
  87. alias -l joinchannels {
  88. join #mod
  89. join #cstrike
  90. somecode $1 $2
  91. }
  92. alias -l somecode {
  93. if ($gettok($2,1,$asc(@)) === PLDTPlaySS && (Guest isincs $1 || $istok($hget(violators,name),$1,32) || $readini(ipadd.ini,$address($1,2),ip))) {
  94. whois $1
  95. }
  96. }
  97. raw 311:*: {
  98. if ($3 === PLDTPlaySS && ($istok($hget(violators,name),$6,32) || $readini(ipadd.ini,$+(*!*@,$4),ip))) {
  99. var %timer = 1
  100. while (%timer <= $timer(0)) {
  101. if ($6 == $timer(%timer)) {
  102. timer $+ $6 1 $timer(%timer).secs whois $2
  103. halt
  104. }
  105. inc %timer
  106. }
  107. timer $+ $6 1 3610 whois $2
  108. msg #mod !ban $6 cs 1 $iif($istok($hget(violators,name),$6,32), $hget(offense,$6), $iif($readini(ipadd.ini,$+(*!*@,$4),ip), $readini(ipadd.ini,$+(*!*@,$4),offense)))
  109. }
  110. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement