/**
* Contains some simul_efuns.
* @author Pinkfish
*/
private string ob_short( object ob ) {
string ret;
if( ob->query_clothing() && ( ret = ob->query_pocket_mess() ) && ret != "" )
return ret;
return "$ob_short$";
} /* ob_short() */
/**
* This method produces the inside messages for the given object up
* to the player object. This one generates 'the_short' messages.
* This should only be called with an object that is a container.
* It will produce weird and incorrect messages otherwise.
* @param ob the object to generate the short for
* @param play the player to generate the short up to
* @see inside_a_short()
*/
string inside_the_short( object ob, object play ) {
string str;
if( !play )
play = TP;
if( !ob )
ob = ENV(play);
str = replace_string( ob_short(ob), "$ob_short$", ob->the_short() );
while( ENV(ob) && ENV(ob) != play && ENV(ob) != ENV(play) ) {
ob = ENV(ob);
str += " inside " + replace_string( ob_short(ob), "$ob_short$",
ob->the_short() );
}
return str;
} /* inside_the_short() */
/**
* This method produces the inside messages for the given object up
* to the player object. This one generates 'a_short' messages.
* This should only be called with an object that is a container.
* It will produce weird and incorrect messages otherwise.
* @param ob the object to generate the short for
* @param play the player to generate the short up to
* @see inside_the_short()
*/
string inside_a_short( object ob, object play ) {
string str;
if( !play )
play = TP;
if( !ob )
ob = ENV(play);
str = replace_string( ob_short(ob), "$ob_short$", ob->a_short() );
while( ENV(ob) && ENV(ob) != play && ENV(ob) != ENV(play) ) {
ob = ENV(ob);
str += " inside " + replace_string( ob_short(ob), "$ob_short$",
ob->the_short() );
}
return str;
} /* inside_a_short() */
/**
* This method produces the inside messages for the given object up
* to the player object. This one generates 'a_short' messages.
* This should only be called with an object that is a container.
* It will produce weird and incorrect messages otherwise.
* @param ob the object to generate the short for
* @param play the player to generate the short up to
* @see inside_the_short()
*/
string inside_one_short( object ob, object play ) {
string str;
if( !play )
play = TP;
if( !ob )
ob = ENV(play);
str = replace_string( ob_short(ob), "$ob_short$", ob->one_short() );
while( ENV(ob) && ENV(ob) != play && ENV(ob) != ENV(play) ) {
ob = ENV(ob);
str += " inside " + replace_string( ob_short(ob), "$ob_short$",
ob->the_short() );
}
return str;
} /* inside_one_short() */
