#include <lib.h>
#include <rooms.h>
#include "./customdefs.h"
inherit LIB_ROOM;
int ReadSign();
int ReadSheet();
int privacy = 0;
string privs = "";
string LongString(){
string ret = "You are standing in the workroom of the mighty " + privs +
"! \nYou may return to the Creators' Hall by going down.\n"+
"A sample room is east."+
"\n%^GREEN%^There is a sign here you can read.%^RESET%^"+
"\n%^GREEN%^There is a sheet here you can read.%^RESET%^";
if(privacy) ret += "\n%^YELLOW%^There is a privacy force field "+
"active around this room.%^RESET%^";
return ret;
}
static void create() {
room::create();
privs = query_privs();
if( privs ) privs = capitalize(privs);
else privs = "a creator";
SetClimate("indoors");
SetAmbientLight(40);
SetShort(possessive_noun(privs) + " workroom");
SetLong( (: LongString :) );
SetItems( ([ "workroom" : "It looks very nice.",
({"sign","hint","hints"}) : "A sign with hints for creators.",
({"sheet","reminder","reminders"}) : "A sheet with quick reminders for creators.",
]) );
SetRead( ([
({"sign","hint","hints"}) : (: ReadSign :),
({"sheet","reminder","reminders"}) : (: ReadSheet :)
]) );
SetInventory( ([
MY_OBJ "/chest" : 1,
"/domains/default/obj/bbucket" :1,
]) );
SetExits( ([ "down" : "/domains/default/room/wiz_hall.c",
"east" : MY_ROOM "/sample_room"
]) );
SetNoModify(0);
}
int ReadSign(){
this_player()->eventPage("/news/hints.txt");
return 1;
}
int ReadSheet(){
this_player()->eventPage("/news/reminders.txt");
return 1;
}
void init(){
::init();
add_action("mod_privacy","privacy");
add_action("mod_privacy","priv");
}
int CanReceive(object sneak) {
int ret;
object *living_stack;
if(!privacy) return ::CanReceive(sneak);
living_stack = get_livings(sneak);
if(!living_stack || !arrayp(living_stack)) living_stack = ({ sneak });
foreach(object ob in living_stack){
if(!archp(ob) && ob->GetKeyName() != lower_case(privs)){
message("info","You bounce off the privacy field.", ob);
message("info",ob->GetName()+" bounced off the privacy field.",
this_object());
if(!environment(ob)) ob->eventMoveLiving(ROOM_START);
return 0;
}
}
ret = ::CanReceive(sneak);
if(ret){
tell_room(this_object(), "\n\nPRIVACY WARNING: "+identify(sneak)+
" has entered the room.\n\n", sneak);
}
return ret;
}
static int set_privacy(int i){
object *npcs = filter(deep_inventory(this_object()),
(: living($1) && !interactive($1) :) );
privacy=i;
SetProperty("no peer", i);
if(sizeof(npcs)){
foreach(object npc in npcs){
tell_room(this_object(),"Ejecting "+identify(npc),npc);
npc->eventMove(ROOM_FURNACE);
}
}
return i;
}
static int mod_privacy(string str){
if(!archp(this_player()) &&
this_player()->GetKeyName() != lower_case(privs)) {
write("You lack the adequate privileges to do that.");
say(this_player()->GetName()+" is trying to muck around with the privacy field system.");
return 1;
}
if(!str || str == ""){
if(privacy) str = "off";
else str = "on";
}
if(str=="on" || str == "1"){
set_privacy(1);
write("You enable the privacy field.\n");
say(this_player()->GetName()+" enables a privacy force field around the
room.");
return 1;
}
if(str=="off" || str == "0"){
set_privacy(0);
write("You disable the privacy field.\n");
say(this_player()->GetName()+" disables a privacy force field around the room.");
return 1;
}
}
