/**********************************************************************/
#include "std.h"
#include "megatyp.h"
#include "megacad.h"
/**********************************************************************/
char edta[32000];// Puffer f�r variable Daten
/**********************************************************************/

// Hier die CallBack-Funktion - die Geisterhand
short SelPid(
        void *argptr )
{
    t_entity  *ent;

    ent = argptr;

	// nun wird einzeln geändert - zum selbst anpassen
    if(ent->attr.col == 1) ent->attr.wid=1;
    if(ent->attr.col == 2) ent->attr.wid=1;
    if(ent->attr.col == 3) ent->attr.wid=1;
    if(ent->attr.col == 4) ent->attr.wid=1;
    if(ent->attr.col == 5) ent->attr.wid=1;
    if(ent->attr.col == 6) ent->attr.wid=1;
    if(ent->attr.col == 7) ent->attr.wid=1;
    if(ent->attr.col == 8) ent->attr.wid=1;
    if(ent->attr.col == 9) ent->attr.wid=1;
    if(ent->attr.col == 10) ent->attr.wid=1;
    if(ent->attr.col == 11) ent->attr.wid=2;
    if(ent->attr.col == 12) ent->attr.wid=1;
    if(ent->attr.col == 13) ent->attr.wid=5;
    if(ent->attr.col == 14) ent->attr.wid=4;
    if(ent->attr.col == 15) ent->attr.wid=3;
    if(ent->attr.col >= 16 && ent->attr.col<=50) ent->attr.wid=1;
    if(ent->attr.col == 51) ent->attr.wid=1;
    if(ent->attr.col >= 52) ent->attr.wid=1;

	// Bemaßung ändern: 2008-01-31 MRS
	if((ent->type >= E_H_DIM) && (ent->type <= E_T_DIM))
	{
		if(ent->data.dim.hlcol == 1) ent->data.dim.hlwid=1;
		if(ent->data.dim.hlcol == 2) ent->data.dim.hlwid=1;
		if(ent->data.dim.hlcol == 3) ent->data.dim.hlwid=1;
		// ...
		
		if(ent->data.dim.tcol == 1) ent->data.dim.twid=1;
		if(ent->data.dim.tcol == 2) ent->data.dim.twid=1;
		if(ent->data.dim.tcol == 3) ent->data.dim.twid=1;
		// ...

	}

	ExChangeEntity(ent,NULL); // damit die Änderung sichtbar wird
	return(0);
}

// Hier der Einstieg aus MegaCAD
short MegaMain(
        char *filename,
        char *args )
{
    t_entity ent;
    ulong    filter;
    t_mat44  ecs;

    
    filter = 0xffffffff; // Selektionskriterium -> alle Elemente erlaubt
    EntityLoop(filter,filter,SelPid,&ent,edta,&ecs,sizeof(edta));     // Schleife �ber die Elemente - von hier gehts zur CallBack

    Message("Zuweisung der Liniendicke abgeschlossen","Ciao Bello",NULL,NULL," OK ",3); // ein kurzer Gruss
    return(0); // und Tschüß
}