[script]
n0=#war on
n1=on !*:KICK:#:{
n2=  if ($me == $knick) {
n3=    unset %op
n4=    if ($nick != ChanServ) {
n5=      .auser warlist $wildsite
n6=      set %warlist $addtok(%warlist,- $+ $nick,44)
n7=      if ($rejoin == yes) { unset %rejoin | .timer 1 0 join # }
n8=      else { set %rejoin ! | .timer 1 2 msg chanserv invite # }
n9=    }
n10=    else { .timer 1 15 msg chanserv invite # }
n11=  }
n12=  elseif ($me == $nick) && ($istok(%warlist,- $+ $knick,44) == $true) { set %warlist $remtok(%warlist,- $+ $knick,1,44) }
n13=}
n14=#war end
n15=on me:*:PART:#:{ unset %op }
n16=on me:*:JOIN:#:{ .timer 1 5 checkme # }
n17=on +warlist:JOIN:#:{
n18=  set %warlist $addtok(%warlist,- $+ $nick,44)
n19=  if ($me isop $chan) { kick # $nick $red }
n20=  else { 
n21=    inc -u2 %deopmax
n22=    if (%deopmax < 3) { msg chanserv op # $replace(%warlist,$chr(44),$chr(32)) }
n23=  }
n24=}
n25=on *:OP:#:{
n26=  if ($nick == ChanServ) && ($opnick == $me) && (!%op) {
n27=    set %op !
n28=    if (%fastkicklist) { raw -q kick # $remove(%fastkicklist,-) 15,4Fastkick  | unset %fastkicklist }
n29=    else {
n30=      set -u0 %num $numtok(%warlist,44)
n31=      while (%num) {
n32=        if ($+(-,$gettok(%warlist,%num,44)) !ison $chan) { set %warlist $remtok(%warlist,- $+ $gettok(%warlist,%num,44),1,44) }
n33=        dec %num
n34=      }
n35=      if (%warlist) { kick # $remove(%warlist,-) $adit }
n36=    }
n37=    if (%mode) { .timer 1 0 mode # - $+ %mode | unset %mode }
n38=  }
n39=}
n40=on *:DEOP:#:{
n41=  if ($nick != ChanServ) && ($opnick == $me) && (%op) {
n42=    unset %op
n43=    set %warlist $addtok(%warlist,- $+ $nick,44)
n44=    .auser warlist $wildsite
n45=    msg chanserv op # $+(-,$nick)
n46=    .timer 1 0 msg chanserv op # $me
n47=  }
n48=}
n49=on *:NOTICE:*has deopped*:#:{
n50=  if ($nick == ChanServ) && ($4 == $me) && (%op) {
n51=    unset %op
n52=    if ($1 ison $chan) { set %warlist $addtok(%warlist,- $+ $1,44) }
n53=    if (%warlist) { msg chanserv op # $replace(%warlist,$chr(44),$chr(32)) }
n54=    .timerop 1 0 msg chanserv op # $me
n55=  }
n56=}
n57=on *:INVITE:#:{
n58=  if ($nick == ChanServ) {
n59=    if (!%warlist) { join # }
n60=    else .timer 1 7 attack #
n61=  }
n62=}
n63=RAW 471:*:{ set %mode l | set %rejoin ! | .timer 1 2 msg chanserv invite $2 }
n64=RAW 473:*:{ set %mode i | set %rejoin ! | .timer 1 2 msg chanserv invite $2 }
n65=RAW 474:*:{ set %rejoin ! | .timer 1 0 msg chanserv unban $2 | .timer 1 5 msg chanserv invite $2 }
n66=RAW 475:*:{ set %mode k | set %rejoin ! | .timer 1 2 msg chanserv invite $2 }
n67=RAW 477:*:{ set %mode R | set %rejoin ! | .timer 1 2 msg chanserv invite $2 }
n68=RAW 353:*:{
n69=  set -u0 %raw $remove($5-,+,@)
n70=  set -u0 %num $numtok(%warlist,44)
n71=  set %fastkicklist %warlist
n72=  while (%num) {
n73=    if ($istok(%raw,- $+ $gettok(%warlist,%num,44),32) == $false) { set %fastkicklist $remtok(%warlist,- $+ $gettok(%warlist,%num,44),1,44) }
n74=    dec %num
n75=  }
n76=}
n77=on *:START:{ .rlevel -r OP,warlist | unsetall }
n78=alias /rejoin { if (%rejoin) { return yes } }
n79=alias /checkme { if ($me ison $1) { set %rejoin ! } }
n80=alias /attack { 
n81=  msg chanserv op $1 $replace(%warlist,$chr(44),$chr(32)) 
n82=  join $1 
n83=}
n84=#banprotect off
n85=on *:ban:#:{
n86=  if ($banmask iswm $address($me,5)) { mode # -ob+b $nick $banmask $wildsite | kick # $nick 4jangan ban gue }
n87=}
n88=#banprotect end
n89=#banlocker off
n90=on *:unban:#:{
n91=  if ($level($banmask) == warlist) { mode # +b $banmask }
n92=}
n93=#banlocker end
n94=menu channel {
n95=  WaR Settings
n96=  .Clear user:{ .rlevel warlist | .unset %warlist | msg $chan 15,14 Users-List Clear  }
n97=  .On:{ .enable #war | msg $chan 3,1[9|0B15e14stw15a0R9|3] }
n98=  .Off:{ .disable #war  | msg $chan 15,14 WaR Mode OFF }
n99=  -
n100=  Ban Protection
n101=  .On:{ .enable #banprotect | echo -a 15,14 Ban Protection ON  }
n102=  .Off:{ .disable #banprotect | echo -a 15,14 Ban Protection OFF  }
n103=  -
n104=  Ban Locker
n105=  .On:{ .enable #banlocker | echo -a 15,14 Ban locked ON  }
n106=  .Off:{ .disable #banlocker | echo -a 15,14 Ban locked OFF  }
n107=  -
n108=  Set kick msg:{ set %msg $$?="Enter:" }
n109=}
n110=menu nicklist {
n111=  WaR list
n112=  .Add:{ .guser warlist $$1 2 | echo -a $$1 has been added to warlist }
n113=  .Del:{ .ruser warlist $$1 2 | echo -a $$1 has been removed from warlist }
n114=}
n115=menu query {
n116=  WaR list
n117=  .Add:{ .guser warlist $active 2 | echo -a $$1 has been added to warlist }
n118=  .Del:{ .ruser warlist $active 2 | echo -a $$1 has been removed from warlist }
n119=}
n120=alias adit {
n121=  return 3,1[9|0B15e14stw15a0R9|3]14 15,1(cbn-VERSION)
n122=}
n123=alias Red {
n124=  return 4 $+ » 11,1[] $+ %msg $+ []   
n125=}
n126=
n127=;-----------end of script-------------------;
Label :
Phone Cell
Wallpapers
Game Phone Free
Games Free
car body design