! The TREASURE class definition. ! ! Defined in DM4 §5, modified in §23 Class Treasure with before [; Take, Remove: if (self in packing_case) "Unpacking such a priceless artifact had best wait until the Carnegie Institution can do it."; if (self.photographed_in_situ == false) "This is the 1930s, not the bad old days. Taking an artifact without recording its context is simply looting."; Photograph: if (self has moved) "What, and fake the archaeological record?"; if (self.photographed_in_situ) "Not again."; ], after [; Insert: if (second == packing_case) { score = score + self.cultural_value; if (score == MAX_SCORE) { deadflag = 2; print_ret "As you carefully pack away ", (the) noun, " a red-tailed macaw flutters down from the tree-tops, feathers heavy in the recent rain, the sound of its beating wings almost deafening, stone falling against stone... As the skies clear, a crescent moon rises above a peaceful jungle. It is the end of March, 1938, and it is time to go home."; } "Safely packed away."; } Photograph: self.photographed_in_situ = true; ], cultural_value 5, photographed_in_situ false; ! ---------------------------------------------------------------------------- !