I am trying to create a form accesible with a menu in Virtuoso Layout editor to create a complex shape. Managed to add the menu, couple of menu items and create a form using material in this forum and web but struggling to pass the values input through the form to a procedure. I am trying to draw a donutas a start.
My code is copied below and appriciate anyone can help figuring out the problem.
The error message is
*Error* dbCreateDonut argument #4 should be a number (type template = "dglnn") - nil
procedure(CreateAddDoForm() let((InnerRadius OuterRadius Centre Layer) InnerRadius=hiCreateIntField( ?name 'InnerRadius ?prompt "Inner Radius" ) OuterRadius=hiCreateIntField( ?name 'OuterRadius ?prompt "Outer Radius" ) Centre=hiCreateIntField( ?name 'Centre ?prompt "Centre" ) Layer=hiCreateIntField( ?name 'Layer ?prompt "Layer" ) hiCreateAppForm( ?name 'AddDonutForm ?formTitle "Input Source Parameters" ?buttonLayout 'OKCancelApply ?callback "DrawDonut()" ?fields list( list(InnerRadius 0:0 200:30 100) list(OuterRadius 0:35 200:30 100) list(Centre 0:70 200:30 100) list(Layer 0:105 200:30 100) ) ) );let );procedureprocedure(FunctionAddDonut() unless(boundp('AddDonutForm) CreateAddDoForm() ) hiDisplayForm(AddDonutForm) )procedure(DrawDonut() let( (Orad Irad) Orad=AddDonutForm->OuterRadius->Value Irad=AddDonutForm->InnerRadius->Value cvID=geGetWindowCellView() dbCreateDonut(cvID "DIFF" 0:0 Orad Irad) ) )
The problem is that leChopShape will return a list of the new shapes - and you have no idea which is the one you want to do subsequent chops on. Now you're not removing the gaps you're chopping out (I suspect you want to though) - but even if you do that, it's not going to solve the problem - fundamentally you will end up with two or three shapes when you chop the remainder of the donut (depending on whether you keep the shapes in the chopped region). If you pick the wrong shape (you have arbitrarily chosen then cadr), then the next chop will return nil because there was nothing that was chopped.
So I think you need to do something like the below - use dbGetTrueOverlaps to find the polygon underneath the mid point of the next segment to be chopped (I compute the midRadius and then a point half way through that segment) - and then chop that. In this example I also remove the chopped region (you must tell it that the chop points are a closed polygon for that to work) - whether you want to do that or not is up to you (this is the t t arguments in leChopShape).
I also added local variables too, for good measure. Note that in the code, you might be able to use cc_mainR rather than computing cc_midRadius (I'll leave that to you - I only spotted this upon reviewing the code).