The House of Freaks (#923)

(an instance of generic integrating room made by melusina)

     The inside of The House of Freaks holds true to the shabby promise of the exterior. It's spartan, but for the various freaks.

You see Tattooed Lady and The Critic here.

EXITS:
      [ southeast ] Dying Moon Carnival. You've ogled the freaks to your heart's content...what else does the carnival have in store for you?
      [ northwest ] The Tank. You push aside the tattered silver streamers and enter The Tank.
      [ south ] Le Cafe' Fetish. You squeeze through the rip in the canvas, squinting against the harsh glow.
      [ east ] The Hermaphrodite. Drawn by the garish doorway, you lift one of the flaps and cross the threshold.
      [ southwest ] Behind the Fetish. You crouch down and slip through the gap in the southwest corner of the tent.



VERB SOURCE CODE:

@details: 
"Copied from Generic Post-Apocalypse Room (#110):@details by Calkins (#150) Wed Sep 
28 12:26:31 1994 EDT";
if (player != this.owner)
    player:tell(E_PERM);
    return;
endif
player:tell("Details here are: ", $string_utils:print(this.detail_names));
.

@det*ail: 
"Copied from Generic Post-Apocalypse Room (#110):@det by Calkins (#150) Wed Sep 28 
12:27:02 1994 EDT";
if (player != this.owner)
    player:tell(E_PERM);
    return;
endif
name = dobjstr;
desc = iobjstr;
if (i = name in this.detail_names)
    this.detail_descriptions = listset(this.detail_descriptions, desc, i);
    player:tell("Detail ", name, " replaced.");
else
    this.detail_names = {@this.detail_names, name};
    this.detail_descriptions = {@this.detail_descriptions, desc};
    player:tell("Detail ", name, " added.");
endif
.

@rmd*etail: 
"Copied from Generic Post-Apocalypse Room (#110):@rmd by Calkins (#150) Wed Sep 28 
12:27:27 1994 EDT";
if (player != this.owner)
    player:tell(E_PERM);
    return;
endif
if (i = dobjstr in this.detail_names)
    this.detail_names = listdelete(this.detail_names, i);
    this.detail_descriptions = listdelete(this.detail_descriptions, i);
    player:tell("Detail ", dobjstr, " deleted.");
else
    player:tell("Detail ", dobjstr, " not found.");
endif
.

l*ook: 
"Copied from Generic Post-Apocalypse Room (#110):l by Calkins (#150) Wed Sep 28 12:27:37 
1994 EDT";
if ((length(args) != 1) || valid($string_utils:match_object(dobjstr, this)))
    pass(@args);
elseif (i = $string_utils:match_stringlist(dobjstr, this.detail_names))
    player:tell(this:weather_daytime(this.detail_descriptions[i]));
else
    player:tell("I see no \"", dobjstr, "\" here.");
endif
.

set_detail_descriptions set_detail_names: 
"Copied from Generic Post-Apocalypse Room (#110):set_detail_names by Calkins (#150) 
Wed Sep 28 12:28:03 1994 EDT";
"Allows note editors to set these props. Doesn't check for proper value";
if ((!$perm_utils:controls(caller_perms(), this)) && (caller != this))
    return E_PERM;
elseif (args)
    which = verb[5..length(verb)];
    return this.(which) = args[1];
else
    return E_INVARG;
endif
.


PROPERTY DATA: