[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/bin/cfplus

Comparing deliantra/Deliantra-Client/bin/cfplus (file contents):
Revision 1.65 by root, Thu Jun 8 01:51:32 2006 UTC vs.
Revision 1.66 by elmex, Thu Jun 8 19:43:26 2006 UTC

             ["Potions"                 => PICKUP_POTION],
             ["Magic Devices"           => PICKUP_MAGIC_DEVICE],
             ["Ignore cursed"           => PICKUP_NOT_CURSED],
             ["Jewelery"                => PICKUP_JEWELS],
          ],
+         ["Weight/Value ratio", 2, 17]
        )
    {
       my ($title, $x, $y, @bits) = @$_;
       $table->add ($x, $y, new CFClient::UI::Label text => $title, align => 1, fg => [1, 1, 0]);
                $::CONN->send_command ("pickup $::CFG->{pickup}")
                   if defined $::CONN;
             });
       }
    }
+   $table->add (2, 18, new CFClient::UI::ValSlider
+      range => [0, 0, 16, 1, 1],
+      to_value => sub { ">= " . 5 * $_[0] },
+      on_changed => sub {
+         my ($slider, $value) = @_;
+         $::CFG->{pickup} &= ~0x7;
+         $::CFG->{pickup} |= int $value
+            if $value;
+         1;
+      });
+   $table->add (3, 18, new CFClient::UI::Button
+      text => "set",
+      on_activate => sub {
+         $::CONN->send_command ("pickup $::CFG->{pickup}")
+            if defined $::CONN;
+        1;
+      });
    $table
 }
 sub inventory_window {

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