zt01.cpp

来自「AotoCAD平台下的结构设计工具」· C++ 代码 · 共 111 行

// ZT01.cpp

#include <adslib.h>
#include "stdafx.h"
#include <aced.h>
#include <adscodes.h>

///////////////////////////////////////////////////////////
// Tools1
int zz()
{
	ads_command(RTSTR,"ZOOM",RTSTR,"0.5X",RTNONE);
    ads_retvoid(); 
    return AcRx::kRetOK;
}
int zx()
{
    ads_command(RTSTR,"ZOOM",RTSTR,"1.5X",RTNONE);
    ads_retvoid(); 
    return AcRx::kRetOK;
}
int zs()
{
    ads_command(RTSTR,"ZOOM",RTSTR,"P",RTNONE);
    ads_retvoid(); 
    return AcRx::kRetOK;
}
int ze()
{
    ads_command(RTSTR,"ZOOM",RTSTR,"E",RTNONE);
    ads_retvoid();
    return AcRx::kRetOK;
}
int zd()
{
    ads_command(RTSTR,"ZOOM",RTSTR,"D",RTNONE);
    ads_retvoid();
    return AcRx::kRetOK;
}

///////////////////////////////////////////////////////////
// Tools2
int th()
{
    ads_name pickh;
    
    if(ads_ssget(NULL,NULL,NULL,NULL,pickh)  != RTNORM)
    {  ads_fail("\nFail get a text.");
       return RTERROR;  }
	ads_command(RTSTR,"CHANGE",RTPICKS,pickh,RTSTR,"",RTSTR,"",
			RTSTR,"",RTSTR,"",RTSTR,"",RTREAL,0.0,RTSTR,"",RTNONE);
    ads_ssfree(pickh);
    ads_retvoid(); 
    return AcRx::kRetOK;
}

int tv()
{
    ads_name pickv;
      
    if(ads_ssget(NULL,NULL,NULL,NULL,pickv)  != RTNORM)
    {  ads_fail("\nFail get a text.");
           return RTERROR;  }
	ads_command(RTSTR,"CHANGE",RTPICKS,pickv,RTSTR,"",RTSTR,"",
			RTSTR,"",RTSTR,"",RTSTR,"",RTREAL,90.0,RTSTR,"",RTNONE);
    ads_ssfree(pickv);
    ads_retvoid(); 
    return AcRx::kRetOK;
}

int mh()
{
    ads_name pickh;
    ads_point bp,pte;
    ads_real dx;
    bp[X]=bp[Y]=0.0;
    if(ads_ssget(NULL,NULL,NULL,NULL,pickh)  != RTNORM)
    {  ads_fail("\nFail get a entity.");
        return RTERROR;  }
    ads_getreal("\nThe Offset of X= ",&dx);
    pte[X]=bp[X]+dx;
    pte[Y]=bp[Y];
    ads_command(RTSTR,"MOVE",RTPICKS,pickh,RTSTR,"",
                              RT3DPOINT,bp,RT3DPOINT,pte,
                                  RTNONE);
    ads_ssfree(pickh);
    ads_retvoid(); 
    return AcRx::kRetOK;
}

int  mv()
{
    ads_name pickv;
    ads_point bp,pte;
    ads_real dy;
    bp[X]=bp[Y]=0.0;
    if(ads_ssget(NULL,NULL,NULL,NULL,pickv)  != RTNORM)
    {  ads_fail("\nFail get a entity.");
       return RTERROR;  }
    ads_getreal("\nThe Offset of Y= ",&dy);
    pte[X]=bp[X];
    pte[Y]=bp[Y]+dy;
    ads_command(RTSTR,"MOVE",RTPICKS,pickv,RTSTR,"",
                              RT3DPOINT,bp,RT3DPOINT,pte,
                              RTNONE);
    ads_ssfree(pickv);
    ads_retvoid(); 
    return AcRx::kRetOK;
}