[ Media ] таймер: [ Число ] после: [ Число ]

дать media := Media новый.
дать i := 0.
media в: ['запуск'] сделать: {
Stdout написать: ['запуск'], стоп.
media таймер: 1 после: 12.
}.
media в: ['шаг'] сделать: {
Stdout написать: i, стоп.
i добавить: 1.
}.
media в: ['таймер:'] сделать: { :t
Stdout написать: ['таймер:'] + t, стоп.
media конец.
}.
media экран: ['canvas.png'].
запуск
0
1
таймер:1
2