Logo by KRAFTWERK - Contribute your own Logo!

END OF AN ERA, FRACTALFORUMS.COM IS CONTINUED ON FRACTALFORUMS.ORG

it was a great time but no longer maintainable by c.Kleinhuis contact him for any data retrieval,
thanks and see you perhaps in 10 years again

this forum will stay online for reference
News: Support us via Flattr FLATTR Link
 
*
Welcome, Guest. Please login or register. December 15, 2019, 08:59:31 AM


Login with username, password and session length


The All New FractalForums is now in Public Beta Testing! Visit FractalForums.org and check it out!


Pages: [1]   Go Down
  Print  
Share this topic on DiggShare this topic on FacebookShare this topic on GoogleShare this topic on RedditShare this topic on StumbleUponShare this topic on Twitter
Author Topic: Fleeting flower arrangement  (Read 268 times)
0 Members and 1 Guest are viewing this topic.
phtolo
Navigator
*****
Posts: 79



« on: November 18, 2015, 09:04:09 PM »

Fleeting flower arrangement



http://www.fractalforums.com/index.php?action=gallery;sa=view;id=18429

Code:
let a, pi*2/6
let s,0.5
let t,0.5
let offs,3*pi/2
let lut,30
let s2,0.5
let rot,35

let sr1,0.01
let sr2,1

newmap 0
 tag g
 rotate sin(a*0+offs),cos(a*0+offs),0,lut
 scale s,s,s
 translate t*sin(a*0),t*cos(a*0),0

newmap 1
 tag g
 rotate sin(a*1+offs),cos(a*1+offs),0,lut
 scale s,s,s
 translate t*sin(a*1),t*cos(a*1),0

newmap 2
 tag g
 rotate sin(a*2+offs),cos(a*2+offs),0,lut
 scale s,s,s
 translate t*sin(a*2),t*cos(a*2),0

newmap 3
 tag g
 rotate sin(a*3+offs),cos(a*3+offs),0,lut
 scale s,s,s
 translate t*sin(a*3),t*cos(a*3),0

newmap 4
 tag g
 rotate sin(a*4+offs),cos(a*4+offs),0,lut
 scale s,s,s
 translate t*sin(a*4),t*cos(a*4),0

newmap 5
 tag g
 rotate sin(a*5+offs),cos(a*5+offs),0,lut
 scale s,s,s
 translate t*sin(a*5),t*cos(a*5),0

newmap 6
 rotate z,rot
 scale s2,s2,s2

ifs
 path (0,0,0)(1,1,1)(2,2,2)(3,3,3)(4,4,4)(5,5,5)(6,6,6)
  sphere_radius_factor sr2
 else
  sphere_radius_factor sr1
 end
 path ,g,g,g,g
   color 1,1
 else
   path 6,6,6
     path ,,,6,6
       color 1,0
else
   color 0,1
end
   else
  color 0,0
   end
 end
Logged
Pages: [1]   Go Down
  Print  
 
Jump to:  

Related Topics
Subject Started by Replies Views Last post
Fleeting Glimpse on the inside of the Mandelbulb Videos « 1 2 » hobold 15 2833 Last post March 30, 2010, 02:46:49 PM
by hobold
Flower 1 Mandelbulb3D Gallery Tatty 0 359 Last post July 30, 2010, 12:04:28 AM
by Tatty
Flower 2 Mandelbulb3D Gallery Tatty 0 469 Last post August 02, 2010, 03:39:59 PM
by Tatty
Triangular Arrangement Images Showcase (Rate My Fractal) element90 1 222 Last post July 17, 2013, 05:46:54 PM
by Kalles Fraktaler
Flower Arrangement Images Showcase (Rate My Fractal) Pauldelbrot 3 525 Last post February 27, 2014, 08:30:54 PM
by Pauldelbrot

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2015, Simple Machines

Valid XHTML 1.0! Valid CSS! Dilber MC Theme by HarzeM
Page created in 0.103 seconds with 27 queries. (Pretty URLs adds 0.006s, 2q)