a bathtub (#1377)

(an instance of Generic Container Room made by Marcus)

     A big bathtub, the old-fashioned kind, porcelain, with lion-claw feet on it.
     It's capacious, there's room enough for more than one.
     A bathtub slides into the tub.

You see a tubful of water, a brush and bubbles here.

Go to location of this object, flutterby's whimsy.



VERB SOURCE CODE:

splash: 
this:announce(this:osplash_msg());
this.location:announce(this:osplash_msg());
player:tell(this:splash_msg());
for time in [1..random(this.times)]
    suds = "";
    for sud in [1..random(68)]
        suds = tostr(suds, " ");
    endfor
    this:announce_all(tostr(suds, "SUDS"));
    this.location:announce_all(tostr(suds, "SUDS"));
endfor
.

splash_msg osplash_msg slosh_msg: 
return $string_utils:pronoun_sub(this.(verb));
.

slosh: 
sloshmsg = this:slosh_msg();
osloshmsg = "";
for s in [1..72 - length(sloshmsg)]
    osloshmsg = tostr(osloshmsg, " ");
endfor
osloshmsg = tostr(osloshmsg, sloshmsg);
for time in [1..random(12)]
    this:announce_all(sloshmsg);
    this.location:announce_all(sloshmsg);
    suspend(time + this.slosh_delay);
    this:announce_all(osloshmsg);
    this.location:announce_all(osloshmsg);
endfor
.


PROPERTY DATA:
      times
      splash_msg
      osplash_msg
      slosh_msg
      slosh_delay