Lencana Facebook

12 Feb 2011

personal protection

on *:BAN:#:{
  if ($banmask iswm $address($me,0)) goto unban
  if ($banmask iswm $address($me,1)) goto unban
  if ($banmask iswm $address($me,2)) goto unban
  if ($banmask iswm $address($me,3)) goto unban
  if ($banmask iswm $address($me,4)) goto unban
  if ($banmask iswm $address($me,5)) goto unban
  if ($banmask iswm $address($me,6)) goto unban
  if ($banmask iswm $address($me,7)) goto unban
  if ($banmask iswm $address($me,8)) goto unban
  if ($banmask iswm $address($me,9)) goto unban
  goto end
  :unban
  set %dick $nick
  cs unban $chan $banmask
  mode $chan -o-b+b %dick $banmask %dick
  kick $chan %dick Auto-Ban Protection & Revenge Triggered.
  mode $chan +b $address(%dick,4)
  goto cou
  :cou
  cs unban $me
  cs invite $chan $me
  join $chan
  goto end
  :end
}
on *:DEOP:#: {
  if ($nick = $me) halt
  if ($opnick == $me && $nick != $me) cs op $chan $me
}
on *:KICK:#:{
  if ($knick == $me) goto rejoin
  halt
  :rejoin
  cs unban $chan $me
  cs invite $chan $me
  join $chan
}
 
 
 
 
heheheheheheh sedot le ga apa apa kok 

8 Feb 2011

remote utk text besoooo

menu channel {
  .bigtext
  ...Say:set %ftaction | bigcolor $??*="Text:"
}
alias bigcolor {
  unset %big.*
  if ($1 = ^^@) {
    set %ba.2 yes
    set %ba.1 $2-
    goto start
  }
  set %ba.1 $1-
  set %ba.2 no
  :start
  :nextba
  if (($left(%ba.1,1) = $null) || ($left(%ba.1,1) = $chr(32))) {
    if ($len(%ba.1) <= 1) {
      if (%ba.2 = yes) {
        goto opers
      }
      goto say
    }
    set %big.1 %big.1 0,1 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0 0 0 0
    set %big.3 %big.3 0,1 0 0 0 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = a) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = b) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = c) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = d) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = e) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = f) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = g) {
    set %big.1 %big.1 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = h) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = i) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = J) {
    set %big.1 %big.1 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = k) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0 0 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = l) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = m) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = n) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = o) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = p) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = q) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = r) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0,1 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = s) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = t) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %big.3 %big.3 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %big.4 %big.4 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %big.5 %big.5 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = u) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = v) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.4 %big.4 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = w) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0 0 0 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.4 %big.4 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = x) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.3 %big.3 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = y) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.3 %big.3 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %big.5 %big.5 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = z) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0 0,1 0
    set %big.2 %big.2 0,1 0 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.3 %big.3 0,1 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0
    set %big.4 %big.4 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = -) {
    set %big.1 %big.1 0,1 0 0 0 0 0 0 0 0
    set %big.2 %big.2 0,1 0 0 0 0 0 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0 0 0,1 0
    set %big.4 %big.4 0,1 0 0 0 0 0 0 0 0
    set %big.5 %big.5 0,1 0 0 0 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = ?) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0 0,1 0 0
    set %big.2 %big.2 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0 0 0
    set %big.5 %big.5 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = !) {
    set %big.1 %big.1 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0 0,1 0
    set %big.3 %big.3 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %big.4 %big.4 0,1 0 0 0 0 0
    set %big.5 %big.5 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = ') {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 0,1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0,1 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = :) {
    set %big.1 %big.1 0,1 0 0 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 0,1 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = $chr(41)) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0
    set %big.2 %big.2 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0,1 0
    set %big.3 %big.3 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0,1 0
    set %big.4 %big.4 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = $chr(124)) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = <) {
    set %big.1 %big.1 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.2 %big.2 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.3 %big.3 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.4 %big.4 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.5 %big.5 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = >) {
    set %big.1 %big.1 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %big.2 %big.2 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %big.4 %big.4 0,1 0 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0 0 0 0 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  if ($left(%ba.1,1) = .) {
    set %big.1 %big.1 0,1 0 0 0
    set %big.2 %big.2 0,1 0 0 0
    set %big.3 %big.3 0,1 0 0 0
    set %big.4 %big.4 0,1 0 0 0
    set %big.5 %big.5 $+ $rand(4,15) $+ , $+ $rand(4,15) 0 0,1 0
    set %ba.1 $mid(%ba.1,2,5000)
    goto nextba
  }
  set %ba.1 $mid(%ba.1,2,5000)
  goto nextba
  :opers
  notice @ $+ $chan %big.1
  notice @ $+ $chan %big.2
  notice @ $+ $chan %big.3
  notice @ $+ $chan %big.4
  notice @ $+ $chan %big.5
  goto end
  :say
  %ftaction say %big.1
  %ftaction say %big.2
  %ftaction say %big.3
  %ftaction say %big.4
  %ftaction say %big.5
  :end
  .unset %ftaction
  .unset %ba.*
  .unset %big.*
}

7 Feb 2011

remote reveng yg gitu2 ja


on *:kick:#: { if ($knick == $me) { .set %knick $nick | .auser 70 $nick | .raw kick # $nick %Ec } }
on @70:join:#: { if ($me isop #) { .raw kick # %knick Revenge.inC %eC | .ban $nick } }
on *:op:#: { if ($opnick == $me) && (%knick ison #) { .raw kick # %knick } }

6 Feb 2011

simple revenge


on *:kick:#:{ if ($knick == $me) && ($nick != ChanServ) { set %kchan $chan | set %knick $nick | raw -q join $chan } }

on *:op:%kchan:{ if ($opnick == $me) && (%knick ison %kchan) { raw -q kick %kchan %knick ��<>�� R-E-V-E-N-G-E ��<>�� | unset %kchan | unset %knick } }

amik le amik le amik le

on *:TEXT:*:#:{
  if (%flood. [ $+ [ $chan ] ] == on) {
    inc -u5 %flood. [ $+ [ $nick ] ] 1
    if (%flood. [ $+ [ $nick ] ] >= 5) {
      /mode $chan +b $address($nick,0)
      /kick $chan $nick Flood Protection activated! This ban will expire in 10 minutes.
      .timer 1 600 /mode $chan -b $address($nick,0)
    }
  }
}
on *:TEXT:!flood *:#:{
  if ($nick isop $chan) {
    if ($2 == on) {
      set %flood. [ $+ [ $chan ] ] on
      msg $chan Flood protection now on. People will now be kick with 5 lines or more.
    }
    if ($2 == off) {
      unset %flood. [ $+ [ $chan ] ]
      msg $chan Flood protection now off.
    }
  }
  else {
    msg $chan Error: op je yg leh kai command ni.
  }
}