/**********************************************************************/
#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=2;
    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;

	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","Und Ciao Bello",NULL,NULL," OK ",3); // ein kurzer Gruss
    return(0); // und Tschüss
}