VBA, 587 560 byte
Sub S(a,b,c,d,e,f)
Set v=ActiveSheet.Shapes.AddShape(a,b,c,d,e)
v.Fill.ForeColor.RGB=f
v.Line.Visible=0
If a=5 Then v.Adjustments(1)=.5
End Sub
Sub U():p=91.5:w=-1
S 1,0,0,500,450,w
S 9,0,0,500,450,0
S 9,38.5,13.5,423,423,w
S 1,36,120,29,210,0
S 1,65,80,26.5,290,0
S 1,435,120,29,105,0
S 1,408.5,80,26.5,145,0
q=212.25:S 1,9,q,480,19,0
S 5,p,205.75,317,13,w
S 1,405,231.25,95,131.5,w
r=14.5:S 1,p,70.5,r,30,0
q=85:S 9,p,59.6,q,q,w
S 1,p,349.5,r,30,0
S 9,p,305.4,q,q,w
S 1,395,70.5,r,30,0
S 9,323.5,59.6,q,q,w
q=231.25:S 1,p,q,6.5,6.5,0
S 9,p,q,13,13,w
End Sub
Aktifkan makro U. Pada dasarnya banyak bentuk gambar. Bentuk 1 adalah persegi panjang, 5 persegi panjang bulat dan 9 adalah oval. Output adalah 500 lebar dengan tinggi 450.

Sunting : menambahkan persegi panjang bulat (dengan penyesuaian untuk mengubah ujungnya menjadi setengah lingkaran) untuk menghasilkan sudut yang terpancar di atas bilah dengan satu bentuk gambar.
0,085,0,013, dan0,025pengukuran? Apakah0,846diagonal di tengah dimaksudkan untuk melewati episentrum elips yang dibentuk oleh bagian luar1dan0,9?