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

cp = script("CameraPhone").new()

cp.snap()
-- "SNAP!"

cp.ring(3)
-- "RING!!!"
-- "RING!!!"
-- "RING!!!"

put cp.resolution
-- "1024x768"

put cp.ringtone
-- "Bell"