/*    /cmds/creator/exits.c
 *    from the Dead Souls LPC Library
 *    Command to display exit and enter info for rooms
 *    by Kalinash 100195
 */

#include <lib.h>

inherit LIB_DAEMON;

mixed cmd()
{
    string *asExits, sDir, sExit;
    string *asEnters;
    object oEnv;

    if ( !( oEnv = environment( this_player() ) ) )
	return "You do not have a valid environment.";

    asExits = oEnv->GetExits();
    asEnters = oEnv->GetEnters();

    message( "Nmy_action", sprintf("\t *** %s ***\n\n", identify( oEnv ) ),
      this_player() );

    if ( !( sizeof( asExits ) ) )
	message( "my_action", "This room has no exits.", this_player() );
    else {
	message( "Nmy_action", "This room has the following exits :\n\n",
	  this_player() );
	foreach( sExit in asExits ) {
	    message( "my_action", sprintf( "\t%10s -> %s", sExit,
		oEnv->GetExit( sExit ) ), this_player() );
	}
    }

    if ( !( sizeof( asEnters ) ) )
	message( "my_action", "\nThis room has no enters.", this_player() );
    else {
	message( "Nmy_action", "\nThis room has the following enters :\n\n",
	  this_player() );
	foreach( sExit in asEnters ) {
	    message( "my_action", sprintf( "\t%10s -> %s", sExit,
		oEnv->GetEnter( sExit ) ), this_player() );
	}
    }

    return 1;
}

void help() 
{
    message("help", "Usage : exits\n\nDisplays exit and enter "
      "information for the current room.", this_player() );
}