import rhinoscriptsyntax as rs

allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)
hgt= 50
initial = "L"
size = 35

# geschlossene kurve zeichnen
#rs.Command("_Curve Degree=2 0,0,0 20,-1,0 20,12,0 0,10,0 0,0,0 _Enter")
#crv = rs.FirstObject(select=True)
mytext = rs.AddText(initial, (0,0,0), height=size, font="Arial")
crv = rs.ExplodeText(mytext,True)
rs.SelectObject(crv)


# kurve extrudieren
rs.Command("_ExtrudeCrv Solid=No {} _Enter".format(hgt))
srf = rs.FirstObject(select=True)
"""
# kontrollpunkte aktivieren und koerper verformen
rs.Command("-_Rebuild UPointCount=10 VPointCount=4 UDegree=3 VDegree=3 DeleteInput=Yes _Enter")
rs.EnableObjectGrips(srf, True)
pointlist = rs.ObjectGripLocations(srf)
print pointlist
for i,pt in enumerate(pointlist):
    cmd = "-_Dot {} {} _Enter".format(str(i) ,str(pt))
    rs.Command(cmd,False)

rs.SelectObjectGrip(srf,23)
rs.Command("-_move 0,0,0 15,0,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,20)
rs.Command("-_move 0,0,0 15,0,0 _Enter")
rs.UnselectAllObjects()
"""

# konturlinien in z-richtung erstellen und diese extrudieren (Geschossdecken)
rs.SelectObject(srf)
rs.Command("_contour 0,0,0 0,0,1 3.0 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")

# konturlinien in x-richtung erstellen und pipe befehl anwenden (Stuetzen)
rs.SelectObject(srf)
rs.Command("_contour 0,0,0 1,0,0 2.0 _Enter")
rs.Command("_pipe 0.2 _Enter")

rs.DeleteObject(srf)

hgt= 50
initial = "S"
size = 35

# geschlossene kurve zeichnen
#rs.Command("_Curve Degree=2 0,0,0 20,-1,0 20,12,0 0,10,0 0,0,0 _Enter")
#crv = rs.FirstObject(select=True)
mytext = rs.AddText(initial, (50,0,0), height=size, font="Arial")
crv = rs.ExplodeText(mytext,True)
rs.SelectObject(crv)


# kurve extrudieren
rs.Command("_ExtrudeCrv Solid=No {} _Enter".format(hgt))
srf = rs.FirstObject(select=True)
"""
# kontrollpunkte aktivieren und koerper verformen
rs.Command("-_Rebuild UPointCount=10 VPointCount=4 UDegree=3 VDegree=3 DeleteInput=Yes _Enter")
rs.EnableObjectGrips(srf, True)
pointlist = rs.ObjectGripLocations(srf)
print pointlist
for i,pt in enumerate(pointlist):
    cmd = "-_Dot {} {} _Enter".format(str(i) ,str(pt))
    rs.Command(cmd,False)

rs.SelectObjectGrip(srf,23)
rs.Command("-_move 0,0,0 15,0,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,20)
rs.Command("-_move 0,0,0 15,0,0 _Enter")
rs.UnselectAllObjects()
"""

# konturlinien in z-richtung erstellen und diese extrudieren (Geschossdecken)
rs.SelectObject(srf)
rs.Command("_contour 0,0,0 0,0,1 3.0 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")

# konturlinien in x-richtung erstellen und pipe befehl anwenden (Stuetzen)
rs.SelectObject(srf)
rs.Command("_contour 0,0,0 1,0,0 2.0 _Enter")
rs.Command("_pipe 0.2 _Enter")

rs.DeleteObject(srf)