Object fireplace "fireplace" livingroom
  with name 'fireplace' 'fire' 'place',
       ! Really I would use a stock idiom parse_name
       ! routine to only accept fire as a modifier for
       ! place, but for the sake of this example we'll
       ! simplify.
       before [;
	  Receive:
	    if (self has lit) {
	    	 switch (noun)
            	 {
               	    water_baloon:  "The baloon pops, and the fire
 		                    hisses and crackles, but the
		                    blaze continues.";
		    deed, certificate:
		      remove noun;
		      "The paper darkens, curls, and finally is
 		       consumed.  I hope you don't need ",
		       (The) noun, " any more.";
		    ! Cases for other objects here...
               	    default:
		      remove noun;
		      print_ret (The) noun, " bursts into flame.";
	    	 }
	    } else { rfalse; }
	  ! Rules for other actions here...
       ],
       ! other properties here...
   has scenery;