1264 lines
39 KiB
C++
1264 lines
39 KiB
C++
/********************/
|
|
/**** rs274d.cpp ****/
|
|
/********************/
|
|
|
|
|
|
#include "fctsys.h"
|
|
#include "common.h"
|
|
#include "confirm.h"
|
|
#include "macros.h"
|
|
#include "gerbview.h"
|
|
#include "pcbplot.h"
|
|
#include "protos.h"
|
|
|
|
#define IsNumber( x ) ( ( ( (x) >= '0' ) && ( (x) <='9' ) ) \
|
|
|| ( (x) == '-' ) || ( (x) == '+' ) || ( (x) == '.' ) )
|
|
|
|
/* Format Gerber: NOTES:
|
|
* Functions history:
|
|
* Gn =
|
|
* G01 linear interpolation (right trace)
|
|
* G02, G20, G21 Circular interpolation, meaning trig <0
|
|
* G03, G30, G31 Circular interpolation, meaning trigo> 0
|
|
* G04 review
|
|
* G06 parabolic interpolation
|
|
* G07 Cubic Interpolation
|
|
* G10 linear interpolation (scale x10)
|
|
* G11 linear interpolation (0.1x range)
|
|
* G12 linear interpolation (0.01x scale)
|
|
* G52 plot symbol reference code by Dnn
|
|
* G53 plot symbol reference by Dnn; symbol rotates from -90 degrees
|
|
* G54 Selection Tool
|
|
* G55 Fashion photo exhibition
|
|
* G56 plot symbol reference code for DNN
|
|
* G57 displays the symbol link to the console
|
|
* G58 plot displays the symbol and link to the console
|
|
* G60 linear interpolation (scale x100)
|
|
* G70 Units = Inches
|
|
* G71 Units = Millimeters
|
|
* G74 circular interpolation removes 360 degree, has returned G01
|
|
* Active G75 circular interpolation on 360 degree
|
|
* G90 mode absolute coordinates
|
|
* G91 Fashion Related Contacts
|
|
*
|
|
* X, Y
|
|
* X and Y are followed by + or - and m + n digits (not separated)
|
|
* m = integer part
|
|
* n = part after the comma
|
|
* Classic formats: m = 2, n = 3 (size 2.3)
|
|
* m = 3, n = 4 (size 3.4)
|
|
* eg
|
|
* G__ X00345Y-06123 * D__
|
|
*
|
|
* Tools and D_CODES
|
|
* Tool number (identification of shapes)
|
|
* 1 to 99 (Classical)
|
|
* 1 to 999
|
|
* D_CODES:
|
|
*
|
|
* D01 ... D9 = action codes:
|
|
* D01 = activating light (lower pen) when placement
|
|
* D02 = light extinction (lift pen) when placement
|
|
* D03 = Flash
|
|
* D09 = VAPE Flash
|
|
* D51 = G54 preceded by -> Select VAPE
|
|
*
|
|
* D10 ... D255 = Identification Tool (Opening)
|
|
* Not tj in order (see table in PCBPLOT.H)
|
|
*/
|
|
|
|
// Photoplot actions:
|
|
#define GERB_ACTIVE_DRAW 1 // Activate light (lower pen)
|
|
#define GERB_STOP_DRAW 2 // Extinguish light (lift pen)
|
|
#define GERB_FLASH 3 // Flash
|
|
|
|
static wxPoint LastPosition;
|
|
|
|
|
|
/* Local Functions (are lower case since they are private to this source file)
|
|
**/
|
|
|
|
|
|
/**
|
|
* Function fillCircularTRACK
|
|
* initializes a given TRACK so that it can draw a circle which is not filled
|
|
* and
|
|
* has a given pen width (\a aPenWidth ).
|
|
*
|
|
* @param aTrack The TRACK to fill in.
|
|
* @param Dcode_index The DCODE value, like D14
|
|
* @param aLayer The layer index to set into the TRACK
|
|
* @param aPos The center point of the flash
|
|
* @param aDiameter The diameter of the round flash
|
|
* @param aPenWidth The width of the pen used to draw the circle's
|
|
* circumference.
|
|
* @param isDark True if flash is positive and should use a drawing
|
|
* color other than the background color, else use the background color
|
|
* when drawing so that an erasure happens.
|
|
*/
|
|
static void fillCircularTRACK( TRACK* aTrack,
|
|
int Dcode_index,
|
|
int aLayer,
|
|
const wxPoint& aPos,
|
|
int aDiameter,
|
|
int aPenWidth,
|
|
bool isDark )
|
|
{
|
|
aTrack->m_Shape = S_CIRCLE;
|
|
aTrack->m_Width = aPenWidth;
|
|
|
|
aTrack->SetLayer( aLayer );
|
|
aTrack->SetNet( Dcode_index );
|
|
|
|
// When drawing a TRACK with shape S_CIRCLE, the hypotenuse (i.e. distance)
|
|
// between the Start and End points gives the radius of the circle.
|
|
aTrack->m_Start = aTrack->m_End = aPos;
|
|
aTrack->m_End.x += max( 0, (aDiameter + 1) / 2 );
|
|
|
|
NEGATE( aTrack->m_Start.y );
|
|
NEGATE( aTrack->m_End.y );
|
|
|
|
if( !isDark )
|
|
{
|
|
aTrack->m_Flags |= DRAW_ERASED;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Function fillRoundFlashTRACK
|
|
* initializes a given TRACK so that it can draw a circle which is filled and
|
|
* has no pen border.
|
|
*
|
|
* @param aTrack The TRACK to fill in.
|
|
* @param Dcode_index The DCODE value, like D14
|
|
* @param aLayer The layer index to set into the TRACK
|
|
* @param aPos The center point of the flash
|
|
* @param aDiameter The diameter of the round flash
|
|
* @param isDark True if flash is positive and should use a drawing
|
|
* color other than the background color, else use the background color
|
|
* when drawing so that an erasure happens.
|
|
*/
|
|
static void fillRoundFlashTRACK( TRACK* aTrack,
|
|
int Dcode_index,
|
|
int aLayer,
|
|
const wxPoint& aPos,
|
|
int aDiameter,
|
|
bool isDark )
|
|
{
|
|
aTrack->SetLayer( aLayer );
|
|
aTrack->m_Width = aDiameter;
|
|
aTrack->m_Start = aTrack->m_End = aPos;
|
|
NEGATE( aTrack->m_Start.y );
|
|
NEGATE( aTrack->m_End.y );
|
|
aTrack->SetNet( Dcode_index );
|
|
aTrack->m_Shape = S_SPOT_CIRCLE;
|
|
|
|
if( !isDark )
|
|
{
|
|
aTrack->m_Flags |= DRAW_ERASED;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Function fillOvalOrRectFlashTRACK
|
|
* initializes a given TRACK so that it can draw an oval or rectangular
|
|
* filled rectangle.
|
|
*
|
|
* @param aTrack The TRACK to fill in.
|
|
* @param Dcode_index The DCODE value, like D14
|
|
* @param aLayer The layer index to set into the TRACK
|
|
* @param aPos The center point of the rectangle
|
|
* @param aSize The size of the flash
|
|
* @param aShape What type of flash, S_SPOT_OVALE or S_SPOT_RECT
|
|
* @param isDark True if flash is positive and should use a drawing
|
|
* color other than the background color, else use the background color
|
|
* when drawing so that an erasure happens.
|
|
*/
|
|
static void fillOvalOrRectFlashTRACK( TRACK* aTrack,
|
|
int Dcode_index,
|
|
int aLayer,
|
|
const wxPoint& aPos,
|
|
const wxSize& aSize,
|
|
int aShape,
|
|
bool isDark )
|
|
{
|
|
int width = MIN( aSize.x, aSize.y );
|
|
int len = MAX( aSize.x, aSize.y ) - width;
|
|
|
|
aTrack->SetLayer( aLayer );
|
|
|
|
aTrack->m_Width = width;
|
|
|
|
aTrack->m_Start = aTrack->m_End = aPos;
|
|
NEGATE( aTrack->m_Start.y );
|
|
NEGATE( aTrack->m_End.y );
|
|
|
|
aTrack->SetNet( Dcode_index );
|
|
|
|
aTrack->m_Shape = aShape;
|
|
|
|
len >>= 1;
|
|
if( aSize.x > aSize.y ) // oval or rectangle is horizontal
|
|
{
|
|
aTrack->m_Start.x -= len;
|
|
aTrack->m_End.x += len;
|
|
}
|
|
else // oval or rectangle is vertical
|
|
{
|
|
aTrack->m_Start.y -= len;
|
|
aTrack->m_End.y += len;
|
|
}
|
|
|
|
if( !isDark )
|
|
{
|
|
aTrack->m_Flags |= DRAW_ERASED;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Function fillLineTRACK
|
|
* initializes a given TRACK so that it can draw a linear D code.
|
|
*
|
|
* @param aTrack The TRACK to fill in.
|
|
* @param Dcode_index The DCODE value, like D14
|
|
* @param aLayer The layer index to set into the TRACK
|
|
* @param aPos The center point of the flash
|
|
* @param aDiameter The diameter of the round flash
|
|
* @param isDark True if flash is positive and should use a drawing
|
|
* color other than the background color, else use the background color
|
|
* when drawing so that an erasure happens.
|
|
*/
|
|
static void fillLineTRACK( TRACK* aTrack,
|
|
int Dcode_index,
|
|
int aLayer,
|
|
const wxPoint& aStart,
|
|
const wxPoint& aEnd,
|
|
int aWidth,
|
|
bool isDark )
|
|
{
|
|
aTrack->SetLayer( aLayer );
|
|
|
|
aTrack->m_Width = aWidth;
|
|
|
|
aTrack->m_Start = aStart;
|
|
NEGATE( aTrack->m_Start.y );
|
|
|
|
aTrack->m_End = aEnd;
|
|
NEGATE( aTrack->m_End.y );
|
|
|
|
aTrack->SetNet( Dcode_index );
|
|
|
|
if( !isDark )
|
|
{
|
|
aTrack->m_Flags |= DRAW_ERASED;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Function fillArcTRACK
|
|
* initializes a given TRACK so that it can draw an arc G code.
|
|
* <p>
|
|
* if multiquadrant == true : arc can be 0 to 360 degrees
|
|
* and \a rel_center is the center coordinate relative to start point.
|
|
* <p>
|
|
* if multiquadrant == false arc can be only 0 to 90 deg,
|
|
* and only in the same quadrant :
|
|
* <ul>
|
|
* <li> absolute angle 0 to 90 (quadrant 1) or
|
|
* <li> absolute angle 90 to 180 (quadrant 2) or
|
|
* <li> absolute angle 180 to 270 (quadrant 3) or
|
|
* <li> absolute angle 270 to 0 (quadrant 4)
|
|
* </ul><p>
|
|
* @param aTrack is the TRACK to fill in.
|
|
* @param Dcode_index is the DCODE value, like D14
|
|
* @param aLayer is the layer index to set into the TRACK
|
|
* @param aStart is the starting point
|
|
* @param aEnd is the ending point
|
|
* @param rel_center is the center coordinate relative to start point,
|
|
* given in ABSOLUTE VALUE and the sign of values x et y de rel_center
|
|
* must be calculated from the previously given constraint: arc only in the
|
|
* same quadrant.
|
|
* @param aDiameter The diameter of the round flash
|
|
* @param aWidth is the pen width.
|
|
* @param isDark True if flash is positive and should use a drawing
|
|
* color other than the background color, else use the background color
|
|
* when drawing so that an erasure happens.
|
|
*/
|
|
static void fillArcTRACK( TRACK* aTrack, int Dcode_index, int aLayer,
|
|
const wxPoint& aStart, const wxPoint& aEnd,
|
|
const wxPoint& rel_center, int aWidth,
|
|
bool clockwise, bool multiquadrant, bool isDark )
|
|
{
|
|
wxPoint center, delta;
|
|
|
|
aTrack->m_Shape = S_ARC;
|
|
aTrack->SetLayer( aLayer );
|
|
aTrack->m_Width = aWidth;
|
|
|
|
if( multiquadrant )
|
|
{
|
|
center.x = aStart.x + rel_center.x;
|
|
center.y = aStart.y + rel_center.y;
|
|
|
|
if( clockwise )
|
|
{
|
|
aTrack->m_Start = aStart;
|
|
aTrack->m_End = aEnd;
|
|
}
|
|
else
|
|
{
|
|
aTrack->m_Start = aEnd;
|
|
aTrack->m_End = aStart;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
center = rel_center;
|
|
delta.x = aEnd.x - aStart.x;
|
|
delta.y = aEnd.y - aStart.y;
|
|
|
|
if( (delta.x >= 0) && (delta.y >= 0) )
|
|
{
|
|
// Quadrant 2
|
|
}
|
|
else if( (delta.x >= 0) && (delta.y < 0) )
|
|
{
|
|
// Quadrant 1
|
|
center.y = -center.y;
|
|
}
|
|
else if( (delta.x < 0) && (delta.y >= 0) )
|
|
{
|
|
// Quadrant 4
|
|
center.x = -center.x;
|
|
}
|
|
else
|
|
{
|
|
// Quadrant 3
|
|
center.x = -center.x;
|
|
center.y = -center.y;
|
|
}
|
|
|
|
center.x += aStart.x;
|
|
center.y += aStart.y;
|
|
|
|
if( clockwise )
|
|
{
|
|
aTrack->m_Start = aStart;
|
|
aTrack->m_End = aEnd;
|
|
}
|
|
else
|
|
{
|
|
aTrack->m_Start = aEnd;
|
|
aTrack->m_End = aStart;
|
|
}
|
|
}
|
|
|
|
aTrack->SetNet( Dcode_index );
|
|
aTrack->m_Param = center.x;
|
|
aTrack->SetSubNet( center.y );
|
|
|
|
NEGATE( aTrack->m_Start.y );
|
|
NEGATE( aTrack->m_End.y );
|
|
|
|
aTrack->SetSubNet( -aTrack->GetSubNet() );
|
|
|
|
if( !isDark )
|
|
{
|
|
aTrack->m_Flags |= DRAW_ERASED;
|
|
}
|
|
}
|
|
|
|
|
|
/* These routines read the text string point from Text.
|
|
* After use, advanced Text the beginning of the sequence unread
|
|
*/
|
|
|
|
|
|
/* Returns the current coord pointed to by Text (XnnnnYmmmm)
|
|
*/
|
|
wxPoint GERBER::ReadXYCoord( char*& Text )
|
|
{
|
|
wxPoint pos = m_CurrentPos;
|
|
int type_coord = 0, current_coord, nbchar;
|
|
bool is_float = false;
|
|
char* text;
|
|
char line[256];
|
|
|
|
|
|
if( m_Relative )
|
|
pos.x = pos.y = 0;
|
|
else
|
|
pos = m_CurrentPos;
|
|
|
|
if( Text == NULL )
|
|
return pos;
|
|
|
|
text = line;
|
|
while( *Text )
|
|
{
|
|
if( (*Text == 'X') || (*Text == 'Y') )
|
|
{
|
|
type_coord = *Text;
|
|
Text++;
|
|
text = line;
|
|
nbchar = 0;
|
|
while( IsNumber( *Text ) )
|
|
{
|
|
if( *Text == '.' )
|
|
is_float = true;
|
|
*(text++) = *(Text++);
|
|
if( (*Text >= '0') && (*Text <='9') )
|
|
nbchar++;
|
|
}
|
|
|
|
*text = 0;
|
|
if( is_float )
|
|
{
|
|
if( m_GerbMetric )
|
|
current_coord = wxRound( atof( line ) / 0.00254 );
|
|
else
|
|
current_coord = wxRound( atof( line ) * PCB_INTERNAL_UNIT );
|
|
}
|
|
else
|
|
{
|
|
int fmt_scale =
|
|
(type_coord == 'X') ? m_FmtScale.x : m_FmtScale.y;
|
|
if( m_NoTrailingZeros )
|
|
{
|
|
int min_digit =
|
|
(type_coord == 'X') ? m_FmtLen.x : m_FmtLen.y;
|
|
while( nbchar < min_digit )
|
|
{
|
|
*(text++) = '0';
|
|
nbchar++;
|
|
}
|
|
|
|
*text = 0;
|
|
}
|
|
current_coord = atoi( line );
|
|
double real_scale = 1.0;
|
|
|
|
switch( fmt_scale )
|
|
{
|
|
case 0:
|
|
real_scale = 10000.0;
|
|
break;
|
|
|
|
case 1:
|
|
real_scale = 1000.0;
|
|
break;
|
|
|
|
case 2:
|
|
real_scale = 100.0;
|
|
break;
|
|
|
|
case 3:
|
|
real_scale = 10.0;
|
|
break;
|
|
|
|
case 4:
|
|
break;
|
|
|
|
case 5:
|
|
real_scale = 0.1;
|
|
break;
|
|
|
|
case 6:
|
|
real_scale = 0.01;
|
|
break;
|
|
|
|
case 7:
|
|
real_scale = 0.001;
|
|
break;
|
|
|
|
case 8:
|
|
real_scale = 0.0001;
|
|
break;
|
|
|
|
case 9:
|
|
real_scale = 0.00001;
|
|
break;
|
|
}
|
|
|
|
if( m_GerbMetric )
|
|
real_scale = real_scale / 25.4;
|
|
|
|
current_coord = wxRound( current_coord * real_scale );
|
|
}
|
|
|
|
if( type_coord == 'X' )
|
|
pos.x = current_coord;
|
|
else if( type_coord == 'Y' )
|
|
pos.y = current_coord;
|
|
|
|
continue;
|
|
}
|
|
else
|
|
break;
|
|
}
|
|
|
|
if( m_Relative )
|
|
{
|
|
pos.x += m_CurrentPos.x;
|
|
pos.y += m_CurrentPos.y;
|
|
}
|
|
|
|
m_CurrentPos = pos;
|
|
return pos;
|
|
}
|
|
|
|
|
|
/* Returns the current coordinate type pointed to by InnJnn Text (InnnnJmmmm)
|
|
* These coordinates are relative, so if coordinate is absent, it's value
|
|
* defaults to 0
|
|
*/
|
|
wxPoint GERBER::ReadIJCoord( char*& Text )
|
|
{
|
|
wxPoint pos( 0, 0 );
|
|
|
|
int type_coord = 0, current_coord, nbchar;
|
|
bool is_float = false;
|
|
char* text;
|
|
char line[256];
|
|
|
|
if( Text == NULL )
|
|
return pos;
|
|
|
|
text = line;
|
|
while( *Text )
|
|
{
|
|
if( (*Text == 'I') || (*Text == 'J') )
|
|
{
|
|
type_coord = *Text;
|
|
Text++;
|
|
text = line;
|
|
nbchar = 0;
|
|
while( IsNumber( *Text ) )
|
|
{
|
|
if( *Text == '.' )
|
|
is_float = true;
|
|
*(text++) = *(Text++);
|
|
if( (*Text >= '0') && (*Text <='9') )
|
|
nbchar++;
|
|
}
|
|
|
|
*text = 0;
|
|
if( is_float )
|
|
{
|
|
if( m_GerbMetric )
|
|
current_coord = wxRound( atof( line ) / 0.00254 );
|
|
else
|
|
current_coord = wxRound( atof( line ) * PCB_INTERNAL_UNIT );
|
|
}
|
|
else
|
|
{
|
|
int fmt_scale =
|
|
(type_coord == 'I') ? m_FmtScale.x : m_FmtScale.y;
|
|
if( m_NoTrailingZeros )
|
|
{
|
|
int min_digit =
|
|
(type_coord == 'I') ? m_FmtLen.x : m_FmtLen.y;
|
|
while( nbchar < min_digit )
|
|
{
|
|
*(text++) = '0';
|
|
nbchar++;
|
|
}
|
|
|
|
*text = 0;
|
|
}
|
|
current_coord = atoi( line );
|
|
double real_scale = 1.0;
|
|
|
|
switch( fmt_scale )
|
|
{
|
|
case 0:
|
|
real_scale = 10000.0;
|
|
break;
|
|
|
|
case 1:
|
|
real_scale = 1000.0;
|
|
break;
|
|
|
|
case 2:
|
|
real_scale = 100.0;
|
|
break;
|
|
|
|
case 3:
|
|
real_scale = 10.0;
|
|
break;
|
|
|
|
case 4:
|
|
break;
|
|
|
|
case 5:
|
|
real_scale = 0.1;
|
|
break;
|
|
|
|
case 6:
|
|
real_scale = 0.01;
|
|
break;
|
|
|
|
case 7:
|
|
real_scale = 0.001;
|
|
break;
|
|
|
|
case 8:
|
|
real_scale = 0.0001;
|
|
break;
|
|
|
|
case 9:
|
|
real_scale = 0.00001;
|
|
break;
|
|
}
|
|
|
|
if( m_GerbMetric )
|
|
real_scale = real_scale / 25.4;
|
|
current_coord = wxRound( current_coord * real_scale );
|
|
}
|
|
if( type_coord == 'I' )
|
|
pos.x = current_coord;
|
|
else if( type_coord == 'J' )
|
|
pos.y = current_coord;
|
|
continue;
|
|
}
|
|
else
|
|
break;
|
|
}
|
|
|
|
m_IJPos = pos;
|
|
return pos;
|
|
}
|
|
|
|
|
|
/* Read the Gnn sequence and returns the value nn.
|
|
*/
|
|
int GERBER::ReturnGCodeNumber( char*& Text )
|
|
{
|
|
int ii = 0;
|
|
char* text;
|
|
char line[1024];
|
|
|
|
if( Text == NULL )
|
|
return 0;
|
|
Text++;
|
|
text = line;
|
|
while( IsNumber( *Text ) )
|
|
{
|
|
*(text++) = *(Text++);
|
|
}
|
|
|
|
*text = 0;
|
|
ii = atoi( line );
|
|
return ii;
|
|
}
|
|
|
|
|
|
/* Get the sequence Dnn and returns the value nn
|
|
*/
|
|
int GERBER::ReturnDCodeNumber( char*& Text )
|
|
{
|
|
int ii = 0;
|
|
char* text;
|
|
char line[1024];
|
|
|
|
if( Text == NULL )
|
|
return 0;
|
|
|
|
Text++;
|
|
text = line;
|
|
while( IsNumber( *Text ) )
|
|
*(text++) = *(Text++);
|
|
|
|
*text = 0;
|
|
ii = atoi( line );
|
|
return ii;
|
|
}
|
|
|
|
|
|
bool GERBER::Execute_G_Command( char*& text, int G_commande )
|
|
{
|
|
D( printf( "%22s: G_CODE<%d>\n", __func__, G_commande ); )
|
|
|
|
switch( G_commande )
|
|
{
|
|
case GC_PHOTO_MODE: // can starts a D03 flash command: redundant, can
|
|
// be safely ignored
|
|
break;
|
|
|
|
case GC_LINEAR_INTERPOL_1X:
|
|
m_Iterpolation = GERB_INTERPOL_LINEAR_1X;
|
|
break;
|
|
|
|
case GC_CIRCLE_NEG_INTERPOL:
|
|
m_Iterpolation = GERB_INTERPOL_ARC_NEG;
|
|
break;
|
|
|
|
case GC_CIRCLE_POS_INTERPOL:
|
|
m_Iterpolation = GERB_INTERPOL_ARC_POS;
|
|
break;
|
|
|
|
case GC_COMMENT:
|
|
text = NULL;
|
|
break;
|
|
|
|
case GC_LINEAR_INTERPOL_10X:
|
|
m_Iterpolation = GERB_INTERPOL_LINEAR_10X;
|
|
break;
|
|
|
|
case GC_LINEAR_INTERPOL_0P1X:
|
|
m_Iterpolation = GERB_INTERPOL_LINEAR_01X;
|
|
break;
|
|
|
|
case GC_LINEAR_INTERPOL_0P01X:
|
|
m_Iterpolation = GERB_INTERPOL_LINEAR_001X;
|
|
break;
|
|
|
|
case GC_SELECT_TOOL:
|
|
{
|
|
int D_commande = ReturnDCodeNumber( text );
|
|
if( D_commande < FIRST_DCODE )
|
|
return false;
|
|
if( D_commande > (MAX_TOOLS - 1) )
|
|
D_commande = MAX_TOOLS - 1;
|
|
m_Current_Tool = D_commande;
|
|
D_CODE* pt_Dcode = GetDCODE( D_commande, false );
|
|
if( pt_Dcode )
|
|
pt_Dcode->m_InUse = true;
|
|
break;
|
|
}
|
|
|
|
case GC_SPECIFY_INCHES:
|
|
m_GerbMetric = false; // false = Inches, true = metric
|
|
break;
|
|
|
|
case GC_SPECIFY_MILLIMETERS:
|
|
m_GerbMetric = true; // false = Inches, true = metric
|
|
break;
|
|
|
|
case GC_TURN_OFF_360_INTERPOL:
|
|
m_360Arc_enbl = false;
|
|
break;
|
|
|
|
case GC_TURN_ON_360_INTERPOL:
|
|
m_360Arc_enbl = true;
|
|
break;
|
|
|
|
case GC_SPECIFY_ABSOLUES_COORD:
|
|
m_Relative = false; // false = absolute Coord, RUE = relative
|
|
// Coord
|
|
break;
|
|
|
|
case GC_SPECIFY_RELATIVEES_COORD:
|
|
m_Relative = true; // false = absolute Coord, RUE = relative
|
|
// Coord
|
|
break;
|
|
|
|
case GC_TURN_ON_POLY_FILL:
|
|
m_PolygonFillMode = true;
|
|
break;
|
|
|
|
case GC_TURN_OFF_POLY_FILL:
|
|
m_PolygonFillMode = false;
|
|
m_PolygonFillModeState = 0;
|
|
break;
|
|
|
|
case GC_MOVE: // Non existent
|
|
default:
|
|
{
|
|
wxString msg; msg.Printf( wxT( "G%0.2d command not handled" ),
|
|
G_commande );
|
|
DisplayError( NULL, msg );
|
|
return false;
|
|
}
|
|
}
|
|
|
|
|
|
return true;
|
|
}
|
|
|
|
|
|
/**
|
|
* Function scale
|
|
* converts a distance given in floating point to our deci-mils
|
|
*/
|
|
static int scale( double aCoord, bool isMetric )
|
|
{
|
|
int ret;
|
|
|
|
if( isMetric )
|
|
ret = wxRound( aCoord / 0.00254 );
|
|
else
|
|
ret = wxRound( aCoord * PCB_INTERNAL_UNIT );
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
/**
|
|
* Function mapPt
|
|
* translates a point from the aperture macro coordinate system to our
|
|
* deci-mils coordinate system.
|
|
* @return wxPoint - The gerbview coordinate system vector.
|
|
*/
|
|
static wxPoint mapPt( double x, double y, bool isMetric )
|
|
{
|
|
wxPoint ret( scale( x, isMetric ),
|
|
scale( y, isMetric ) );
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
/**
|
|
* Function mapExposure
|
|
* translates the first parameter from an aperture macro into a current
|
|
* exposure
|
|
* setting.
|
|
* @param curExposure A dynamic setting which can change throughout the
|
|
* reading of the gerber file, and it indicates whether the current tool
|
|
* is lit or not.
|
|
* @param isNegative A dynamic setting which can change throughout the reading
|
|
* of
|
|
* the gerber file, and it indicates whether the current D codes are to
|
|
* be interpreted as erasures or not.
|
|
*/
|
|
static bool mapExposure( int param1, bool curExposure, bool isNegative )
|
|
{
|
|
bool exposure;
|
|
|
|
switch( param1 )
|
|
{
|
|
case 0:
|
|
exposure = false;
|
|
break;
|
|
|
|
default:
|
|
case 1:
|
|
exposure = true;
|
|
break;
|
|
|
|
case 2:
|
|
exposure = !curExposure;
|
|
}
|
|
|
|
return exposure ^ isNegative;
|
|
}
|
|
|
|
|
|
bool GERBER::Execute_DCODE_Command( WinEDA_GerberFrame* frame,
|
|
char*& text, int D_commande )
|
|
{
|
|
wxSize size( 15, 15 );
|
|
|
|
APERTURE_T aperture = APT_CIRCLE;
|
|
TRACK* track;
|
|
BOARD* pcb = frame->GetBoard();
|
|
|
|
int activeLayer = frame->GetScreen()->m_Active_Layer;
|
|
|
|
int dcode = 0;
|
|
D_CODE* tool = NULL;
|
|
wxString msg;
|
|
|
|
D( printf( "%22s: D_CODE<%d>\n", __func__, D_commande ); )
|
|
|
|
if( D_commande >= FIRST_DCODE ) // This is a "Set tool" command
|
|
{
|
|
if( D_commande > (MAX_TOOLS - 1) )
|
|
D_commande = MAX_TOOLS - 1;
|
|
|
|
// remember which tool is selected, nothing is done with it in this
|
|
// call
|
|
m_Current_Tool = D_commande;
|
|
|
|
D_CODE* pt_Dcode = GetDCODE( D_commande, false );
|
|
if( pt_Dcode )
|
|
pt_Dcode->m_InUse = true;
|
|
|
|
return true;
|
|
}
|
|
else // D_commande = 0..9: this is a pen command (usually D1, D2 or D3)
|
|
{
|
|
m_Last_Pen_Command = D_commande;
|
|
}
|
|
|
|
if( m_PolygonFillMode ) // Enter a polygon description:
|
|
{
|
|
switch( D_commande )
|
|
{
|
|
case 1: // code D01 Draw line, exposure ON
|
|
m_Exposure = true;
|
|
|
|
SEGZONE* edge_poly;
|
|
edge_poly = new SEGZONE( pcb );
|
|
pcb->m_Zone.Append( edge_poly );
|
|
D( printf( "R:%p\n", edge_poly ); )
|
|
|
|
edge_poly->SetLayer( activeLayer );
|
|
edge_poly->m_Width = 1;
|
|
|
|
edge_poly->m_Start = m_PreviousPos;
|
|
NEGATE( edge_poly->m_Start.y );
|
|
|
|
edge_poly->m_End = m_CurrentPos;
|
|
NEGATE( edge_poly->m_End.y );
|
|
|
|
edge_poly->SetNet( m_PolygonFillModeState );
|
|
|
|
// the first track of each polygon has a netcode of zero,
|
|
// otherwise one. Set the erasure flag in that special track,
|
|
// if a negative polygon.
|
|
if( !m_PolygonFillModeState )
|
|
{
|
|
if( m_LayerNegative ^ m_ImageNegative )
|
|
edge_poly->m_Flags |= DRAW_ERASED;
|
|
D( printf( "\nm_Flags=0x%08X\n", edge_poly->m_Flags ); )
|
|
}
|
|
|
|
m_PreviousPos = m_CurrentPos;
|
|
m_PolygonFillModeState = 1;
|
|
break;
|
|
|
|
case 2: // code D2: exposure OFF (i.e. "move to")
|
|
m_Exposure = false;
|
|
m_PreviousPos = m_CurrentPos;
|
|
m_PolygonFillModeState = 0;
|
|
break;
|
|
|
|
default:
|
|
return false;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
switch( D_commande )
|
|
{
|
|
case 1: // code D01 Draw line, exposure ON
|
|
m_Exposure = true;
|
|
|
|
tool = GetDCODE( m_Current_Tool, false );
|
|
if( tool )
|
|
{
|
|
size = tool->m_Size;
|
|
dcode = tool->m_Num_Dcode;
|
|
aperture = tool->m_Shape;
|
|
}
|
|
|
|
switch( m_Iterpolation )
|
|
{
|
|
case GERB_INTERPOL_LINEAR_1X:
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillLineTRACK( track, dcode, activeLayer, m_PreviousPos,
|
|
m_CurrentPos, size.x,
|
|
!(m_LayerNegative ^ m_ImageNegative) );
|
|
break;
|
|
|
|
case GERB_INTERPOL_LINEAR_01X:
|
|
case GERB_INTERPOL_LINEAR_001X:
|
|
case GERB_INTERPOL_LINEAR_10X:
|
|
wxBell();
|
|
break;
|
|
|
|
case GERB_INTERPOL_ARC_NEG:
|
|
case GERB_INTERPOL_ARC_POS:
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillArcTRACK( track, dcode, activeLayer, m_PreviousPos,
|
|
m_CurrentPos, m_IJPos, size.x,
|
|
( m_Iterpolation == GERB_INTERPOL_ARC_NEG ) ?
|
|
false : true, m_360Arc_enbl,
|
|
!(m_LayerNegative ^ m_ImageNegative) );
|
|
break;
|
|
|
|
default:
|
|
msg.Printf( wxT( "Execute_DCODE_Command: interpol error (type %X)" ),
|
|
m_Iterpolation );
|
|
DisplayError( frame, msg );
|
|
break;
|
|
}
|
|
|
|
m_PreviousPos = m_CurrentPos;
|
|
break;
|
|
|
|
case 2: // code D2: exposure OFF (i.e. "move to")
|
|
m_Exposure = false;
|
|
m_PreviousPos = m_CurrentPos;
|
|
break;
|
|
|
|
case 3: // code D3: flash aperture
|
|
tool = GetDCODE( m_Current_Tool, false );
|
|
if( tool )
|
|
{
|
|
size = tool->m_Size;
|
|
dcode = tool->m_Num_Dcode;
|
|
aperture = tool->m_Shape;
|
|
}
|
|
|
|
switch( aperture )
|
|
{
|
|
case APT_LINE: // APT_LINE is not in the spec, don't know why it's
|
|
// here
|
|
case APT_CIRCLE:
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillRoundFlashTRACK( track, dcode, activeLayer,
|
|
m_CurrentPos, size.x,
|
|
!(m_LayerNegative ^ m_ImageNegative) );
|
|
break;
|
|
|
|
case APT_OVAL:
|
|
case APT_RECT:
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillOvalOrRectFlashTRACK( track, dcode, activeLayer,
|
|
m_CurrentPos, size,
|
|
( aperture == APT_RECT ) ?
|
|
S_SPOT_RECT : S_SPOT_OVALE,
|
|
!(m_LayerNegative ^ m_ImageNegative) );
|
|
break;
|
|
|
|
case APT_MACRO:
|
|
{
|
|
APERTURE_MACRO* macro = tool->GetMacro();
|
|
wxASSERT( macro );
|
|
|
|
// split the macro primitives up into multiple normal TRACK
|
|
// elements
|
|
for( AM_PRIMITIVES::iterator p = macro->primitives.begin();
|
|
p!=macro->primitives.end();
|
|
++p )
|
|
{
|
|
bool exposure;
|
|
wxPoint curPos = m_CurrentPos;
|
|
|
|
switch( p->primitive_id )
|
|
{
|
|
case AMP_CIRCLE:
|
|
{
|
|
exposure = mapExposure( p->GetExposure(), m_Exposure,
|
|
m_ImageNegative );
|
|
curPos += mapPt( p->params[2].GetValue( tool ),
|
|
p->params[3].GetValue( tool ),
|
|
m_GerbMetric );
|
|
int diameter = scale( p->params[1].GetValue( tool ),
|
|
m_GerbMetric );
|
|
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillRoundFlashTRACK( track, dcode, activeLayer,
|
|
m_CurrentPos, diameter, exposure );
|
|
}
|
|
break;
|
|
|
|
case AMP_LINE2:
|
|
case AMP_LINE20:
|
|
{
|
|
exposure = mapExposure(
|
|
p->GetExposure(), m_Exposure, m_ImageNegative );
|
|
int width = scale( p->params[1].GetValue( tool ),
|
|
m_GerbMetric );
|
|
wxPoint start = mapPt( p->params[2].GetValue( tool ),
|
|
p->params[3].GetValue( tool ),
|
|
m_GerbMetric );
|
|
wxPoint end = mapPt( p->params[4].GetValue( tool ),
|
|
p->params[5].GetValue( tool ),
|
|
m_GerbMetric );
|
|
|
|
if( start.x == end.x )
|
|
{
|
|
size.x = width;
|
|
size.y = ABS( end.y - start.y ) + 1;
|
|
}
|
|
else
|
|
{
|
|
size.x = ABS( end.x - start.x ) + 1;
|
|
size.y = width;
|
|
}
|
|
|
|
wxPoint midPoint( ( start.x + end.x ) / 2,
|
|
( start.y + end.y ) / 2 );
|
|
curPos += midPoint;
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillOvalOrRectFlashTRACK( track, dcode, activeLayer,
|
|
curPos, size, S_SPOT_RECT,
|
|
exposure );
|
|
}
|
|
break;
|
|
|
|
case AMP_LINE_CENTER:
|
|
{
|
|
exposure = mapExposure( p->GetExposure(), m_Exposure,
|
|
m_ImageNegative );
|
|
wxPoint msize = mapPt( p->params[1].GetValue( tool ),
|
|
p->params[2].GetValue( tool ),
|
|
m_GerbMetric );
|
|
size.x = msize.x;
|
|
size.y = msize.y;
|
|
curPos += mapPt( p->params[3].GetValue( tool ),
|
|
p->params[4].GetValue( tool ),
|
|
m_GerbMetric );
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillOvalOrRectFlashTRACK( track, dcode, activeLayer,
|
|
curPos, size, S_SPOT_RECT,
|
|
exposure );
|
|
}
|
|
break;
|
|
|
|
case AMP_LINE_LOWER_LEFT:
|
|
{
|
|
exposure = mapExposure(
|
|
p->GetExposure(), m_Exposure, m_ImageNegative );
|
|
wxPoint msize = mapPt( p->params[1].GetValue( tool ),
|
|
p->params[2].GetValue( tool ),
|
|
m_GerbMetric );
|
|
size.x = msize.x;
|
|
size.y = msize.y;
|
|
wxPoint lowerLeft = mapPt( p->params[3].GetValue( tool ),
|
|
p->params[4].GetValue( tool ),
|
|
m_GerbMetric );
|
|
curPos += lowerLeft;
|
|
|
|
// need the middle, so adjust from the lower left
|
|
curPos.y += size.y / 2;
|
|
curPos.x += size.x / 2;
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillOvalOrRectFlashTRACK( track, dcode, activeLayer,
|
|
curPos, size, S_SPOT_RECT,
|
|
exposure );
|
|
}
|
|
break;
|
|
|
|
case AMP_THERMAL:
|
|
{
|
|
int outerDiam = scale( p->params[2].GetValue( tool ),
|
|
m_GerbMetric );
|
|
int innerDiam = scale( p->params[3].GetValue( tool ),
|
|
m_GerbMetric );
|
|
|
|
curPos += mapPt( p->params[0].GetValue( tool ),
|
|
p->params[1].GetValue( tool ),
|
|
m_GerbMetric );
|
|
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillRoundFlashTRACK( track, dcode, activeLayer,
|
|
curPos, outerDiam,
|
|
!( m_LayerNegative ^ m_ImageNegative ) );
|
|
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillRoundFlashTRACK( track, dcode, activeLayer, curPos,
|
|
innerDiam,
|
|
( m_LayerNegative ^ m_ImageNegative ) );
|
|
|
|
// @todo: draw the cross hairs, see page 23 of rs274
|
|
// spec. this might be done with two lines, thickness
|
|
// from params[4], and drawing
|
|
// darkness "(m_LayerNegative ^ m_ImageNegative)"
|
|
}
|
|
break;
|
|
|
|
case AMP_MOIRE:
|
|
{
|
|
curPos += mapPt( p->params[0].GetValue( tool ),
|
|
p->params[1].GetValue( tool ),
|
|
m_GerbMetric );
|
|
|
|
// e.g.: "6,0,0,0.125,.01,0.01,3,0.003,0.150,0"
|
|
int outerDiam = scale( p->params[2].GetValue( tool ),
|
|
m_GerbMetric );
|
|
int penThickness = scale( p->params[3].GetValue( tool ),
|
|
m_GerbMetric );
|
|
int gap = scale( p->params[4].GetValue( tool ),
|
|
m_GerbMetric );
|
|
int numCircles = (int) p->params[5].GetValue( tool );
|
|
int crossHairThickness =
|
|
scale( p->params[6].GetValue( tool ), m_GerbMetric );
|
|
int crossHairLength =
|
|
scale( p->params[7].GetValue( tool ), m_GerbMetric );
|
|
|
|
// ignore rotation, not supported
|
|
// adjust outerDiam by this on each nested circle
|
|
int diamAdjust = 2 * (gap + penThickness);
|
|
for( int i = 0;
|
|
i < numCircles;
|
|
++i, outerDiam -= diamAdjust )
|
|
{
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillCircularTRACK( track, dcode, activeLayer,
|
|
curPos, outerDiam,
|
|
penThickness,
|
|
!( m_LayerNegative ^ m_ImageNegative ) );
|
|
}
|
|
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
fillOvalOrRectFlashTRACK( track, dcode, activeLayer,
|
|
curPos,
|
|
wxSize( crossHairThickness,
|
|
crossHairLength ),
|
|
S_SPOT_RECT,
|
|
!( m_LayerNegative ^ m_ImageNegative ) );
|
|
|
|
track = new TRACK( pcb );
|
|
pcb->m_Track.Append( track );
|
|
D( printf( "R:%p\n", track ); )
|
|
|
|
// swap x and y in wxSize() for this one
|
|
fillOvalOrRectFlashTRACK( track, dcode, activeLayer,
|
|
curPos,
|
|
wxSize( crossHairLength,
|
|
crossHairThickness ),
|
|
S_SPOT_RECT,
|
|
!( m_LayerNegative ^ m_ImageNegative ) );
|
|
}
|
|
break;
|
|
|
|
case AMP_EOF:
|
|
case AMP_OUTLINE:
|
|
case AMP_POLYGON:
|
|
default:
|
|
|
|
// not yet supported, waiting for you.
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
m_PreviousPos = m_CurrentPos;
|
|
break;
|
|
|
|
default:
|
|
return false;
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|