How to get pin position and location?

Hi Morgan,

Below api will help you to get X and Y position of hotspot where we connect wire.

Once you have hotspot of pin use that coordinate to draw wire using first point (x,y ) of pin hotspot.

DboPortInst_sGetHotSpotX(obj, status) : returns int
Parameters:
obj: DboBaseObject *
status: DboState &
DboPortInst_sGetHotSpotY(obj, status) : returns int
Parameters:
obj: DboBaseObject *
status: DboState &

Hope it helps.

Thank you, CadAP, Now the question becomes:

1. What value should be give to variable obj?

2. How to get pin position on the Symbol, such as Top, Bottom, Left or Right?

Hi CadAP,

1.When I use code: $portInst GetId $lStatus, get the pin ID, and pass it to DboPortInst_sGetHotSpotX, it error;

2.Get pin position to place wire, if the pin is on Top, the wire will go to top from pin hotspot; if the pin is on right, the wire will go to right from pin hotspot, so must know the pin position on the Symbol.

Hi Morgan,

1.When I use code: $portInst GetId $lStatus, get the pin ID, and pass it to DboPortInst_sGetHotSpotX, it error;

Ans: DboPortInst_sGetHotSpotX $portInst $lStatus -- correct command.

2.Get pin position to place wire, if the pin is on Top, the wire will go to top from pin hotspot; if the pin is on right, the wire will go to right from pin hotspot, so must know the pin position on the Symbol.

Ans: Need to create a script to get pin position. I'll create a sample and share it with you.

I didnt get this one. Could you please elaborate. 

KD202502275710 

whish part you didn't understand?

Morgan 

Please find below code for getting pin position(Left, Right, Top, Bottom):

proc lGetPinPos {lPin} {
set lStatus [DboState]
set lPinName [DboTclHelper_sMakeCString]
$lPin GetPinName $lPinName
set PinName [DboTclHelper_sGetConstCharPtr $lPinName]
# set lSelObj [GetSelectedObjects]
# set lSelloc []
set lPinHOtSpotCP [$lPin GetHotSpot $lStatus]

set lPinHOtSpotCPx [DboTclHelper_sGetCPointX $lPinHOtSpotCP]
set lPinHOtSpotCPy [DboTclHelper_sGetCPointY $lPinHOtSpotCP]

#get the location point
set lStartCP [$lPin GetStartPoint $lStatus]

set lStartCPx [DboTclHelper_sGetCPointX $lStartCP]
set lStartCPy [DboTclHelper_sGetCPointY $lStartCP]

if {[expr {$lStartCPx - $lPinHOtSpotCPx}] > 0} {

puts "Pin $PinName is Left Pointed"

} elseif {[expr {$lStartCPx - $lPinHOtSpotCPx}] < 0} {

puts "Pin $PinName is Right Pointed"

} elseif {[expr {$lStartCPy - $lPinHOtSpotCPy}] > 0} {

puts "Pin $PinName is Top Pointed"

} elseif {[expr {$lStartCPy - $lPinHOtSpotCPy}] < 0} {

puts "Pin $PinName is Bottom Pointed"

}

}

set lStatus [DboState]
set lSelObj [GetSelectedObjects]

set lIter [$lSelObj NewPinsIter $lStatus]
set lNullObj NULL
#get the first pin of the part
set lPin [$lIter NextPin $lStatus]
while {$lPin !=$lNullObj } {
#placeholder: do your processing on $lPin
lGetPinPos $lPin
#get the next pin of the part
set lPin [$lIter NextPin $lStatus]
}
delete_DboPartInstPinsIter $lIter

Morgan 

Please find below code for getting pin position(Left, Right, Top, Bottom):

proc lGetPinPos {lPin} {
set lStatus [DboState]
set lPinName [DboTclHelper_sMakeCString]
$lPin GetPinName $lPinName
set PinName [DboTclHelper_sGetConstCharPtr $lPinName]
# set lSelObj [GetSelectedObjects]
# set lSelloc []
set lPinHOtSpotCP [$lPin GetHotSpot $lStatus]

set lPinHOtSpotCPx [DboTclHelper_sGetCPointX $lPinHOtSpotCP]
set lPinHOtSpotCPy [DboTclHelper_sGetCPointY $lPinHOtSpotCP]

#get the location point
set lStartCP [$lPin GetStartPoint $lStatus]

set lStartCPx [DboTclHelper_sGetCPointX $lStartCP]
set lStartCPy [DboTclHelper_sGetCPointY $lStartCP]

if {[expr {$lStartCPx - $lPinHOtSpotCPx}] > 0} {

puts "Pin $PinName is Left Pointed"

} elseif {[expr {$lStartCPx - $lPinHOtSpotCPx}] < 0} {

puts "Pin $PinName is Right Pointed"

} elseif {[expr {$lStartCPy - $lPinHOtSpotCPy}] > 0} {

puts "Pin $PinName is Top Pointed"

} elseif {[expr {$lStartCPy - $lPinHOtSpotCPy}] < 0} {

puts "Pin $PinName is Bottom Pointed"

}

}

set lStatus [DboState]
set lSelObj [GetSelectedObjects]

set lIter [$lSelObj NewPinsIter $lStatus]
set lNullObj NULL
#get the first pin of the part
set lPin [$lIter NextPin $lStatus]
while {$lPin !=$lNullObj } {
#placeholder: do your processing on $lPin
lGetPinPos $lPin
#get the next pin of the part
set lPin [$lIter NextPin $lStatus]
}
delete_DboPartInstPinsIter $lIter