#E

import rhinoscriptsyntax as rs

allobjs = rs.AllObjects()
rs.DeleteObjects(allobjs)
initial = "E"
hgt= 40
size =5

#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(initial,(0,0,0),height=size, font="Times New Roman")
crv = rs.ExplodeText(mytext,True) [0]
rs.SelectObject(crv)

rs.Command("_ExtrudeCrv Solid=No {} _Enter" .format(hgt))
rs.UnselectAllObjects()
srf = rs.FirstObject(select=True)
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,12)
rs.SelectObjectGrip(srf,13)
rs.SelectObjectGrip(srf,14)
rs.SelectObjectGrip(srf,15)
rs.Command("_Move 0,0,0 0,60,0 _Enter")
rs.UnselectAllObjects()

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

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

rs.SelectObjectGrip(srf,22)
rs.SelectObjectGrip(srf,21)
rs.Command("_Move 0,0,0 20,20,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,30)
rs.SelectObjectGrip(srf,29)
rs.Command("_Move 0,0,0 -20,-20,0 _Enter")
rs.UnselectAllObjects()

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

rs.EnableObjectGrips(srf, False)

rs.SelectObject(srf)
rs.Command("_Contour 0,0,0 0,0,1 2.5 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")
rs.UnselectAllObjects()

rs.SelectObject(srf)
rs.Command("_Contour 0,0,0 10,0,0 2.0 _Enter")
rs.Command("_Pipe 0.2 _Enter")

rs.DeleteObject(srf)
rs.UnselectAllObjects()


#F


initial2 = "F"
hgt2= 20
size2 =5

#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(initial2,(115,-100,0),height=size2, font="Times New Roman")
crv = rs.ExplodeText(mytext,True) [0]
rs.SelectObject(crv)

rs.Command("_ExtrudeCrv Solid=No {} _Enter" .format(hgt2))
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,3)
rs.SelectObjectGrip(srf,15)
rs.Command("_Move 0,0,0 10,0,0 _Enter")
rs.UnselectAllObjects()

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

rs.SelectObjectGrip(srf,6)
rs.Command("_Move 0,0,0 -15,0,0 _Enter")
rs.UnselectAllObjects()

rs.SelectObjectGrip(srf,22)
rs.SelectObjectGrip(srf,21)
rs.Command("_Move 0,0,0 20,0,0 _Enter")
rs.UnselectAllObjects()

rs.EnableObjectGrips(srf, False)
rs.UnselectAllObjects()

rs.SelectObject(srf)
rs.Command("Contour 0,0,0 0,0,1 2.5 _Enter")
rs.Command("_ExtrudeCrv Solid=Yes 0.3 _Enter")

rs.SelectObject(srf)
rs.Command("Contour 0,0,0 1,0,0 1.5 _Enter")
rs.Command("Pipe 0.2 _Enter")

rs.DeleteObject(srf)