import rhinoscriptsyntax as rs

allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)
hgt= 24


# draw a closed curve in Rhino
#rs.Command("-_Curve Degree=2 0,0,0 20,-1,0 20,12,0 0,10,0 Close _Enter")
#crv = rs.FirstObject(select=True)
mytext = rs.AddText("A",(0,0,0),height=20)
crv = rs.ExplodeText(mytext,True)[0]
rs.SelectObject(crv)


# extrude the curve
rs.Command("-_ExtrudeCrV Solid=No 30 _Enter")
srf = rs.FirstObject(select=True)

# use handles to change NURBS shape

# create contourlines in z-direction and extrude them (floor plates)
rs.SelectObject(srf)
rs.Command("Contour 0,0,0 0,0,1 3.0 _Enter")
rs.Command("-_ExtrudeCrV Solid=Yes 0.3 _Enter")

# cretae contourlines in X-direction and use the pipe command (vertical support)
rs.SelectObject(srf)
rs.Command("Contour 0,0,0 1,0,0 2.0 _Enter")
rs.Command("Pipe 0.2 _Enter")

rs.DeleteObject(srf)