image_paradise 0.4.20

data/lib/image_paradise/cfdg/ring_growth_variation.cfdg

@@ -0,0 +1,41 @@
+startshape spinstart
+
+rule spinstart{
+  spin{hue 90}
+}
+
+rule spin {
+  CIRCLE{ s 5 sat 0 b 0 z -5}
+  //CIRCLE{ s 15 sat 1 b 0 z -8}
+  CIRCLE{ sat 1 b .8}
+
+  spin[x .1 r 1]
+}
+
+rule spin 0.005 {
+  spin{ flip 0 hue .1 z -.1}
+}
+
+rule spin 0.009 {
+  spin{}
+  tree{}
+}
+
+rule spin 0.0001 {}
+
+rule tree {
+  curl{ flip 0 z -6}
+}
+
+rule tree {
+  curl{z -3}
+}
+
+rule curl{
+  CIRCLE{hue 0 sat 1 b .3}
+  curl {x .1 s 0.995 r .7}
+}
+
+rule curl 0.002 {
+  curl{flip 0}
+}

data/lib/image_paradise/cfdg/robot_nightlife.cfdg

@@ -0,0 +1,25 @@
+startshape JIMMY
+background {b -1}
+ 
+rule BASE         {	SQUARE {}}
+ 
+//Transpositions
+rule JIMMY        {	BASE {}	JIMMY {x -1}}
+rule JIMMY        {	BASE {}	JIMMY {y -1}}
+rule JIMMY        {	BASE {}	JIMMY {x 1}}
+rule JIMMY        {	BASE {}	JIMMY {y 1}}
+ 
+//Variations
+rule JIMMY        {	JIMMY {skew 0 3}}
+rule JIMMY        {	JIMMY {skew -3 0}}
+rule JIMMY .0005  {	JIMMY {r 5}}
+rule JIMMY        {	JIMMY {alpha -.3}}
+rule JIMMY        {	JIMMY {alpha .1}}
+rule JIMMY        {	JIMMY {s 1.25}}
+rule JIMMY        {	JIMMY {s .8}}
+rule JIMMY        {	JIMMY {h 5  sat 1 b 1}}
+rule JIMMY        {	JIMMY {h -5 sat 1 b 1}}
+ 
+//Stop
+rule JIMMY .00005 {}
+ 

data/lib/image_paradise/cfdg/rolled_firespiral.cfdg

@@ -0,0 +1,34 @@
+startshape START
+
+rule START {
+	FROND{rotate -100 hue 1 sat 1 b 1}
+	START {rotate 55 y 10 s 0.98 hue 1 sat 1}
+}
+
+rule FROND {
+	CIRCLE{}
+	FROND {y 1.3 rotate 3 b 0.01 s 0.95}
+}
+
+rule FROND {
+	CIRCLE{}
+	FROND {y 1.3 rotate -3 b 0.01 s 0.95}
+}
+
+rule FROND 0.008 {
+	FRONDSPIRALL{}
+}
+
+rule FROND 0.008 {
+	FRONDSPIRALR{}
+}
+
+rule FRONDSPIRALL {
+	CIRCLE{}
+	FRONDSPIRALL {rotate 33 y 1.3 b 0.01 s 0.95}
+}
+
+rule FRONDSPIRALR {
+	CIRCLE{}
+	FRONDSPIRALR {rotate -33 y 1.3 b 0.01 s 0.95}
+}

data/lib/image_paradise/cfdg/rose.cfdg

@@ -0,0 +1,44 @@
+startshape plant
+
+rule rose1 {
+  petal {}
+  petal { r 90 }
+  petal { r 180 }
+  petal { r 270 }
+  rose1 { r 14 s 0.92 hue 0.12| }
+}
+
+rule petal {
+  petal1 {r 15 x 0.9 s 0.9 1.8}
+}
+
+rule petal {
+  petal1 {r -15 x 0.9 s 0.9 1.8}
+}
+
+rule petal1 {
+  CIRCLE {}
+  CIRCLE { s 0.975 x -0.025 hue 0.1| }
+  CIRCLE { s 0.95 x -0.05 hue 0.2| }
+  CIRCLE { s 0.925 x -0.075 hue 0.3| }
+  CIRCLE { s 0.90 x -0.10 hue 0.4| }
+}
+
+rule stem { 
+  CIRCLE {s 2 6 r -15 y -3 x -.5}
+  CIRCLE {s 2 6 r -15 y -3 x -0.35 sat -1 b 1}
+  leaf { r 30 y -3 x -2.2 } 
+  leaf { r -45 y -3.15 x -0.8  } 
+}
+
+rule leaf {
+  CIRCLE [s 0.75 2 y 0.25]
+  CIRCLE [s 0.75 2 b 0.2 y 0.25 s 0.80 0.90]
+  TRIANGLE [y -0.25 s 0.1 3 ]
+  leaf  { s 0.86 y 0.25 }
+}
+
+rule plant {
+  rose1 { b 1 sat 1 |hue 60}
+  stem  { b 0.4 sat 1 hue 120}
+}

data/lib/image_paradise/cfdg/round_tree.cfdg

@@ -0,0 +1,121 @@
+startshape tronco
+background {b -1}
+rule tronco
+{
+  SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5}
+  tronco {s 0.99 y 0.2}
+}
+
+rule tronco
+{
+  SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r 20}
+  tronco {s 0.99 y 0.2 r 5 b 0.4}
+}
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r -30}
+tronco {s 0.99 y 0.2 r 5 b -0.4}
+}
+
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r 10}
+tronco {s 0.99 y 0.2 r -5 b 0.4}
+}
+
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r -10}
+tronco {s 0.99 y 0.2 r -5 b -0.4}
+}
+
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r 60}
+tronco {s 0.99 y 0.2 r 5 b 0.4}
+}
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r -60}
+tronco {s 0.99 y 0.2 r 5 b -0.4}
+}
+
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r 5}
+tronco {s 0.99 y 0.2 r -5 b 0.4}
+}
+
+rule tronco
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5 r -5}
+tronco {s 0.99 y 0.2 r -5 b -0.4}
+}
+
+
+rule tronco 0.14
+{
+SQUARE {hue 40 sat 0.5 b 0.5 alpha -0.5}
+tronco {s 0.99 y 0.5 r 45}
+tronco {s 0.99 y 0.5 r -45}
+}
+
+rule tronco 0.05
+{
+hojas {}
+}
+
+rule hoja
+{
+    TRIANGLE {y 1 hue 100 sat 1 alpha -0.5}
+    TRIANGLE {r 60 x -0.5 hue 100 sat 1 alpha -0.5}
+    TRIANGLE {r -60 x 0.5 hue 100 sat 1 alpha -0.5}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x 1 y 1 r 40 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x 1 r 20 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x -1 r 60 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x 1 y -1 r 80 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x 1 r 40 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x -1 r 40 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {y 1 r 40 s 0.999}
+}
+
+rule hojas
+{
+    hoja {}
+    hojas {x 1 r -40 s 0.999}
+}

data/lib/image_paradise/cfdg/rubiks_cube.cfdg

@@ -0,0 +1,120 @@
+# Kubik
+startshape Rubikscubekev
+background {b -.92}
+
+rule Rubikscubekev {
+  Rubiksorient {}
+  Rubikscubekev {x -3.5 y 2 r 5 s .9}
+}
+
+rule Rubiksorient {
+  Rubiks {r 0}
+}
+
+rule Rubiksorient {
+  Rubiks {r 120}
+}
+
+rule Rubiksorient {
+  Rubiks {r 240}
+}
+
+rule Rubiks { # orange blue white
+  bkgd {x .003 y -.91}
+  bkgd {r 60 x -1.18 y 1.14}
+  bkgd {r -60 x 1.18 y 1.14}
+  kev {b 1 h 30 sat 1}
+  kev {r 60 y 1.6 x -1.95 b .7 h 240 sat 1}
+  kev {r -60 y 1.6 x 1.95 b 1 h 0 sat 0}
+}
+
+rule Rubiks { # orange yellow blue
+  bkgd {x .003 y -.91}
+  bkgd {r 60 x -1.18 y 1.14}
+  bkgd {r -60 x 1.18 y 1.14}
+  kev {b 1 h 30 sat 1}
+  kev {r 60 y 1.6 x -1.95 b 1 h 60 sat 1}
+  kev {r -60 y 1.6 x 1.95 b .7 h 240 sat 1}
+}
+
+rule Rubiks { # orange green yellow
+bkgd {x .003 y -.91}
+bkgd {r 60 x -1.18 y 1.14}
+bkgd {r -60 x 1.18 y 1.14}
+kev {b 1 h 30 sat 1}
+kev {r 60 y 1.6 x -1.95 b .7 h 120 sat 1}
+kev {r -60 y 1.6 x 1.95 b 1 h 60 sat 1}
+}
+
+rule Rubiks { # orange white green
+bkgd {x .003 y -.91}
+bkgd {r 60 x -1.18 y 1.14}
+bkgd {r -60 x 1.18 y 1.14}
+kev {b 1 h 30 sat 1}
+kev {r 60 y 1.6 x -1.95 b 1 h 0 sat 0}
+kev {r -60 y 1.6 x 1.95 b .7 h 120 sat 1}
+}
+
+rule Rubiks { # red blue white
+  bkgd {x .003 y -.91}
+  bkgd {r 60 x -1.18 y 1.14}
+  bkgd {r -60 x 1.18 y 1.14}
+  kev {b 1 h 0 sat 1}
+  kev {r 60 y 1.6 x -1.95 b .7 h 240 sat 1}
+  kev {r -60 y 1.6 x 1.95 b 1 h 0 sat 0}
+}
+
+rule Rubiks { # red yellow blue
+bkgd {x .003 y -.91}
+bkgd {r 60 x -1.18 y 1.14}
+bkgd {r -60 x 1.18 y 1.14}
+kev {b 1 h 0 sat 1}
+kev {r 60 y 1.6 x -1.95 b 1 h 60 sat 1}
+kev {r -60 y 1.6 x 1.95 b .7 h 240 sat 1}
+}
+
+rule Rubiks { # red green yellow
+bkgd {x .003 y -.91}
+bkgd {r 60 x -1.18 y 1.14}
+bkgd {r -60 x 1.18 y 1.14}
+kev {b 1 h 0 sat 1}
+kev {r 60 y 1.6 x -1.95 b .7 h 120 sat 1}
+kev {r -60 y 1.6 x 1.95 b 1 h 60 sat 1}
+}
+
+rule Rubiks { # red white green
+  bkgd {x .003 y -.91}
+  bkgd {r 60 x -1.18 y 1.14}
+  bkgd {r -60 x 1.18 y 1.14}
+  kev {b 1 h 0 sat 1}
+  kev {r 60 y 1.6 x -1.95 b 1 h 0 sat 0}
+  kev {r -60 y 1.6 x 1.95 b .7 h 120 sat 1}
+}
+
+rule kev {
+kside {s 1 0.57735}
+}
+
+rule kside {
+Side {r 45}
+}
+
+rule bkgd {
+black {s 1 0.57735}
+}
+
+rule black {
+  SQUARE {r 45 s 3.35 3.35}
+}
+
+rule Side {
+  SQUARE {}
+  SQUARE {x -1.1}
+  SQUARE {x -2.2}
+  SQUARE {y -1.1}
+  SQUARE {y -2.2}
+  SQUARE {x -1.1 y -1.1}
+  SQUARE {x -2.2 y -1.1}
+  SQUARE {x -1.1 y -2.2}
+  SQUARE {x -2.2 y -2.2}
+}

data/lib/image_paradise/cfdg/ruins.cfdg

@@ -0,0 +1,19 @@
+startshape design
+ 
+rule design {
+  foo {}
+  design {x 0.1 s 0.9994}
+}
+ 
+rule design 0.001 {
+  design {r 90}
+  design {r -90}
+}
+ 
+rule design 0.001 {
+  design {r 33}
+}
+ 
+rule foo {
+  CIRCLE {}
+}

data/lib/image_paradise/cfdg/sails_and_the_sea.cfdg

@@ -0,0 +1,27 @@
+# still playing around with this simple design. 
+# i'm sorry, it must be absolutely boring!
+
+startshape three
+tile {x 1 s 12 }
+ 
+background {  hue 46.3 sat 0.6 b -0.3 }
+ 
+rule three {
+5* { x 3 } absflow [ ] 
+}
+ 
+rule absflow {
+dweed [ ]
+absflow [ y .13 s .99 z -.1 r 2]
+}
+rule absflow .1 { absflow [ flip 90 ] }
+rule absflow .1 { absflow [ r 1 ] }
+rule absflow .1 { absflow [ r -1 ] }
+rule absflow .01 { absflow [ ] absflow [ r 45 ]}
+ 
+rule dweed {
+SQUARE [z -.2 s 1 1 r 10 a -.7 b .6 sat .9 hue 220]
+SQUARE [z -.1 s .3 .3 r -10 a -.5 b 1]
+SQUARE [s .1 .1 b 1]
+dweed [ x .2 a -.02 r -2 s .98]
+}

data/lib/image_paradise/cfdg/salt_crystals.cfdg

@@ -0,0 +1,26 @@
+startshape S1
+
+/*background {b -0.2} not bad in white too... */
+background {b -0.8}
+
+rule S1 {CRISTAL {} S1{x 1.5 y 1.5 r 10 s 0.99}}
+rule S1 {CRISTAL {} S1{x -1.5 y -1.5 r 10 s 0.99}}
+rule S1 {CRISTAL {} S1{x -1.5 y 1.5 r 10 s 0.99}}
+rule S1 {CRISTAL {} S1{x 1.5 y -1.5 r 10 s 0.99}}
+
+rule S2 {
+  CRISTAL {} 
+  S2 {x 3 r 40 s 0.9}
+}
+
+rule CRISTAL {FORM {} CRISTAL {s 1.1}}
+rule CRISTAL {FORM {} CRISTAL {s 1.15}}
+rule CRISTAL {FORM {} CRISTAL {s 1.2}}
+rule CRISTAL {FORM {} CRISTAL {s 1.25}}
+rule CRISTAL {FORM {} CRISTAL {s 1.3}}
+rule CRISTAL 2.5 {}
+
+rule FORM {
+  SQUARE {hue 240 sat 0.15 b 0.4 a -0.9} 
+  SQUARE {hue 240 sat 0.15 b 1 s 0.96 a -0.9}
+}

data/lib/image_paradise/cfdg/saturn.cfdg

@@ -0,0 +1,105 @@
+startshape Test 
+
+CF::Background = [hue 240 sat 1 b -1]
+CF::Size = [s 1.4 1.5 x 0.3 y 0]
+CF::Impure = 1
+ 
+sum(number item) = item +90.0
+ 
+rotationxYX(number betavalue, number gammavalue, number x1,
+number y1, number z1) =
+  x1*cos(gammavalue) - z1*sin(gammavalue)
+ 
+rotationyYX(number betavalue, number gammavalue, number x1,
+number y1, number z1) = 
+  -x1*sin(gammavalue)*sin(betavalue) +
+y1*cos(betavalue) - z1*cos(gammavalue)*sin(betavalue)
+ 
+rotationzYX(number betavalue, number gammavalue, number x1,
+number y1, number z1) =
+  x1*sin(gammavalue)*cos(betavalue) +y1*sin(betavalue)
++  z1*cos(gammavalue)*cos(betavalue)
+ 
+bifurkation(number value, number iterator) =  value*
+iterator*(1 - iterator)
+ 
+shape Test 
+{
+  ball(35,100) [s .3     ]
+  ring [r -35]
+  starshower[]
+}
+ 
+shape ring {
+  loop i = 25,60 []
+   		 feigenbaum(960, 3.4+i*0.01,0.9 ) []
+}
+ 
+shape feigenbaum(natural iter, number a_value, number start)
+
+{		
+    if (iter > 0) {
+      x1 =(a_value-3)*cos(start*360)
+      y1 = (a_value-3)*sin(start*360)
+      z1 = 0
+      ball1[ h 20..70 sat 0.1..0.4 x rotationxYX(75,0,
+x1, y1, z1) y rotationyYX(75,0, x1, y1, z1) z 
+(-2*rotationzYX(75,0, x1, y1, z1)) b (1-rotationzYX(70,0,
+x1, y1, z1))]
+    feigenbaum(iter--1, a_value, (a_value*
+start*(1 - start))) []
+       }
+    }
+ 
+ 
+shape ball1 {
+    CIRCLE [s 0.005 ]
+    ball1[s.98 sat -0.06 x 0.005 b -0.1]
+}
+
+shape ballcircle(number alpha1, gamma1, radius, width,
+height)  
+{	
+     loop i = 720 [] 
+  {
+    x1 = radius*cos(i/2)
+    y1 = radius * sin(i/2)
+    z1 = height
+    x1new = rotationxYX(alpha1,gamma1,x1,y1,z1)
+    y1new = rotationyYX(alpha1,gamma1,x1,y1,z1)
+    z1new = rotationzYX(alpha1,gamma1,x1,y1,z1)
+    CIRCLE( ) [ x  x1new y y1new z z1new s width
+]
+  }	
+}
+ 
+shape ball(number gam1, number alph1)
+{
+  // alph1  rotation x
+  // gam1  rotation y
+  n  =  100
+  loop k= -n, n []  
+      ballcircle(alph1, gam1,(cos(k/n*90)), 0.09,
+(sin(k/n*90)))  [ sat 0.2 b ((k/n)+0.7) h 0..70]
+}
+ 
+shape starshower {
+  loop i= 1,4000 [ ] {
+    radius = 180*exp(-i*0.01)
+    alpha1= 0..360
+     star [s (1.0*exp(-i*0.01)) x (radius*cos(alpha1)) y
+     (radius*sin(alpha1)) z -100]
+  }
+}
+
+shape star {
+  loop 1,1000 [s 0.8 ]
+  CIRCLE [hue 30..60 x -0.1..0.1  y -0.1..0.1 sat 0.5..1 a 0.1..1 b 1]
+  loop i=0,4 []
+  startreck[flip (i*45) s 0.4]
+}
+ 
+shape startreck {
+  CIRCLE [hue 10..60 sat 0.3 a 0.1..1 b 1]
+  startreck[ s 0.9..0.95 x 0.2 y 0.1..0.2 z -1]
+}

data/lib/image_paradise/cfdg/scary_pot.cfdg

@@ -0,0 +1,49 @@
+# ========================================== #
+# Scary ! ... well, maybe not ^-
+#
+# ========================================== #
+
+startshape YO
+background {b -.5 hue 300 sat .5}
+
+rule YO {POT{s .2 y 1}RAD{y 1.8 s 1.5 z 101}B1{hue 120}}
+
+
+# ========================================== #
+
+rule POT {DEMIPOT{}DEMIPOT{flip 90}}
+
+rule DEMIPOT {
+100*{skew .15 -.2 x .1}SQUARE{x .5 y 6 z -100 s 1 30 b .1 sat 1}
+100*{skew .15 .2 x .11}SQUARE{x .5 z 100 s 1 30 b .6 sat 1}}
+
+# ========================================== #
+rule RAD{
+CIRCLE{s 2.3}CIRCLE{s 2.2 b 1}
+3*{r 120}RA{}CIRCLE{s .7 z .1 b 1}CIRCLE{s .5 z .2}}
+
+rule RA{600*{r .1}SQUARE{x .5 s 1 .005}}
+# ========================================== #
+rule B1 {B1 [ y 1 r 2 sat .001 b -.01]C {s 1.5}C {s -1 1.5}}
+rule B1 {B1{flip 90}}
+rule B1 .1{B2{}}
+rule B1 .1{B1{s .75 flip 90 z -10}B1{s .75 z 10}}
+
+rule B2 {B2 [ y 1 s .99 r 2 sat .001 b .01]C {s 1.5}C {s -1 1.5}}
+rule B2 .1{B2{flip 90}}
+rule B2 .02{B2{z -30 s .6} B2{z 30 s .75 flip 90}}
+rule B2 .01{B3{}}
+
+rule B3 {B3 [ y 1 z .1 s .99 r 4 sat .001]C {s 1.5}C {s -1 1.5}}
+rule B3 {B3{hue 10}}
+rule B3 {B3{hue -10}}
+rule B3 .01{B3{flip 90}}
+rule B3 .05{}
+
+rule C {AAA{} C[s .9 y 1 r 2]}
+rule C {AAA{} C[s .9 y 1 r 6]}
+
+rule AAA {SQUARE{sat .3 b .1} AAA[s .9 y .3]}
+rule AAA 3{
+  AAA{r 1}
+}

data/lib/image_paradise/cfdg/schematic_worm.cfdg

@@ -0,0 +1,35 @@
+startshape dot
+
+rule dot 0.001 {
+  CIRCLE { }
+}
+
+rule dot 0.0025 {
+  CIRCLE { }
+  dot { r 90 }
+  dot { r -90 }
+}
+
+rule dot {
+  CIRCLE { }
+  dot { y 1.1 s 0.9 hue 27 }
+}
+
+rule dot {
+  CIRCLE { }
+  dot { y 1.1 s 1.1 hue 23 }
+}
+
+rule dot 0.1 {
+  CIRCLE { sat 1 b 1 }
+  dot { y 1.1 }
+}
+
+rule dot 0.1 {
+  CIRCLE { }
+  dot { r 90 }
+}
+rule dot 0.1 {
+  CIRCLE { }
+  dot { r -90 }
+}