for(int i=0; i<10; i++){
    vector pos = {0,0,0};
    pos = set(i,i,0);
    addpoint(0,pos);
}

vector pos = {0,0,0};
pos = set(@P.x,@P.y+1,@P.z);

if(@ptnum != @numpt-1){
    int p0 = addpoint(0, pos);
}

int ptnum = @numpt;

int pointlen = chi("pointlen");
int p0 = 0;

for(int i=0; i<ptnum; i++){
    
    vector newpos = {0,0,0};
    vector pos = point(0, "P", i);
    newpos = set(pos.x,pos.y,pos.z+pointlen);
    p0 = addpoint(0, newpos);
    
    if(i!=ptnum-1){
        addprim(0, "poly", p0, i, i+1, p0+1);
    }
}