[ Media ] tidtaker: [ Tall ] etter: [ Tall ]

var media := Media ny.
 var i := 0.
 media på: ['start'] gjøre: {
 Stdout skrive: ['start'], stop.
 media tidtaker: 1 etter: 12.
 }.
 media på: ['skritt'] gjøre: {
 Stdout skrive: i, stop.
 i legg-til: 1.
 }.
 media på: ['tidtaker:'] gjøre: { :t
 Stdout skrive: ['tidtaker:'] + t, stop.
 media slutt.
 }.
 media skjerm: ['canvas.png'].

start
tidtaker:1