un poco de VEX

// Crear una línea con puntos 
int pt_max = chi ( " Point_Max " );
longitud del flotador = chf ( " Longitud " ); 
vector dir = chv ( " Dirección " ); 
dir = normalizar (dir); 
vector offset = chv ( " Offset " ); 

float stepVal = length / ( float ) (pt_max- 1 );
int pts_all []; 
cambiar el tamaño (pts_all, pt_max); 

para ( int i = 0 ; i <pt_max; i ++ ) 
{ 
    vector pos = dir * (stepVal * i) + offset;
    int curId = addpoint ( 0 , pos); 
    pts_all [i] = curId; 
} 
// addprim (0, "polilínea", pts_all); 

para ( int i = 0 ; i <pt_max- 1 ; i ++ ) 
{ 
    addprim ( 0 , " polilínea " , pts_all [i], pts_all [i + 1 ]); 
}

// ¡hazlo circular! 
flotante gradiente = ( flotante ) @ ptnum / ( flotante ) (@ numpt - 1 ); 

@Py = sin (gradiant * 2 * $ PI); 
@Pz = cos (gradiant * 2 * $ PI);