/*arbol1*/
/*Fernando Galindo Soria*/

#include <graphics.h>
#include <math.h>

void arbol(int,int,int,int);
void recta(int,int,int,int,int*,int*);
int ind,w1;

void main()
{
  int gd=DETECT,gm;
  initgraph(&gd,&gm,"");
  ind=1;
  w1=57;arbol(100,150,45,90);
  w1=5;arbol(200,150,45,90);
  w1=85;arbol(300,150,45,90);
  w1=46;arbol(100,300,45,90);
  w1=47;arbol(200,300,45,90);
  w1=48;arbol(300,300,45,90);
  w1=7;ind=25;arbol(100,450,45,90);
  w1=7;ind=10;arbol(200,450,45,90);
}

void arbol(int x0,int y0,int l,int an)
{
  int x1,y1;

  if(bioskey(2)!=0x04)
  if (l > ind )
  {
    recta(x0,y0,l,an,&x1,&y1);
    arbol(x1,y1,l/1.7,an-w1);
    arbol(x1,y1,l/1.7,an);
    arbol(x1,y1,l/1.7,an+w1);
  }
}

void recta(int x0,int y0,int l,int an,int *x1,int *y1)
{
  *x1=x0-(l*cos(an/57.29578));
  *y1=y0-(l*sin(an/57.29578));
  line(x0,y0,*x1,*y1);
}