#include <sys.h> string long_desc,short_desc; object owner,dropto; int special,flags; get_flags() { return flags; } get_special() { return special; } set_flags(f) { flags=f; return 1; } set_special(s) { special=s; return 1; } get_dropto() { return dropto; } set_dropto(o) { dropto=o; return 1; } self_destruct() { destruct(this_object()); return 1; } get_type() { return TYPE_ROOM; } set_long(arg) { long_desc=arg; return 1; } set_short(arg) { short_desc=arg; return 1; } get_long() { return (long_desc?long_desc: "You are nowhere."); } get_short() { return short_desc ? short_desc:"Gray Mist"; } stat() { tell_player(this_player(),"Object Type: ROOM\n"); if (flags) tell_player(this_player(),"Flags: "+make_flags(flags)+"\n"); if (special) tell_player(this_player(),"Special: "+itoa(special)+"\n"); if (short_desc) tell_player(this_player(),"Short: "+short_desc+"\n"); if (long_desc) tell_player(this_player(),"Long: "+long_desc+"\n"); if (dropto) tell_player(this_player(),"Dropto: "+make_num(dropto)+"\n"); if (owner) tell_player(this_player(),"Owner: "+make_num(owner)+"\n"); return 1; }