string *blocks; string block_action; int is_blocking( string dir ) { int i; if( blocks != 0 ) { for( i = 0; i < sizeof( blocks ); i++ ) { if( blocks[i] == dir ) return(1); } } return( 0 ); } int query_blocking( string dir ) { return( is_blocking( dir ) ); } void add_block( string exit ) { if( blocks == 0 ) blocks = ({ }); blocks -= ({ exit }); blocks += ({ exit }); if( block_action == 0 ) { block_action = "$N $vstop $t from going $o. \n"; } } void set_block_action( string action ) { block_action = action; } string query_block_action( void ) { return( block_action ); }