// Smear Move Script
// Author:      frumbert@hotmail.com
// Description: polar mirror, extremely fast zoom - very trippy


(declare init
 (set $usePolar 1)
 (set $use Aspect 1)
)

(declare move
 (set $srcRadius (* -.80 $radius))
)


