[ Media ] timer: [ Number ] after: [ Number ]

>> media := Media new.
 >> i := 0.
 media on: ['start'] do: {
 Out write: ['start'], stop.
 media timer: 1 after: 12.
 }.
 media on: ['step'] do: {
 Out write: i, stop.
 i add: 1.
 }.
 media on: ['timer:'] do: { :t
 Out write: ['timer:'] + t, stop.
 media end.
 }.
 media screen: ['canvas.png'].

start
0
1
timer:1
2