$im->filledRectangle($X1,$Y1-20,$X2,$Y2,$genecolor);