#include <lib.h>
#include ROOMS_H
inherit LIB_ITEM;
inherit LIB_PRESS;
int check_environs();
int vanish_count = 50;
static void create() {
item::create();
SetKeyName("omni");
SetId(({"omni","Omni","device"}));
SetShort("an omni");
SetLong("This is a small, round metal device, copper in color, "+
"and similar in appearance to a pocket watch. There is a blinking red light "+
"next to the tiny metal button at its top.");
SetMass(10);
SetDollarCost(300);
AddItem("button", "A button on the omni.");
}
void init() {
::init();
check_environs();
}
mixed CanPress(object who, string target) {
if(!present(this_object()->GetKeyName(),who ) && target == "button"){
return "You do not have the Omni!";
}
if(this_object()->GetId() == target){
return "You cannot push that.";
}
return 1;
}
mixed eventPress(object who, string where) {
object *rooms = objects( (: inherits(LIB_ROOM, $1) :) );
object target;
int success = 0;
rooms = filter(rooms, (: member_array(base_name($1), ({ ROOM_START,
ROOM_FURNACE, ROOM_VOID, ROOM_POD, ROOM_DEATH, ROOM_WIZ,
ROOM_ARCH, ROOM_NETWORK, ROOM_ROUTER, LIB_FURNACE,
ROOM_FREEZER }) ) == -1 && strsrch(base_name($1),"/realms/") &&
!inherits(LIB_FURNACE,$1) &&
!($1->GetVirtual() && !grepp(base_name($1),",")) &&
last_string_element(base_name($1),"/") != "death" :) );
say(who->GetName()+" turns "+dbz_colors("multicolored")+" and disappears!");
write("You feel momentarily disoriented and find yourself elsewhere!");
while(!success){
target = rooms[random(sizeof(rooms)-1)];
success = who->eventMove(target);
}
who->eventDescribeEnvironment();
tell_room(target, "With a multicolored flash, "+who->GetName()+
" appears!",who);
return 1;
}
void heart_beat(){
object env = environment();
object *holders;
if(!env) return;
holders = filter(containers(this_object()),
(: interactive($1) :) );
if(interactive(env)) vanish_count--;
else if(sizeof(holders) && random(100) > 80) vanish_count--;
if(vanish_count < 0){
tell_object(env,"The omni glows brightly and disappears!");
this_object()->eventDestruct();
}
if(vanish_count == 5){
tell_object(env,"The omni begins to glow a dull red.");
this_object()->SetLong("This is a small, round metal device, copper in color, "+
"and similar in appearance to a pocket watch. There is a blinking red light "+
"next to the tiny metal button at its top. It is glowing a dull red.");
this_object()->SetShort("an omni (glowing)");
}
}
int check_environs(){
if( interactive(environment()) ){
set_heart_beat(10);
return 1;
}
return 1;
}
