O1g/o1g.asy

Innen: Politika
A program kimenete

Az o1g.asy fájl tartalma:

import graph;

size(100,100);                  // abrameret
defaultpen(9.0);                // vonalvastagsag

draw(Circle((0,0),1.5),red);
draw(arc((0,0),0.9,45,360)--(0,0)--(0,0.3)--(-0.3,0.15)^^(0,0)--(0,-0.3),green);

Az o1g.svg előállítása: asy -f svg o1g.asy

Az asymptote egy strukturált, objektum-orientált programnyelv, amit egy amerikai házaspár fejlesztett ki abból a célból, hogy az egyetemi geometria-előadásaikhoz egyszerűen tudjanak szemléltető ábrákat készíteni.

Vágott o1g

Vágott o1g.svg
import graph;

size(100,100);		// abrameret
real r = 30;		// a G kulso sugara
real e = 30;		// az 1-es magassaga
real v = 9;		// vonalvastagsag
real h = 16.5;		// az 1-es ferde szaranak hossza felul
real alfa = 45;		// az 1-es szaranak szoge a fuggolegestol
pair origo = (0,0);

real e2 = e/2;
real v2 = v/2;
real sinalfa = Sin(alfa);
real cosalfa = Cos(alfa);

pair balcsucs = (-v2,e2) - h*(sinalfa,cosalfa);		// az 1-es bal szelso csucsa
pair alcsucs  =	balcsucs + v*(sinalfa,-sinalfa);	// az 1-es bal also csucsa
// alcsucs.y = e2 - v/sinalfa - (h - v/Tan(alfa)) * cosalfa = e2 - h*cosalfa - v*(1/sinalfa + cosalfa/sinalfa * cosalfa) =
//	e2 - h*cosalfa -v*sinalfa

filldraw(
	arc(origo,r,45,360)	// a G kulso kore
	--(r,v2)
	--(v2,v2)
	--(v2,e2)		// az 1-es jobb felso fuggoleges szara
	--(-v2,e2)		// az 1-es teteje
	--balcsucs
	--alcsucs
	--(-v2,e2-v/sinalfa)	// az 1-es honalja
	--(-v2,-e2)
	--(v2,-e2)		// az 1-es talpa
	--(v2,-v2)		// az 1-es jobb also fugg. szara
	--(r-v,-v2)		// a G also vizsz. vonala
	--arc(origo,r-v,-aSin((v2)/(r-v)),45,CW)
	--cycle
	,green+1,green+1);

draw(Circle((0,0),45),red+v);

E wiki logója (minden lap bal felső sarkában található ikon) o1g.svg-ből készült az alábbi utasítással:

convert -resize 100 o1g.svg o1g.png