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(252,98,3))
solid ellipse (-51*mag+x, 0*mag+y, 56*mag, 101*mag)
solid ellipse (48*mag+x, 1*mag+y, 2*mag, 5*mag)
solid ellipse (-17*mag+x, -68*mag+y, 3*mag, 11*mag)
solid ellipse (-1*mag+x, 0*mag+y, 55*mag, 102*mag)
solid color (rgb(0,0,0))
solid circle (-62*mag+x, -50*mag+y, 10*mag)
solid circle (8*mag+x, -49*mag+y, 10*mag)
solid color (rgb(254,254,254))
solid circle (8*mag+x, -50*mag+y, 2*mag)
solid circle (-63*mag+x, -50*mag+y, 3*mag)
solid circle (8*mag+x, -50*mag+y, 3*mag)
solid color (rgb(247,6,8))
solid circle (8*mag+x, -50*mag+y, 0*mag)
solid circle (8*mag+x, -50*mag+y, 0*mag)
solid circle (8*mag+x, -50*mag+y, 0*mag)
solid color (rgb(0,0,0))
solid round rectangle (-25*mag+x, 50*mag+y, -49*mag+x, 53*mag+y, 16, 16)
solid round rectangle (-25*mag+x, 51*mag+y, -28*mag+x, 53*mag+y, 16, 16)
solid round rectangle (-27*mag+x, 50*mag+y, -27*mag+x, 50*mag+y, 16, 16)
solid round rectangle (-27*mag+x, 50*mag+y, -26*mag+x, 50*mag+y, 16, 16)
solid round rectangle (-25*mag+x, 50*mag+y, -24*mag+x, 50*mag+y, 16, 16)
solid round rectangle (-5*mag+x, 50*mag+y, -24*mag+x, 50*mag+y, 16, 16)
solid round rectangle (-24*mag+x, 51*mag+y, -5*mag+x, 51*mag+y, 16, 16)
solid round rectangle (-25*mag+x, 53*mag+y, -5*mag+x, 53*mag+y, 16, 16)
solid round rectangle (-5*mag+x, 53*mag+y, -5*mag+x, 53*mag+y, 16, 16)
solid round rectangle (-25*mag+x, 51*mag+y, -5*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-5*mag+x, 52*mag+y, -5*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-5*mag+x, 52*mag+y, -6*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-4*mag+x, 50*mag+y, -1*mag+x, 50*mag+y, 16, 16)
solid round rectangle (-5*mag+x, 53*mag+y, -1*mag+x, 53*mag+y, 16, 16)
solid round rectangle (-4*mag+x, 51*mag+y, -3*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-3*mag+x, 51*mag+y, -1*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-3*mag+x, 51*mag+y, -3*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-3*mag+x, 52*mag+y, -1*mag+x, 52*mag+y, 16, 16)
solid round rectangle (-49*mag+x, 50*mag+y, -46*mag+x, 50*mag+y, 16, 16)
solid round rectangle (-49*mag+x, 52*mag+y, -49*mag+x, 53*mag+y, 16, 16)
solid round rectangle (-48*mag+x, 53*mag+y, -46*mag+x, 53*mag+y, 16, 16)
solid triangle (-33*mag+x, -15*mag+y, -33*mag+x, 41*mag+y, 28*mag+x, 11*mag+y)
solid triangle (-34*mag+x, -15*mag+y, -34*mag+x, 41*mag+y, -87*mag+x, 14*mag+y)
solid color (rgb(254,254,254))
solid circle (-40*mag+x, 13*mag+y, 4*mag)
solid circle (-15*mag+x, 13*mag+y, 4*mag)
solid color (rgb(241,85,14))
solid color (rgb(207,110,48))
solid round rectangle (-30*mag+x, -105*mag+y, -21*mag+x, -78*mag+y, 16, 16)
solid color (rgb(0,0,0))
solid round rectangle (-70*mag+x, -65*mag+y, -56*mag+x, -64*mag+y, 16, 16)
solid round rectangle (0*mag+x, -65*mag+y, 14*mag+x, -64*mag+y, 16, 16)
solid color (rgb(253,253,253))
solid rectangle (-49*mag+x, 54*mag+y, -46*mag+x, 59*mag+y)
solid rectangle (-40*mag+x, 54*mag+y, -46*mag+x, 58*mag+y)
solid rectangle (-40*mag+x, 59*mag+y, -45*mag+x, 59*mag+y)
solid rectangle (-39*mag+x, 59*mag+y, -1*mag+x, 54*mag+y)
solid color (rgb(0,0,0))
line (-25*mag+x, 54*mag+y, -25*mag+x, 59*mag+y)
line (-49*mag+x, 56*mag+y, -1*mag+x, 56*mag+y)
solid color (rgb(237,92,18))
line (-81*mag+x, -83*mag+y, -81*mag+x, 3*mag+y)
line (-81*mag+x, 21*mag+y, -81*mag+x, 78*mag+y)
line (-81*mag+x, 20*mag+y, -81*mag+x, 18*mag+y)
line (-81*mag+x, 4*mag+y, -81*mag+x, 10*mag+y)
line (-81*mag+x, 79*mag+y, -81*mag+x, 85*mag+y)
line (-25*mag+x, -78*mag+y, -25*mag+x, -13*mag+y)
line (-25*mag+x, 38*mag+y, -25*mag+x, 49*mag+y)
line (-25*mag+x, 60*mag+y, -25*mag+x, 91*mag+y)
line (25*mag+x, -89*mag+y, 25*mag+x, -39*mag+y)
line (25*mag+x, -38*mag+y, 25*mag+x, 9*mag+y)
line (25*mag+x, 13*mag+y, 25*mag+x, 89*mag+y)
line (-50*mag+x, -101*mag+y, -50*mag+x, -53*mag+y)
line (-50*mag+x, -52*mag+y, -50*mag+x, -7*mag+y)
line (-50*mag+x, 35*mag+y, -50*mag+x, 49*mag+y)
line (-50*mag+x, 34*mag+y, -50*mag+x, 34*mag+y)
line (-50*mag+x, 50*mag+y, -50*mag+x, 102*mag+y)
solid color (rgb(0,0,0))
line (-50*mag+x, 102*mag+y, -50*mag+x, 102*mag+y)
line (-50*mag+x, 102*mag+y, -46*mag+x, 103*mag+y)
solid rectangle (-52*mag+x, 102*mag+y, -42*mag+x, 104*mag+y)
//by leif