50 lines
1.9 KiB
C
50 lines
1.9 KiB
C
#include <lib.h>
|
|
#include <daemons.h>
|
|
|
|
inherit LIB_ROOM;
|
|
|
|
int SignRead(){
|
|
string list;
|
|
list = implode(keys(STARGATE_D->GetStargates()),", ");
|
|
write("These are Stargate operation instructions.");
|
|
write("The Dead Souls stargate system provides teleportation within "
|
|
"the stargate network. To use the stargate network, one finds an "
|
|
"idle stargate, then dials the name of some other known stargate. "
|
|
"One then enters the outbound stargate, and if things go well, teleportation "
|
|
"to the dialed stargate occurs. To travel to Uruk, if that were a "
|
|
"valid stargate name, you would: dial uruk\n"
|
|
"Once the stargate activates: enter stargate");
|
|
write("Currently available stargates are:");
|
|
write("%^BOLD%^%^YELLOW%^"+list+"%^RESET%^");
|
|
return 1;
|
|
}
|
|
|
|
static void create() {
|
|
object ob;
|
|
room::create();
|
|
SetClimate("indoors");
|
|
SetAmbientLight(30);
|
|
SetShort("Science Building Stargate Lab");
|
|
SetLong("This large room is the testing ground for the newly discovered stargate technology that allows for instant teleportation between distant locations. The main Science Building hallway is south.\n"
|
|
"%^BOLD%^%^GREEN%^An instruction sign is here.%^RESET%^");
|
|
SetItems(([
|
|
({ "sign", "instruction sign", "instructions sign", "instruction", "instructions" }) : "A sign you can read. It appears to be instructions for operating the stargate.",
|
|
]));
|
|
SetInventory(([
|
|
"/domains/campus/obj/stargate" : 1,
|
|
"/domains/campus/npc/kleiner" : 1,
|
|
]));
|
|
SetExits(([
|
|
"south" : "/domains/campus/room/science2",
|
|
]));
|
|
SetRead("sign", (: SignRead() :) );
|
|
}
|
|
int CanReceive(object ob) {
|
|
if(!ob) return 0;
|
|
return room::CanReceive(ob);
|
|
}
|
|
|
|
void init(){
|
|
::init();
|
|
}
|