open window 700, 600
backcolor 0,0,0
clear window

a=200
b=200
n=2.5
na=2/n
t=.01
color 0,0,255
for i = 0 to 314
    xp=a*sig(cos(t))*abs((cos(t)))^na+350
    yp=b*sig(sin(t))*abs((sin(t)))^na+275
    t=t+.02
    line to xp, yp
next i