Superellipse: Difference between revisions
m
→{{header|EasyLang}}
No edit summary |
|||
| (3 intermediate revisions by 3 users not shown) | |||
Line 272:
{{libheader|SysUtils,StdCtrls}}
[[File:DelphiSuperElipse.png|frame|none]]
<syntaxhighlight lang="Delphi">
Line 330:
</pre>
=={{header|EasyLang}}==
[https://easylang.dev/show/#cod=Vc1LCsMgFEbh+V3FGbYJGLHYUV2MtqERgikomOw+2Bft6L9wPrgJh1FWfFutJbx3jmms8VYmtDJSpziPFC6O01kLsOJ4LBUfMtclUzgYBtKRDk9Hjvf0Ck1vPzrH9KfDRz9D0+03KwOWHqvZvmerhd6hlRUlOw== Run it]
<syntaxhighlight>
n = 2.5
a = 200
b = 200
linewidth 0.2
while t <= 360
x = pow abs cos t (2 / n) * a * sign cos t
y = pow abs sin t (2 / n) * b * sign sin t
line x / 5 + 50 y / 5 + 50
t += 0.5
.
</syntaxhighlight>
=={{header|EchoLisp}}==
Line 1,800 ⟶ 1,814:
{{libheader|DOME}}
Uses Go's drawing code but produces a more complex image.
<syntaxhighlight lang="
class Game {
| |||