/*caracol*/
/*Fernando Galindo Soria*/

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

void caracol(int,int,int,int);
void recta(int,int,int,int,int*,int*);
int ind;

void main()
{
  int gd=DETECT,gm;
  initgraph(&gd,&gm,"");
  ind=1;
  caracol(200,250,150,137);
}

void caracol(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);
    caracol(x1,y1,l-.12,an+241);
  }
}

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);
}