box 2

sphere 0.9

Maxim zhastov

float amp_x = chf('Amplitude_X')*scale;

float amp_y = chf('Amplitude_Y')*scale;

float amp_z = chf('Amplitude_Z')*scale;

int freq_x = chi('Frequency_X');

int freq_y = chi('Frequency_Y');

int freq_z = chi('Frequency_Z');

v@P.x = sin(@curveu*freq_x)*amp_x;

v@P.y = sin(@curveu*freq_y)*amp_y;

G or C = negative

vector bbox = relpointbbox(0, @P);

@P.x = sin(bbox.z PI * chf("xbulge") + PI) - (chf("base_thickness"));

@P.z += sin(bbox.x PI) bbox.z * chf("zbulge");

float r = 1.0/pow(@numpt-1, chf("radius")); // Radius distance scaled by total seeds

float phi = chf('angle'); // Degrees to twist consectuive seeds

@P.x = pow(r sqrt(@ptnum), chf("scale")) cos(radians(phi)*@ptnum);

@P.y = pow(r sqrt(@ptnum), chf("scale")) sin(radians(phi)*@ptnum);

f@r = pow(r * sqrt(@ptnum), chf("squash"));

@P.z = fit(@ptnum, 0, 22, 0, 1) (chf("extrude")0.1); // Extrude along Z axis (Optional)

p@orient = quaternion(radians(phi*@ptnum), set(0,0,1)); // Seed orientation (Optional)

//rotate(xform, 1, set(0,1,0));

xform *= qconvert(p@orient);

p@orient = quaternion(xform);

float angle = radians(chf('angle'));

vector axis = normalize(chv('axis'));

vector4 rotation = quaternion(angle, axis);

p@orient = qmultiply(p@orient, rotation);

float offset2 = chramp("Grade2", @curveu);

float final = lerp(offset1, offset2, f@r);

float angle = ch("Angle");

prerotate(4@localtransform, radians(angle * (final -.5)), {1,0,0});

vector restP = v@P * {1,1,0};

vector uvw = set(relpointbbox(0,v@P).z,0,0);

matrix3 m = primuv(1,"transform",0,uvw);

restP *= m;

v@P = restP + primuv(1,"P",0,uvw);

float srfoffset = chf("srfoffset");

if(f@dist <= srfoffset){

int polys[] = pointprims(0, @ptnum);

for(int i=0; i<len(polys); i++){

int poly = polys[i];

setprimgroup(0, "remesh", poly, 0);

}

}

f@weight = pow(fit(max(f@dist, srfoffset), srfoffset, maxdist, 0.0, 1.0), chf("weightpow"));