Houdini VEX script to wrap sphere with curve.

wrapsphere.c

int res = chi("res");
float rad = chf("rad");
int poly = addprim(0, "polyline");
for(int i=0; i<res; i++){
    float ang = $PI * 2 * chf("angmult") * i / (res - 1.0);
    float rang = $PI * i / (res - 1.0);
    float r = sin(rang) * rad;
    float h = cos(rang) * rad;
    float x = cos(ang) * r;
    float z = sin(ang) * r;
    
    int pt = addpoint(0, set(x, h, z));
    addvertex(0, poly, pt);
}