Draw many Rect/Polygons of Many layers Interactively and selectively using Skill

Hi Satya,

Use enterBox() to prompt the user for the location of the rectangle(s), maybe with an options form to control which layer names to create the rectangles on, and then in the doneProc of the enterBox use dbCreateRect to create the rectangles.

Your requirement to delete existing shapes is rather imprecise - but that's just a matter of using dbDeleteObject on any shapes you want to delete.

This seems pretty straightforward, and a little research (in the documentation, in this forum, and on Cadence Online Support) could have found you the answers to all of this. Perhaps your requirements are really more complicated? Or perhaps you just wanted somebody to write the code for you?

Regards,

Andrew

Hi Satya

The following is a sample of how you can do it. Load the script and enter "CCSgetPoints()" in ciw. Draw a few lines in a layout and press Enter to terminate.

The script actually has a problem in that it is quite inflexible in terms of changing the input layers. Would you like to improve on it and post your solution so that everybody can benefit from it? Perhaps you might want to consider using "@rest" keyword in CCSgetPoints procedure to allow user to enter the desired layers.

Best regards
Quek


procedure( CCSgetPoints()
   let( (orgSnapMode)
      orgSnapMode=hiGetCurrentWindow()->snapMode
      hiGetCurrentWindow()->snapMode="anyAngle"
      enterLine(
         ?prompts list("Enter first point" "Enter next point(s)")
         ?doneProc "CCSdraw"
      ) ;enterLine
      hiGetCurrentWindow()->snapMode=orgSnapMode
   ) ;let
) ;procedure

procedure( CCSdraw(win done allPoints)
   let( (cv)
      if( done then
         cv=geGetWindowCellView()
         dbCreatePolygon(cv list("Metal1" "drawing") allPoints)
         dbCreatePolygon(cv list("Metal2" "drawing") allPoints)
         dbCreatePolygon(cv list("Metal3" "drawing") allPoints)
      ) ;if
   ) ;let
) ;procedure