# =========================================================================== # # Taken from: # # www.contextfreeart.org/gallery/view.php?id=4224 # # 06.04.2021 # =========================================================================== # startshape fence

CF::Background = [ b -1 ]

CF::Tile = [ s (26*4) ]

shape box {

SQUARE [ s 10 1.5 y 9.5 z 1 ]           // Top L
SQUARE [ s 10 1.5 x 10 y 9.5 z 2 ]      // Top R
SQUARE [ s 1.5 10 x 14.5 y 5.25 z 1 ]   // Right T
SQUARE [ s 1.5 10 x 14.5 y -4.75 z 2 ]  // Right B
SQUARE [ s 10 1.5 x 10.25 y -9 z 1 ]    // Bottom R
SQUARE [ s 10 1.5 x 0.25 y -9 z 2 ]     // Bottom L
SQUARE [ s 1.5 10 x -4.25 y -4.75 z 1 ] // Left B
SQUARE [ s 1.5 10 x -4.25 y 5.25 z 2 ]  // Left T

}

shape fence {

loop 4 [ y 26 h 25 ]
loop 4 [ x 26 h 90 ] {
  box [ h 0 sat (0.5 + rand(0.5)) b (0.75 + rand(0.25)) ]
  box [ h 180 sat (0.5 + rand(0.5)) b (0.75 + rand(0.25)) x 13 y 13 ]
}

}