Ultra-SiMPLE
xc=xpixels()/2; yc=ypixels()/2
Call image (xc, yc, 1.0, 1) @

Task image (Int x, Int y, Float mag, Int flag)
If (flag) zz=mag
Else zz=1.0
line size (1*zz+0.5)
line color (rgb(128,128,128))
solid color (rgb(128,128,128))
point color (rgb(128,128,128))
solid color (rgb(255,101,0))
solid ellipse (0*mag+x, 1*mag+y, 25*mag, 19*mag)
line color (rgb(253,15,0))
ellipse (0*mag+x, 1*mag+y, 6*mag, 19*mag)
ellipse (0*mag+x, 1*mag+y, 13*mag, 20*mag)
ellipse (0*mag+x, 1*mag+y, 19*mag, 19*mag)
solid color (rgb(52,16,5))
solid rectangle (-4*mag+x, -17*mag+y, 4*mag+x, -21*mag+y)
solid color (rgb(17,17,17))
solid triangle (-13*mag+x, -4*mag+y, -6*mag+x, -4*mag+y, -9*mag+x, -8*mag+y)
solid triangle (8*mag+x, -4*mag+y, 14*mag+x, -4*mag+y, 11*mag+x, -8*mag+y)
solid triangle (-1*mag+x, 2*mag+y, 5*mag+x, 2*mag+y, 2*mag+x, -2*mag+y)
solid triangle (-7*mag+x, 7*mag+y, 12*mag+x, 7*mag+y, 2*mag+x, 17*mag+y)
solid color (rgb(57,152,198))
solid triangle (-2*mag+x, 9*mag+y, 5*mag+x, 9*mag+y, 2*mag+x, 12*mag+y)