[ Task ] set: [ Text ] value: [ Object ]

var x := { Pen write: (own q + ['!']), stop. }.
x set: ['q'] value: ['123'].
x start.
123!