#include "std.h" object ring; int found; #undef EXTRA_LONG #define EXTRA_LONG\ if (str == "bed") {\ write("The bed is covered with clean silken sheets, it smells of roses.\n");\ return;\ } #undef EXTRA_RESET #define EXTRA_RESET\ found = found-1;\ #undef EXTRA_INIT #define EXTRA_INIT\ add_action("search_bed"); add_verb("search");\ ONE_EXIT("players/kantele/kitiaras_innerhall","east", "A tidy sleepingroom", "A tidy sleepingroom, it has a feminine look and a large pink bed.\n", 1) search_bed(arg) { if (arg == "bed" && found <1) { found =3; ring = clone_object("players/kantele/ring"); move_object(ring, this_object()); write("You found a small ring.\n"); return 1; } else if (arg == "bed") { write("You found nothing.\n"); return 1; } } id(str) { if (str == "bed") return 1; }