blob: 0d061695892cdcda31a6516efc6d1b40e22e7982 [file] [log] [blame]
// (c) by Padreic (Padreic@mg.mud.de)
#include "../files.h"
inherit ROOM("stdroom");
void create()
{
::create();
SetProp(P_INDOORS, 0);
SetProp(P_LIGHT, 1);
SetProp(P_INT_SHORT, "Am Rande einer Lichtung im Zauberwald");
AddSpecialDetail(({"wald", "zauberwald"}), "_query_int_long");
AddDetail(({"westen", "lichtung", "plaetzchen", "idyllisches plaetzchen"}),
"Im Westen befindet sich eine grosse Lichtung mit einem kleinen Tuempel, am\n"
+"Rande der Lichtung stehen vereinzelt noch einige Baeume aber zum Tuempel hin,\n"
+"wird es dann mehr und mehr nur noch Gras das den Boden bedeckt.\n");
AddDetail(({"rasen", "gras"}),
"Am besten betrittst Du die Lichtung einfach und schaust Dir den Rasen\n"
+"naeher an.\n");
AddDetail("tuempel",
"Wenn Du Dir den Tuempel naeher ansehen moechtest, dann solltest Du schon\n"
+"ein Stueck naeher rangehen.\n");
AddDetail(({"stueck", "raum"}),
"Na wenigstens einen Raum weiter solltest Du schon gehn.\n");
AddDetail("schatten",
"Hier befindest Du Dich noch im Schatten der Baeume, die Lichtung im Westen\n"
+"liegt jedoch komplett in der waermenden Sonne.\n");
AddSpecialDetail("sonne", "det_sonne");
AddDetail(({"wegesrand", "baeume", "wegrand", "rand"}),
"Am Wegesrand stehen einige Baeume die ein schoenes Blaetterdach ueber den Weg\n"
+"spannen und den Weg in ihren Schatten legen.\n");
AddDetail(({"himmel", "blaetterdach", "dach", "licht", "sonnenstrahlen", "wolken", "wolke"}),
"Das Blaetterdach ist ziemlich dicht, so dass Du nicht soo viel sehen kannst,\n"
+"aber einige Sonnenstrahlen durchbrechen das Dach und erreichen den Weg.\n");
AddDetail(({"weg", "boden", "erde", "ausgang", "osten", "richtung"}),
"Im Westen fuehrt der Weg zu einer grossen Lichtung, waehrend er nach Osten hin\n"
+"Richtung Ausgang des Zauberwalds fuehrt.\n");
AddDetail("voegel", "Du kannst sie deutlich hoeren, bekommst aber keinen zu sehn.\n");
AddExit("osten", ROOM("weg1"));
AddExit("suedwesten", ROOM("lichtungso"));
AddExit("westen", ROOM("lichtungo"));
AddExit("nordwesten", ROOM("lichtungno"));
AddCmd("osten", "cmd_osten");
AddItem(NPC("laufeiche"), REFRESH_DESTRUCT);
}
static string det_sonne()
{
if (PL) PL->SetProp(P_BLIND, 1);
return "Du schaust fasziniert in die Sonne und untersucht sie naeher, doch das war\n"
+"wohl ein grosser Fehler, denn ploetzlich wird es ganz ganz dunkel um Dich rum.\n";
}
void init()
{
// wenn man von westen kommt und keine blockende Eiche hier ist, dann
// so betrachten als waere man aus dem osten gekommen
if (query_once_interactive(PL) && !present(WALDID("eiche")))
PL->SetProp(AUSGANG, "westen");
::init();
}
static int cmd_osten()
// wenn gerade eine Eiche hierhin gelaufen ist, kommen feindliche
// Spieler nicht mehr vorbei :)
{
if (PL && PL->QueryProp(AUSGANG)!="westen" &&
PL->QueryProp(ZAUBERWALD)>time() && present(WALDID("eiche"), ME)) {
if (present(WALDID("eiche 2"), ME))
write("Die Eichen stehen Dir dabei leider im Weg und lassen Dich nicht vorbei.\n");
else write("Die Eiche steht Dir dabei leider im Weg und laesst Dich nicht vorbei.\n");
return 1;
}
}
static string _query_int_long()
{
if (!PL || PL->QueryProp(ZAUBERWALD)<=time())
return
"Du stehst nun mitten im Zauberwald. Im Westen erstreckt sich vor Dir eine\n"
+"grosse Lichtung, auf die Du muehelos gelangen kannst. Nach Osten hin fuehrt\n"
+"ein schmaler Weg zurueck zum Ausgang des Waldes. Alles scheint hier sehr\n"
+"friedlich zu sein, die Voegel zwitschern und das Blaetterdach ist hier auch\n"
+"nicht mehr so dicht wie im Osten, so dass einige Sonnenstrahlen den Weg\n"
+"erreichen. Es zieht Dich foermlich nach Westen auf die Lichtung, mitten auf\n"
+"dieses sonnige idyllische Plaetzchen.\n";
return "Nichts wie raus hier. Es war ganz und gar keine gute Idee hier im Wald Deiner\n"
+"Aggressivitaet freien Lauf zu lassen. Du kannst von Glueck haben, wenn Du mit\n"
+"einem blauen Auge davon kommst und den Wald noch lebend verlassen kannst.\n"
+"Nach Westen gelangst Du auf die grosse Lichtung, ratsamer waere jedoch wohl\n"
+"eher der Waldweg im Osten, ueber den Du den Zauberwald wieder verlassen kannst.\n";
}