RosettaCodeData/Task/Inheritance-Multiple/Lingo/inheritance-multiple-1.lingo

-- parent script "Camera"
property resolution

on new (me)
  me.resolution = "1024x768"
  return me
end

on snap (me)
  put "SNAP!"
end