Return to howsliced CVS log

Up to [Research Unix] / researchv10dc / vol2 / Faces / How

researchv10 Dan Cross

x {
	int a, dy;
	array ddy[X];
	for (dy = 1; dy < X; dy++)
		ddy[dy] = ddy[dy-1]+rand()%4-2
	for (dy = 0; dy < Y; dy++)
	{	a = (dy/51)%4
		for (x = 0; x < X; x++)
		{	y = clamp(ddy[x]+dy-sin(2*x)/(x+50)) 
			if (a == 0)
			new[x,y]=$1[x,y]
			if (a == 1)
			new[x,y]=$2[x,y]
			if (a == 2)
			new[x,y]=$5[x,y]
			if (a == 3)
			new[x,y]=$4[x,y]
		}
	}	
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.