63 lines
2.2 KiB
C
63 lines
2.2 KiB
C
#include <lib.h>
|
|
|
|
inherit LIB_ROOM;
|
|
|
|
void init() {
|
|
::init();
|
|
add_action("climb", "climb");
|
|
}
|
|
|
|
void create() {
|
|
::create();
|
|
SetProperty("light", 3);
|
|
SetProperty("night light", 1);
|
|
SetProperty("no castle", 1);
|
|
SetShort( "the southern end of East Road");
|
|
SetLong(
|
|
"Starting your journey down East Road, you can see that this is "
|
|
"a less travelled street. Boc La Road is south from here, running "
|
|
"straight through Praxis. Every now and then you can see a street "
|
|
"lamp or two, in its ancient and rusted stage. The walls of the supply "
|
|
"store border the western side of the road, and the Praxis Library, "
|
|
"one of the biggest libraries in this realm, is to the east.");
|
|
SetItems(
|
|
(["road" : "East Road, which marks the far east end of Praxis.",
|
|
"roads" : "East Road and Boc La Road.",
|
|
"side" : "It's the supply shop.",
|
|
"shop" : "The local adventurer's supply shop sits on Boc La "
|
|
"and East Road.",
|
|
"walls" : "They are nothing special.",
|
|
"wall" : "You are fairly certain that you cannot climb them.",
|
|
"library" : "It is open for your reading pleasure."]) );
|
|
SetSkyDomain("town");
|
|
SetExits(
|
|
(["north" : "/domains/Praxis/east_road2",
|
|
"south" : "/domains/Praxis/e_boc_la3",
|
|
"east" : "/domains/Praxis/library"]) );
|
|
SetProperty("no castle", 1);
|
|
}
|
|
|
|
int climb(string str) {
|
|
if(!str) {
|
|
notify_fail("Climb what?\n");
|
|
return 0;
|
|
}
|
|
if(str != "wall" && str != "walls") {
|
|
notify_fail("That's not here for climbing.\n");
|
|
return 0;
|
|
}
|
|
if(this_player()->query_stats("dexterity") < random(30)) {
|
|
write("Ack! You slip and hurt yourself in trying!");
|
|
say(this_player()->query_cap_name()+" slips and hurts "+
|
|
this_player()->query_objective()+"self in trying "
|
|
"to climb the walls.");
|
|
this_player()->add_hp(-(random(7)));
|
|
}
|
|
else {
|
|
write("You can't quite manage the climb.");
|
|
say(this_player()->query_cap_name()+" tries to climb the shop "
|
|
"walls and fails.");
|
|
}
|
|
return 1;
|
|
}
|