$box[$i] = $sc[$i]->createRectangle($x, 50, $x+20, 90,
            -fill => randColor(),
            -outline => 'black',
            -width => 2,
            -tags => 'rect',
     );