5180b93f9b4204c4d96e48f960a50e1595014174
5 set arg1
[lindex $argv 0]
6 set p
[factory_producer fezzik
$arg1]
7 set c
[factory_consumer sdl
""]
8 set r
[mlt_consumer_properties
$c]
9 mlt_properties_set
$r "rescale" "none"
10 consumer_connect
$c $p
12 while { ![mlt_consumer_is_stopped
$c] } {