mbase_e.c - example for course 04

---

/* Filename      : mbase_e.c
 * Description   : eastern part of the mountainbase
 *
 * written       : 01-10-1996 - Gunner
 * last modified : 01-10-1996 - Gunner
 * HTML-Version  : 01-02-2000 - Ghorwin
 */

#include <mudlib.h>
inherit I_ROOM;                     // inherit "/std/room.c"

create()
{
    ::create();
    set_light(1);                   // Let there be light...
    set_short("By a river");
    set_long("You are standing by a river running past the mountain. "
        "The mountain rises up of the river rising higher and higher "
        "until it vanishes behind the clouds.\n");

    add_item(({"river","water","cool water","refreshing water"}),
        "The water seems to be okay to drink.\n",
        "drink",
        "Ahhhh... The water is cool and refreshing.\n");

    add_item(({"mountain","base","mountainbase","base of mountain",
        "steep mountain"}),
        "You are standing at the base of the mountain, looking at a "
        "river that running by the mountain.\n");

    add_item(({"peak","peaks","mountainpeak","mountainpeaks"}),
        "The peaks seem to pierce the gray clouds high up above you.\n");

    add_item(({"sky","cloud","gray cloud","clouds","gray clouds"}),
        "The sky is filled with gray clouds.\n");

    add_item("heaven",
        "Is it up there? Who knows...\n");

    add_item(({"wall","mountainwall","smooth wall","smooth mountainwall"}),
        "The wall is smooth and there are no signs of caves here.\n");

    add_item(({"ground","hard ground","unforgiving ground"}),
        "The ground is hard and unforgiving.\n");

    add_item("sun",
        "You can't see the sun since the clouds are blocking your view.\n");

    add_reset_object("soldier","../course03/soldier",1);

    add_property(({"no_magic","no_flee","no_teleport"}));

    add_exit("./mbase","west");     // Only one way out of here,

    replace_program(I_ROOM);
}