typedef struct
{
    t_entity  ent;
    double    from;
    double    to;
    short     col;
    short     chk;
} tDat;

/*******************************************/
/*******************************************/
short MegaEnt(
        void *argptr )
{
    tDat   *p = (tDat*)argptr;  
    int    ret = FALSE;

    switch ( p->ent.type )
    {
        case E_CIRCLE:
        if (EQ(p->ent.data.cir.rd,p->from,EPS))
        {
            p->ent.data.cir.rd = p->to;
            p->ent.attr.col = p->col;
            if (p->chk)
                ExChangeEntity(&p->ent,p->ent.ecs);
            else
            {
                CreateEntity(E_CIRCLE,&p->ent.attr,&p->ent.data.cir,NULL,p->ent.ecs,p->ent.id);
            }
        }
        break;
    }
    return(CONTINUE_LOOP);
}
/*******************************************/
/*******************************************/
extern "C" short MegaMain(
        char *argv,  
        char *args )
{
    t_dlgdta tg[4]; // Array der Dialogfeldbeschreiber
    tDat     dat;

    argv;
 
    dat.from  = 3.55;
    dat.to    = 4.55;
	dat.col   = 3;
    dat.chk   = 1;

    SetDlg(&tg[0],"KreisRadius von",DLG_LEN,&dat.from);
    SetDlg(&tg[1],"KreisRadius zu",DLG_LEN,&dat.to);
    SetDlg(&tg[2],"Farbe  zu",DLG_SHT,&dat.col);
    SetDlg(&tg[3],"OriginalKreiseL”schen",DLG_CHK,&dat.chk);
    if (DlgInput(4,"RadiusChange",tg))
    {
        LoopAll((1<<E_CIRCLE),&dat,MegaEnt);
    }

    MegaCMD("AZoomAll");
	return(0);
}