mbase_w.c - example for course 04

---

/* Filename      : mbase_w.c
 * Description   : western 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("On the edge");
    set_long("You are standing on the edge of a deep canyon. There are some "
        "strange flowers growing all around the canyon. The mountain "
        "is really steep here.\n");

    add_item("edge","You're standing on it.\n");

    add_item(({"canyon","deep canyon","dark canyon"}),
        "The canyon is both dark and deep. You can't really see "
        "anything down there.\n");

    add_item(({"flower","strange flower","flowers","strange flowers"}),
        "The flowers seem strange. You're not sure what it is, "
        "but something's wrong about them.\n");

    add_neg(({"smell","sniff"}),({"flower","flowers","strange flower",
        "strange flowers"}),
        "The flowers smell bad. Yuck.\n");

    add_neg(({"eat","consume"}),({"flower","flowers","strange flower",
        "strange flowers"}),
        "Yuck! Eat flowers? I don't think that's a very good idea.\n");

    add_neg(({"pick","take","get"}),({"flower","flowers","strange flower",
        "strange flowers"}),
        "They're totally stuck in the hard ground.\n");

    add_item(({"mountain","base","mountainbase","base of mountain",
        "steep mountain"}),
        "You are standing at the base of the mountain, looking at a "
        "deep canyon right in front of you.\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_exit("./mbase","east");     // Only one way out of here

    replace_program(I_ROOM);
}