|
|
/********************//**** rs274d.cpp ****//********************/
#include "fctsys.h"
#include "common.h"
#include "confirm.h"
#include "macros.h"
#include "gerbview.h"
#include "pcbplot.h"
#include "trigo.h"
#include "protos.h"
#include <math.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; }}
/**
* Function fillArcPOLY * creates an arc G code when found in poly outlines. * <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 aPcb is the board. * @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. * @return a pointer to the first segment created */static SEGZONE * fillArcPOLY( BOARD * aPcb, int aLayer, const wxPoint& aStart, const wxPoint& aEnd, const wxPoint& rel_center, bool clockwise, bool multiquadrant, bool isDark ){ /* in order to calculate arc parameters, we use fillArcTRACK
* so we muse create a dummy track and use its geometric parmeters */ static TRACK dummyTrack(NULL); SEGZONE * firstSegment = NULL;
fillArcTRACK( &dummyTrack, 0, aLayer, aStart, aEnd, rel_center, 0, clockwise, multiquadrant, isDark );
// dummyTrack has right geometric parameters, and has its Y coordinates negated (to match the pcbnew Y axis).
// Approximate arc by 36 segments per 360 degree
const int increment_angle = 360/36;
wxPoint center; center.x = dummyTrack.m_Param; center.y = dummyTrack.GetSubNet();
// Calculate relative coordinates;
wxPoint start = dummyTrack.m_Start - center; wxPoint end = dummyTrack.m_End - center;
/* Calculate angle arc
* angle is here clockwise because Y axis is reversed */ double start_angle = atan2( (double)start.y, (double)start.x ); start_angle = 180 * start_angle / M_PI; double end_angle = atan2( (double)end.y , (double)end.x ); end_angle = 180 * end_angle / M_PI; double angle = start_angle - end_angle;
// D( printf( " >>>> st %d,%d angle %f, end %d,%d angle %f delta %f\n",
// start.x, start.y, start_angle, end.x, end.y, end_angle, angle ) );
if( !clockwise ) { EXCHG(start, end); D( printf( " >>>> reverse arc\n") ); }
// Normalize angle
while ( angle > 360.0 ) angle -= 360.0; while ( angle < 0.0 ) angle += 360.0;
int count = (int) (angle / increment_angle ); if( count <= 0 ) count = 1;// D( printf( " >>>> angle %f, cnt %d sens %d\n", angle, count, clockwise ) );
// calculate segments
wxPoint start_arc = start; for( int ii = 1; ii <= count; ii++ ) { wxPoint end_arc = start; int rot = 10 * ii * increment_angle; // rot is in 0.1 deg
if( ii < count ) { if( clockwise ) RotatePoint(&end_arc, rot); else RotatePoint(&end_arc, -rot); } else end_arc = end; SEGZONE * edge_poly = new SEGZONE( aPcb ); if( firstSegment == NULL ) firstSegment = edge_poly; aPcb->m_Zone.Append( edge_poly );// D( printf( " >> Add arc %d rot %d, edge poly item %d,%d to %d,%d\n",
// ii, rot, start_arc.x, start_arc.y,end_arc.x, end_arc.y ); )
edge_poly->SetLayer( aLayer ); edge_poly->m_Width = 1;
edge_poly->m_Start = start_arc + center; edge_poly->m_End = end_arc + center;
// the first track of each polygon has a netcode of zero,
// otherwise one.
// set netcode to 1. the calling function is responsible
// to set the first point to 0
edge_poly->SetNet( 1 ); if( !isDark ) { edge_poly->m_Flags |= DRAW_ERASED; } start_arc = end_arc; }
return firstSegment;}
/* These routines read the text string point from Text.
* After use, advanced Text the beginning of the sequence unread */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, true = relative
// Coord
break;
case GC_SPECIFY_RELATIVEES_COORD: m_Relative = true; // false = absolute Coord, true = 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:
{ SEGZONE* edge_poly; switch( D_commande ) { case 1: // code D01 Draw line, exposure ON
m_Exposure = true;
switch( m_Iterpolation ) { case GERB_INTERPOL_ARC_NEG: case GERB_INTERPOL_ARC_POS: D( printf( "Add arc poly %d,%d to %d,%d fill %d interpol %d 360_enb %d\n", m_PreviousPos.x, m_PreviousPos.y, m_CurrentPos.x, m_CurrentPos.y, m_PolygonFillModeState, m_Iterpolation, m_360Arc_enbl ); ) edge_poly = fillArcPOLY( pcb, activeLayer, m_PreviousPos, m_CurrentPos, m_IJPos, ( m_Iterpolation == GERB_INTERPOL_ARC_NEG ) ? false : true, m_360Arc_enbl, !(m_LayerNegative ^ m_ImageNegative) ); edge_poly->SetNet( m_PolygonFillModeState ); break;
default: edge_poly = new SEGZONE( pcb ); pcb->m_Zone.Append( edge_poly ); D( printf( "Add poly edge %d,%d to %d,%d fill %d\n", m_PreviousPos.x, m_PreviousPos.y, m_CurrentPos.x, m_CurrentPos.y, m_Iterpolation ); )
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 ); ) } break; }
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;}
|
