# =========================================================================== # # === moebius.cfdg # # Stored as of 19.07.2021 # # Upstream URL: www.contextfreeart.org/gallery/view.php?id=4235 # # Created by flembobs. # =========================================================================== # startshape S []
CF::Background = [ b -0.1 h 50 sat 0.4 ]
shape S {
loop 12 [ r 30 ] SQ [ s 1.5 h 220 sat 1 b 0.2 a -0.8 blend CF::Overlay] R (4) [] R (4) [ flip 180 ] CIRCLE [ s 1.3 sat 1 b 0.7 h 20 ] loop 200 [ s 0.99 ] CIRCLE [ sat -1 s 1.3 a -0.98 b 1 ] C [s 1.3 a -0.2 blend CF::Multiply ]
}
shape R ( natural n ) {
if ( n > 0 ) { T [ s 1 0.7 sat 0.9 b 0.05 h (120*n) ] TRIANGLE [ s 1 0.7 a -0.75 sat 0.8 b 1 h (60*n) blend CF::Exclusion ] R (n--1) [ s 0.8 y -0.126 ] }
} path T {
path TRIANGLE [] STROKE (0.02) []
}
path C {
path CIRCLE [] STROKE ( 0.03 ) []
}
path SQ {
path SQUARE [s sqrt(2)] path SQUARE [r 45 ] loop 4 [ s 0.75 ] loop 6 [ r 15 ] loop 4 [ r 90 ] { path SQUARE [ s 0.5 x 0.5 r 45 ] } FILL(CF::EvenOdd)[]
}