хаотическое движение(где я ошибся????)

[M31]

вот кусок текста с моей программы, по идеи это хаотическое движение, а выходит движение вверх:(

Код:

double dx,dy;
double numx=0;
double numy=250;
n=StrToInt(Edit1->Text);

const int rr=10;
int r;
x[0]=numx; y[0]=0;
Image1->Canvas->MoveTo(numx,numy);
for (i=1;i<n;i++)
		{
		r = random(rr);
		f=random(2);
        if (f=1)
		dx=random(r);
		else dx=-1*random(r);
		f=random(2);
		if (f=1)
		dy=sqrt(r*r-dx*dx);
		else dy=-1*sqrt(r*r-dx*dx);
        x[i]=x[i-1]+dx;
        y[i]=y[i-1]+dy;
        Image1->Canvas->LineTo(x[i],numy-1*y[i]);

Где я ошибся?

[Finch]

"Класофикация грабель" под номером 1

Код:

         if (f=1)

[M31]

а как нужно?

[Finch]

Вообше то знак сравнения это ==
Знак присваивания это =

[M31]

о сенкс)