skill/layoutProcedures.il

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
;-----------------------------------------------------------------------
;     Copyright (c) 2020-2024 by Altair Engineering, Inc.
;     Author: Heinz Bruederlin
;
; Layout skill helper procedures
;
; load script into cadence CIW with
; > load("<path/to/script>/layoutProcedures.il")
;

putd('CeLayoutZoomToPoint nil)
procedure(CeLayoutZoomToPoint(libName cellName x y)
  prog( (windowId scale cvId)
    scale = 3.0
    windowId = deOpenCellView(libName cellName "layout" "maskLayout" nil "r")
    hiPan(windowId x:y)
    hiZoomRelativeScale(windowId scale)
    cvId = geGetEditCellView(windowId)
    leSetRefPoint(cvId x:y)
    leMoveCursorToRefPoint()
  )
)