import rhinoscriptsyntax as rs

allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)
initial = "C"
hgt = 60
size = 40

# mit curve eine geschlossene Linie in Rhino zeichnen
#rs.Command("_Curve Degree=2 0,0,0 20,-1,0 20,12,0 0,10,0 Close _Enter")
#crv = rs.FirstObject(select=True)

### BUCHSTABE 1

my_text = rs.AddText(initial,(0,0,0),height=size)
crv = rs.ExplodeText(my_text,True)[0]
rs.SelectObject(crv)

# mit extrude die Linie dann extrudieren
rs.Command("_ExtrudeCrv Solid=No {} _Enter".format(hgt))
srf = rs.FirstObject(select=True)
rs.UnselectObject(crv)

# mithilfe der Punkte die Form aendern
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,19)
rs.SelectObjectGrip(srf,16)
rs.Command("-_Move 0,0,0 0,-7,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,11)
rs.SelectObjectGrip(srf,8)
rs.Command("-_Move 0,0,0 0,7,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,20)
rs.Command("-_Move 0,0,0 10,5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,27)
rs.Command("-_Move 0,0,0 0,5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,23)
rs.Command("-_Move 0,0,0 10,5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,4)
rs.Command("-_Move 0,0,0 10,5,0 _Enter")
rs.UnselectAllObjects()

rs.EnableObjectGrips(srf, False)

# mit contour Konturlinien in die z- Richtung zeichnen, und diese dann extrudieren (Boden)
rs.SelectObject(srf)
rs.Command("_Contour 0,0,0 0,0,1 3.0 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")

# mit contour Konturlinien in die x- Richtung zeichnen, und den pipe Befehl benuetzen (Stuetzen)
rs.SelectObject(srf)
rs.Command("_Contour 0,0,0 1,0,0 1.5 _Enter")
rs.Command("_Pipe 0.2 _Enter")
rs.DeleteObject(srf)
rs.UnselectAllObjects()


### BUCHSTABE 2

letter = "S"

# Text
my_letter = rs.AddText(letter,(40,0,0),height = size)
crv = rs.ExplodeText(my_letter, True)
rs.SelectObject(crv)

# Text extrudieren
rs.Command("_ExtrudeCrv Solid=No {} _Enter".format(hgt))
rs.UnselectAllObjects()

# Punkte Surface
srf = rs.FirstObject(select=True)
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,35)
rs.Command("-_Move 0,0,0 0,5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,23)
rs.SelectObjectGrip(srf,20)
rs.Command("-_Move 0,0,0 0,-5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,11)
rs.SelectObjectGrip(srf,8)
rs.Command("-_Move 0,0,0 0,-5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,19)
rs.SelectObjectGrip(srf,16)
rs.Command("-_Move 0,0,0 0,5,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,7)
rs.SelectObjectGrip(srf,4)
rs.Command("-_Move 0,0,0 5,7,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,27)
rs.SelectObjectGrip(srf,24)
rs.Command("-_Move 0,0,0 0,7,0 _Enter")
rs.UnselectAllObjects()

rs.EnableObjectGrips(srf, False)

# Kontourlinien - extrudieren (z-Richtung)
rs.SelectObject(srf)
rs.Command("_Contour 40,0,0 40,0,1 3.0 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")

#Kontourlinien - pipen (x-Richtung)
rs.SelectObject(srf)
rs.Command("_Contour 40,0,0 41,0,0 3.0 _Enter")
rs.Command("_Pipe 0.2 _Enter")

rs.DeleteObject(srf)
rs.UnselectAllObjects()