import rhinoscriptsyntax as rs
import random as ran
import fantastic_stairs_lib as fs
# delete everything and start from scratch
rs.DeleteObjects(rs.AllObjects())
rs.EnableRedraw(False)

#curve = fs.make_clover_nsc(40, radius = 10, angle = 85, translation = [2,0,0])
curve =rs.AddSpiral([0,0,0],[0,0,1], 0, turns=8, radius0=10, radius1=1)

len_c= rs.CurveLength(curve)
An=0
P=8
mods = (len_c-An) / (P*fs.tt+fs.pod_l + fs.tt)
steps = int(mods*P)+1
fs.make_curved_podeststair(curve, steps=steps, pod_l=fs.pod_l, DC=steps+1, P=P, An=An)
i = 1
len_fromstart = An+P*fs.tt+fs.pod_l/2


while (len_fromstart <= len_c):
    point = rs.CurveArcLengthPoint(curve, len_fromstart)
    m_l=rs.AddLine(point, [point[0],point[1],i*P*fs.th-fs.thick])
    rs.AddPipe(m_l,0,0.1)
    (box1, line1) = fs.make_box_wline([point[0],point[1],i*P*fs.th-fs.thick], fs.pod_l, 2.0, fs.thick)
    param = rs.CurveClosestPoint(curve, point)
    normal = rs.CurveTangent(curve, param)
    angle = rs.Angle([0,0,0], normal)[0]
    rs.RotateObjects([box1, line1],[point[0],point[1],i*P*fs.th-fs.thick], angle, [0,0,1] )
    i = i+1
    len_fromstart +=  P*fs.tt+fs.pod_l + fs.tt