Hello everybody,
I am looking for a small script which extracts xy + side for Fiducials.
I tried through cell collection, but did not succeed till now.
Can anybody help me in this problem ?
Thanks in advance,
Head1.
------------------------------------------------------------------------------------------
Dim fid 'As Fiducial
Dim fids 'As Fiducials
Set fids = pcbDoc.Fiducials(epcbSelectAll)
Dim side, x, y
For Each fid In fids
side = fid.side
If side = 1 Then side = "Top"
If side = 512 Then side = "Bottom"
x = fid.PositionX
y = fid.PositionY
Next