Adesk::Boolean pickViewport (AcDbViewport *&pVp) {
ads_point p1, p2 ;
if ( acedGetPoint (NULL, ACRX_T("\nPlease enter point 1: "), p1) != RTNORM )
return (Adesk::kFalse) ;
if ( acedGetPoint (p1, ACRX_T("\nPlease enter point 2: "), p2) != RTNORM )
return (Adesk::kFalse) ;
acdbUcs2Wcs (p1, p1, Adesk::kFalse ) ;
acdbUcs2Wcs (p2, p2, Adesk::kFalse ) ;
int frontClip =AfxMessageBox (ACRX_T("Would you like to clip at the front?"), MB_YESNO) ;
int backClip =AfxMessageBox (ACRX_T("Would you like to clip at the back?"), MB_YESNO) ;
pVp =new AcDbViewport ;
pVp->setViewTarget (asPnt3d (p2)) ;
pVp->setViewDirection (asPnt3d (p1) - asPnt3d (p2)) ;
pVp->setFrontClipDistance (asPnt3d (p1).distanceTo (asPnt3d (p2))) ;
pVp->setBackClipDistance (0) ;
acutPrintf (ACRX_T("\nFront Clipping is %d"), pVp->isFrontClipOn ()) ;
if ( frontClip == IDYES )
pVp->setFrontClipOn () ;
acutPrintf (ACRX_T("\nFront Clipping is %d"), pVp->isFrontClipOn ()) ;
acutPrintf (ACRX_T("\nBack Clipping is %d"), pVp->isBackClipOn ()) ;
if ( backClip == IDYES )
pVp->setBackClipOn () ;
acutPrintf(ACRX_T("\nBack Clipping is %d"), pVp->isBackClipOn ()) ;
return (Adesk::kTrue) ;
}
//This is used to set the value for an element in a group.
//The element is identified by the dwCookie parameter
STDMETHODIMP CComPolygon::SetElementValue(
/* [in] */ DISPID dispID,
/* [in] */ DWORD dwCookie,
/* [in] */ VARIANT VarIn)
{
if (dispID >= DISPID_NORMAL && dispID <= DISPID_STARTPOINT)
{
try
{
if (dwCookie>2)
throw Acad::eInvalidInput;
Acad::ErrorStatus es;
AcAxObjectRefPtr<AsdkPoly> pPoly(&m_objRef,AcDb::kForWrite,Adesk::kTrue);
if((es=pPoly.openStatus()) != Acad::eOk)
throw es;
AcAxPoint3d pt;
AcAxPoint2d pt2d;
if (dispID == DISPID_NORMAL)
{
pt = pPoly->normal();
//translate from wcs to ucs
acdbEcs2Ucs(asDblArray(pt),asDblArray(pt),asDblArray(pPoly->normal()),Adesk::kTrue);
} else {
switch (dispID)
{
case DISPID_CENTER:
pt2d = pPoly->center();
break;
case DISPID_STARTPOINT:
pt2d = pPoly->startPoint();
break;
default:
throw Acad::eInvalidInput;
}
pt.set(pt2d.x,pt2d.y,pPoly->elevation());
//translate from wcs to ucs
acdbEcs2Ucs(asDblArray(pt),asDblArray(pt),asDblArray(pPoly->normal()),Adesk::kFalse);
}
pt[dwCookie] = V_R8(&VarIn);
if (dispID == DISPID_NORMAL) {
acdbUcs2Wcs(asDblArray(pt),asDblArray(pt),Adesk::kTrue);
if ((es=pPoly->setNormal(pt.asVector()))!=Acad::eOk)
throw es;
}else {
acdbUcs2Ecs(asDblArray(pt),asDblArray(pt),asDblArray(pPoly->normal()),Adesk::kFalse);
pt2d.set(pt.x,pt.y);
pPoly->setElevation(pt.z);
if (dispID == DISPID_CENTER)
if ((es=pPoly->setCenter(pt2d))!=Acad::eOk)
throw es;
if (dispID == DISPID_STARTPOINT)
if ((es=pPoly->setStartPoint(pt2d))!=Acad::eOk)
throw es;
}
Fire_Notification(dispID);
}
catch(const Acad::ErrorStatus)
{
return Error(L"Failed to open object",IID_IComPolygon,E_FAIL);
}
catch(const HRESULT hr)
{
return Error(L"Invalid argument.",IID_IComPolygon,hr);
}
}
return S_OK;
}
void asdktest1 () {
//----- Select the entities
ads_name ss, en ;
if ( acedSSGet (NULL, NULL, NULL, NULL, ss) != RTNORM )
return ;
//----- Append entity IDs to the collector
long n ;
AcDbObjectId id ;
AsdkHlrCollector collector ;
collector.setDeleteState (true) ;
acedSSLength (ss, &n) ;
for ( int i =0 ; i < n ; i++ ) {
acedSSName (ss, i, en) ;
acdbGetObjectId (id, en) ;
collector.addEntity (id) ;
}
acedSSFree (ss) ;
//----- Get current viewport settings
struct resbuf rb;
acedGetVar(ACRX_T(/*NOXLATE*/"viewdir"), &rb);
ads_point dirPt;
acdbUcs2Wcs (rb.resval.rpoint, dirPt, Adesk::kTrue) ;
acedGetVar(ACRX_T(/*NOXLATE*/"target"), &rb);
ads_point tarPt;
acdbUcs2Wcs (rb.resval.rpoint, tarPt, Adesk::kFalse) ;
//----- Ask if non-visible edges should be created
int hidLines =AfxMessageBox (ACRX_T("Would you like to see hidden lines?"), MB_YESNO) ;
int honorInt =AfxMessageBox (ACRX_T("Would you like to honor internal visibility of polyface meshes or ACIS objects?"), MB_YESNO) ;
int meshSils =AfxMessageBox (ACRX_T("Would you like to calculate silhouettes of polyface meshes?"), MB_YESNO) ;
int unit =AfxMessageBox (ACRX_T("Would you like to unit solid before processing?"), MB_YESNO) ;
//----- Process hidden line removal
AsdkHlrEngine hlr (
asPnt3d (tarPt), asVec3d (dirPt),
kEntity | kBlock | kSubentity | kProgress
| (honorInt == IDYES ? kHonorInternals : 0)
| (hidLines == IDYES ? kShowAll : 0)
| (meshSils == IDYES ? kMeshSilhouettes : 0)
| (unit == IDYES ? kUnite : 0)
) ;
hlr.setAcisConversionProgressCallBack (progress1) ;
hlr.setAhlProgressCallBack (progress2) ;
hlr.setAcadConversionProgressCallBack (progress3) ;
acedSetStatusBarProgressMeter (ACRX_T("HLR running: "), 0, 300) ;
hlr.run (collector) ;
acedRestoreStatusBar () ;
//----- Assign color to the resulting entities
//----- red for visible edges
//----- blue for non-visible edges
//----- yellow for internal edges
n =collector.mOutputData.logicalLength () ;
for (int i =0 ; i < n ; i++ ) {
AsdkHlrData *p =collector.mOutputData [i] ;
AcDbEntity *pEnt =p->getResultEntity () ;
AsdkHlrData::Visibility vis =p->getVisibility () ;
if ( vis == AsdkHlrData::kVisible ) {
pEnt->setColorIndex (1) ; //----- Read
} else if ( vis == AsdkHlrData::kInternallyHidden ) {
if ( p->getHlrVisibility () == AsdkHlrData::kVisible )
pEnt->setColorIndex (2) ; //----- Yellow
else
pEnt->setColorIndex (3) ; //----- Green
} else {
pEnt->setColorIndex (5) ; //----- Blue
}
if ( postToDatabase (NULL, pEnt, id) != Acad::eOk ) {
acutPrintf (_T("Failed to add entity to current space.\n")) ;
break ;
}
if ( acdbOpenAcDbEntity (pEnt, id, AcDb::kForRead) != Acad::eOk ) {
acutPrintf (_T("Failed to open last added outputed curve.\n")) ;
break ;
}
//----- Entity originator path for block reference entities
AcDbObjectIdArray ids =p->getObjectIds () ;
if ( ids.logicalLength () > 0 ) {
acutPrintf (ACRX_T("\n%lx, "), pEnt->objectId ().asOldId ()) ;
if ( p->getSubentId ().type () != AcDb::kNullSubentType )
acutPrintf (ACRX_T("[%ld, %ld], "), p->getSubentId ().type (), p->getSubentId ().index ()) ;
for ( int j =0 ; j < ids.logicalLength () ; j++ )
acutPrintf (ACRX_T("%lx, "), ids.at (j).asOldId ()) ;
AcDbObjectId id =ids.last () ;
if ( !id.isNull () ) {
AcDbEntity *ent =NULL ;
acdbOpenAcDbEntity (ent, id, AcDb::kForRead) ;
id =ent->linetypeId () ;
ent->close () ;
if ( pEnt->upgradeOpen () == Acad::eOk )
pEnt->setLinetype (id) ;
}
}
pEnt->close () ;
}
}
void asdktest4 () {
//----- Select the entities
ads_name ss, en ;
if ( acedSSGet (NULL, NULL, NULL, NULL, ss) != RTNORM )
return ;
//----- Append entity IDs to the collector
long n ;
AcDbObjectId id ;
AsdkHlrCollector collector ;
acedSSLength (ss, &n) ;
for ( int i =0 ; i < n ; i++ ) {
acedSSName (ss, i, en) ;
acdbGetObjectId (id, en) ;
collector.addEntity (id) ;
}
acedSSFree (ss) ;
//----- Get current viewport settings
struct resbuf rb;
acedGetVar(ACRX_T(/*NOXLATE*/"target"), &rb);
ads_point tarPt;
acdbUcs2Wcs (rb.resval.rpoint, tarPt, Adesk::kFalse) ;
//----- Ask if non-visible edges should be created
int hidLines =AfxMessageBox (ACRX_T("Would you like to see hidden lines?"), MB_YESNO) ;
int honorInt =AfxMessageBox (ACRX_T("Would you like to honor internal visibility of polyface meshes or ACIS objects?"), MB_YESNO) ;
int meshSils =AfxMessageBox (ACRX_T("Would you like to calculate silhouettes of polyface meshes?"), MB_YESNO) ;
int unit =AfxMessageBox (ACRX_T("Would you like to unit solid before processing?"), MB_YESNO) ;
//----- *** First view will be front view ***
//----- Process hidden line removal
AsdkHlrEngine hlrFront (
asPnt3d (tarPt), AcGeVector3d (0, -1, 0),//AcGeVector3d (0, 0, -1),
kProject| kEntity | kBlock | kReuse //----- Do not use 'kCleanup'
| (honorInt == IDYES ? kHonorInternals : 0)
| (hidLines == IDYES ? kShowAll : 0)
| (meshSils == IDYES ? kMeshSilhouettes : 0)
| (unit == IDYES ? kUnite : 0)
) ;
hlrFront.run (collector) ;
AddEntityToLayer (collector, ACRX_T("FontView")) ;
//----- *** Second view will be left view ***
//----- Process hidden line removal
AsdkHlrEngine hlrLeft (
asPnt3d (tarPt), AcGeVector3d (1, 0, 0),//, AcGeVector3d (1, 0, 0),
kProject| kEntity | kBlock | kReuse //----- Do not use 'kCleanup'
| (honorInt == IDYES ? kHonorInternals : 0)
| (hidLines == IDYES ? kShowAll : 0)
| (meshSils == IDYES ? kMeshSilhouettes : 0)
| (unit == IDYES ? kUnite : 0)
) ;
hlrLeft.run (collector) ;
AddEntityToLayer (collector, ACRX_T("LeftView")) ;
//----- *** Third view will be top view ***
//----- Process hidden line removal
AsdkHlrEngine hlrTop (
asPnt3d (tarPt), AcGeVector3d (0, 0, 1),//, AcGeVector3d (0, -1, 0),
kProject| kEntity | kBlock | kReuse //----- Do not use 'kCleanup'
| (honorInt == IDYES ? kHonorInternals : 0)
| (hidLines == IDYES ? kShowAll : 0)
| (meshSils == IDYES ? kMeshSilhouettes : 0)
| (unit == IDYES ? kUnite : 0)
) ;
hlrTop.run (collector) ;
AddEntityToLayer (collector, ACRX_T("TopView")) ;
}
// Invoked by the command - POLY
//
void
polyCommand()
{
int nSides = 0;
while (nSides < 3) {
acedInitGet(INP_NNEG, "");
switch (acedGetInt("\nEnter number of sides: ", &nSides)) {
case RTNORM:
if (nSides < 3)
acutPrintf("\nNeed at least 3 sides.");
break;
default:
return;
}
}
ads_point center, startPt, normal;
if (acedGetPoint(NULL, "\nLocate center of polygon: ", center) != RTNORM)
return;
startPt[0] = center[0]; startPt[1] = center[1]; startPt[2] = center[2];
while (asPnt3d(startPt) == asPnt3d(center)) {
switch (acedGetPoint(center, "\nLocate start point of polygon: ",
startPt)) {
case RTNORM:
if (asPnt3d(center) == asPnt3d(startPt))
acutPrintf("\nPick a point different from the center.");
break;
default:
return;
}
}
char nameBuf[133];
if (acedGetString(Adesk::kTrue, "\nEnter polygon name: ", nameBuf) != RTNORM)
return;
AcDbObjectId tsId = 0;
char styleBuf[133], msg[133];
// Get default text style
struct resbuf result ;
if ( acedGetVar ("TEXTSTYLE", &result) != RTNORM ) {
acutPrintf("\nError while reading default AutoCAD text style setting");
return ;
}
strcpy (styleBuf, result.resval.rstring) ;
sprintf (msg, "\nEnter text style <%s>: ", result.resval.rstring) ;
acdbFree (result.resval.rstring) ;
if (acedGetString(Adesk::kTrue, "\nEnter text style: ", styleBuf) != RTNORM)
return;
if ( styleBuf[0] == '\0' ) {
// Get default text style
struct resbuf result ;
if ( acedGetVar ("TEXTSTYLE", &result) != RTNORM ) {
acutPrintf("\nError while reading default AutoCAD text style setting");
return ;
}
strcpy (styleBuf, result.resval.rstring) ;
acdbFree (result.resval.rstring) ;
}
if ( rx_getTextStyleId(styleBuf,
acdbHostApplicationServices()->workingDatabase(),
tsId) != Acad::eOk)
{
acutPrintf("\nInvalid text style name");
return;
}
// Set the normal to the plane of the polygon to be the same as the
// z direction of the current ucs, i.e. (0, 0, 1) since we also got the
// center and start point in the current UCS. (acedGetPoint() returns in
// the current UCS.)
normal[X] = 0.0; normal[Y] = 0.0; normal[Z] = 1.0;
acdbUcs2Wcs(normal, normal, Adesk::kTrue);
acdbUcs2Ecs(center, center,normal, Adesk::kFalse);
acdbUcs2Ecs(startPt, startPt,normal, Adesk::kFalse);
double elev = center[2];
AcGePoint2d cen = asPnt2d(center), start = asPnt2d(startPt);
AcGeVector3d norm = asVec3d(normal);
AsdkPoly* poly = new AsdkPoly;
if (poly==NULL){
acutPrintf("\nOut of memory.");
return;
}
if (poly->set(cen, start, nSides, norm, nameBuf, tsId, elev)!=Acad::eOk){
delete poly;
acutPrintf("\nCannot create AsdkPoly with given parameters.");
return;
}
poly->setDatabaseDefaults(acdbHostApplicationServices()->workingDatabase());
postToDb(poly);
}
// Invoked by the command - DRAGPOLY
//
void
dragPolyCommand()
{
int nSides = 0;
ads_point center, startPt, normal;
if (acedGetPoint(NULL, "\nLocate center of polygon: ", center) != RTNORM)
return;
char nameBuf[133];
if (acedGetString(Adesk::kTrue, "\nEnter polygon name: ", nameBuf) != RTNORM)
return;
AcDbObjectId tsId = 0;
char styleBuf[133], msg[133];
// Get default text style
struct resbuf result ;
if ( acedGetVar ("TEXTSTYLE", &result) != RTNORM ) {
acutPrintf("\nError while reading default AutoCAD text style setting");
return ;
}
strcpy (styleBuf, result.resval.rstring) ;
sprintf (msg, "\nEnter text style <%s>: ", result.resval.rstring) ;
acdbFree (result.resval.rstring) ;
if (acedGetString(Adesk::kTrue, msg, styleBuf) != RTNORM)
return;
if ( styleBuf[0] == '\0' ) {
// Get default text style
struct resbuf result ;
if ( acedGetVar ("TEXTSTYLE", &result) != RTNORM ) {
acutPrintf("\nError while reading default AutoCAD text style setting");
return ;
}
strcpy (styleBuf, result.resval.rstring) ;
acdbFree (result.resval.rstring) ;
}
if ( rx_getTextStyleId(styleBuf,
acdbHostApplicationServices()->workingDatabase(),
tsId) != Acad::eOk)
{
acutPrintf("\nInvalid text style name");
return;
}
// Set the normal to the plane of the polygon to be the same as the
// z direction of the current ucs, i.e. (0, 0, 1) since we also got the
// center and start point in the current UCS. (acedGetPoint() returns in
// the current UCS.)
normal[X] = 0.0; normal[Y] = 0.0; normal[Z] = 1.0;
acdbUcs2Wcs(normal, normal, Adesk::kTrue);
acdbUcs2Ecs(center, center, normal, Adesk::kFalse);
acdbUcs2Ecs(startPt, startPt, normal, Adesk::kFalse);
double elev = center[2];
AcGePoint2d cen = asPnt2d(center), start = asPnt2d(startPt);
AcGeVector3d norm = asVec3d(normal);
AsdkPolyJig* pJig = new AsdkPolyJig();
pJig->acquire(cen, norm, nameBuf, tsId, elev);
delete pJig;
}
