# =========================================================================== # # === gallery2.cfdg # # Taken from: www.contextfreeart.org/gallery/view.php?id=4245 # # Added: 24.08.2021 # # Originally created by: y flembobs # =========================================================================== # startshape WEB [ ]
CF::Background = [ b -0.85 sat 0.6 h 160 ]
sectors=9 spirals=21
vector2 vertex(i,n,l)=let(A=(360*(i/n));(sin(A)*l,cos(A)*l))
len(i,j) = 0.5*((sectors*i + j)/(spirals*sectors))
shape WEB {
CIRCLE [ a -0.8 ] SPIRAL [b 1 sat 0.1 h 90] loop (sectors) [ r (360/(sectors)) ] LINE [ b 1 sat 0.1 h 90 ]
}
path SPIRAL {
loop i=spirals [] loop j=sectors [] { l1=len(i,j+1)+(-0.003..0.005) v1 = vertex(j+1,sectors,l1) R=0.35..1.5 ARCTO ( v1[0], v1[1], R ) } STROKE (0.00085) []
}
path LINE {
m0=-0.001..0.001 m1=-0.001..0.001 MOVETO(m0,m1) Y=0.5..0.555 R=let(n=7..10;select(rand()*2, -n, n)) ARCTO ( 0, Y, R ) STROKE (0.001)[]
}