image_paradise 0.4.20

data/lib/image_paradise/cfdg/func_plot.cfdg

@@ -0,0 +1,59 @@
+# =========================================================================== #
+# Taken from: https://www.contextfreeart.org/gallery/view.php?id=4279
+# Added on:   12.09.2022
+# Created on: 08.09.2022
+# Author:   flx
+# =========================================================================== #
+
+// CFA "FuncPlot" 2022 by flx
+RX = 4 // resX
+RY = 4 // resY
+ZM = 1 // zoom
+startshape A
+shape A {
+  COORDSYS[]
+  FUNC_01[]
+}
+shape FUNC_01 {
+  loop X = -RX/ZM, RX/ZM, 0.001 [] {
+    Y = 0.6*X^3 + 2*X^2 + X // Function formula
+    if (Y<RY/ZM && Y>-RY/ZM)
+    CIRCLE[x (X*ZM) y (Y*ZM) s 0.1 b 1 sat 1 h 250]
+  }
+}
+shape COORDSYS {
+  // Origin
+  CIRCLE[s 0.1]
+  // Gridlines
+  loop i=0,RX,ZM [] {
+    SQUARE[x i y 0 s 0.02 ((RY)*2) b 0.5]
+    SQUARE[x -i y 0 s 0.02 ((RY)*2) b 0.5]
+  }
+  loop i=0,RY,ZM [] {
+    SQUARE[x 0 y i s ((RX)*2) 0.02 b 0.5]
+    SQUARE[x 0 y -i s ((RX)*2) 0.02 b 0.5]
+  }
+  // Axis with arrows
+  SQUARE[x 0 y 0 s 0.05 (RY*2) b 0]
+  SQUARE[x 0 y 0 s (RX*2) 0.05 b 0]
+  TRIANGLE[s 0.3 y (RY-0.16)]
+  TRIANGLE[s 0.3 r -90 x (RX-0.16)]
+  // Unit-Ticks
+  SQUARE[x ZM y 0 s 0.03 0.2 b 0]
+  SQUARE[x 0 y ZM s 0.2 0.03 b 0]
+  // Axis-Labels
+  ONE[x ZM y -0.5]
+  ONE[x -0.3 y (ZM-0.1)]
+}
+
+path ONE {
+  transform[s 0.2] {
+    MOVETO(0,0)
+    LINETO(0,1)
+    LINETO(-0.3,0.7)
+    STROKE(0.2)[]
+    MOVETO(-0.3,0)
+    LINETO(0.3,0)
+    STROKE(0.2)[]
+  }
+}

data/lib/image_paradise/cfdg/funky_squiggle.cfdg

@@ -0,0 +1,40 @@
+# $IMG/CFDG/funky_squiggle.cfdg
+# rconfreegui $IMG/CFDG/funky_squiggle.cfdg
+startshape FUNKY_SQUIGGLE
+
+background{ b -.925 }
+
+rule FUNKY_SQUIGGLE
+{
+  THING1{}
+  THING2{}
+}
+
+rule THING1 { START {} THING1{ x .125 y .09375 size .995 b .001 hue .1 sat 5 r -.5 } }
+rule THING2 { START {} THING2{ x -.125 y -.09375 size .995 b .001 hue .1 sat 5 r -.5 } }
+
+rule START
+{
+  LEFTRIGHT{}
+}
+
+rule LEFTRIGHT { LEFT{} }
+rule LEFTRIGHT { RIGHT{} }
+
+rule LEFT { SEED{} LEFT{ y .3 r 5 size .99 b .01 hue .05 } }
+rule LEFT { SEED{} LEFT{ y .3 r 5 size .99 b .01 hue .05 } }
+rule LEFT { SEED{} LEFT{ y .3 r 5 size .99 b .01 hue .05 } }
+rule LEFT { SEED{} LEFT{ y .3 r 10 size .99 b .01 hue .05 } }
+rule LEFT { SEED{} LEFT{ y .3 r 10 size .99 b .01 hue .05 } }
+rule LEFT { SEED{} LEFT{ y .3 r 20 size .99 b .01 hue .05 } }
+rule LEFT { SEED{} RIGHT{} }
+
+rule RIGHT { SEED{} RIGHT { y .3 r -5 size .99 b .01 hue .05 } }
+rule RIGHT { SEED{} RIGHT { y .3 r -5 size .99 b .01 hue .05 } }
+rule RIGHT { SEED{} RIGHT { y .3 r -5 size .99 b .01 hue .05 } }
+rule RIGHT { SEED{} RIGHT { y .3 r -10 size .99 b .01 hue .05 } }
+rule RIGHT { SEED{} RIGHT { y .3 r -10 size .99 b .01 hue .05 } }
+rule RIGHT { SEED{} RIGHT { y .3 r -20 size .99 b .01 hue .05 } }
+rule RIGHT { SEED{} LEFT{} }
+
+rule SEED { CIRCLE{} }

data/lib/image_paradise/cfdg/fuzzy_sun.cfdg

@@ -0,0 +1,47 @@
+startshape start
+background{b -1}
+
+rule start
+{
+  CIRCLE{sat 0 b 1 s 5 x -5}
+  spiral{hue .1 sat 1 b 1}
+}
+
+rule spiral
+{
+  hair{}
+  spiral{hue .1 sat -0.0008 y 1 r 10 s 0.9992}
+}
+
+rule hair 10
+{
+  SQUARE{}
+  hair{y 1 r 5 s 0.99}
+}
+
+rule hair 10
+{
+  SQUARE{}
+  hair{y 1 r -5 s 0.99}
+}
+
+rule hair 0.005
+{
+  hair{}
+  hair{r 10 hue 180}
+  //smallspiral{hue 180 b 1}
+}
+
+/*
+rule smallspiral
+{
+  SQUARE{}
+  smallspiral{y 1 r 1 s 0.99 hue 1}
+}
+
+rule smallspiral
+{
+  SQUARE{}
+  smallspiral{y 1 r -1 s 0.99 hue 1}
+}
+*/

data/lib/image_paradise/cfdg/galaxy.cfdg

@@ -0,0 +1,59 @@
+startshape GALAXY
+
+background { hue -20 sat 0 b -1 }
+
+rule GALAXY {
+  ZWEIG{}
+}
+
+rule ZWEIG {
+  ZWEIG {s 1 r 90}
+}
+
+
+rule SPOREN 25 {
+  CIRCLE {hue 0 sat 0 b .2 s .1}
+  SPOREN { y 0.2 size .995}
+}
+
+
+rule SPOREN .5{
+ZWEIG {}
+}
+
+rule SPOREN .1 {
+CIRCLE {hue 0.0 sat 0.0000 b 0.8 s .8}
+CIRCLE {hue 0.0 sat 0.0000 b 0.5 s .6}
+CIRCLE {hue 0.0 sat 0.0000 b 0.3 s .4}
+}
+
+rule SPOREN .1 {
+CIRCLE {hue 0.0 sat 0.0000 b 0.8 s .6}
+CIRCLE {hue 0.0 sat 0.0000 b 0.5 s .4}
+CIRCLE {hue 0.0 sat 0.0000 b 0.3 s .3}
+}
+
+rule ZWEIG{
+ZWEIG_LINKS {}
+ZWEIG_RECHTS {}
+}
+
+rule ZWEIG_LINKS 3{
+SPOREN {r 20 }
+}
+rule ZWEIG_LINKS{
+  SPOREN {r 180}
+}
+rule ZWEIG_LINKS{
+  SPOREN {r 270}
+}
+
+rule ZWEIG_RECHTS 3{
+  SPOREN {r -90}
+}
+rule ZWEIG_RECHTS{
+  SPOREN {r -180}
+}
+rule ZWEIG_RECHTS 15{
+  SPOREN {r -270}
+}

data/lib/image_paradise/cfdg/gallery.cfdg

@@ -0,0 +1,28 @@
+# =========================================================================== #
+# === gallery.cfdg
+#
+# From: https://www.contextfreeart.org/gallery/view.php?id=4113
+#
+# Created: 01.03.2021
+#
+# Originally created by by thohTu0u Variation: HPL, uploaded
+# on December 25th, 2019.
+# =========================================================================== #
+HUE_BORDER = 210
+STEPS = 100
+
+CF::Background = [h HUE_BORDER sat 1 b -5]
+CF::Size = [s 120]
+
+startshape galaxy []
+
+shape galaxy {
+  loop STEPS [x -5..5 y -5..5 h .5]
+    cloud [h HUE_BORDER sat 1 b 1]
+}
+
+shape cloud {
+  randomShape = let(n = 0..3; select(n, CIRCLE, SQUARE, TRIANGLE))
+  randomShape []
+  cloud [x -5..5 y -5..5 a -.03 r 1..10 s .995]
+}

data/lib/image_paradise/cfdg/game1_turn6.cfdg

@@ -0,0 +1,35 @@
+startshape START
+
+background {
+  hue 36 sat 0.34 b 0.535
+}
+
+rule START {
+  SPIRAL{}
+  SPIRAL { r 120 }
+  SPIRAL { r 240 }
+}
+
+rule SPIRAL {
+  F_SQUARES { }
+  F_TRIANGLES { x 0.5 y 0.5 r 45 }
+  SPIRAL { y 1 r 25 s 0.9 }
+}
+
+rule SPIRAL 0.022 {
+  START { flip 90 hue 50}
+}
+
+rule F_SQUARES {
+  SQUARE    { x 0.1 y 0.1 alpha -0.33 hue 250 sat 0.7 b 0.8 }
+  SQUARE    {  hue 220 sat 0.9 b 0.33  }
+  SQUARE    { s 0.9 hue 220 sat 0.25 b 1 }
+  F_SQUARES { s 0.8 r 5 }
+}
+
+rule F_TRIANGLES {
+  TRIANGLE    { x 0.1 y 0.1 alpha -0.33 hue 20 sat 0.7 b 0.8  }
+  TRIANGLE    { hue 10 sat 0.9 b 0.33  }
+  TRIANGLE    { s 0.9 hue 10 sat 0.5 b 1 }
+  F_TRIANGLES { s 0.8 r 5 }
+}

data/lib/image_paradise/cfdg/garland.cfdg

@@ -0,0 +1,42 @@
+/*
+ garland
+ 
+ By AK Nov 2013
+ 
+ Not really representative of
+ any particular flower, just
+ an attractive variant of some
+ ideas I was messing around with.
+ 
+ Variations: FPZ,AAC
+ 
+ http://creativecommons.org/licenses/by-sa/3.0/au/deed.en
+*/
+ 
+ 
+CF::ColorDepth=16
+CF::Size=[]
+ 
+startshape A(0,1)[h 60 sat .2]
+ 
+shape A(number p,number q)
+rule 50{
+    B(=)[b p x .3 a -1 s .8 (1-2*p) sat (p/5)]
+    A(q,p)[s .97 r 120±20 h 190]
+    // approximate symmetry from ~120° rotation
+    // note that p,q alternates between 0,1 and 1,0
+    }
+rule {}
+ 
+shape B(number p, number q){// single twist
+    S(7,2)[z -1 a -.98]
+    B(=)[s .99 .99 .99 r .5±1 b .01 q sat .002 p a .02]
+    // variation in rotation angle for texture
+    }
+ 
+path S(number n,m){// generic star
+    MOVETO(0,.5)
+    loop n [r (m*360/n)] LINETO(0,.5)
+    CLOSEPOLY()
+    FILL(CF::EvenOdd)[]
+    }

data/lib/image_paradise/cfdg/general_polygons.cfdg

@@ -0,0 +1,20 @@
+
+startshape seed
+
+include i_polygons.cfdg
+
+rule seed {
+	 CIRCLE {x -2 y 2 b 0.5}
+	  CIRCLE {x -2 y 0 b 0.5}
+	   polygon5sided {x 0 y 0}
+	    polygon6sided {x 2 y 0}
+	 polygon7sided {x 4 y 0}
+	  polygon8sided {x 6 y 0}
+	   polygon9sided {x 0 y 2}
+	    polygon10sided {x 2 y 2}
+	 polygon11sided {x 4 y 2}
+	  polygon12sided {x 6 y 2}
+	   CIRCLE {x 8 y 0 b 0.5}
+	    CIRCLE {x 8 y 2 b 0.5}
+} 
+

data/lib/image_paradise/cfdg/generational_birds.cfdg

@@ -0,0 +1,118 @@
+/*
+ *  Generational - by Jeremy Douglass - 2007-04-06
+ *  based on Piupole by Guigui
+ *
+ *    http://www.contextfreeart.org/gallery/view.php?id=558
+ *
+ *  in response to andrewborrell on genetic algorithms
+ *   
+ *   http://www.contextfreeart.org/phpbb/viewtopic.php?p=1724
+ * 
+ *  Parent1 is always yellow with wide eyes and an open mouth,
+ *  Parent2 is always brown with narrow eyes and a closed
+ *  mouth.
+ *  Within traits, they vary, and their children mix by trait.
+ *  
+ */
+
+ 
+startshape generational
+background { hue 210 sat .5 b -.2 }
+ 
+rule generational {
+    children { }
+    p01 { x -.7 z -10 s .25 }
+    p02 { x  .7 z -10 s .25 }
+}
+ 
+rule children     { children_col { s .2 } }
+rule children_col { 5* { x  1 } children_row { x -2 s 0.8 }
+}
+rule children_row { 5* { y -1 } child        { y  2 s 0.8 }
+}
+ 
+// offspring
+rule child {
+    pick_body {}
+    pick_eyes { s 0.3 y  0.15 }
+    pick_mouth { s 0.3 z  1    }
+}
+rule child .1 { child { hue 180  } } // random mutation
+ 
+# PARENT1
+# PARENT1 appearance
+rule p01 {
+    p01_body {}
+    p01_eyes { s 0.3 y  0.15 }
+    p01_mouth { s 0.3 z  1    }
+}
+// PARENT1 gamete - could become part of child
+rule pick_body      { p01_body {}  }
+rule pick_eyes  1.2 { p01_eyes {}  } // dominant-ish trait
+rule pick_mouth     { p01_mouth {} }
+ 
+// PARENT1 genes
+rule p01_body   { skin { b 1.0  sat .5   hue 30 } }
+rule p01_body   { skin { b 0.5  sat .5  hue 30 } }
+rule p01_eyes   { p01_eye { x -1 r -15 } p01_eye { x 1 r  15
+  } }
+rule p01_mouth {
+    skin { s 1 1.3 } skin { s 0.9 1.2 }
+    CIRCLE { s 0.8 0.6 y -.1 z 0.1 sat 1 b 0.3 }
+    2* [flip 90] CIRCLE { r -9 s 0.1 0.2 x -.1 y 0.4 z 0.2 b
+1 sat 0.3 a -.5 }
+}
+rule p01_mouth {
+    skin { s 1 1.3 } skin { s 0.9 1.2 }
+    CIRCLE { s 0.3 0.4 y -.1 z 0.1 sat 1 b 0.3 }
+    2* [flip 90] CIRCLE { r -9 s 0.1 0.2 x -.1 y 0.3 z 0.2 b
+1 sat 0.3 a -.5 }
+}
+rule p01_eye { skin { s 1.2   } CIRCLE {         b 1 z 0.1 }
+CIRCLE { s 0.3 z 0.15 } }
+rule p01_eye { skin { s 1.2 2 } CIRCLE { s 1 1.7 b 1 z 0.1 }
+CIRCLE { s 0.3 z 0.15 } }
+ 
+// PARENT2
+ 
+// PARENT2 appearance
+rule p02 {
+    p02_body {}
+    p02_eyes { s 0.3 y  0.15 }
+    p02_mouth { s 0.3 z  1    }
+}
+ 
+// PARENT2 gamete - could become part of child
+rule pick_body     { p02_body  {} }
+rule pick_eyes  .8 { p02_eyes  {} } // recessive-ish trait
+rule pick_mouth    { p02_mouth {} }
+ 
+// PARENT2 genes
+rule p02_body   { skin { b 0    sat 1    hue  0 } }
+rule p02_body   { skin { b 0    sat 0.5  hue  0 } }
+rule p02_eyes   { p02_eye { x -1       } p02_eye { x 1 flip
+90 } }
+rule p02_eyes   { p02_eye { x -1 r  15 } p02_eye { x 1 r -15
+  } }
+rule p02_eyes   { p02_eye { x -1 r -15 } p02_eye { x 1 r  15
+  } }
+rule p02_mouth {
+    CIRCLE { s 1 1.3 b 0.5 sat 1 hue 30 } skin { s 0.9 1.2 z
+0.02 }
+    SQUARE { s 0.9 0.06 y -.1 z 0.04 b 0.5 sat 1 hue 30 }
+    2* [flip 90] CIRCLE { r -9 s 0.1 0.2 x -.1 y 0.3 z 0.1 b
+1 sat 0.3 a -.5 }
+}
+rule p02_mouth {
+    skin { s 1 1.3 } skin { s 0.9 1.2 z 0.02 }
+    4* { x 0.21 }  SQUARE { x -.315 s 0.15 0.3 y -.1 z 0.04
+b 1 }
+    2* [ flip 90 ] CIRCLE { r -9 s 0.1 0.2 x -.1 y 0.3 z 0.1
+b 1 sat 0.3 a -.5 }
+}
+rule p02_eye   { SQUARE { y 0.1 s 1.2 0.15 b 0.2 sat 1 hue
+30 } }
+ 
+// common unvarying genome
+ 
+rule skin { CIRCLE { b 0.5 hue 30 sat .25 } }

data/lib/image_paradise/cfdg/ghostly_spine.cfdg

@@ -0,0 +1,24 @@
+# ghostly spine by wxs
+
+startshape S
+background {b -1}
+rule S 30 {
+  T {b 1 sat 1}
+  T {flip 90 b 1 sat 1}
+  S {y 30 r 5 s 0.99 b 1 hue 3 sat 1}
+}
+rule S {
+  T{b 1}
+  T {flip 90 b 1}
+  S{y 30 r 5 s 0.99 b 1 flip 90}
+}
+
+rule T {
+  U{}
+  T{y 5 r 3 s 0.99 hue 1.5}
+}
+
+rule U {
+  CIRCLE{}
+  U{y 1 r 5 s 0.99}
+}

data/lib/image_paradise/cfdg/gift_wrapping.cfdg

@@ -0,0 +1,46 @@
+startshape DEPART
+//SVU
+background{sat 1}
+tile {s 6}
+ 
+rule DEPART {MAN{}MEN{s .3 b .5 sat .5 z -10}}
+ 
+rule MEN {MAN{}MEN{s .99 b .06 sat .1 z -5}}
+rule MEN 3000{MEN{x .7}}
+rule MEN 3000{MEN{y .7}}
+ 
+rule MAN {
+SQU{s .18 y .47 z -1}
+CIRCLE{}
+CIRCLE{s .87 b 1}
+CIRCLE{s .87 .95 x -.05 y .01 r -15}
+TET{s .1 y .5 z -1}
+BR[r 60 y .5 s .2 z -1]
+BR[r -60 y .5 s .2 z -1]
+JAM[r 150 y .5 s .2 z -1]
+JAM[r -150 y .5 s .2 z -1]
+}
+ 
+rule JAM {10*{y .1} SQU{}JAMB{y 1}}
+rule JAMB 30{SQU{}JAMB{y .1 r 3 s .999}}
+rule JAMB 2{JAMB{flip 90}}
+rule JAMB {FEU {s 3 r 36 z 1}FEU {s 4 r 36 b 1 z -1}}
+ 
+rule BR {30*{y .1} SQU{}BRA{y 3}}
+rule BRA 30{SQU{}BRA{y .1 r 1 s .99}}
+rule BRA {BRA{flip 90}}
+rule BRA {FEU {y .3 s 2 r 36}FEU {y .1 s 2.5 r 36 b 1 z
+-1}}
+ 
+rule TET {20*{y .1} SQU{}TETEA{y 2}}
+rule TETEA 50{SQU{}TETEA{y .1 r 1}}
+rule TETEA {TETEA{flip 90}}
+rule TETEA {FEU{s 9 b 1 sat 1 hue 60 z 2}}
+ 
+rule FEU{
+5*{r 72}TRIANGLE{s .36 .6 y .17}
+CIRCLE{x .09 y .045 s .11 hue -60}
+CIRCLE{x -.09 y .045 s .12 hue -60}
+}
+ 
+rule SQU{SQUARE{}SQUARE{b 1 x .2 s .1 1.1}}

data/lib/image_paradise/cfdg/glass_cubes.cfdg

@@ -0,0 +1,33 @@
+# this is rather advanced stuff
+startshape glasscubes
+
+rule glasscubes {
+  18 * {x 0.2 y 0.2  r 0} cubebox {b 1 sat 0.2 alpha -0.2}
+}
+
+rule cubebox {
+  25 * {y -1.2 hue 18 sat 0.2 alpha -0.02} cuberow { }
+}
+
+rule cuberow {
+  15 * {x -1.2 hue 12 sat 0.2 alpha 0.1} randomcube {b 1 sat 1 }
+}
+
+rule randomcube 0.4 {randomcube {alpha -0.6}}
+rule randomcube {randomcube {b 0.3}}
+rule randomcube {randomcube {b -0.3}}
+rule randomcube {randomcube {hue -5}}
+rule randomcube {randomcube {hue 5}}
+
+
+rule randomcube 1 {cube {}}
+
+
+rule cube {
+ SQUARE {x 0.281 y 0.281 hue 240}
+ SQUARE [r 45 skew 45 0 x -0.5125 y 0.355 s 0.4 0.707 b -0.5 hue 120 ]
+ SQUARE [r -45 skew 0 45 x 0.355 y -0.5125 s 0.707 0.4 b -0.5 hue 40 ]
+ SQUARE [r 45 skew 45 0 x 0.9095 y -0.355 s 0.4 0.707 hue 80 ]
+ SQUARE [r -45 skew 0 45 x -0.355 y 0.9095 s 0.707 0.4 hue 160 ]
+ SQUARE { }
+}

data/lib/image_paradise/cfdg/gleaming_bush.cfdg

@@ -0,0 +1,33 @@
+# rconfree $CFDG/gleaming_bush.cfdg
+# child of glowing_bush, other colours, and not as long.
+
+startshape SEED
+
+background {b -1}
+
+rule SEED {
+  SEED1  { hue 0 sat 0.72 b 1 }
+}
+# invoke self, become smaller. Square is needed to avoid holes
+rule SEED1 {
+  SQUARE   { }
+  SEED1    { y 1 size 0.99 r 2.4 hue .15 b 0.11 }
+}
+# As above but makes a twist to the other direction
+rule SEED1 {
+  SQUARE   { }
+  SEED1    { y 1 size 0.99 r -2.4 hue .55 sat 0.405}
+}
+
+rule SEED1 0.05 {
+  SQUARE {}
+  SEED1  { r -22 hue .3  sat 0.015}
+  SEED1  { r  22 hue .2  sat 0.015}
+}
+
+rule SEED1 0.05 {
+  SQUARE {}
+  SEED1  { y 1 s 0.99   r 1.5   flip 80 hue .22 sat 0.045 }
+  SEED1  {     s 0.6    r -45           hue .2  sat 0.045 }
+  SEED1  {     s 0.5    r  45   flip 80 hue .2  sat 0.045 }
+}

data/lib/image_paradise/cfdg/glowing_bush.cfdg

@@ -0,0 +1,33 @@
+# burning_bush.cfdg
+startshape SEED
+
+background {b -1}
+
+rule SEED {
+  SEED1 {hue 0 sat 0.8 b 1}
+}
+
+rule SEED1 {
+  SQUARE{}
+  SEED1 {y 1 size 0.99 r 1.5 hue .15 b 0.01}
+}
+
+rule SEED1 {
+ SQUARE{}
+ SEED1 {y 1 size 0.99 r -1.5 hue .35 sat 0.005}
+}
+
+rule SEED1 0.04 {
+  SQUARE {}
+  SEED1 {r -22 hue .3 sat 0.005}
+  SEED1 {r 22 hue .2 sat 0.005}
+}
+
+rule SEED1 0.05 {
+  SQUARE{}
+  SEED1 {y 1 s 0.99 r 1.5 flip 90 hue .22 sat 0.005}
+  SEED1 { s 0.6 r -45 hue .2 sat 0.005}
+  SEED1 { s 0.5 r 45 flip 90 hue .2 sat 0.005}
+  SEED1 {r 1 hue .2 sat 0.003}
+}
+

data/lib/image_paradise/cfdg/go_grid.cfdg

@@ -0,0 +1,32 @@
+# I made this for a goban that I am 
+# building in Second Life. I will composite this on 
+# top of a woodgrain image.
+
+# Go board grid using dimensions found at
+# http://senseis.xmp.net/?EquipmentDimensions
+ 
+startshape board
+background {a -1}
+ 
+rule board {
+  grid {s 1 1.07143}
+}
+ 
+rule grid {
+  SQUARE {a -1 s 424 x 212 y 212}
+  lines {x 14 y 14}
+  lines {x 14 y 14 flip 45}
+  stars {x 14 y 14}
+}
+ 
+rule lines {
+  19* {y 22} SQUARE {s 396 1 x 198}
+}
+ 
+rule stars {
+  3* {y 132} star_row{y 66}
+}
+ 
+rule star_row {
+  3* {x 132} CIRCLE {s 4 x 66}
+}

data/lib/image_paradise/cfdg/gold_tiles.cfdg

@@ -0,0 +1,21 @@
+startshape START_SHAPE
+
+rule START_SHAPE {
+  SQUARE { x 0.5 y 0.5 s 2 hue 240 sat 1 b 0.3}
+  rectangle { x 0 y 0 sat 1 b 0 hue 0 s 0.71 1}
+  rectangle { x 1 y 0 sat 0 b 1 hue 0 s 0.71 1}
+  rectangle { x 0 y 1 sat 1 b 1 hue 0 s 0.71 1}
+  rectangle { x 1 y 1 sat 0.5 b 0.5 hue 0 s 0.71 1}
+}
+
+rule rectangle {
+  SQUARE {  }
+  rectangle [ r 90 s 0.71 y 0.5 alpha -0.4 b -0.1 sat -0.2 hue -4]
+  rectangle [ r -90 s 0.71 y 0.5 alpha 0.02 b 0.2 sat 0.3 hue 4]
+}
+
+rule rectangle {
+  SQUARE {  }
+  rectangle [ r -90 s 0.71 y 0.5 alpha -0.4 b -0.1 sat -0.2 hue -4]
+  rectangle [ r 90 s 0.71 y 0.5 alpha 0.02 b 0.2 sat 0.3 hue 4]
+}

data/lib/image_paradise/cfdg/golden_rectangle.cfdg

@@ -0,0 +1,19 @@
+# TEST
+startshape seed
+
+rule seed {
+	 golden_rectangle {b 0.2}
+}
+
+# We need to add the correct hue here. This is not yet done.
+rule golden_rectangle {
+	 SQUARE {}
+	 circle_well {b -0.1}
+	 golden_rectangle {x 0.809107 y -0.190983 s 0.618039887 r 90 b 0.1}
+}
+
+rule circle_well {
+	 CIRCLE {}
+	  circle_well {b -0.01 s 0.99}
+} 
+