Pentagram: Difference between revisions

(Added XPL0 example.)
Line 291:
 
=={{header|EasyLang}}==
[https://easylang.online/apps/_pentagram.html Run it]
[https://easylang.online/ide/?run=xp%3D10%0Ayp%3D40%0Alinewidth%202%0Amove%20xp%20yp%0Awhile%20angle%20%3E%20-720%0Ax%3Dxp%2Bcos%20angle%2A80%0Ay%3Dyp%2Bsin%20-angle%2A80%0Aline%20x%20y%0Af%5B%5D%26%3Dx%0Af%5B%5D%26%3Dy%0Axp%3Dx%0Ayp%3Dy%0Aangle-%3D144%0A.%0Acolor%20900%0Apolygon%20f%5B%5D Run it]
 
<lang>xp = 10
yp = 40
set_linewidth 2
linewidth 2
movemove_pen xp yp
while angle > -720
x = xp + cos angle * 80
y = yp + sin -angle * 80
linedraw_line x y
f[] &= x
f[] &= y
Line 307:
angle -= 144
.
colorset_color 900
polygondraw_polygon f[]</lang>
 
=={{header|Go}}==
1,995

edits