Context Free Forums and Gallery

Code: Select all

startshape dance_party

rule dance_party {
 man {}
 man {y 15}
 man {x 15}
 man {x 15 y 15}
 man {x 30}
 man {x 30 y 15}

}

rule man { 
 man {r 1}
}

rule man {
 man {r -1}
}

rule man 0.003 {
 uprightman {}
}

rule uprightman {
   segment{s 0.07 b 0.8 y 4.75 x -0.0 r 10}
   segment{s 0.07 b 0.8 y 4.8 x -0.3 r -10}
   segment {rotate 90} 
   CIRCLE {s 2 y 5.5}
   CIRCLE {s 0.7 b 1 y 5.5 x -0.3}
   CIRCLE {s 0.7 b 1 y 5.5 x 0.3}
   pupil {s 0.5 y 5.4 x -0.3}
   pupil {s 0.5 y 5.4 x 0.3}
   double_rotated_segment { r -120}
   double_rotated_segment {y 4.2 s 0.8}
   double_rotated_segment {r -60 }
   double_rotated_segment {y 4.2 r 180 s 0.8}
}

rule pupil 0.1 {
 CIRCLE {x 0.1 y 0.1}
}
rule pupil {
 pupil {r 45}
}
rule pupil {
 pupil {r -45}
}


rule segment {
  CIRCLE {}
  SQUARE {x 0.5} 
  SQUARE {x 1.5} 
  SQUARE {x 2.5}
  SQUARE {x 3.5}
  CIRCLE {x 4}
}

rule rotated_segment {
   rotated_segment {r -9 }
}
rule rotated_segment {
   rotated_segment {r 10 }
}
rule rotated_segment 0.3 {
   segment { }
}

rule double_rotated_segment {
   double_rotated_segment {r 9}
}

rule double_rotated_segment {
   double_rotated_segment {r -10}
}

rule double_rotated_segment 0.3 {
   segment { }
   rotated_segment {x 4}
}

Code: Select all

startshape dance_party

rule dance_party {
   man {s 20 x 150 y 90}
   man {s 20 x -150 y 90}
   dance_party_up { }
}

rule dance_party_up {
   dance_party_row { }
   dance_party_up {y 15 s 0.96}
}

rule dance_party_row {
   dance_party_right { }
   dance_party_left{x -15 s 0.98}
}

rule dance_party_right {
   man { }
   dance_party_right {x 15 s 0.96 y -0.08}
}

rule dance_party_left {
   man { }
   dance_party_left {x -15 s 0.96 y -0.08}
}

rule man { man {r 1} }

rule man { man {r -1} }

rule man 0.003 { uprightman { } }

rule uprightman {
   segment{s 0.07 b 0.8 y 4.75 x -0.0 r 10}
   segment{s 0.07 b 0.8 y 4.8 x -0.3 r -10}
   segment {rotate 90} 
   CIRCLE {s 2 y 5.5}
   CIRCLE {s 0.7 b 1 y 5.5 x -0.3}
   CIRCLE {s 0.7 b 1 y 5.5 x 0.3}
   pupil {s 0.5 y 5.4 x -0.3}
   pupil {s 0.5 y 5.4 x 0.3}
   double_rotated_segment { r -120}
   double_rotated_segment {y 4.2 s 0.8}
   double_rotated_segment {r -60 }
   double_rotated_segment {y 4.2 r 180 s 0.8}
}

rule pupil 0.1 { CIRCLE {x 0.1 y 0.1} }
rule pupil { pupil {r 45} }
rule pupil { pupil {r -45} }

rule segment {
  CIRCLE {}
  SQUARE {x 0.5} 
  SQUARE {x 1.5} 
  SQUARE {x 2.5}
  SQUARE {x 3.5}
  CIRCLE {x 4}
}

rule rotated_segment {
   rotated_segment {r -9 }
}
rule rotated_segment {
   rotated_segment {r 10 }
}
rule rotated_segment 0.3 {
   segment { }
}

rule double_rotated_segment {
   double_rotated_segment {r 9}
}

rule double_rotated_segment {
   double_rotated_segment {r -10}
}

rule double_rotated_segment 0.3 {
   segment { }
   rotated_segment {x 4}
}