Logo by S Nelson - 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: Visit the official fractalforums.com Youtube Channel
 
*
Welcome, Guest. Please login or register. September 26, 2020, 08:36:07 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: pentagonal caleidoscope  (Read 498 times)
0 Members and 1 Guest are viewing this topic.
knighty
Fractal Iambus
***
Posts: 819


« on: December 02, 2012, 08:52:05 PM »

pentagonal caleidoscope



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

The product of my attempt to KIFS-ify ( cheesy) Penrose tiling. It's aperiodic but not a Penrose tiling.
The evaldraw script:
Code:
//Ctrl-p to load a picture
static a=-sin(4*pi/5),b=cos(4*pi/5),c=sin(4*pi/5);
static phi=0.5*(1+sqrt(5));
(x,y,&r,&g,&b){
   n=10;k=1/phi^n;
   x*=k;y*=k;
   x+=0.5;
   for(i=0;i<n;i++) iter(x,y);
   
   pic(x*256+mousx,mousy-y*256,r,g,b)
}
iter(&x,&y){
   
   t=2*min(0,a*x+b*y+c);
   x-=t*a; y-=t*b;
   y=abs(y);
   x*=phi;y*=phi;
   x=phi-x;
   t=2*min(0,a*x+b*y+c);
   x-=t*a; y-=t*b;
   y=abs(y);
}
enjoy
Logged
Pages: [1]   Go Down
  Print  
 
Jump to:  

Related Topics
Subject Started by Replies Views Last post
Beautiful Pentagonal Midget Fractal Movies stardust4ever 0 1343 Last post March 31, 2010, 08:17:22 AM
by stardust4ever
Pentagonal Plunge Images Showcase (Rate My Fractal) Fractal Ken 1 624 Last post February 09, 2011, 08:19:33 PM
by yv3
Pentagonal Mandelbulb3D Gallery dainbramage 0 437 Last post February 28, 2011, 06:28:44 AM
by dainbramage
Caleidoscope Eye 2 - Morphing Mandala 1080p Movies Showcase (Rate My Movie) schizo 1 973 Last post September 16, 2012, 09:15:10 PM
by schizo
Pentagonal Piano Duet Images Showcase (Rate My Fractal) JoeFRAQ 0 297 Last post October 25, 2015, 12:16:36 AM
by JoeFRAQ

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.122 seconds with 27 queries. (Pretty URLs adds 0.009s, 2q)