# =========================================================================== # # === shards.cfdg # # Taken from: # # www.contextfreeart.org/gallery/view.php?id=4226 # # Originally written by “sugarfi”. Uploaded on 11.04.2021 # =========================================================================== #

CF::Tile = [s 10]

startshape shard

shape shard

rule 33% {

TRIANGLE[skew -80..80 -80..80]
TRIANGLE[skew -80..80 -80..80 b 1 s 1.02]
shard[x -2..2 y -2..2]

}

rule 33% {

blood[h -5..5]
TRIANGLE[skew -80..80 -80..80 s 1.02]
TRIANGLE[skew -80..80 -80..80 b 1]
shard[x -2..2 y -2..2]

}

rule 33% {

box[h -5..5 skew -60..60 -60..60]
TRIANGLE[skew -80..80 -80..80 s 1.02]
TRIANGLE[skew -80..80 -80..80 b 1]
shard[x -2..2 y -2..2]

}

rule 1% { }

shape blood

rule {

CIRCLE[h 100 sat 1 a -0.5 b 1]

}

rule {

CIRCLE[h 100 sat 1 a -0.5 b 1]
blood[x -1..1 y -1..1 s 0.5 h -5..5]

}

shape box

rule 49.5% {

hollow[]

}

rule 49.5% {

hollow[]
SQUARE[x 1 y 1 h 200 sat 1 a -0.7 b 1]

}

rule 1% { }

path hollow {

MOVETO(0, 0)
LINETO(1, 0)
LINETO(1, 1)
LINETO(0, 1)
CLOSEPOLY()
STROKE(0.02)[]

}