File:Regular polygon 10 annotated.svg

描述Regular polygon 10 annotated.svg	English: Regular decagon with annotation.
日期	2013年7月17日, 15:13:16
來源	自己的作品
作者	László Németh
其他版本	Regular 3-gon Regular 4-gon Regular 5-gon Regular 6-gon Regular 7-gon Regular 8-gon Regular 9-gon Regular 10-gon Regular 11-gon Regular 12-gon Regular 13-gon Regular 14-gon Regular 15-gon Regular 16-gon Regular 17-gon Regular 18-gon Regular 19-gon Regular 20-gon
SVG開發 InfoField	本SVG檔案的原始碼通過W3C驗證。   本向量圖形使用OpenOffice.org創作。

; Created in LibreOffice 4 with this LibreLogo program.
; Usage: Copy it in an English language document in LibO Writer,
; and click on the Start icon of the View»Toolbar»Logo toolbar.
FONTSIZE 22 FONTFAMILY “Nimbus Sans L”
FOR vertices IN [3, 4, 5, 6, 8, 9, 10, 12, 15, 18, 20] [
;    PICTURE “regular_polygon_%d_annotated.svg” % vertices [ ; from LibO 4.1.1
    PICTURE [
	HOME CLEARSCREEN HIDETURTLE
	FILLCOLOR “WHITE” PENCOLOR “SILVER” 
	PENDOWN PENSIZE 2 CIRCLE 400
	β = 360/vertices
	CIRCLE [80 + vertices * 10, 80 + vertices * 10, 0, β]
	FONTCOLOR “SILVER”
	IF vertices >= 18 [ f = 0.011 ] [ f = 0.013 ]
	HEADING β*0.57 PENUP FORWARD (80 + vertices * 10) * (0.23 + (f * vertices))
	HEADING 0 LABEL “%d°” % β
	HOME HEADING 0 PENDOWN
	dots = []
	REPEAT vertices [
		FORWARD 200
		where = POSITION
		dots = dots + [where]
		BACK 200 RIGHT β
	]
	HOME
	PENSIZE 2 CIRCLE 10
	PENCOLOR “BLACK” FONTCOLOR “BLACK”
	α = ((vertices-2)/vertices)*180
	PENUP FORWARD 200 PENDOWN
	CIRCLE [90 + 105/vertices, 90 + 105/vertices, 180 – α/2, 180 + α/2]
	PENUP BACK 20 + 70/vertices LABEL “%d°” %  α
	HOME PENUP PENSIZE 4 PENUP
	FOR i IN dots + dots[0:1] [ POSITION i PENDOWN ] PENSIZE 2
	FOR i IN dots [ PENUP POSITION i PENDOWN CIRCLE 10 ]
    ]
]

László Németh，此作品的版權所有人，決定用以下授權條款發佈本作品：

	此檔案在創用CC CC0 1.0 通用公有領域貢獻宣告之下分發。
	在此宣告之下分發本作品者，已依據各國著作權法，在全世界放棄其對本作品所擁有的著作權及所有相關相似的法律權利，從而將本作品貢獻至公有領域。您可以複製、修改、分發和演示該作品，用於任何商業用途，所有這些都不需要請求授權。 http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse