[ViewVC] Diff of: cvs/deliantra/server/ext/Jeweler.pm

Comparing deliantra/server/ext/Jeweler.pm (file contents):
Revision 1.31 by elmex, Sun Apr 18 07:59:55 2010 UTC vs.
Revision 1.32 by elmex, Tue Apr 27 17:08:09 2010 UTC

    $obj->{arch} = $thing->arch->archname;
    $obj->{face} = $thing->face;
    $obj->{value} = $thing->value;
+   $obj->{is_ring} = ($thing->type == cf::RING);
    $self->{hash} = $obj
 }
 sub to_object {
    my ($self) = @_;
 sub power_to_level {
    my ($self, $lvldescr) = @_;
    my $max_imprs    = Jeweler::getcfg (maximprovements => 'improvements');
    my $max_impr_lvl = Jeweler::getcfg (maxlevels       => 'improve_level');
+   my $ring_offs    = Jeweler::getcfg (maxlevels       => 'ring_offset');
    my ($stat_lvl,   $stat_imprs) = $self->stat_level;
    my ($resist_lvl, $res_imprs)  = $self->resist_level;
    my ($spec_lvl,   $spec_imprs) = $self->special_level;
    my $impr_sum = $stat_imprs + $res_imprs + $spec_imprs;
-   my $impr_lvl = ceil (($max_impr_lvl / ($max_imprs + 1)) * ($impr_sum - 1)); # 1 improvemnt bonus
+   my $impr_lvl =
+      ceil (($max_impr_lvl / ($max_imprs + 1))
+      * ($impr_sum - 1)); # 1 improvemnt bonus
    my $levl = int max ($stat_lvl, $resist_lvl, $impr_lvl, $spec_lvl, 0);
+   if ($self->{hash}->{is_ring}) {
+      $levl += $ring_offs;
+   }
+   $levl = min ($levl, cf::settings->max_level);
    if ($lvldescr) {
       $$lvldescr =
          sprintf "%3d: %s\n", $levl,
               "stat: $stat_lvl, resist: $resist_lvl, improve: $impr_lvl, "

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines