startshape unification_sign
rule unification_sign{
God {z 100} 12 * {r (360/12)} gate_of_heaven {} four_position_foundation {} 4 * {r 90} whiteout {z 1} 4 * {r (360/4)} gate_of_heaven {r (22.5+360/48) z 2 s
1.6}
2 * {r 180 } give_and_take_action {z 3 s 1.26}
}
rule God {
CIRCLE {s .7 h 1.35 sat 1 b 1 z 1}
}
rule four_position_foundation {
SQUARE {s 1.4 h 1.35 sat 1 b 1} SQUARE {s 1.27 h 0 sat 0 b 1}
}
rule gate_of_heaven {
lines{r (360/48)}
}
path lines {
MOVETO {x 0 y 0} LINETO {x 1 y 0} LINETO {x cos(360/24) y sin(360/24)} CLOSEPOLY {} FILL {width .03 h 1.35 sat 1 b 1}
}
path give_and_take_action { MOVETO { x (1-.26/2) y (0-0.02)} LINETO {x 1 y (0.04-0.02)} ARCTO {x -1 y (0.04-0.02) r 1} LINETO {x (-1+.26/2) y (0.04+.02)} LINETO {x (-1+.26) y (0.04-0.02)} ARCTO {x (1-.26) y (0.04-0.02) r (1-.26) p cw} CLOSEPOLY {} FILL {h 1.35 sat 1 b 1} }
path whiteout {
MOVETO {x .7 y .9} ARCTO {x .7 y -.9 r 1.1 p cw} CLOSEPOLY{} FILL { h 0 sat 0 b 1}
}