<![CDATA[
// Petrarch
#include <std.h>
inherit ARMOUR;
void create() {
::create();
set_name("ring");
set_short("a crystal ring");
set_long("The ring has a bight stone in the middle of its face. Colours "
"swirl around inside of it.");
set_id(({"ring", "crystal ring"}));
set_ac(1);
set_mass(1);
set_value(100);
set_type("ring");
set_limbs(({"left hand", "right hand", "first hand",
"second hand", "third hand", "fourth hand"}));
set_material(({"stone","metal"}));
set_size(0);
set_wear("You fool, the ring was cursed!");
set_remove( (: this_object(), "remove_ring" :) );
set_prevent_drop( (: call_other, this_object(), "remove_ring" :) );
}
int remove_ring() {
if(!query_worn()) return 1;
message("info", "The ring is stuck to your finger.", this_player());
return 0;
}
]]>