*solidbrush 0 128 128
roundrect 0 0 40 40 10 10
solidpen 192 192 192 5
moveto -20 20
lineto 10 20
moveto 30 20
lineto 60 20
solidpen 255 0 0 0
solidbrush 255 0 0
rectangle 10 5 18 35
rectangle 22 5 30 35