Anonymous user
Pentagram: Difference between revisions
→{{header|SPL}}
(Added Kotlin) |
|||
Line 699:
</svg>
</pre>
=={{header|SPL}}==
<lang spl>
mx,my = #.scrsize()
xc = mx/2
yc = my/2
mr = #.min(mx,my)/3
#.angle(#.degrees)
#.drawcolor(1,0,0)
#.drawsize(10)
> r, mr..0,-1
#.drawline(xc,yc-r,xc,yc-r)
> a, 54..630,144
#.drawline(r*#.cos(a)+xc,r*#.sin(a)+yc)
<
#.drawcolor(1,1,0)
#.drawsize(1)
<
</lang>
=={{header|Tcl}}==
| |||