image_paradise 0.4.20

data/lib/image_paradise/cfdg/twisted_hex_grid.cfdg

@@ -0,0 +1,26 @@
+
+startshape seed
+
+include i_polygons.cfdg
+
+rule seed {
+	 seed_up {y 0.866025 x -0.5}
+	  seed_up {r 180}
+}
+
+rule seed_up {
+	 seed_up {y 0.866025 x -0.5 s 0.97 b 0.05 r 1}
+	  seed_left {x -1}
+	   seed_right {}
+}
+
+rule seed_left {
+	 seed_left {x -1 s 0.97 b 0.05}
+	  polygon6sided {}
+}
+
+rule seed_right {
+	 seed_right {x 1 s 0.97 b 0.05}
+	  polygon6sided {}
+} 
+

data/lib/image_paradise/cfdg/twisty_triangel.cfdg

@@ -0,0 +1,79 @@
+# ========================================= #
+# confree twisty_triangel.cfdg output.png 800 100
+# ========================================= #
+
+
+startshape TRIPLES
+
+rule TRIPLES {
+	   LINES { r 0 }
+	      LINES { r 120 }
+		     LINES { r -120 }
+}   
+
+rule LINES {
+	   UTRIANGLE { y 0.5 }
+	      LINES { r 20 b 0.15 y 0.75 x -0.4330125  s 0.754877 }
+		     LINER { r -60 b 0.15 y 0.75 x 0.4330125  s 0.754877 }
+			  }
+rule LINER { LINER15 { } }
+rule LINER { LINER12 { } }
+rule LINER { LINER9 { } }
+rule LINER { LINER6 { } }
+rule LINER15 {
+	   UTRIANGLE { y 0.5 }
+	      LINER { r -15 b 0.02
+			        y 0.75 x 0.4330125  s 0.754877 }
+		   }
+rule LINER12 {
+	   UTRIANGLE { y 0.5 }
+	      LINER { r -12 b 0.02
+			        y 0.75 x 0.4330125  s 0.754877 }
+		   }
+rule LINER9 {
+	   UTRIANGLE { y 0.5 }
+	      LINER { r -9 b 0.02
+			        y 0.75 x 0.4330125  s 0.754877 }
+		   }
+rule LINER6 {
+	   UTRIANGLE { y 0.5 }
+	      LINER { r -6 b 0.02
+			        y 0.75 x 0.4330125  s 0.754877 }
+		   }
+
+// 0.754877 is the solution to
+// x^2 + x^3 = 1
+// this allows double backed
+// triangles to exactly line up!
+
+
+rule TESTU {
+	   TESTU_background { }
+	      UTRIANGLE { }
+		     UTRIANGLE { y 0.5 x -0.866025 b 0.5 r 60 }
+			    UTRIANGLE { y 0.5 x +0.866025 b 0.5 r 60 }
+}
+rule TESTU_background {
+	   CIRCLE {  b 0.5 }
+	      CIRCLE  { y -1 }
+		     CIRCLE { y -0.5 x -0.866025 }
+			    CIRCLE { y -0.5 x 0.866025 }
+				   CIRCLE { y 0.5 x -0.866025 }
+				      CIRCLE { y 0.5 x 0.866025 }
+					     CIRCLE  { y 1 }
+}
+
+rule UTRIANGLE {
+	   TRIANGLE { r 42.5 s 0.525 }
+}
+rule TRIANGLE{
+	   ARM { r 0 }
+	      ARM { r 120 }
+		     ARM { r -120 }
+}
+
+rule ARM {
+	   CIRCLE { }
+	      ARM { y 0.1 s 0.9 r 2 }
+} 
+

data/lib/image_paradise/cfdg/twizeeded.cfdg

@@ -0,0 +1,19 @@
+startshape tweed3
+ 
+rule tweed1 {
+  SQUARE { x 1 y 1 size 2 b .15 sat 100 hue 75}    
+  tweed1 { x 1.07 s 0.87 skew .5 2 b .10 flip 2 sat -.2 hue 1.5} 
+  tweed1 { r 45 s .428  b .01  flip 180} // draws on top of both
+}
+ 
+rule tweed2 {
+  tweed1 {r 0}
+  tweed1 {r 45}
+  tweed1 {r 90}
+  tweed1 {r 135}
+  tweed1 {r 180}
+}
+ 
+rule tweed3 {
+  tweed2 {r -2.45}
+}

data/lib/image_paradise/cfdg/uncontrolled_fungus.cfdg

@@ -0,0 +1,36 @@
+startshape dep 
+
+
+background {b -1}
+rule dep 30{
+  rugu{}
+  dep{y .1 r -1 s .99}
+}
+rule dep 60{
+  rugu{}
+  dep{y .1 r 3 s .99}  
+}
+rule dep 2{
+rot{}
+rot{}
+}
+rule dep {
+taille{}
+}
+# ==================================== #
+rule rot 360{rot{r 1}}
+rule rot {dep{}}
+# ==================================== #
+rule taille 100{taille{s .99}}
+rule taille {vort{}}
+# ==================================== # 
+rule vort { trait {} vort {r 111 s .999 b .1} }
+rule vort { trait {} vort {r 30 s .999 b .5} }
+rule vort { trait {} vort {r 180.05 s .999 b .7} }
+# ==================================== #
+rule trait {SQUARE {s 10 .01}}
+# ==================================== #
+rule rugu 360 {
+  rugu {r 1}
+}
+rule rugu    {TRIANGLE {b 1 alpha -.96}} 

data/lib/image_paradise/cfdg/underground.cfdg

@@ -0,0 +1,72 @@
+# rfree $CFDG/underground.cfdg
+startshape MAP
+
+rule MAP {
+  LOGO { }
+  ROUTE { x 80 y 80 rotate 90 }
+}
+
+rule ROUTE {
+  LINES { brightness 0.2 }
+}
+rule ROUTE {
+  LINES { brightness -0.2 }
+}
+rule LINES {
+  LINE { }
+  LINE { rotate 180 }
+}
+
+rule LINE 1000 {
+  CIRCLE { }
+  LINE { y 0.1 }
+}
+// turns
+rule LINE 1 { LINE { rotate 45 } }
+rule LINE 1 { LINE { rotate -45 } }
+rule LINE 1 { LINE { rotate 90 } }
+rule LINE 1 { LINE { rotate -90 } }
+
+// station
+rule LINE 4 {
+  SQUARE {
+    size 3
+    rotate 45
+  }
+  LINE { }
+}
+
+// interchange
+rule LINE 0.5 {
+  LINE { }
+  ROUTE { rotate 90 }
+}
+
+// terminus
+rule LINE 1 {
+  CIRCLE { size 3 }
+  CIRCLE { size 1
+    brightness 1 }
+}
+
+rule LOGO {
+  CIRCLE {
+    size 5
+    brightness 0.5
+  }
+  CIRCLE {
+    size 3.5
+    brightness 1.0
+  }
+  SQUARE { x -2.5 }
+  SQUARE { x -1.5 }
+  SQUARE { x -0.5 }
+  SQUARE { x  0.5 }
+  SQUARE { x  1.5 }
+  SQUARE { x  2.5 }
+  SQUARE { x -2.0 }
+  SQUARE { x -1.0 }
+  SQUARE { x  0 }
+  SQUARE { x  1.0 }
+  SQUARE { x  2.0 }
+}

data/lib/image_paradise/cfdg/underwater.cfdg

@@ -0,0 +1,75 @@
+# =========================================================================== #
+# === underwater.cfdg
+#
+# BY MONO
+# =========================================================================== #
+
+startshape START
+background { hue 180 sat 0.1 b 0.9 }
+
+rule START {
+  SCENE { hue 180 sat 0.8 b 0.8 }
+}
+
+rule SCENE {
+  FLOW { }
+  FLOW { flip -90 }
+}
+
+rule FLOW {
+  SQUARE { }
+  FLOW { x 1 s 0.994 r 3}
+}
+
+rule FLOW 0.001 {
+  SQUARE { }
+  CIRCLE { s 15 alpha -0.7 }
+  CIRCLE { s 3 x 17 alpha -0.7 }
+  FLOW { x 1 s 0.994 r 3}
+}
+
+rule FLOW 0.01 {
+  SQUARE { }
+  CIRCLE { x 10 s 15 alpha -0.9 }
+  CIRCLE { s 3 x -10 alpha -0.8 }
+  FLOW { x 1 s 0.994 r 3}
+}
+
+rule FLOW 0.0008 {
+  # CIRCLE { s 5 }
+  FLOWER { alpha -0.5 x 20 y 20}
+  FLOW { flip -3 }
+}
+
+rule FLOWER {
+  CIRCLE { s 9 2 r 75 x 0.5}
+  FLOWER { s 0.9 r 40 }
+}
+
+rule FLOW 0.01 {
+  FLOW { flip 2 }
+}
+
+rule FLOW 0.02 {
+  CIRCLE { s 5 4}
+  FLOW { flip 15 }
+  FLOW { r -45 s 0.4}
+}
+
+rule FLOW 0.01 {
+  SQUARE { }
+  BUBBLE { }
+  FLOW { x 1 s 0.994 r 3}
+}
+
+rule FLOW 0.01 {
+  SQUARE { }
+  FLOWER { y 15 alpha -0.7 }
+  FLOW { x 1 s 0.994 r 3}
+}
+
+rule BUBBLE {
+  CIRCLE { s 15 alpha -0.7 }
+  CIRCLE { s 3 x 17 alpha -0.7 }
+  BUBBLE { y 15 s 0.5 alpha -0.01 r 15}
+}

data/lib/image_paradise/cfdg/unicorn_boi.cfdg

@@ -0,0 +1,20 @@
+# From:
+#   https://www.contextfreeart.org/gallery2/#design/3901
+
+startshape UNICORN
+
+background{b-1}
+
+rule UNICORN
+{
+  // horn
+  200*{ y 0.5 h 7 r 0.9}
+  CIRCLE {h 284.71 sat 0.9190 b 1.0000}
+  //left horn
+  200*{ y 0.5 h 7 s 0.9 r 15}
+  CIRCLE {h 284.71 sat 0.9190 b 1.0000}
+  //rt horn
+  200*{ y 0.5 h 7 s 0.9 r -15}
+  CIRCLE {h 284.71 sat 0.9190 b 1.0000}
+  UNICORN {y 5 r 22.5 s 0.99}
+}

data/lib/image_paradise/cfdg/unification_sign.cfdg

@@ -0,0 +1,52 @@
+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}
+}
+ 
+ 

data/lib/image_paradise/cfdg/urban_connections.cfdg

@@ -0,0 +1,44 @@
+# rconfreegui $CFDG/urban_connections.cfdg
+startshape START
+background { hue 400 sat 0.2 b -1 }
+
+rule START {
+  SCENE { hue 900 sat 1 b 1 }
+  FUXIA {hue 400 sat 1 b 1}
+  START {y 100 r 90 s 0.29}
+}
+
+rule FUXIA{
+  CIRCLE { s 10 x -10 }
+  CIRCLE { x 50 s 5 }
+  CIRCLE { x 15 y 15 size 5 }
+  # CIRCLE { x 50 y 15 size 10 alpha -0.7}
+  FUXIA {y 50 r 88 s 0.59 alpha -0.15}
+}
+
+rule FUXIA 0.45 {
+  FUXIA{flip -50}
+  FUXIA {flip -10}
+}
+
+rule SCENE {
+  CIRCLE { size 20 }
+  CIRCLE { size 30 alpha -0.7 }
+  CIRCLE { size 40 alpha -0.7 }
+  FLOW { }
+  FLOW { }
+  FLOW { flip -50 }
+  FLOW { flip -50 }
+  FLOW { flip -10 }
+  FLOW { flip -10 }
+}
+
+rule FLOW 0.008 {
+  SQUARE { }
+  CIRCLE { s 5 alpha -0.7 }
+  FLOW { x 1 s 0.995 r 2}
+}
+
+rule FLOW 0.0001 {
+  FLOW { flip 2 }
+}

data/lib/image_paradise/cfdg/us_flag.cfdg

@@ -0,0 +1,109 @@
+# ========================================================== #
+# background {hue 120 b 1 sat 1}  // Used to find borders, errors, etc
+# http://www.usFLAG.org/FLAGspecs.html
+# I'm designing such that the dimension
+# is multiplied by 1000
+# Thus the FLAG width is 1000
+# and FLAG length is 1900
+# etc.
+# I followed the webpage above for the 
+# starfield, but then simply threw the
+# stripes on in a way that looked good
+# to me.
+# ========================================================== #
+
+startshape FLAG
+
+
+rule FLAG {
+  stripes {}
+  starfield {}
+}
+
+rule stripes {
+  // Short stripes
+  shortstripe {x 712 y 431 s 70  b 1 h 0 sat 1}
+  shortstripe {x 712 y 288 s 70  b 1 h 0 sat 1}
+  shortstripe {x 712 y 144 s 70  b 1 h 0 sat 1}
+  shortstripe {x 712 y 0 s 70  b 1 h 0 sat 1}
+
+  // Long stripes
+  shortstripe {x -15 y -144 s 70  b 1 h 0 sat 1}
+  shortstripe {x 712 y -144 s 70  b 1 h 0 sat 1}
+  shortstripe {x -15 y -288 s 70  b 1 h 0 sat 1}
+  shortstripe {x 712 y -288 s 70  b 1 h 0 sat 1}
+  shortstripe {x -15 y -431 s 70  b 1 h 0 sat 1}
+  shortstripe {x 712 y -431 s 70  b 1 h 0 sat 1}
+}
+
+rule starfield {
+  // Blue background
+  // Used to be two large squares, but the interpreter
+  // appears to add a border relative the shape size 
+  // around each shape so the squares had huge 
+  // borders on the top and left of the FLAG.
+  //  SQUARE {s 500 hue 200 sat 1 b 1 y 216 x 200}
+  //  SQUARE {s 500 hue 240 sat 1 b 1 y 216 x 425}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y -2}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 64}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 129}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 194}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 259}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 324}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 389}
+  shortstripe {s 66 hue 240 sat 1 b 1 x -17 y 433}
+
+  // Stars
+  starline6 {}
+  starline5 {y 54 x 63}
+  starline6 {y 108}
+  starline5 {y 162 x 63}
+  starline6 {y 216}
+  starline5 {y 270 x 63}
+  starline6 {y 324}
+  starline5 {y 378 x 63}
+  starline6 {y 432}
+}
+
+rule starline6 {
+  starline5 {}
+  stars {x 630}
+}
+
+rule starline5 {
+  stars {}
+  stars {x 126}
+  stars {x 252}
+  stars {x 378}
+  stars {x 504}
+}
+
+rule stars {
+  star {s 15 b 1 y 5}
+}
+
+rule star  {
+  // Thanks, bargonaut, for the stars.  
+  // I skewed the triangles for a regular 5 point star
+  CIRCLE  { s 1.3 y -0.3 }
+  TRIANGLE  { x 0 y 0.667  s 1 1.75}
+  TRIANGLE  { x -0.91 r 72 s 1 1.75}
+  TRIANGLE  { x -0.57 y -1.07 r 144  s 1 1.75 }
+  TRIANGLE  { x 0.57 y -1.07 r 216  s 1 1.75 }
+  TRIANGLE  { x 0.91 y 0 r 288 s 1 1.75  }
+}
+
+rule shortstripe {
+//  SQUARE {x 5 s 11 1}  // Shortcut, but generates large borders
+  SQUARE {}
+  SQUARE {x 1}
+  SQUARE {x 2}
+  SQUARE {x 3}
+  SQUARE {x 4}
+  SQUARE {x 5}
+  SQUARE {x 6}
+  SQUARE {x 7}
+  SQUARE {x 8}
+  SQUARE {x 9}
+  SQUARE {x 10}
+}

data/lib/image_paradise/cfdg/v_null.cfdg

@@ -0,0 +1,89 @@
+# From:
+#   https://www.contextfreeart.org/gallery2/#design/3910
+
+startshape BIT(0, (0,1,2,3,4)) []
+
+CF::MaxNatural = 9007199254740992
+
+// The shape BIT is a finite-state machine that
+// produces random but structured patterns
+
+// BIT draws a TILE and then alters the vector
+// parameter according to the state specified by v[0]
+
+// The pattern starts at the lower left pixel and
+// walks to the right - moving up and returning to
+// the left when n == row size 
+
+
+num_steps = 1089
+row_size = 33
+
+//Some alternative canvas sizes
+
+//num_steps = 400
+//row_size = 20
+
+//num_steps = 10000
+//row_size = 100
+
+//num_steps = 9801
+//row_size = 99
+
+shape BIT(natural n, vector5 v)
+{
+  if(n < num_steps)
+  {
+    //Draw tile in proper position
+    TILE(v[0])[ x mod(n, row_size) y floor((n/row_size))  ]
+
+    //every 26 steps repeat the current state
+    if (mod(n,26) == 0 )
+    {
+        BIT(n+1, (v[0],v[1],v[2],v[3],v[4]) )[]
+    }
+
+    //state 0 == reverse direction
+    else if (v[0] == 0 )
+    {
+        BIT(n+1, (v[4],v[3],v[2],v[1],v[0]) )[]
+    }
+
+    //state 0 == swap next and previous states
+    else if (v[0] == 2  )
+    {
+        BIT(n+1, (v[1],v[4],v[2],v[3],v[0]) )[]
+    }
+
+    //default state - cycle the vector
+    else
+    {    
+        BIT(n+1, (v[1],v[2],v[3],v[4],v[0]) )[]
+    }
+
+  }
+}
+
+shape TILE(number state)
+{
+  if (state == 0 )
+  {
+    SQUARE[h 43.08 sat 0.1797 b 0.7]
+  }
+  if (state == 1 )
+  {
+    SQUARE[h 44.52 sat 0.4 b 0.5804]
+  }
+  if (state == 2 )
+  {
+    SQUARE[h 146.67 sat 0.1 b 0.4]
+  }
+  if (state == 3 )
+  {
+    SQUARE[h 35.38 sat 0.3197 b 0.4784]
+  }  
+  if (state == 4 )
+  {
+    SQUARE[h 190.00 sat 0.1639 b 0.14]
+  }
+}

data/lib/image_paradise/cfdg/very_simple_flower.cfdg

@@ -0,0 +1,45 @@
+
+startshape FLOWER
+
+rule FLOWER {
+   LINE { }
+   LINE { r 45 }
+   LINE { r 90 }
+   LINE { r 135 }
+   LINE { r 180 }
+   LINE { r 225 }
+   LINE { r 270 }
+   LINE { r 315 }
+   CLINE { }
+   CLINE { r 45 }
+   CLINE { r 90 }
+   CLINE { r 135 }
+   CLINE { r 180 }
+   CLINE { r 225 }
+   CLINE { r 270 }
+   CLINE { r 315 }
+   CLINE2 { }
+   CLINE2 { r 45 }
+   CLINE2 { r 90 }
+   CLINE2 { r 135 }
+   CLINE2 { r 180 }
+   CLINE2 { r 225 }
+   CLINE2 { r 270 }
+   CLINE2 { r 315 }
+}
+
+rule LINE {
+   SQUARE { }
+   LINE { x 1 s .96 }
+}
+
+rule CLINE {
+   SQUARE { }
+# CLINE { y 1 r 1.1 s .95885 }
+   CLINE { y 1 r 1.2 s .95885 }
+}
+
+rule CLINE2 {
+   SQUARE { }
+   CLINE2 { y -1 r -1.1 s .95885 }
+} 

data/lib/image_paradise/cfdg/very_simple_hexagon.cfdg

@@ -0,0 +1,16 @@
+
+
+
+
+startshape HEXAGON
+rule HEXAGON {
+
+	    SQUARE {size .5 rotate -30 y -0.09 x 0.16}
+	    SQUARE {size .5 rotate 30 y 0.09 x 0.16}
+	    SQUARE {size .5 rotate -30 y 0.09 x -0.16}
+	    SQUARE {size .5 rotate 30 y -0.09 x -0.16}
+	    SQUARE {size .5 y .183 }
+	    SQUARE {size .5 y -0.183 }
+
+}
+

data/lib/image_paradise/cfdg/very_simple_octagon.cfg

@@ -0,0 +1,13 @@
+startshape OCTAGON
+
+rule OCTAGON{
+	   SQUARE{size .41 y -0.20 x -0.201 r 45}
+	   SQUARE{size .41 y -0.285 }
+	   SQUARE{size .41 y -0.20 x 0.20 r 45}
+	   SQUARE{size .41 x 0.285 }
+	   SQUARE{size .41 y 0.20 x 0.20 r 45}
+	   SQUARE{size .41 y 0.285}
+	   SQUARE{size .41 y 0.20 x -0.20 r 45}
+	   SQUARE{size .41 x -0.285}
+	   SQUARE{size .41}
+}