Recursive fractals

Off lately recursion has become much more fascinating than ever it was to me. And the obvious catalyst in this has been computer graphics. Without visualization its impossible to appreciate the beauty of recursion, trees, sorting algorithms, etc!
Having admired the Sierpinski triangles I wondered how such an experimentation would look upon squares. And I came up with the following written in devCPP & Allegro graphics library-

view plainprint?

1. #include <allegro.h>  
2.   
3. BITMAP *work;  
4.   
5. void draw (int x,int y,int w){  
6. int i,j,c,r,g,b;  
7. if (x<0 || y<0 || x>639 || y>479 || w<5)  
8. return;  
9.   
10. int nw=w/2;  
11. draw(x-w/2-1,y-w/2-1,nw);  
12. draw(x+w/2+1,y+w/2+1,nw);  
13. draw(x-w/2-1,y+w/2+1,nw);  
14. draw(x+w/2+1,y-w/2-1,nw);  
15.   
16. c=w;  
17. for (w=c;w>=1;w--){  
18. r=((float)(sin(w)*sin(w)*c/3)/(float)c)*(float)255;  
19. g=((float)(c-w/2)/(float)c)*(float)255;  
20. b=((float)(w/2)/(float)c)*(float)255;  
21. if (w<1){  
22. r=g=b=0;  
23. }  
24. rect(work,x-w/2,y-w/2,x+w/2,y+w/2, makecol (r,g,b));  
25. }  
26. w=c;  
27. r=((float)(c-w)/(float)c)*(float)255;  
28. g=((float)(c-w)/(float)c)*(float)255;  
29. b=((float)w/(float)c)*(float)255;  
30. rect(work,x-w/2-1,y-w/2-1,x+w/2+1,y+w/2+1, makecol (r/2,g/2,b/2));  
31. }  
32.   
33. int main (){  
34. allegro_init();  
35. install_keyboard();  
36. set_color_depth(32);  
37. set_gfx_mode (GFX_AUTODETECT_WINDOWED,640,480,0,0);  
38.   
39. work = create_bitmap(640,480);  
40. clear_to_color(work,makecol(255,255,255));  
41.   
42. draw(320,240,200);  
43. while (!key[KEY_ESC]){  
44. vsync();  
45. blit (work,screen,0,0,0,0,640,480);  
46. }  
47.   
48. allegro_exit();  
49. return 0;  
50. }  
51. END_OF_MAIN();  

#include <allegro.h>

BITMAP *work;

void draw (int x,int y,int w){
int i,j,c,r,g,b;
if (x<0 || y<0 || x>639 || y>479 || w<5)
return;

int nw=w/2;
draw(x-w/2-1,y-w/2-1,nw);
draw(x+w/2+1,y+w/2+1,nw);
draw(x-w/2-1,y+w/2+1,nw);
draw(x+w/2+1,y-w/2-1,nw);

c=w;
for (w=c;w>=1;w--){
r=((float)(sin(w)*sin(w)*c/3)/(float)c)*(float)255;
g=((float)(c-w/2)/(float)c)*(float)255;
b=((float)(w/2)/(float)c)*(float)255;
if (w<1){
r=g=b=0;
}
rect(work,x-w/2,y-w/2,x+w/2,y+w/2, makecol (r,g,b));
}
w=c;
r=((float)(c-w)/(float)c)*(float)255;
g=((float)(c-w)/(float)c)*(float)255;
b=((float)w/(float)c)*(float)255;
rect(work,x-w/2-1,y-w/2-1,x+w/2+1,y+w/2+1, makecol (r/2,g/2,b/2));
}

int main (){
allegro_init();
install_keyboard();
set_color_depth(32);
set_gfx_mode (GFX_AUTODETECT_WINDOWED,640,480,0,0);

work = create_bitmap(640,480);
clear_to_color(work,makecol(255,255,255));

draw(320,240,200);
while (!key[KEY_ESC]){
vsync();
blit (work,screen,0,0,0,0,640,480);
}

allegro_exit();
return 0;
}
END_OF_MAIN();

Some circular modifications -

view plainprint?

1. #include <allegro.h>  
2.   
3. BITMAP *work;  
4.   
5. void draw (int x,int y,int w){  
6. int i,j,c,r,g,b;  
7. if (x<0 || y<0 || x>SCREEN_W || y>SCREEN_H || w<5)  
8. return;  
9.   
10. int nw=(float)w*(float)(.5);  
11. draw(x-w/2-1,y-w/2-1,nw);  
12. draw(x+w/2+1,y+w/2+1,nw);  
13. draw(x-w/2-1,y+w/2+1,nw);  
14. draw(x+w/2+1,y-w/2-1,nw);  
15.   
16. c=w;  
17. for (w=c;w>=1;w--){  
18. r=((float)(w/2)/(float)c)*(float)255;  
19. g=((float)(c-w/2)/(float)c)*(float)255;  
20. b=((float)(c-w/2)/(float)c)*(float)255;  
21. if (w<1){  
22. r=g=b=0;  
23. }  
24. circlefill (work,x,y,w/2,makecol (r,g,b));  
25. }  
26. }  
27.   
28. int main (){  
29. allegro_init();  
30. install_keyboard();  
31. set_color_depth(32);  
32. set_gfx_mode (GFX_AUTODETECT_WINDOWED,800,600,0,0);  
33.   
34. work = create_bitmap(SCREEN_W,SCREEN_H);  
35. clear_to_color(work,makecol(255,255,255));  
36.   
37. draw(SCREEN_W/2,SCREEN_H/2,300);  
38. while (!key[KEY_ESC]){  
39. vsync();  
40. blit (work,screen,0,0,0,0,SCREEN_W,SCREEN_H);  
41. }  
42.   
43. allegro_exit();  
44. return 0;  
45. }  
46. END_OF_MAIN();  

#include <allegro.h>

BITMAP *work;

void draw (int x,int y,int w){
int i,j,c,r,g,b;
if (x<0 || y<0 || x>SCREEN_W || y>SCREEN_H || w<5)
return;

int nw=(float)w*(float)(.5);
draw(x-w/2-1,y-w/2-1,nw);
draw(x+w/2+1,y+w/2+1,nw);
draw(x-w/2-1,y+w/2+1,nw);
draw(x+w/2+1,y-w/2-1,nw);

c=w;
for (w=c;w>=1;w--){
r=((float)(w/2)/(float)c)*(float)255;
g=((float)(c-w/2)/(float)c)*(float)255;
b=((float)(c-w/2)/(float)c)*(float)255;
if (w<1){
r=g=b=0;
}
circlefill (work,x,y,w/2,makecol (r,g,b));
}
}

int main (){
allegro_init();
install_keyboard();
set_color_depth(32);
set_gfx_mode (GFX_AUTODETECT_WINDOWED,800,600,0,0);

work = create_bitmap(SCREEN_W,SCREEN_H);
clear_to_color(work,makecol(255,255,255));

draw(SCREEN_W/2,SCREEN_H/2,300);
while (!key[KEY_ESC]){
vsync();
blit (work,screen,0,0,0,0,SCREEN_W,SCREEN_H);
}

allegro_exit();
return 0;
}
END_OF_MAIN();

beautiful! what more can I say.