/* /d/standard/hotel.c
* from Nightmare IV
* a place to stay for rest and other things
* created by Descartes of Borg (what a cutie!)
* and Lassondra@Nightmare 940424
*/
#include <lib.h>
#include <clock.h>
#include <daemons.h>
inherit LIB_ROOM;
int query_occupied(int chambre);
string query_key_id(int chambre);
object query_room(int chambre);
void check_out();
static private void random_key(int chambre);
static private mapping __Rooms;
void create() {
int x;
room::create();
SetProperties( ([ "indoors":1, "light":2, "no castle":1]) );
SetShort("the Nightmare Inn");
SetLong(
"You find yourself at the entrance of the most prestigious "
"inn in Nightmare. The floor is carpeted with plush red carpet, "
"and the walls are trimmed with golden paint. Large oaken "
"doors from where you entered stand behind you, and directly "
"in front of you the front desk of the hotel stands."
" Type list to see the available rooms, and <rent 'type'> to rent a certain type of room."
);
SetItems( ([ "entrance" : "The lobby of the hotel is very "
"large and spacious. It looks like it is a rather "
"expensive hotel.",
"floor" : "The floor is covered with a very thick "
"red carpet, with golden fringes at the edges.",
"carpet" : "The carpet is in good shape, although "
"it is a bit worn in spots. There is a golden "
"symbol of the hotel standing in the center of it.",
({ "wall", "walls" }) :
"The walls have been painted white with some gold "
"trim on all the edges.",
({ "doors", "door" }) :
"The heavy oaken doors are ornately carved with "
"the hotel ensignia. The doors gleam in the light "
"from the large amount of polishing they receive.",
"desk" : "The front desk is also made from oak, and "
"stands at the back of the lobby.",
"hotel" : "You are in the Nightmare Inn."
])
);
SetExits( ([
"north" : "/domains/Praxis/hall",
"west" : "/domains/Praxis/n_centre1.c",
]) );
// if(!event_pending(this_object())) {
// if((x=hour(time())) > 9) x= (9+(20-x))*HOUR;
// else x = HOUR*(9-x);
// event("check_out", x, 0, 1);
// }
// SetNoClean(1);
// __Rooms = allocate_mapping(10);
// this_object()->check_out();
}
void reset() {
int x;
room::reset();
if(present("receptionist")) return;
new("/domains/Praxis/obj/mon/receptionist")->move(this_object());
}
void set_occupied(int x) { __Rooms[x]["occupied"] = 1; }
int query_occupied(int chambre) {
return __Rooms[chambre]["occupied"];
}
string query_key_id(int chambre) {
return __Rooms[chambre]["key id"];
}
object query_room(int x) {
return load_object(sprintf("/domains/Praxis/inn%d", x));
}
void check_out() {
object *tmp;
int i, j;
if(previous_object() != this_object() &&
base_name(previous_object()) != EVENTS_D) return;
for(i=1; i<11; i++) {
__Rooms[100+i] = ([ "occupied":0, "key id": random_key(100+i) ]);
j = sizeof(tmp = livings() & all_inventory(query_room(100+i)));
while(j--) {
message("my_action", "Check out time!\nThe receptionist "
"hurries you out into the lobby.", tmp[j]);
tmp[j]->eventMoveLiving("/domains/Praxis/hotel", "out");
}
}
}
string random_key(int chambre) {
return sprintf("praxishotel%d%d", chambre, random(100));
}
void init(){
::init();
}
