if(right-1>=0 && right_edge)
{
pen=Surface::alpha_pen(surface->get_pen(right-1,top),get_amount()*right_edge,get_blend_method());
surface->fill(color,pen,1,bottom-top);
}
if(right-1>=0 && right_edge)
{
pen=Surface::alpha_pen(surface->get_pen(right-1,top),get_amount()*right_edge,get_blend_method());
surface->fill(color,pen,1,bottom-top);
}