drawbox.rd function

Draw a shaded coloured box