my $timer = $mw->repeat(10,sub{
        $x = $shared{'x'};
        $y = $shared{'y'};
        $mw->update;
});