ArtCoders.pe Propuesta de Logo (Context-Free Art)

acpe.cfdg

// ArtCoders.pe - Propuesta de Logo
// Variación recomendada: BQP
import i_pix.cfdg
import i_polygons.cfdg
startshape ccpe
CF::Background = [h -140.10 sat 0.8835 b -0.9448]

shape ccpe {
	backg[x -6.65 4 1]
	title[z 1]
}


shape title {
	SQUARE[x 2.75 s 7 1.4 b .05]

	A_5by5[h -128.66 sat 0.1423 b 1.0000]
	C_5by5[x 1.5 h -128.66 sat 0.1423 b 1.0000]

	dot[x 2.75 -.35 s .1 h -35.68 sat 0.5334 b 0.6243]

	P_5by5[x 4 h -128.66 sat 0.1423 b 1.0000]
	E_5by5[x 5.5 h -128.66 sat 0.1423 b 1.0000]
}


shape backg {
	loop 10 [x 2.1] randomcolor[s 2 a -.2]
	loop 10 [x 2.1] randomcolor[s 2 a -.2 y -2]
	loop 10 [x 2.1] randomcolor[s 2 a -.2 y -4]
	loop 10 [x 2.1] randomcolor[s 2 a -.2 y -6]
	loop 10 [x 2.1] randomcolor[s 2 a -.2 y -8]
}


shape randomcolor 
rule {
	randompolygon[h 9.16 sat 0.6978 b 1.0000]
}
rule {
	randompolygon[h -90.56 sat 1.0000 b 1.0000]
}
rule {
	randompolygon[h 49.12 sat 0.9846 b 1.0000]
}


shape randompolygon
rule {
	realrandompolygon[alpha -.8]
}


shape realrandompolygon
rule {
	CIRCLE[]
}
rule {
	CIRCLE[]
	loop 500 [s .95] CIRCLE[]
}

rule {
	SQUARE[]
}
rule {
	SQUARE[]
	loop 500 [s .95] SQUARE[]
}

rule {
  polygon(5)[]
}
rule {
  polygon(5)[]
	loop 500 [s .95] polygon(5)[]
}
rule {
  polygon(5)[r 30]
}
rule {
  polygon(5)[r 45]
}
rule {
  polygon(5)[r 90]
}

rule {
	polygon(6)[]
}
rule {
  polygon(6)[]
	loop 500 [s .95] polygon(6)[]
}
rule {
	polygon(6)[r 20]
}
rule {
	polygon(6)[r 40]
}
rule {
	polygon(6)[r 60]
}


shape dot {
	SQUARE[x -.75 -.75]
	SQUARE[x -.75 .75]
	SQUARE[x .75 -.75]
	SQUARE[x .75 .75]
}