Advertisement
Guest User

Untitled

a guest
Jul 26th, 2017
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.73 KB | None | 0 0
  1. alias bangang { server webmaster.webchat.org 7000 | .unset %takut.flood %kena.kick %saya.kick }
  2. alias -l samseng {
  3.   .inc %takut.flood
  4.   if (%takut.flood > 4) { .bangang }
  5. }
  6. on *:start:.hadd -sm i sial $chr(0044)
  7.  
  8. #klien on
  9. on *:connect:.nick apalahkamuni $+ $rand(1,10000)
  10. RAW 221:*: {
  11.   .ns identify animation adik1990
  12.   .quote -q join $hget(ueki,c)
  13.   ;.timer221 -m 1 300 kick $hget(ueki,c) $hget(i,sial) 12ini guna timer
  14.  
  15. }
  16. ;RAW 386:*:.timer386 -m 1 150 quote -q kick $hget(ueki,c) $hget(i,sial) 13ini guna timer
  17. RAW 401:*:.samseng
  18. RAW 482:*:.samseng
  19. ;RAW 376:*:.timer376 -m 1 290 quote -h kick $hget(ueki,c) $hget(i,sial) 8ini guna timer
  20. ;RAW 433:*:.nick uekikacak $+ $r(0,99999)
  21. ;RAW 332:*:.quote -h kick $hget(ueki,c) $hget(i,sial) 7ini raw 332(topik)
  22.  
  23. on $*+*:KICK:#: {
  24.   if ($regex($knick,$me)) {
  25.     .timerhehehe -m 1 188 quote -h kick # $hget(i,sial) 14ini timer dalam on kick
  26.     join #
  27.     hadd -sm ueki c #
  28.     set %limit.ip  $gettok($hget(i,sial),0,44)
  29.     if (%limit.ip < 6) { hadd -sm i sial $addtok($hget(i,sial),$+($mask($fulladdress,4),$chr(0044)),$chr(0044)) }
  30.  
  31.     .$iif((%kena.kick >= 2),.bangang,inc %kena.kick)
  32.   }
  33.   if ($regex($nick,$me)) {
  34.     .timerhuh -m 1 $rand(20,25) kick $hget(ueki,c) $hget(i,sial) 4on kick niii...
  35.     if (%saya.kick >= 4) { .bangang }
  36.     inc %saya.kick
  37.   }
  38. }
  39. on $*+*:JOIN:#: {
  40.   if ($show)  { .quote -q kick $hget(ueki,c) $hget(i,sial)  11ini on join muahh sayang }
  41. }
  42. on *:DEOP:#:$iif($opnick == $me,.cs op # $me)
  43. }
  44. on *:NOTICE:*:*: {
  45. if ($istok(flood heavy load,0,32)) && ($istok(chanserv nickserv,0,32)) { .bangang }
  46. ;if (successfully identified to isin $1-) { .timersamsengx -m 2 90 quote -qh kick $hget(ueki,c) $hget(i,sial) 5ini on notice }
  47. }
  48.  
  49. #klien end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement