Dibuixar un polígon amb rumbs i distàncies d'Excel a Microstation

Fa uns anys vaig publicar un article en què mostrava com concatenar dades en Excel per construir una poligonal amb AutoCAD, Sense haver de fer tot el protocol:

@ distància

L'altre dia que érem al curs d'AutoCAD algú em va preguntar si això es podria fer amb la línia d'ordres de Microsation. La resposta és SI, únicament cal entendre que el Keyin de Microstation no és igual que la línia d'ordres d'AutoCAD. Vegem com es pot construir, de pas aprenem cosetes poc usades en aquest programa:

El quadre a la dreta és un exemple d'una poligonal en base a rumbs i distàncies amb la següent estructura.

Amb Microstation es pot dibuixar això com ho vaig explicar abans, Amb el desavantatge òbvia -i la mateixa de AutoCAD-, que és tediós estar escrivint una a una, la possibilitat d'equivocar-se i fins i tot que no resetee el rumb anterior.

Doncs bé, el procés de concatenar és just el mateix que vaig explicar amb AutoCAD, Únicament cal entendre alguna cosa en què difereix Microstation.

El keyin no es va construir en funció de fer comandes en línia de text sinó per cridat d'ordres amb orientació a objectes, de manera que només suporta 56 caràcters. A més a requereix que es faci servir punt i coma (;) per separar les ordres doncs a diferència d'AutoCAD que ve d'una lògica de programació Basic, aquesta porta una lògica de Clipper amb el que va ser fet Microstation enllà quan encara se li cridava Ustation.

Davant d'això, la forma més senzilla, és cridar les ordres des d'un arxiu text amb la comanda @ que em sembla molt pocs coneixen però que és el procediment que sempre ha fet servir Microstation per processar ordres per lots. Fins i tot el importar punts d'una llista txt és una mdl que fa això.

Usant el full d'Excel que anteriorment vaig treballar per ensenyar com convertir de rumbs i distàncies a coordenades, vaig a mostrar com es concatenaría per Microstation:

Concatenar els punts.

El que ens interessa és finalment, que el Key in final sigui:

place point ;xi =374037.736,1580735.145;

Place point és la comanda punt, incloent l'espai, el punt i coma és per indicar una altra ordre, el xi = és l'ordre per ingressar coordenades i les dues coordenades blau i verd són els punts coneguts. A la fi un nou punt i coma per a indicar un enter o pas a nou comandament.

De manera llavors, suposant que les cel·les de la meva interès estan en U7 i V7 a concatenar seria:

=CONCATENAR(“place point ;”,”xi ="U7,”,”,V7,”;”)

D'aquesta manera, només copio el contingut de la columna AA en un fitxer txt, que vaig a cridar puntosgeofumadas2.txt. Suggereixo que el col·loquin directament en C perquè no sigui tan difícil la ruta.

En aquest cas estic situant en els meus documents, la ruta seria: C: \ Users \ Usuari \ Documents \ puntosgeofumadas2.txt

per executar-lo, activem la finestra de línia d'ordres (key in), Això es fa des Companyies de serveis públics> key in i després vam ingressar l'ordre:

@C: \ Usuaris \ Usuari \ Documents \ puntosgeofumadas2.txt

Fem Enter, i allà el tenen, els punts dibuixats en el seu ordre. Convé tenir un gruix de línia gruix perquè es visualitzin.

Concatenar les línies.

Per això, l'operació és similar, la comanda que hem d'executar és place line, Addicionalment ocupem indicar que la línia té un punt d'origen i un de destí.

place line ;xi =374032.234,1580716.255;xi =374037.736,1580735.145;

=CONCATENAR(“place line ;”,”xi =“,U6,”,”,V6,”;”,”xi =“,U7,”,”,V7,”;”)

Copiem i enganxem a l'arxiu txt, guardem i tornem a executar

@C: \ Usuaris \ Usuari \ Documents \ puntosgeofumadas2.txt

I allà el tenen:

I un avantatge addicional, és que construir el quadre de rumbs i distàncies només requereix fer Copiar en Excel, i enganxar en Microstation. Amb l'enganxat especial es pot triar entre ser una imatge, un full de càlcul embeguda o vinculada

Per completar l'article, estic disposant l'arxiu en Excel d'exemple, En què només han de canviar el punt d'origen, rumbs i distàncies i la plantilla pot ser útil per a qualsevol iguana amb més de mitja lliura de costelles.  També aquí el txt d'exemple.

Requereix una aportació simbòlic per la descàrrega, que pots fer amb targeta de crèdit o Paypal.