A simple graphic displaying a function of root and power.

hight = 150
graphic #img, hight*2, hight*2
for x = 0-hight to hight
    for p = 1 to 10 step .25
        y = abs(x/(hight/hight^(1/p)))^p
        #img set(x+hight,y)
        #img set(x+hight,2*hight-y)
    next
next
render #img
end