dxf out question

Hi Masa,

I'm using SPB v17.4 S036.
There is Color Mapping option in DXF Out setup to match database colors.

thank u for ur comment.

the color mapping option is already set as "match database colors" as default but the exported dxf file has all white.

I just tested this with allegro 22.1 S006 & the colors were output correctly...

thank u for checking, david.

r u talking about the colors assigned by the command "assign color"?

thank u for checking, david.

r u talking about the colors assigned by the command "assign color"?

No, I just verified that the layer colors in a pcb fab_dwg matched between Allegro and  the dxf file

Per research I did a couple of years ago the only way to export 'assign color' setting is to use the 'capture image' command

thank u, david. the purpose of this dxf out is to find out the xy coordinates of the highlighted bga pads assigned by the command assign color.  so a capture Image does not help.

As a possible solution to that issue I wrote the skill code below to report the colored pins:

procedure((Report_ColoredPins \@optional FileName)
    prog((OutputName outport PinCnt NetCnt Total)
        if(FileName then
            (OutputName = strcat(simplifyFilename(".") "/" FileName))
            (OutputName = FileName) else
            (OutputName = strcat(simplifyFilename(".") "/Colored_Pins.txt"))
        )
        if(isFile(OutputName) then
            unless(deleteFile(OutputName)
                (axlMsgPut "ERROR: could not remove existing file %s" OutputName)
                return()
            )
        )
        (axlMeterCreate "Report 1 pin nets" "" t)
        if((outport = outfile(OutputName)) then
            (NetCnt = 0)
            (PinCnt = 0)
            (Total = length(((axlDBGetDesign)->nets)))
            foreach(net
                ((axlDBGetDesign)->nets)
                unless((axlMeterIsCancelled)
                    NetCnt++
                    (axlMeterUpdate
                        ((100 * NetCnt) / Total)
                        strcat("Processing net "
                            (net->name)
                        )
                    )
                    foreach(branch
                        (net->branches)
                        foreach(child
                            (branch->children)
                            when(((child->objType) == "pin")
                                when((axlIsCustomColored child)
                                    PinCnt++
                                    fprintf(outport "%s.%s\t%s\t(%g %g)\t%d\n"
                                        ((child->component)->name)
                                        (child->number)
                                        (net->name)
                                        (xCoord
                                            (child->xy)
                                        )
                                        (yCoord
                                            (child->xy)
                                        )
                                        (axlIsCustomColored child)
                                    )
                                )
                            )
                        )
                    )
                )
            )
            (axlMeterDestroy)
            close(outport)
            (axlMsgPut "%d nets processed, %d CustomColored Pins found & written to %s" NetCnt PinCnt OutputName) else
            (axlMsgPut "ERROR: could not open output file %s" OutputName)
            return()
        )
    )
)

thank u, david for providing me with the skill coade.

i am not familiar with skill codes.

In the skill caode named "color_assign.il", do i need to put something in the head shown below?

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

axlCmdRegister( "color_assign" `color_assign)

procedure((Report_ColoredPins \@optional FileName)
    prog((OutputName outport PinCnt NetCnt Total)

skill code continued

I included the command registration & added design units output

updated skill code below:

procedure((Report_ColoredPins \@optional FileName)
prog((OutputName outport PinCnt NetCnt Total)
if(FileName then
(OutputName = strcat(simplifyFilename(".") "/" FileName))
(OutputName = FileName) else
(OutputName = strcat(simplifyFilename(".") "/Colored_Pins.txt"))
)
if(isFile(OutputName) then
unless(deleteFile(OutputName)
axlMsgPut("ERROR: could not remove existing file %s" OutputName)
return()
)
)
axlMeterCreate("Report Colored Pins" "" t)
if((outport = outfile(OutputName)) then
(Total = car((axlDBGetDesignTotal)))
cond(((Total == "mils")
fprintf(outport "UNITS Mils\n")
)
((Total == "inches")
fprintf(outport "UNITS Inches\n")
)
((Total == "microns")
fprintf(outport "UNITS UM\n")
)
((Total == "millimeters")
fprintf(outport "UNITS MM\n")
)
((Total == "centimeters")
fprintf(outport "UNITS CM\n")
)
)
(NetCnt = 0)
(PinCnt = 0)
(Total = length((axlDBGetDesign()->nets)))
foreach(net
(axlDBGetDesign()->nets)
unless(axlMeterIsCancelled()
NetCnt++
axlMeterUpdate(((100 * NetCnt) / Total)
strcat("Processing net "
(net->name)
)
)
foreach(branch
(net->branches)
foreach(child
(branch->children)
when(((child->objType) == "pin")
when(axlIsCustomColored(child)
PinCnt++
fprintf(outport "%s.%s\t%s\t(%g %g)\t%d\n"
((child->component)->name)
(child->number)
(net->name)
xCoord((child->xy))
yCoord((child->xy))
axlIsCustomColored(child)
)
)
)
)
)
)
)
axlMeterDestroy()
close(outport)
axlMsgPut("%d nets processed, %d CustomColored Pins found & written to %s" NetCnt PinCnt OutputName) else
axlMsgPut("ERROR: could not open output file %s" OutputName)
return()
)
)
)
axlCmdRegister( "Report_ColoredPins" 'Report_ColoredPins)