Chord Height.py

import rhinoscriptsyntax as rs
step = 0.00000001
pApos = rs.EvaluateCurve(x,0)
pBpos = rs.EvaluateCurve(x,0.00000001)

pA = rs.AddPoint(pApos)
pB = rs.AddPoint(pBpos)
a = []

right = False
domain = rs.CurveDomain(x)[1]
print domain

#while (not right) or (guard>100):
for j in range(500):
    for i in range(500):
        nextStep = step + (i/10)
        pBpos = rs.EvaluateCurve(x, nextStep)
        pB = rs.AddPoint(pBpos)
        line = rs.AddLine(pA,pB)
        lDom = rs.CurveDomain(line)[1]
        midPtOfLine = rs.EvaluateCurve(line, lDom*0.5)
        paramOnCurve = rs.CurveClosestPoint(x, midPtOfLine)
        ptOnCurve = rs.AddPoint(rs.EvaluateCurve(x, paramOnCurve))
        if rs.Distance(midPtOfLine, ptOnCurve) > y:
            break
    a.append(pA)
    step = nextStep
    if step > domain:
        break
    pA = pB

print a