/* A suit of ancient elvish chainmail */ inherit "inherit/armour"; reset(arg) { if(arg) return; set_name("chainmail"); set_short("A suit of chainmail"); set_long( "This suit of chainmail is in a fashion thousands of years old, \n"+ "bearing a certain elvish influence in its design. Perhaps it \n"+ "is an ancient suit of elvish chain; a relic of the past. \n"); set_type("armour"); set_ac(5); /* +2 chainmail */ set_weight(4); set_sell_destruct(1); set_value(9000); } query_info() { return "This suit of armour is thousands of years old, dating back to \n"+ "when the elves fought the ogre races during the battle of the \n"+ "ancients. The famous elvish hero Ekimthanis wore this armour \n"+ "which the Gods themselves are said to have blessed. It protected \n"+ "him from many attacks from his enemies, fire, lightning, and \n"+ "even some magical attacks\n"; } wear(string str) { environment() -> add_spell_immune("fire"); environment() -> add_spell_immune("lightning"); environment() -> set_magic_resist(25); /* not too bad eh! */ ::wear(this_object()->query_name()); return 1; } remove(string str) { object obj; if(!str) return; obj = present(lower_case(str), this_player()); if(obj == this_object()) ::drop(); return 1; } drop() { ::drop(); environment() -> remove_spell_immune("fire"); environment() -> remove_spell_immune("lightning"); environment() -> set_magic_resist(0); return 0; }