516 lines
15 KiB
C++
516 lines
15 KiB
C++
/******************************************/
|
|
/* Kicad: Common plot Postscript Routines */
|
|
/******************************************/
|
|
|
|
#include "fctsys.h"
|
|
#include "gr_basic.h"
|
|
#include "trigo.h"
|
|
#include "wxstruct.h"
|
|
#include "base_struct.h"
|
|
#include "common.h"
|
|
#include "plot_common.h"
|
|
#include "worksheet.h"
|
|
#include "macros.h"
|
|
#include "class_base_screen.h"
|
|
#include "drawtxt.h"
|
|
|
|
|
|
// Variables partagees avec Common plot Postscript et HPLG Routines
|
|
wxPoint g_Plot_LastPenPosition;
|
|
wxPoint g_Plot_PlotOffset;
|
|
FILE* g_Plot_PlotOutputFile;
|
|
double g_Plot_XScale, g_Plot_YScale;
|
|
int g_Plot_DefaultPenWidth;
|
|
int g_Plot_CurrentPenWidth = -1;
|
|
int g_Plot_PlotOrientOptions, g_Plot_PenState;
|
|
|
|
/*************************/
|
|
void ForcePenReinit()
|
|
/*************************/
|
|
|
|
/* set the flag g_Plot_CurrentPenWidth to -1 in order to force a pen width redefinition
|
|
* for the next draw command
|
|
*/
|
|
{
|
|
g_Plot_CurrentPenWidth = -1;
|
|
}
|
|
|
|
|
|
/**********************************************/
|
|
void SetPlotScale( double aXScale, double aYScale )
|
|
/**********************************************/
|
|
|
|
/* Set the plot scale for the current plotting)
|
|
*/
|
|
{
|
|
g_Plot_XScale = aXScale;
|
|
g_Plot_YScale = aYScale;
|
|
}
|
|
|
|
|
|
/*********************************/
|
|
void Setg_Plot_PlotOffset( wxPoint offset )
|
|
/*********************************/
|
|
|
|
/* Set the plot offset for the current plotting)
|
|
*/
|
|
{
|
|
g_Plot_PlotOffset = offset;
|
|
}
|
|
|
|
|
|
/**************************************************************************/
|
|
void WinEDA_DrawFrame::PlotWorkSheet( int format_plot, BASE_SCREEN* screen )
|
|
/**************************************************************************/
|
|
|
|
/* Plot sheet references
|
|
* margin is in mils (1/1000 inch)
|
|
*/
|
|
{
|
|
#define WSTEXTSIZE 50 // Text size in mils
|
|
Ki_PageDescr* Sheet = screen->m_CurrentSheetDesc;
|
|
int ii, jj, xg, yg, ipas, gxpas, gypas;
|
|
wxSize PageSize;
|
|
wxPoint pos, ref;
|
|
EDA_Colors color;
|
|
Ki_WorkSheetData* WsItem;
|
|
int conv_unit = screen->GetInternalUnits() / 1000; /* Scale to convert dimension in 1/1000 in into internal units
|
|
* (1/1000 inc for EESchema, 1/10000 for pcbnew */
|
|
wxString msg;
|
|
wxSize text_size;
|
|
void (*FctPlume)( wxPoint pos, int state );
|
|
int UpperLimit = VARIABLE_BLOCK_START_POSITION;
|
|
bool italic = false;
|
|
bool thickness = 0; //@todo : use current pen
|
|
|
|
switch( format_plot )
|
|
{
|
|
case PLOT_FORMAT_POST:
|
|
FctPlume = LineTo_PS;
|
|
break;
|
|
|
|
case PLOT_FORMAT_HPGL:
|
|
FctPlume = Move_Plume_HPGL;
|
|
break;
|
|
|
|
case PLOT_FORMAT_GERBER:
|
|
FctPlume = LineTo_GERBER;
|
|
break;
|
|
|
|
default:
|
|
return;
|
|
}
|
|
|
|
color = BLACK;
|
|
|
|
PageSize.x = Sheet->m_Size.x;
|
|
PageSize.y = Sheet->m_Size.y;
|
|
|
|
/* trace de la bordure */
|
|
ref.x = Sheet->m_LeftMargin * conv_unit;
|
|
ref.y = Sheet->m_TopMargin * conv_unit; /* Upper left corner */
|
|
xg = (PageSize.x - Sheet->m_RightMargin) * conv_unit;
|
|
yg = (PageSize.y - Sheet->m_BottomMargin) * conv_unit; /* lower right corner */
|
|
|
|
#if defined(KICAD_GOST)
|
|
FctPlume(ref,'U');
|
|
pos.x = xg; pos.y = ref.y;
|
|
FctPlume(pos,'D');
|
|
pos.x = xg; pos.y = yg;
|
|
FctPlume(pos,'D');
|
|
pos.x = ref.x; pos.y = yg;
|
|
FctPlume( pos,'D' );
|
|
FctPlume(ref,'D');
|
|
#else
|
|
|
|
for( ii = 0; ii < 2; ii++ )
|
|
{
|
|
FctPlume( ref, 'U' );
|
|
pos.x = xg; pos.y = ref.y;
|
|
FctPlume( pos, 'D' );
|
|
pos.x = xg; pos.y = yg;
|
|
FctPlume( pos, 'D' );
|
|
pos.x = ref.x; pos.y = yg;
|
|
FctPlume( pos, 'D' );
|
|
FctPlume( ref, 'D' );
|
|
ref.x += GRID_REF_W * conv_unit; ref.y += GRID_REF_W * conv_unit;
|
|
xg -= GRID_REF_W * conv_unit; yg -= GRID_REF_W * conv_unit;
|
|
}
|
|
#endif
|
|
|
|
/* trace des reperes */
|
|
text_size.x = WSTEXTSIZE * conv_unit;
|
|
text_size.y = WSTEXTSIZE * conv_unit;
|
|
|
|
ref.x = Sheet->m_LeftMargin;
|
|
ref.y = Sheet->m_TopMargin; /* Upper left corner in 1/1000 inch */
|
|
xg = (PageSize.x - Sheet->m_RightMargin);
|
|
yg = (PageSize.y - Sheet->m_BottomMargin); /* lower right corner in 1/1000 inch */
|
|
|
|
#if defined(KICAD_GOST)
|
|
for ( WsItem = &WS_Segm1_LU; WsItem != NULL; WsItem = WsItem->Pnext )
|
|
{
|
|
pos.x = (ref.x - WsItem->m_Posx) * conv_unit;
|
|
pos.y = (yg - WsItem->m_Posy) * conv_unit;
|
|
msg.Empty();
|
|
switch( WsItem->m_Type )
|
|
{
|
|
case WS_CADRE:
|
|
break;
|
|
case WS_PODPIS_LU:
|
|
if(WsItem->m_Legende) msg = WsItem->m_Legende;
|
|
PlotGraphicText(format_plot, pos, color,
|
|
msg, TEXT_ORIENT_VERT, text_size,
|
|
GR_TEXT_HJUSTIFY_CENTER, GR_TEXT_VJUSTIFY_BOTTOM,
|
|
thickness, italic );
|
|
|
|
break;
|
|
case WS_SEGMENT_LU:
|
|
FctPlume(pos, 'U');
|
|
pos.x = (ref.x - WsItem->m_Endx) * conv_unit;
|
|
pos.y = (yg - WsItem->m_Endy) * conv_unit;
|
|
FctPlume(pos, 'D');
|
|
break;
|
|
}
|
|
}
|
|
for ( WsItem = &WS_Segm1_LT; WsItem != NULL; WsItem = WsItem->Pnext )
|
|
{
|
|
pos.x = (ref.x + WsItem->m_Posx) * conv_unit;
|
|
pos.y = (ref.y + WsItem->m_Posy) * conv_unit;
|
|
msg.Empty();
|
|
switch( WsItem->m_Type )
|
|
{
|
|
case WS_SEGMENT_LT:
|
|
FctPlume(pos, 'U');
|
|
pos.x = (ref.x + WsItem->m_Endx) * conv_unit;
|
|
pos.y = (ref.y + WsItem->m_Endy) * conv_unit;
|
|
FctPlume(pos, 'D');
|
|
break;
|
|
}
|
|
}
|
|
#else
|
|
|
|
/* Trace des reperes selon l'axe X */
|
|
ipas = (xg - ref.x) / PAS_REF;
|
|
gxpas = ( xg - ref.x) / ipas;
|
|
for( ii = ref.x + gxpas, jj = 1; ipas > 0; ii += gxpas, jj++, ipas-- )
|
|
{
|
|
msg.Empty(); msg << jj;
|
|
if( ii < xg - PAS_REF / 2 )
|
|
{
|
|
pos.x = ii * conv_unit; pos.y = ref.y * conv_unit;
|
|
FctPlume( pos, 'U' );
|
|
pos.x = ii * conv_unit; pos.y = (ref.y + GRID_REF_W) * conv_unit;
|
|
FctPlume( pos, 'D' );
|
|
}
|
|
pos.x = (ii - gxpas / 2) * conv_unit;
|
|
pos.y = (ref.y + GRID_REF_W / 2) * conv_unit;
|
|
PlotGraphicText( format_plot, pos, color,
|
|
msg, TEXT_ORIENT_HORIZ, text_size,
|
|
GR_TEXT_HJUSTIFY_CENTER, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
|
|
if( ii < xg - PAS_REF / 2 )
|
|
{
|
|
pos.x = ii * conv_unit; pos.y = yg * conv_unit;
|
|
FctPlume( pos, 'U' );
|
|
pos.x = ii * conv_unit; pos.y = (yg - GRID_REF_W) * conv_unit;
|
|
FctPlume( pos, 'D' );
|
|
}
|
|
pos.x = (ii - gxpas / 2) * conv_unit;
|
|
pos.y = (yg - GRID_REF_W / 2) * conv_unit;
|
|
PlotGraphicText( format_plot, pos, color,
|
|
msg, TEXT_ORIENT_HORIZ, text_size,
|
|
GR_TEXT_HJUSTIFY_CENTER, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
}
|
|
|
|
/* Trace des reperes selon l'axe Y */
|
|
ipas = (yg - ref.y) / PAS_REF;
|
|
gypas = ( yg - ref.y) / ipas;
|
|
for( ii = ref.y + gypas, jj = 0; ipas > 0; ii += gypas, jj++, ipas-- )
|
|
{
|
|
msg.Empty(); msg << jj;
|
|
if( ii < yg - PAS_REF / 2 )
|
|
{
|
|
pos.x = ref.x * conv_unit; pos.y = ii * conv_unit;
|
|
FctPlume( pos, 'U' );
|
|
pos.x = (ref.x + GRID_REF_W) * conv_unit; pos.y = ii * conv_unit;
|
|
FctPlume( pos, 'D' );
|
|
}
|
|
pos.x = (ref.x + GRID_REF_W / 2) * conv_unit;
|
|
pos.y = (ii - gypas / 2) * conv_unit;
|
|
PlotGraphicText( format_plot, pos, color,
|
|
msg, TEXT_ORIENT_HORIZ, text_size,
|
|
GR_TEXT_HJUSTIFY_CENTER, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
|
|
if( ii < yg - PAS_REF / 2 )
|
|
{
|
|
pos.x = xg * conv_unit; pos.y = ii * conv_unit;
|
|
FctPlume( pos, 'U' );
|
|
pos.x = (xg - GRID_REF_W) * conv_unit; pos.y = ii * conv_unit;
|
|
FctPlume( pos, 'D' );
|
|
}
|
|
pos.x = (xg - GRID_REF_W / 2) * conv_unit;
|
|
pos.y = (ii - gypas / 2) * conv_unit;
|
|
PlotGraphicText( format_plot, pos, color, msg, TEXT_ORIENT_HORIZ, text_size,
|
|
GR_TEXT_HJUSTIFY_CENTER, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
}
|
|
#endif
|
|
|
|
/* Trace du cartouche */
|
|
text_size.x = SIZETEXT * conv_unit;
|
|
text_size.y = SIZETEXT * conv_unit;
|
|
#if defined(KICAD_GOST)
|
|
ref.x = PageSize.x - Sheet->m_RightMargin;
|
|
ref.y = PageSize.y - Sheet->m_BottomMargin;
|
|
if (screen->m_ScreenNumber == 1)
|
|
{
|
|
for( WsItem = &WS_Date; WsItem != NULL; WsItem = WsItem->Pnext )
|
|
{
|
|
pos.x = (ref.x - WsItem->m_Posx) * conv_unit;
|
|
pos.y = (ref.y - WsItem->m_Posy) * conv_unit;
|
|
msg.Empty();
|
|
switch( WsItem->m_Type )
|
|
{
|
|
case WS_DATE:
|
|
break;
|
|
case WS_REV:
|
|
break;
|
|
case WS_KICAD_VERSION:
|
|
break;
|
|
case WS_PODPIS:
|
|
if(WsItem->m_Legende) msg = WsItem->m_Legende;
|
|
PlotGraphicText(format_plot, pos, color, msg, TEXT_ORIENT_HORIZ,text_size,
|
|
GR_TEXT_HJUSTIFY_LEFT, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
break;
|
|
case WS_SIZESHEET:
|
|
break;
|
|
case WS_IDENTSHEET:
|
|
if(WsItem->m_Legende) msg = WsItem->m_Legende;
|
|
msg << screen->m_ScreenNumber;
|
|
PlotGraphicText(format_plot, pos, color, msg, TEXT_ORIENT_HORIZ,text_size,
|
|
GR_TEXT_HJUSTIFY_LEFT, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
break;
|
|
case WS_SHEETS:
|
|
if(WsItem->m_Legende) msg = WsItem->m_Legende;
|
|
msg << screen->m_NumberOfScreen;
|
|
PlotGraphicText(format_plot, pos, color, msg, TEXT_ORIENT_HORIZ,text_size,
|
|
GR_TEXT_HJUSTIFY_LEFT, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
break;
|
|
case WS_COMPANY_NAME:
|
|
break;
|
|
case WS_TITLE:
|
|
break;
|
|
case WS_COMMENT1:
|
|
break;
|
|
case WS_COMMENT2:
|
|
break;
|
|
case WS_COMMENT3:
|
|
break;
|
|
case WS_COMMENT4:
|
|
break;
|
|
case WS_UPPER_SEGMENT:
|
|
case WS_LEFT_SEGMENT:
|
|
case WS_SEGMENT:
|
|
FctPlume(pos, 'U');
|
|
pos.x = (ref.x - WsItem->m_Endx) * conv_unit;
|
|
pos.y = (ref.y - WsItem->m_Endy) * conv_unit;
|
|
FctPlume(pos, 'D');
|
|
break;
|
|
}
|
|
}
|
|
} else {
|
|
for( WsItem = &WS_CADRE_D; WsItem != NULL; WsItem = WsItem->Pnext )
|
|
{
|
|
pos.x = (ref.x - WsItem->m_Posx) * conv_unit;
|
|
pos.y = (ref.y - WsItem->m_Posy) * conv_unit;
|
|
msg.Empty();
|
|
switch( WsItem->m_Type )
|
|
{
|
|
case WS_CADRE:
|
|
/* Begin list number > 1 */
|
|
case WS_PODPIS_D:
|
|
if(WsItem->m_Legende) msg = WsItem->m_Legende;
|
|
PlotGraphicText(format_plot, pos, color, msg, TEXT_ORIENT_HORIZ,text_size,
|
|
GR_TEXT_HJUSTIFY_LEFT, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
break;
|
|
case WS_IDENTSHEET_D:
|
|
if(WsItem->m_Legende) msg = WsItem->m_Legende;
|
|
msg << screen->m_ScreenNumber;
|
|
PlotGraphicText(format_plot, pos, color, msg, TEXT_ORIENT_HORIZ,text_size,
|
|
GR_TEXT_HJUSTIFY_LEFT, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
break;
|
|
case WS_LEFT_SEGMENT_D:
|
|
case WS_SEGMENT_D:
|
|
FctPlume(pos, 'U');
|
|
pos.x = (ref.x - WsItem->m_Endx) * conv_unit;
|
|
pos.y = (ref.y - WsItem->m_Endy) * conv_unit;
|
|
FctPlume(pos, 'D');
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
#else
|
|
ref.x = PageSize.x - GRID_REF_W - Sheet->m_RightMargin;
|
|
ref.y = PageSize.y - GRID_REF_W - Sheet->m_BottomMargin;
|
|
|
|
for( WsItem = &WS_Date; WsItem != NULL; WsItem = WsItem->Pnext )
|
|
{
|
|
pos.x = (ref.x - WsItem->m_Posx) * conv_unit;
|
|
pos.y = (ref.y - WsItem->m_Posy) * conv_unit;
|
|
if( WsItem->m_Legende )
|
|
msg = WsItem->m_Legende;
|
|
else
|
|
msg.Empty();
|
|
|
|
switch( WsItem->m_Type )
|
|
{
|
|
case WS_DATE:
|
|
msg += screen->m_Date;
|
|
break;
|
|
|
|
case WS_REV:
|
|
msg += screen->m_Revision;
|
|
break;
|
|
|
|
case WS_KICAD_VERSION:
|
|
msg += g_ProductName;
|
|
break;
|
|
|
|
case WS_SIZESHEET:
|
|
msg += screen->m_CurrentSheetDesc->m_Name;
|
|
break;
|
|
|
|
case WS_IDENTSHEET:
|
|
msg << screen->m_ScreenNumber << wxT( "/" ) << screen->m_NumberOfScreen;
|
|
break;
|
|
|
|
case WS_FILENAME:
|
|
{
|
|
wxString fname, fext;
|
|
wxFileName::SplitPath( screen->m_FileName, (wxString*) NULL, &fname, &fext );
|
|
msg << fname << wxT( "." ) << fext;
|
|
}
|
|
break;
|
|
|
|
case WS_FULLSHEETNAME:
|
|
msg += GetScreenDesc();
|
|
break;
|
|
|
|
case WS_COMPANY_NAME:
|
|
msg += screen->m_Company;
|
|
if( !msg.IsEmpty() )
|
|
UpperLimit = MAX( UpperLimit, WsItem->m_Posy + SIZETEXT );
|
|
break;
|
|
|
|
case WS_TITLE:
|
|
msg += screen->m_Title;
|
|
break;
|
|
|
|
case WS_COMMENT1:
|
|
msg += screen->m_Commentaire1;
|
|
if( !msg.IsEmpty() )
|
|
UpperLimit = MAX( UpperLimit, WsItem->m_Posy + SIZETEXT );
|
|
break;
|
|
|
|
case WS_COMMENT2:
|
|
msg += screen->m_Commentaire2;
|
|
if( !msg.IsEmpty() )
|
|
UpperLimit = MAX( UpperLimit, WsItem->m_Posy + SIZETEXT );
|
|
break;
|
|
|
|
case WS_COMMENT3:
|
|
msg += screen->m_Commentaire3;
|
|
if( !msg.IsEmpty() )
|
|
UpperLimit = MAX( UpperLimit, WsItem->m_Posy + SIZETEXT );
|
|
break;
|
|
|
|
case WS_COMMENT4:
|
|
msg += screen->m_Commentaire4;
|
|
if( !msg.IsEmpty() )
|
|
UpperLimit = MAX( UpperLimit, WsItem->m_Posy + SIZETEXT );
|
|
break;
|
|
|
|
case WS_UPPER_SEGMENT:
|
|
if( UpperLimit == 0 )
|
|
break;
|
|
|
|
case WS_LEFT_SEGMENT:
|
|
WS_MostUpperLine.m_Posy =
|
|
WS_MostUpperLine.m_Endy =
|
|
WS_MostLeftLine.m_Posy = UpperLimit;
|
|
pos.y = (ref.y - WsItem->m_Posy) * conv_unit;
|
|
|
|
case WS_SEGMENT:
|
|
{
|
|
wxPoint auxpos;
|
|
auxpos.x = (ref.x - WsItem->m_Endx) * conv_unit;;
|
|
auxpos.y = (ref.y - WsItem->m_Endy) * conv_unit;;
|
|
FctPlume( pos, 'U' );
|
|
FctPlume( auxpos, 'D' );
|
|
}
|
|
break;
|
|
}
|
|
|
|
if( !msg.IsEmpty() )
|
|
{
|
|
PlotGraphicText( format_plot, pos, color,
|
|
msg.GetData(), TEXT_ORIENT_HORIZ, text_size,
|
|
GR_TEXT_HJUSTIFY_LEFT, GR_TEXT_VJUSTIFY_CENTER,
|
|
thickness, italic );
|
|
}
|
|
}
|
|
#endif
|
|
|
|
switch( format_plot )
|
|
{
|
|
case PLOT_FORMAT_HPGL:
|
|
Plume_HPGL( 'U' );
|
|
break;
|
|
|
|
case PLOT_FORMAT_POST:
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
/******************************************/
|
|
void UserToDeviceCoordinate( wxPoint& pos )
|
|
/******************************************/
|
|
|
|
/* modifie les coord pos.x et pos.y pour le trace selon l'orientation,
|
|
* l'echelle, les offsets de trace */
|
|
{
|
|
pos.x = (int) (pos.x * g_Plot_XScale);
|
|
pos.y = (int) (pos.y * g_Plot_YScale);
|
|
|
|
switch( g_Plot_PlotOrientOptions ) /* Calcul du cadrage */
|
|
{
|
|
default:
|
|
pos.x -= g_Plot_PlotOffset.x; pos.y = g_Plot_PlotOffset.y - pos.y;
|
|
break;
|
|
|
|
case PLOT_MIROIR:
|
|
pos.x -= g_Plot_PlotOffset.x; pos.y = -g_Plot_PlotOffset.y + pos.y;
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
/************************************/
|
|
void UserToDeviceSize( wxSize& size )
|
|
/************************************/
|
|
/* modifie les dimension size.x et size.y pour le trace selon l'echelle */
|
|
{
|
|
size.x = (int) (size.x * g_Plot_XScale);
|
|
size.y = (int) (size.y * g_Plot_YScale);
|
|
}
|