RosettaCodeData/Task/Superellipse/EasyLang/superellipse.easy
2025-08-11 18:05:26 -07:00

11 lines
204 B
Text

n = 2.5
a = 200
b = 200
glinewidth 0.2
gpenup
while t <= 360
x = (pow abs cos t (2 / n) * a * sign cos t) / 5 + 50
y = (pow abs sin t (2 / n) * b * sign sin t) / 5 + 50
glineto x y
t += 0.5
.