Simple Mass Aop for Freewar.Easy to Use.
Auto System Aop.....

;*********************************************************************************
;                                         Crewz War  2011 ™                                                       
;                         ++++++++   Freewar Design   +++++++++            
;                                  webmaster.webmaster.com 6667                                       
;                                      Right copy by Vat69                                                      
;*********************************************************************************

alias nickwar {
  set %o.chan $$?="Insert War Chanel . Exmple: #crewz"
  nwkira
  nwmasa
  .say 0• 3System :  9Aop For  $+ $chr(32) $+ %f.nw  $+ $chr(32) $+ War Nicks
  .say 0• 3 Time For Aop All Nick 9 :  9 $+ $chr(32) $+ %f.nwmasa  $+ $chr(32) $+ minute.
  var %j.pemp = 1 ,%j.pempes $addtok(%j.pempes,$nick,44) 
  while ($gettok(%j.pempes,%j.pemp,44)) { 
    .timer 1 $calc(%j.pemp * 10)  .cs aop %o.chan add $gettok(%j.pempes,%j.pemp,44) 
    inc %j.pemp
  } 
}
alias nwkira { .set %f.nw $count(%j.pempes,$chr(44)) + 1   }
alias nwmasa { if (%f.nw > 5) .set %f.nwmasa $calc(%f.nw * 10) / 60 }
alias nwlist {
  nwkira
  .echo 0 -a [ $time ]   • 6System :  13List War Nick
  .echo 0 -a [ $time ]   • 6Total : 13 $+ %f.nw  $+ $chr(32) $+ War Nick
  var %j.pemp = 1 ,%j.pempes $addtok(%j.pempes,$nick,44) 
  while ($gettok(%j.pempes,%j.pemp,44)) { 
    .timer -mc 1 $calc(%j.pemp * 300)  .echo 0 -a [ $time ] • 6 %j.pemp 0•13 $gettok(%j.pempes,%j.pemp,44) | inc %j.pemp
  } 
}
alias nwamik {
  set %j.nik $$?="Insert Nick"
  if ($istok(%j.pempes,$+(,%j.nik,),44)) { .echo 0 -a [ $time ] • 3System :  9 %j.nik Already in List War Nick | halt }
  if (!$istok(%j.pempes,$+(,%j.nik,),44)) .set %j.pempes $addtok(%j.pempes,%j.nik,44) |  nwkira
  .echo 0 -a [ $time ] • 3System :  9Insert %j.nik to List War Nick
  .echo 0 -a [ $time ] • 3Report :  9Latest Total Nick  : $+ $chr(32) $+ %f.nw  $+ $chr(32) $+ nicks. 
  unset %j.nik
}
alias nwbuang {
  set %j.nik $$?="Insert Nick"
  if (!$istok(%j.pempes,$+(,%j.nik,),44)) { .echo 0 -a [ $time ] • 3System :  9 %j.nik Not in Your List War Nick | halt }
  if ($istok(%j.pempes,$+(,%j.nik,),44)) .set %j.pempes $remtok(%j.pempes,%j.nik,44) |  nwkira
  .echo 0 -a [ $time ] • 3System :  9Deleted %j.nik from  List War Nick
  .echo 0 -a [ $time ] • 3Report :  9Latest Total Nick : $+ $chr(32) $+ %f.nw  $+ $chr(32) $+ nicks.
  unset %j.nik
}
Menu MenuBar,Status,channel {
  +Aop System +
  .Aop Nick: { nickwar }
  .List Nick: { nwlist }
  .Add Nick: { nwamik }
  .Delete Nick: { nwbuang }
}