select -all; delete; defaultDirectionalLight(1, 1,1,1, "0", 0,0,0); string $sph[] = `sphere -sections 8 -spans 4`; float $P[], $N[]; float $U, $V; // Choose a number of random locations for($n = 0; $n < 500; $n++) { $U = rand(0,1) * 4; // notice this matches the -spans $V = rand(0,1) * 8; // ditto the -sections $P = `pointOnSurface -u $U -v $V $sph[0]`; $N = `pointOnSurface -u $U -v $V -nn $sph[0]`; makeCurve($P, $N); // A couple of test objects //sphere -p ($P[0]) ($P[1]) ($P[2]) -r 0.01; //cylinder -axis ($N[0]) ($N[1]) ($N[2]) -p ($P[0]) ($P[1]) ($P[2]) -r 0.001 -hr 1000; //move ($P[0]/2) ($P[1]/2) ($P[2]/2); } select -all; /* curve -d 1 -p $p[0] $p[1] $p[2] -p $p[0] ($p[1] + 0.1) $p[2] -p $p[0] ($p[1] + 0.2) $p[2] -p $p[0] ($p[1] + 0.3) $p[2]; */