Assigning values at runtime 

do Price(obj) as 10 
  if (obj ofclass Treasure) 

do Price(obj) as 0 
  if (...the assignment below has occurred...)

do Hit(MingVase) as { 
  print "It cracks."; 
  Price(MingVase) := 0; 
}