inherit "/obj/vessel"; void setup() { set_name( "phial" ); set_short( "crystal phial" ); add_adjective( "crystal" ); set_main_plural( "crystal phials" ); set_long( "This is a small tube-like bottle made of some sort of "+ "crystal. A stopper is attached at one end on a bit of wire.\n" ); set_weight( 1 ); set_value( 1000 ); set_max_weight( 1 ); set_max_volume( 10 ); set_transparent(); } /* setup() */ int test_add( object thing, int flag ) { string word; object *things; if ( !this_player() ) return ::test_add( thing, flag ); things = all_inventory( this_object() ); if ( !sizeof( things ) ) return ::test_add( thing, flag ); word = (string)things[ 0 ]->query_medium_alias(); if ( word == (string)thing->query_medium_alias() ) return ::test_add( thing, flag ); write( "You don't want to contaminate "+ ( stringp( word ) ? (string)things[ 0 ]->the_short() : (string)thing->the_short() ) +", do you?\n" ); return 0; } /* test_add() */ object query_substance() { object *things; things = all_inventory( this_object() ); if ( !sizeof( things ) ) return 0; if ( !stringp( (string)things[ 0 ]->query_medium_alias() ) ) return 0; return things[ 0 ]; } /* query_substance() */ string short( int dark ) { object thing = query_substance(); if ( dark || !objectp( thing ) ) return ::short( dark ); return ::short( dark ) +" of "+ (string)thing->short( dark ); } /* short() */ string query_plural( int dark ) { object thing = query_substance(); if ( dark || !objectp( thing ) ) return ::query_plural( dark ); return ::query_plural( dark ) +" of "+ (string)thing->short( dark ); } /* query_plural() */ string *parse_command_adjectiv_id_list() { object thing = query_substance(); if ( !objectp( thing ) ) return ::parse_command_adjectiv_id_list(); return ::parse_command_adjectiv_id_list() + ({ "of" }) + (string *)thing->query_adjectives(); } /* parse_command_adjectiv_id_list() */