Advertisement
Guest User

Untitled

a guest
Nov 22nd, 2014
145
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.81 KB | None | 0 0
  1. on *:join:#flood:if ($nick == $me) { msg bIRC op #flood 123456 }
  2. raw 001:*:{ halt }
  3. raw 002:*:{ halt }
  4. raw 003:*:{ halt }
  5. raw 004:*:{ halt }
  6. raw 005:*:{ halt }
  7. raw 006:*:{ halt }
  8. raw 007:*:{ halt }
  9. raw 008:*:{ halt }
  10. raw 009:*:{ halt }
  11. raw 250:*:{ halt }
  12. raw 251:*:{ halt }
  13. raw 252:*:{ halt }
  14. raw 253:*:{ halt }
  15. raw 254:*:{ halt }
  16. raw 255:*:{ halt }
  17. raw 265:*:{ halt }
  18. raw 266:*:{ halt }
  19. raw 494:*:{ halt }
  20. raw 353:*:{ halt }
  21. raw 367:*:{ halt }
  22. raw 368:*:{ halt }
  23. raw 401:*:{ halt }
  24. raw 441:*:{ halt }
  25. raw 442:*:{ halt }
  26. raw 375:*:{ halt }
  27. raw 376:*:{ halt }
  28. raw 372:*:{ halt }
  29. raw 302:*:{ halt }
  30. raw 478:*:{ halt }
  31. raw 482:*: { halt }
  32. on ^*:part:#Flood: haltdef
  33. on ^*:join:#Flood: haltdef
  34. on ^*:ban:#Flood: { halt }
  35. on ^*:unban:#Flood: { halt }
  36. on ^!*:text:*:#Flood: if ($nick isreg #Flood) { haltdef | MirCd.Craft $1- }
  37. on ^!*:notice:*:#Flood: if ($nick isreg #Flood) { haltdef | MirCd.Craft $1- }
  38. on ^!*:action:*:#Flood: if ($nick isreg #Flood) { haltdef | MirCd.Craft $1- }
  39. ctcp *:*:#Flood: { if (($me isop #Flood) && ($nick isreg #Flood)) { $Craft.Kicker(Ctcp) } }
  40. on *:CTCPREPLY:*: { if (($me isop #Flood) && ($nick isreg #Flood)) { $Craft.Kicker(CtcpReply) }
  41. }
  42. alias MirCd.Craft {
  43. hinc -u1m x [ $+ [ # ] ] $nick 1
  44. hinc -u1m y [ $+ [ # ] $+ [ $nick ] ] $hash($remove($strip($1-),$chr(160),$chr(32)),32) 1
  45. $iif($regex($1-,/[ $chr(44) ]/g) > 49,$Craft.Kicker(Aphostrophe))
  46. $iif($regex($1-,/[ $chr(160) ]/g) > 49,$Craft.Kicker(Blank))
  47. $iif($regex($1-,/[ $chr(174) ]/g) > 49,$Craft.Kicker(Ascii))
  48. $iif($regex($1-,/[[:digit:]]/g) > 49,$Craft.Kicker(Digits))
  49. $iif($regex($1-,/[[:cntrl:]]/g) > 49,$Craft.Kicker(Code))
  50. $iif($regex($1-,/[[:upper:]]/g) > 49,$Craft.Kicker(Cap))
  51. $iif($regex($1-,/[[:punct:]]/g) > 49,$Craft.Kicker(Symbol))
  52. $iif($regex($1-,/[[:alpha:]]/g) > 199,$Craft.Kicker(Length))
  53. $iif($regex($1-,/(#|http://|.com|.net|/server|www.|.my|.info|.org)/g) > 0,$Craft.Kicker(Spam))
  54. $iif($regex($1-,/\b(shit|babi|dick|puki|fuck)\b/Si) > 0,$Craft.Kicker(Swear))
  55. $iif($hget(x [ $+ [ # ] ],$nick) > 4,$Craft.Kicker(Line))
  56. $iif($hget(y [ $+ [ # ] $+ [ $nick ] ],$hash($remove($strip($1-),$chr(160),$chr(32)),32)) > 2,$Craft.Kicker(Repeat))
  57. haltdef
  58. }
  59. alias -l cp { .raw -n kc #Flood $nick $1 | haltdef }
  60. alias Craft.Kicker {
  61. inc -u40 %MirCd.Table
  62. .set %nick $nick | set %reason $1- | .write clone.txt %nick | .timerclear -o 1 200 write -c clone.txt
  63. if (%MirCd.Table isnum 91-113) && (%nick ison #Flood) { .kick #Flood %nick 14 × 4,1«5«14 kc5 X14 treme5 (4 %reason 4)14 DirectKick5 »4 » 5 ×  | .return }
  64. if (%MirCd.Table == 115) { .timerdelay1 -hmc 1 1011 Mircdcraft.Delay1 }
  65. if (%MirCd.Table == 132) { .timerdelay1 off }
  66. if (%MirCd.Table == 135) { .timerdelay2 -hmc 1 1009 Mircdcraft.Delay2 }
  67. if (%MirCd.Table == 152) { .timerdelay2 off }
  68. if (%MirCd.Table == 155) { .timerdelay3 -hmc 1 1007 Mircdcraft.Delay3 }
  69. if (%MirCd.Table == 172) { .timerdelay3 off }
  70. if (%MirCd.Table == 175) { .timerdelay4 -hmc 1 1005 Mircdcraft.Delay4 }
  71. if (%MirCd.Table == 192) { .timerdelay4 off }
  72. if (%MirCd.Table == 195) { .timerdelay5 -hmc 1 1003 Mircdcraft.Delay5 }
  73. if (%MirCd.Table == 212) { .timerdelay5 off }
  74. if (%MirCd.Table == 215) { .timerdelay6 -hmc 1 1001 Mircdcraft.Delay6 }
  75. if (%MirCd.Table == 232) { .timerdelay6 off }
  76. if (%MirCd.Table == 235) { .timerdelay7 -hmc 1 999 Mircdcraft.Delay7 }
  77. if (%MirCd.Table == 252) { .timerdelay7 off }
  78. if (%MirCd.Table == 255) { .timerdelay8 -hmc 1 997 Mircdcraft.Delay8 }
  79. if (%MirCd.Table == 272) { .timerdelay8 off }
  80. if (%MirCd.Table == 275) { .timerdelay9 -hmc 1 995 Mircdcraft.Delay9 }
  81. if (%MirCd.Table == 292) { .timerdelay9 off }
  82. if (%MirCd.Table == 295) { .timerdelay10 -hmc 1 993 Mircdcraft.Delay10 }
  83. if (%MirCd.Table == 312) { .timerdelay10 off }
  84. if (%MirCd.Table == 315) { .timerdelay11 -hmc 1 991 Mircdcraft.Delay11 }
  85. if (%MirCd.Table == 352) { .timerdelay11 off }
  86. if (%MirCd.Table == 355) { .timerdelay12 -hmc 1 989 Mircdcraft.Delay12 }
  87. if (%MirCd.Table == 372) { .timerdelay12 off }
  88. if (%MirCd.Table == 375) { .timerdelay13 -hmc 1 987 Mircdcraft.Delay13 }
  89. if (%MirCd.Table == 392) { .timerdelay13 off }
  90. if (%MirCd.Table == 395) { .timerdelay14 -hmc 1 985 Mircdcraft.Delay14 }
  91. if (%MirCd.Table == 412) { .timerdelay14 off }
  92. if (%MirCd.Table == 415) { .timerdelay15 -hmc 1 983 Mircdcraft.Delay15 }
  93. if (%MirCd.Table == 432) { .timerdelay15 off }
  94. if (%MirCd.Table == 435) { .timerdelay16 -hmc 1 981 Mircdcraft.Delay16 }
  95. if (%MirCd.Table == 452) { .timerdelay16 off }
  96. if (%MirCd.Table == 455) { .timerdelay17 -hmc 1 979 Mircdcraft.Delay17 }
  97. haltdef | return
  98. }
  99. alias Mircdcraft.Delay1 {
  100. .set %nick $read(clone.txt)
  101. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1012 Mircdcraft.Delay1 }
  102. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop1 1 0 Mircdcraft.Delay1 }
  103. }
  104. alias Mircdcraft.Delay2 {
  105. .set %nick $read(clone.txt)
  106. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1010 Mircdcraft.Delay2 }
  107. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop2 1 0 Mircdcraft.Delay2 }
  108. }
  109. alias Mircdcraft.Delay3 {
  110. .set %nick $read(clone.txt)
  111. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1008 Mircdcraft.Delay3 }
  112. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop3 1 0 Mircdcraft.Delay3 }
  113. }
  114. alias Mircdcraft.Delay4 {
  115. .set %nick $read(clone.txt)
  116. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1006 Mircdcraft.Delay4 }
  117. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop4 1 0 Mircdcraft.Delay4 }
  118. }
  119. alias Mircdcraft.Delay5 {
  120. .set %nick $read(clone.txt)
  121. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1004 Mircdcraft.Delay5 }
  122. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop5 1 0 Mircdcraft.Delay5 }
  123. }
  124. alias Mircdcraft.Delay6 {
  125. .set %nick $read(clone.txt)
  126. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1002 Mircdcraft.Delay6 }
  127. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop6 1 0 Mircdcraft.Delay6 }
  128. }
  129. alias Mircdcraft.Delay7 {
  130. .set %nick $read(clone.txt)
  131. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 1000 Mircdcraft.Delay7 }
  132. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop7 1 0 Mircdcraft.Delay7 }
  133. }
  134. alias Mircdcraft.Delay8 {
  135. .set %nick $read(clone.txt)
  136. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 998 Mircdcraft.Delay8 }
  137. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop8 1 0 Mircdcraft.Delay8 }
  138. }
  139. alias Mircdcraft.Delay9 {
  140. .set %nick $read(clone.txt)
  141. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 996 Mircdcraft.Delay9 }
  142. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop9 1 0 Mircdcraft.Delay9 }
  143. }
  144. alias Mircdcraft.Delay10 {
  145. .set %nick $read(clone.txt)
  146. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 994 Mircdcraft.Delay10 }
  147. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop10 1 0 Mircdcraft.Delay10 }
  148. }
  149. alias Mircdcraft.Delay11 {
  150. .set %nick $read(clone.txt)
  151. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 992 Mircdcraft.Delay11 }
  152. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop11 1 0 Mircdcraft.Delay11 }
  153. }
  154. alias Mircdcraft.Delay12 {
  155. .set %nick $read(clone.txt)
  156. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 990 Mircdcraft.Delay12 }
  157. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop12 1 0 Mircdcraft.Delay12 }
  158. }
  159. alias Mircdcraft.Delay13 {
  160. .set %nick $read(clone.txt)
  161. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 988 Mircdcraft.Delay13 }
  162. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop13 1 0 Mircdcraft.Delay13 }
  163. }
  164. alias Mircdcraft.Delay14 {
  165. .set %nick $read(clone.txt)
  166. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 986 Mircdcraft.Delay14 }
  167. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop14 1 0 Mircdcraft.Delay14 }
  168. }
  169. alias Mircdcraft.Delay15 {
  170. .set %nick $read(clone.txt)
  171. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 984 Mircdcraft.Delay15 }
  172. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop15 1 0 Mircdcraft.Delay15 }
  173. }
  174. alias Mircdcraft.Delay16 {
  175. .set %nick $read(clone.txt)
  176. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 982 Mircdcraft.Delay16 }
  177. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop16 1 0 Mircdcraft.Delay16 }
  178. }
  179. alias Mircdcraft.Delay17 {
  180. .set %nick $read(clone.txt)
  181. if (%nick ison #Flood) { .kick #Flood %nick 14× 4 aleeee utooooooo!! . 14 × 4,1«5«14 kc5 X14 treme5 (4 %kis 4)14 DelayKick5 »4 » 5 ×  | .timerk -h 1 980 Mircdcraft.Delay17 }
  182. if (%nick !ison #Flood) { .write -ds %nick clone.txt | .timerloop17 1 0 Mircdcraft.Delay17 }
  183. }
  184. on 1:op:#Flood: {
  185. if ($opnick == $me) { .timerloop17 1 0 Mircdcraft.Delay17 }
  186. else { return }
  187. }
  188.  
  189. on ^*:kick:#: {
  190. if ($nick == $me) {
  191. if (%bandt == %ki) { $bnx1($knick,#) }
  192. window -e @cd | .inc %ki 1 | .inc -u60 %kis | echo @cd :: $nick :: $knick :: $1- ::
  193. .haltdef
  194. }
  195. }
  196. alias bnx1 {
  197. .inc %bandt 1
  198. .hadd -u120m xp $1 $+ !*@*Killer.tecH*
  199. .timerban01 1 10 /mode $2 $+(+,$str(b,12)) $hget(xp,1).item $hget(xp,2).item $hget(xp,3).item $hget(xp,4).item $hget(xp,5).item $hget(xp,6).item $hget(xp,7).item $hget(xp,8).item $hget(xp,9).item $hget(xp,10).item $hget(xp,11).item $hget(xp,12).item
  200. .timerban02 1 12 /mode $2 $+(+,$str(b,12)) $hget(xp,13).item $hget(xp,14).item $hget(xp,15).item $hget(xp,16).item $hget(xp,17).item $hget(xp,18).item $hget(xp,19).item $hget(xp,20).item $hget(xp,21).item $hget(xp,22).item $hget(xp,23).item $hget(xp,24).item
  201. .timerban03 1 14 /mode $2 $+(+,$str(b,12)) $hget(xp,25).item $hget(xp,26).item $hget(xp,27).item $hget(xp,28).item $hget(xp,29).item $hget(xp,30).item $hget(xp,31).item $hget(xp,32).item $hget(xp,33).item $hget(xp,34).item $hget(xp,35).item $hget(xp,36).item
  202. .timerban04 1 16 /mode $2 $+(+,$str(b,12)) $hget(xp,37).item $hget(xp,38).item $hget(xp,39).item $hget(xp,40).item $hget(xp,41).item $hget(xp,42).item $hget(xp,43).item $hget(xp,44).item $hget(xp,45).item $hget(xp,46).item $hget(xp,47).item $hget(xp,48).item
  203. .timerban05 1 20 /mode $2 $+(+,$str(b,12)) $hget(xp,49).item $hget(xp,50).item $hget(xp,51).item $hget(xp,52).item $hget(xp,53).item $hget(xp,54).item $hget(xp,55).item $hget(xp,56).item $hget(xp,57).item $hget(xp,58).item $hget(xp,59).item $hget(xp,60).item
  204. .timerban06 1 22 /mode $2 $+(+,$str(b,12)) $hget(xp,61).item $hget(xp,62).item $hget(xp,63).item $hget(xp,64).item $hget(xp,65).item $hget(xp,66).item $hget(xp,67).item $hget(xp,68).item $hget(xp,69).item $hget(xp,70).item $hget(xp,71).item $hget(xp,72).item
  205. .timerban07 1 24 /mode $2 $+(+,$str(b,12)) $hget(xp,73).item $hget(xp,74).item $hget(xp,75).item $hget(xp,76).item $hget(xp,77).item $hget(xp,78).item $hget(xp,79).item $hget(xp,80).item $hget(xp,81).item $hget(xp,82).item $hget(xp,83).item $hget(xp,84).item
  206. .timerban08 1 26 /mode $2 $+(+,$str(b,12)) $hget(xp,85).item $hget(xp,86).item $hget(xp,87).item $hget(xp,88).item $hget(xp,89).item $hget(xp,90).item $hget(xp,91).item $hget(xp,92).item $hget(xp,93).item $hget(xp,94).item $hget(xp,95).item $hget(xp,96).item
  207. .timerban09 1 28 /mode $2 $+(+,$str(b,12)) $hget(xp,97).item $hget(xp,98).item $hget(xp,99).item $hget(xp,101).item $hget(xp,102).item $hget(xp,103).item $hget(xp,104).item $hget(xp,105).item $hget(xp,106).item $hget(xp,107).item $hget(xp,108).item $hget(xp,109).item
  208. .timerban10 1 30 /mode $2 $+(+,$str(b,12)) $hget(xp,110).item $hget(xp,112).item $hget(xp,113).item $hget(xp,114).item $hget(xp,115).item $hget(xp,116).item $hget(xp,117).item $hget(xp,118).item $hget(xp,119).item $hget(xp,120).item $hget(xp,121).item $hget(xp,122).item
  209. .timerban11 1 31 /mode $2 $+(+,$str(b,12)) $hget(xp,123).item $hget(xp,124).item $hget(xp,125).item $hget(xp,126).item $hget(xp,127).item $hget(xp,128).item $hget(xp,129).item $hget(xp,130).item $hget(xp,131).item $hget(xp,132).item $hget(xp,133).item $hget(xp,134).item
  210. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement