rollout igorznag_extrude_edge "Extrude Edge" width:100 height:60
( button btn_extrude "Extrude" pos:[5,5] width:90 height:50
on btn_extrude pressed do ( co=modPanel.getCurrentObject()
if(subObjectLevel==1)then
( subobjectlevel = 2
eh=co.edgeExtrudeHeight; ew=co.edgeExtrudeWidth
co.edgeExtrudeHeight=0;co.edgeExtrudeWidth=0;
co.SetOperation #ExtrudeEdge;co.ConvertSelection #Edge #Vertex
co.edgeExtrudeHeight=eh;co.edgeExtrudeWidth=ew
subobjectlevel = 1; ))); createdialog igorznag_extrude_edge