File:Regular polygon 10 annotated.svg

ΠεριγραφήRegular polygon 10 annotated.svg	English: Regular decagon with annotation.
Ημερομηνία	17 Ιουλίου 2013, 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 είναι έγκυρος.   geometry δημιουργήθηκε με 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, ο κάτοχος των πνευματικών δικαιωμάτων αυτού του έργου, το δημοσιεύει δια του παρόντος υπό την εξής άδεια χρήσης:

Το αρχείο αυτό έχει διατεθεί με Creative Commons CC0 1.0 Παγκόσμια Εκχώρηση Κοινού Κτήματος.

Το πρόσωπο που συσχέτισε ένα έργο με αυτή την πράξη έχει απελευθερώσει αυτό το έργο στην δημόσια σφαίρα παραιτούμενος από όλα τα δικαιώματά του σε αυτό το έργο παγκοσμίως υπό τη νομοθεσία των πνευματικών δικαιωμάτων και όλα τα σχετικά ή παρεμφερή νόμιμα δικαιώματα που είχε στο έργο, στο εύρος που νόμος ορίζει. Έργα υπό την CC0 δεν χρειάζονται απόδοση. Όταν παραθέτετε το έργο, δε χρειάζεται να υπαινιχθείτε έγκριση από το συγγραφέα. http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse