Miscellany

    if ($($+(%,stats.type.,%ID),2) == req) {
      var %a.mult = .32707, %s.mult = .324, %d.mult = .25, %h.mult = .25, %p.mult = .124, %r.mult = .487, %m.mult = .487
      set %a $iif($($+(%,stats.Attack.level.,%ID),2),$v1,-) | set %s $iif($($+(%,stats.Strength.level.,%ID),2),$v1,-) | set %d $iif($($+(%,stats.Defence.level.,%ID),2),$v1,-) | set %h $iif($($+(%,stats.hitpoints.level.,%ID),2),$v1,-) | set %r $iif($($+(%,stats.ranged.level.,%ID),2),$v1,-) | set %m $iif($($+(%,stats.magic.level.,%ID),2),$v1,-) | set %p $iif($($+(%,stats.prayer.level.,%ID),2),$v1,-)
      set %meleecombat $calc(%a * %a.mult + %s * %s.mult + %d * %d.mult + %h * %h.mult + %p * %p.mult) | set %RangedCombat $calc(%r * %r.mult + %p * %p.mult + %d * %d.mult + %h * %h.mult) | set %MagicCombat $calc(%m * %m.mult + %p * %p.mult + %d * %d.mult + %h * %h.mult)
      if (%MagicCombat == %RangedCombat) && (%MagicCombat == %RangedCombat) { var %cmbstyle = Balanced, %combat = %MeleeCombat }
      elseif (%MagicCombat > %RangedCombat) && (%MagicCombat > %MeleeCombat) { var %cmbstyle = Magic, %Combat = %MagicCombat }
      elseif (%RangedCombat > %MeleeCombat) { var %cmbstyle = Ranged, %Combat = %RangedCombat }
      else { var %cmbstyle = Melee, %combat = %MeleeCombat }
      set %combat $bytes(%combat,3d) | set %x 0
      if (%combat <  $readini(ChannelReq.ini,$($+(%,stats.chan.,%ID),2),Combat)) { inc $+(%,stats.violate.,%ID) 1 }
      while (%x < 25) {
        if ($($+(%,stats.,$setskill(%x),.level.,%ID),2) < $readini(ChannelReq.ini,$($+(%,stats.chan.,%ID),2),$setskill(%x))) { inc $+(%,stats.violate.,%ID) 1 | inc %x }
      }
      while ($var($+(%,stats.*.level.,%ID),$($+(%,stats.number.2.,%ID),2))) { set $+(%,stats.statline.,%ID) $($+(%,stats.statline.,%ID),2) $c1($gettok($var($+(%,stats.*.level.,%ID),$($+(%,stats.number.2.,%ID),2)),2,46))  $c2($($var($+(%,stats.*.level.,%ID),$($+(%,stats.number.2.,%ID),2)),2)) | inc $+(%,stats.number.2.,%ID) 1 }
      if (!$var($+(%,stats.*.level.,%ID),$($+(%,stats.number.2.,%ID),2))) { msg $($+(%,stats.chan.,%ID),2) $c1(Stats for) $c2($($+(%,stats.rsn.,%ID),2)) $c1($chr(40)) $+ $c2($($+(%,stats.violate.,%ID),2)) $c1(Channel Requirement Violations) $+ $c1($chr(41)) $+ $c1(:) | msg $($+(%,stats.chan.,%ID),2) $($+(%,stats.statline.,%ID),2) | $iif($($+(%,stats.violate.,%ID),2) > 1,kick $($+(%,stats.chan.,%ID),2) $($+(%,stats.rsn.,%ID),2) You do not meet $($+(%,stats.violate.,%ID),2) of this $($+(%,stats.chan.,%ID),2) $+ 's requirements,noop) | sockclose $sockname }
    }