Context Free Forums and Gallery

Code: Select all

startshape A

rule A 2
{
  2segmentos { }
  A { r 5 y 38 }
}

rule A 2
{
  2segmentos { }
  A { r 9 y 38 }
}
/*
rule A 6
{
  2segmentos { }
  A { r 180 y 38 }
}
*/
rule A 4
{
  2segmentos { }
  A { r 270 y 38 }
}

rule A .4
{
}

rule 2segmentos
{
  barra { }
  barra { y 19 }
}


// BARRA ----------
rule barra
{
  barraAncha { }
}
rule barra
{
  barraFina { }
}
rule barraAncha
{
  line20 { r 90 x -1}
  line20 { r 90  }
  line20 { r 90 x 1 }
}
rule barraFina
{
  line20 { r 90 }
}


// LINEAS (con diferente longitud) ----------
rule line1
{
  CIRCLE { s .5 }
}
rule line2
{
  line1 { }
  line1 { x 1 }
}
rule line3
{
  line1 { }
  line2 { x 1 }
}
rule line4
{
  line1 { }
  line3 { x 1 }
}
rule line5
{
  line1 { }
  line4 { x 1 }
}
rule line6
{
  line1 { }
  line5 { x 1 }
}
rule line7
{
  line1 { }
  line5 { x 1 }
}
rule line8
{
  line1 { }
  line7 { x 1 }
}
rule line9
{
  line1 { }
  line8 { x 1 }
}
rule line10
{
  line1 { }
  line9 { x 1 }
}
rule line20
{
  line10 { }
  line10 { x 9 }
}

Code: Select all

startshape split 

rule line { 
	linel {}
}

rule line { 
	liner {}
}

rule linel 100 {
	lineShape {}
	linel{ y 2 r 1}
}

rule linel 1 {
	split {}
}

rule linel 5 {
	corner {}
}

rule linel 1 {
	hollowDot {s 5}
}

rule liner 100 {
	lineShape {}
	linel{ y 2 r -1}
}

rule liner 1 {
	split {}
}

rule liner 5 {
	corner {}
}

rule liner 1 {
	hollowDot { s 5 }
}

rule corner {
	CIRCLE {}
	line { y 2 r -90 }
}

rule corner {
	CIRCLE {}
	line { y 2 r 90 }
}

rule split {
	SQUARE { r 45 }
	line { x -2 r 90}

	line { x 2 r -90}
}

rule lineShape {
	CIRCLE {}
}

rule lineShape {
	hollowDot {}
}

rule hollowDot {
	CIRCLE {}
	CIRCLE { b 1 s .8 }
}