aop crap shit

alias updateaop {
  var %i = 0 | var %a writeini -n Aop.ini | var %r Fibonacci Auto Aop
  echo -ta * %r Update Started.
  while (%i < $nick(#,0)) {
    var %i = $calc(%i + 1)
    if ($nick(#,%i) != $me) {
      if ($v1 isowner #)  { %a Owners $+ $chan $address($v1,1) $v1 - %r  }
      elseif ($v1 isop #) && ($v1 !isowner #)  { %a Hosts $+ $chan $address($v1,1) $v1 - %r }
    }
  }
  echo -ta * %r Update Completed.
}
on ^*:Join:#: {
  var %y = $address($nick,1) | var %a $readini(Aop.ini,halt,$right(#,-2))
  var %b $readini(Aop.ini,Owners $+ $chan,%y) | var %c $readini(Aop.ini,Hosts $+ $chan,%y)
  if (# $+ aop == halt) { echo -t $chan Aop Halted for # | haltdef }
  if (%c) && (%a !isin #) && ($me isop # || $me isowner #) { notice # $nick - Local Host: $nick - %c | mode $chan +o $nick | haltdef }
  if (%b) && (%a !isin #) && ($me isowner #) { notice # $nick - Local Owner: $nick - %b | mode $chan +q $nick | haltdef }
}