Antes vimos como se genera una malla de cuadrantes catastrales, ahora veamos como hacer la cuadrícula de coordenadas con una aplicación CAD… sí, eso que ArcView y Manifold hacen bien fácil. También con AutoCAD se puede hacer usando CivilCAD.
En este caso veremos como hacerlo con Microstation Geographics, cosa que muchos usuarios no saben que el sistema hace; advertencia, esto no lo hace Microstation normal.
1. Debe tener un sistema de proyección asignada.
Para ver como se asigna o cambia la proyección puedes ve el post anterior.
2. Definiendo el Cuadrante
En mi caso tengo este mapa, ya he creado el cuadrante, tal como lo analizamos en el post dedicado a ello.
3. Los botones principales de configuración
Para activar el panel de configurar la malla, seleccionamos tools / coordinate system / utilities. luego activamos el primer ícono (grid generation parameters).
Aquí se configuran las características que se desean, veamos los botones principales, estos pueden ser cambiados en cualquier momento del proceso:
El marco. Esto se hace con el ícono superior «Neat Line» Neat line sirve para encuadrar
Ref=Lat/long. Esto es porque en el sistema de coordenadas de referencia lo habilité
Ref=Master. Estas son las coordenadas que están como primarias, también se configuran tal como lo explicamos en aquel post.
Generate. Este botón es para generar la cuadrícula, recomiendo que lo uses hasta que hayas configurado las características.
En la sección llamada «Components» se puede activar o desactivar las etiquetas que se desea configurar o inactivar
La opción «Deltas» es para definir si la cuadrícula será en base a una distancia definida (por ejemplo una malla UTM de 1000 x 1000 mts.) o una malla cada 30 segundos.
La opción Increments, se usa para definir si la malla irá a partir de múltiplos de la cuadrícula o a partir de la esquina inferior izquierda del cuadrante (origin)
En Appearance se puede definir si los elementos generados irán por una simbología del level o por atributos (features) de el proyecto de Geographics.
4. Las otras configuraciones son una práctica… no a prueba y error pero sí a gusto de lo que se guiere generar al final. En esto ArcView y Manifold le ganan a cualquier herramienta CAD, pero ni modo es lo que hace Microstation Geographics V8.
Cut Line. Sirve para configurar el marco que corta
Grid Frame. Para configurar la malla
Labels. Para definir los textos, si se desea las coordenadas en las esquinas (NL Corner), en los bordes de la cuadrícula (Grid Line), En las crucetas de las intersecciones de la cuadrícula (Tick Marck), tamaños de texto, estilos, decimales, formato de grados… bla, bla, bla
Neat line. Para indicar el marco que define la malla y que contiene la zona a cuadricular: es recomendable elegir la opción 4 puntos pues no es un rectángulo excacto.
La cuadrícula. Estas se configuran con las siguientes plantillas; Grid lines para definir la simbología de la cuadrícula, Cross Ticks para las crucetas de intersección, Tick Marks para las líneas de los bordes.
Cuando ya se tiene todo definido, se aplica «Generate», todos los elementos son vectoriales y quedan almacenados en los niveles (layers) configurados, si se generan de nuevo se reemplazan.
Finalmente el mapa queda así, aunque lo admito, hay otras formas de ipresionar con un mapa. El borde exterior no es formado en este proceso, ese puede generarse como una célula o bien como un layout (models)
HABLEN EN BLANCO HAY VARIOS PATAS QUE NO ENTIENDEN YO QUIERO EL LISP , EL PROGRAMA YA BAJADO PARA GENERAR GRILLAS OK? ME HARIAN EL FAVOR…..GRACIAS
ME INTERESARIA SABER SOBRE EL MANEJO DE CIVILCAD… SALUDOS!!!
Hola, me podrian explicar como se hace? Lo e intentado cargando eso con appload pero a mi no me sale, alguien q me lo pueda explicar? se lo agradeceria, me hace mucha falta para mi trabajo.
Gracias y saludos
el lisp funciona para autocad 2010…..como
En AutoCAD la cuadricula la haces con una rutina lisp, yo la uso hace más de 10 años
Acá está:
(defun strpto (aa / largo)
(setq largo (strlen aa))
(cond ((= x minX))
(setq l (append l (list x)))
)
(setq lista (cdr lista))
)
(list (min (car l)(cadr l)) (max (car l)(cadr l)))
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; Interseccion dada la cordenada X
;;
(Defun CalculaY (a b c x)
(if (= 0.0 b) ; no hay interseccion
nil
(/ (- c (* a x)) b)
)
)
(Defun IntersecY ( / l lista)
(setq l ()
lista (list (CalculaY a1 b1 c1 startX) (CalculaY a2 b2 c2 startX)
(CalculaY a3 b3 c3 startX) (CalculaY a4 b4 c4 startX)
)
)
(while (/= lista nil)
(setq y (car lista))
(if (and (/= y nil) (= y minY))
(setq l (append l (list y)))
)
(setq lista (cdr lista))
)
(list (min (car l)(cadr l)) (max (car l)(cadr l)))
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; Programa principal
;;
(Defun c:cuadri (/ p1 p2 p3 p4 paux incx incy l h n maldato base
alfa startX startY minX minY maxX maxY)
(setvar «CMDECHO» 0)
(command «LAYER» «M» «cuadriculado» «C» «8» «»»»)
(setq p1 (getpoint «\nIngrese un vertice de la region «)
p2 (getpoint p1 «\nIngrese el otro vertice «)
)
(command «LINE» p1 p2 «»)
(if (> (cadr p1)(cadr p2)) ; siempre el p1 abajo
(setq paux p1 p1 p2 p2 paux)
)
(setq p3 (getpoint p1 «\nIngrese punto para Ancho de la region «)
l (distance p1 p3) ; calculo de puntos p3 y p4 , paralelos
alfa (angle p1 p2) ; a p1 y p2 a distancia l
alfa (+ (/ pi 2) alfa)
)
(if (> (car p3) (car p1))
(setq alfa (+ pi alfa))
)
(if (= (car p1) (car p3))
(if ( (- maxY startY) (* 2 alto))
(command «TEXT» (list (+ x1 dl) (+ startY dh)) alto 0 coordY)
(command «TEXT» «R» (list (- x2 dl) (+ startY dh)) alto 0 coordY)
)
)
(setq startY (+ startY incy))
)
(while ( (- startX minX) (* 2 alto))
(command «TEXT» (list (- startX dh) (+ y1 dl)) alto 100 coordX)
(command «TEXT» «R» (list (- startX dh) (- y2 dl)) alto 100 coordX)
)
)
(setq startX (+ startX incx))
)
(if (> (distance p1 p3) (distance p1 p2))
(setq alfa angP1P3)
(setq alfa angP1P2)
)
(if (or (/= alfa pi) (/= alfa 0.0))
(setq alfarad (* -1 alfa)
alfa (* -1 (/ (* 180 alfa) pi))
p4 (list (- (* (car p4)(cos alfarad)) (* (cadr p4) (sin alfarad)))
(+ (* (car p4)(sin alfarad)) (* (cadr p4) (cos alfarad)))
)
p1 (list (- (* (car p1)(cos alfarad)) (* (cadr p1)(sin alfarad)))
(+ (* (car p1)(sin alfarad)) (* (cadr p1)(cos alfarad)))
)
base (list 0.0 0.0) ; el origen
)
)
)
Hola
Oye, la cuadrícula la generas en modelo y luego la pegas en espacio papel?.
Te lo digo porque estoy utilizando la herramienta de «print preparation» y me gustaría meterle una neat-line por defecto en la plantilla que me inserta, y que sólo tuviese que darle al boton generate.
Problemas que me surgen, cómo puedo hacer para que las coordenadas del «espacio papel» sean las del modelo?
Gracias
Jejejej gracias de todos modos
jeje ya me metí a problemas.
Porque yo asumo que Microstation Geographics es un equivalente de AutoCAD Map supongo que se puede.
Voy a descargar la versión trial y les cuento si se puede o no.
La verdad es que yo tambien me he quedado intrigado, esto mismo se puede hacer con el Map?
Autocad Civil 3D 2008 incluye a Autocad Map, ¿podrias explicar como se hace?
Con autoCAD Civil 3D no, porque para esto se ocupa que el programa maneje sistema de proyecciónes. Pero sí con AutoCAD Map 3D se puede hacer algo similar.
Se podrá hacer con Civil 3D de AutoCAD 2009, supongo porque este inclusive permite conectarse a Google Earth, por lo que se supone que soporta proyecciones.
Existe alguna posibilidad parecida en autocad civil?