<?xml version="1.0" encoding="ISO-8859-1"?><article xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<front>
<journal-meta>
<journal-id>1991-6469</journal-id>
<journal-title><![CDATA[Revista Tecnociencia Universitaria Bolivia]]></journal-title>
<abbrev-journal-title><![CDATA[Rev tec u]]></abbrev-journal-title>
<issn>1991-6469</issn>
<publisher>
<publisher-name><![CDATA[Editorial Universitaria UAGRM]]></publisher-name>
</publisher>
</journal-meta>
<article-meta>
<article-id>S1991-64692009000200007</article-id>
<title-group>
<article-title xml:lang="es"><![CDATA[AUTOMATIZACIÓN EN EL DISEÑO DE OBRAS DE INGENIERÍA EN EL LENGUAJE DE PROGRAMACIÓN AUTOLISP]]></article-title>
</title-group>
<contrib-group>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Gutiérrez Klinsky]]></surname>
<given-names><![CDATA[Eduardo]]></given-names>
</name>
<xref ref-type="aff" rid="A07"/>
</contrib>
</contrib-group>
<aff id="A07">
<institution><![CDATA[,Universidad Autonoma Gabriel Rene Moreno Facultad de Ciencias Exactas y Tecnologia Instituto de Investigaciones Tecnologicas]]></institution>
<addr-line><![CDATA[ ]]></addr-line>
</aff>
<pub-date pub-type="pub">
<day>00</day>
<month>00</month>
<year>2009</year>
</pub-date>
<pub-date pub-type="epub">
<day>00</day>
<month>00</month>
<year>2009</year>
</pub-date>
<volume>7</volume>
<numero>7</numero>
<fpage>48</fpage>
<lpage>51</lpage>
<copyright-statement/>
<copyright-year/>
<self-uri xlink:href="http://www.scielo.br/scielo.php?script=sci_arttext&amp;pid=S1991-64692009000200007&amp;lng=en&amp;nrm=iso&amp;tlng=en"></self-uri><self-uri xlink:href="http://www.scielo.br/scielo.php?script=sci_abstract&amp;pid=S1991-64692009000200007&amp;lng=en&amp;nrm=iso&amp;tlng=en"></self-uri><self-uri xlink:href="http://www.scielo.br/scielo.php?script=sci_pdf&amp;pid=S1991-64692009000200007&amp;lng=en&amp;nrm=iso&amp;tlng=en"></self-uri><abstract abstract-type="short" xml:lang="es"><p><![CDATA[Autolisp es una poderosa herramienta para todo usuario avanzado, medio o principiante de Autocad. Este lenguaje ha sido desarrollado exclusivamente para aplicaciones de Autocad, el mismo permite la creación de nuevos comandos y la automatización de rutinas repetitivas, ahorrando así horas de tiempo en el diseño. Este trabajo presenta una introducción a la programación y personalización de comandos empleando el lenguaje gráfico nativo de Autocad y algunos ejemplos de rutinas desarrollados con el mismo en la Unidad de Postgrado de la Facultad de Tecnología (UPFT- UAGRM), estas rutinas son de uso netamente académico pero de libre distribución a los interesados.]]></p></abstract>
<abstract abstract-type="short" xml:lang="en"><p><![CDATA[Autolisp is a powerful tool for any advanced user, beginner medium Autocad. This language has been developed exclusively for Autocad applications, it allows the creation of new commands and automation of repetitive routines, saving hours of design time. This work presents an introduction to programming and customizing using graphic language commands native Autocad and some examples of the same routines developed in- UAGRM UPFT, these routines are of purely academic use but may be freely distributed to interested parties.]]></p></abstract>
<kwd-group>
<kwd lng="es"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="es"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="es"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="es"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="es"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="en"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="en"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="en"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="en"><![CDATA[INFORMÁTICA]]></kwd>
<kwd lng="en"><![CDATA[INFORMÁTICA]]></kwd>
</kwd-group>
</article-meta>
</front><body><![CDATA[  <h2 align="center">AUTOMATIZACI&Oacute;N EN EL DISE&Ntilde;O DE OBRAS DE INGENIER&Iacute;A EN EL     <br>LENGUAJE DE  PROGRAMACI&Oacute;N AUTOLISP </h2> <H5 align="right">    <BR>   Eduardo Guti&eacute;rrez Klinsky     <h6 align="right">INGENIERO CIVIL (1995) - UNIVERSIDADE FEDERAL DE SAO CARLOS    <br>     (UFSCAR). SAO PABLO, BRAZIL.    <br>     MASTER EN INGENIERIA CIVIL (1999)- UNIVERSIDADE DE SAO    <br>     PAULO (USP). ESCOLA DE ENGENHARIA DE SAO CARLOS. (EESC).    <br>     COORDINADOR ACADMICO - UNIDAD POSTGRADO DE LA FACULTAD    <br>     CIENCIAS EXACTAS Y TECNOLOGA    <br>     UNIVERSIDAD AUT&Oacute;NOMA GABRIEL RENE MORENO</H6> </h5>     <P></P>     ]]></body>
<body><![CDATA[<blockquote>   <h5>RESUMEN</h5>       <p align="justify">Autolisp es una poderosa herramienta para todo usuario avanzado, medio o principiante de Autocad. Este lenguaje ha sido desarrollado exclusivamente para aplicaciones de Autocad, el mismo permite la creaci&oacute;n de nuevos comandos y la automatizaci&oacute;n de rutinas repetitivas, ahorrando as&iacute; horas de tiempo en el dise&ntilde;o. </p>       <p align="justify">Este trabajo presenta una introducci&oacute;n a la programaci&oacute;n y personalizaci&oacute;n de comandos empleando el lenguaje gr&aacute;fico nativo de Autocad y algunos ejemplos de rutinas desarrollados con el mismo en la Unidad de Postgrado de la Facultad de Tecnolog&iacute;a (UPFT- UAGRM), estas rutinas son de uso netamente acad&eacute;mico pero de libre distribuci&oacute;n a los interesados. </p>   <h5>PALABRAS CLAVES </h5>       <p align="justify">INFORM&Aacute;TICA / LENGUAJES DE PROGRAMACI&Oacute;N / AUTOCAD / AUTOLISP / PROGRAMACI&Oacute;N DE COMPUTADOR / ALGORITMO.</p> </blockquote>     <p align="center"><img src="/img/revistas/rtc/v7n7/a07v7n7img2.png" width="700" height="6"></p>     <blockquote>   <h5 align="left">ABSTRACT</h5>       <p align="justify">Autolisp is a powerful tool for any advanced user, beginner medium Autocad. This language has been developed exclusively for Autocad applications, it allows the creation of new commands and automation of repetitive routines, saving hours of design time.</p>       <p align="justify">This work presents an introduction to programming and customizing using graphic language commands native Autocad and some examples of the same routines developed in- UAGRM UPFT, these routines are of purely academic use but may be freely distributed to interested parties. </p>   <h5 align="left">KEY WORDS</h5>       <p align="justify">INFORMTICA / PROGRAMMING LANGUAGES / AUTOCAD / AUTOLISP / COMPUTER PROGRAMMING / ALGORITHM.</p> </blockquote>     <p align="center"><img src="/img/revistas/rtc/v7n7/a07v7n7img2.png" width="700" height="6"></p> <h4 align="justify">1. PROGRAMACIN CON AUTOLISP. </h4>     ]]></body>
<body><![CDATA[<P align="justify">Cualquier usuario de Autocad puede acceder al ambiente de programaci&oacute;n desde el mismo Autocad, digitando en la barra de comandos vlisp, una vez efectuada esta operaci&oacute;n se abrir&aacute; el ambiente de programaci&oacute;n en Autolisp. En la Figura 1 se ilustra el ambiente de programaci&oacute;n Visual Lisp. </P>     <P align="justify">Para poder emplear un comando o correr una rutina creada con Autolisp es necesario que &eacute;ste sea previamente cargado, esto puede efectuarse digit&aacute;ndose en la l&iacute;nea de comandos el texto appload y seleccionando el archivo creado (*.lsp). </P>     <P align="justify">Los comandos vlisp y appload tambi&eacute;n pueden emplearse desde la barra de men&uacute; Tools>Applications de Autocat. </P>     <P align="center"><img src="/img/revistas/rtc/v7n7/a07v7n7img9.jpg" width="465" height="406"></P>     <p align="center" ><strong>Figura 1.</strong> Ambiente de Programaci&oacute;n Visual Lisp.</p>     <P align="center"><img src="/img/revistas/rtc/v7n7/a07v7n7img10.gif" width="465" height="100"></P>     <p align="center" ><strong>Figura 2. </strong>Acceso a los comandos vlisp y appload desde la    <br>   barra de men&uacute;s para Autocad 2009.</p>     <P align="justify">En la figura 2 se ilustra el acceso a estos comandos desde la barra de men&uacute;s de Autocad versi&oacute;n 2009.</P> <h4 >2. APLICATIVOS DESARROLLADOS EN LA UPFTUAGRM CON AUTOLISP.</h4>     <p align="justify" >Se presenta a continuaci&oacute;n la descripci&oacute;n breve de algunos de los aplicativos desarrollados en la UPFT-UAGRM con esta herramienta. </p> <h4 align="justify" >3. COMANDO DF.</h4>     ]]></body>
<body><![CDATA[<p align="justify" >Este comando determina y escribe la distancia de frenado en la pantalla de Autocad, seg&uacute;n la propuesta AASHTO. Para ello el usuario debe entrar en el cuadro de di&aacute;logo de la figura 3, con los par&aacute;metros de dise&ntilde;o como ser velocidad de proyecto, inclinaci&oacute;n de rampa, tiempo de reacci&oacute;n del conductor y coeficiente de fricci&oacute;n. Asimismo en el cuadro de di&aacute;logo se incorporan a manera de ayuda al usuario los valores de tiempo de reacci&oacute;n y coeficiente de fricci&oacute;n sugeridos por el reglamento AASHTO. </p>     <p align="justify" >La creaci&oacute;n de este comando permite evaluar de manera r&aacute;pida y sencilla la distancia requerida para diferentes situaciones en el dise&ntilde;o de carreteras.</p>     <p align="center" ><img src="/img/revistas/rtc/v7n7/a07v7n7img11.gif" width="250" height="378"><img src="/img/revistas/rtc/v7n7/a07v7n7img13.gif" width="22" height="21"><img src="/img/revistas/rtc/v7n7/a07v7n7img12.gif" width="120" height="80"></p>     <p align="center"><strong>Figura 3. </strong>a) Entrada de datos. b) Impresi&oacute;n de la distancia de frenado     <br>   y de los par&aacute;metros de c&aacute;lculo de la misma en pantalla Autocad.</p> <h4 align="justify">4. COMANDO LS. </h4>     <p align="justify">El comando determina la longitud de una espiral de transici&oacute;n mediante los criterios est&eacute;tico, din&aacute;mico y de tiempo, as&iacute; como la longitud deseada, recomendados por elreglamento AASHTO. Los par&aacute;metros de entrada empleados en el cuadro de di&aacute;logo son la velocidad de proyecto, superelevaci&oacute;n en la curva, radio de la curva, &aacute;ngulo de deflexi&oacute;n y ancho de carril. Una vez ingresados estos datos, el programa imprimir&aacute; en la pantalla de Autocad las longitudes de espiral calculadas a trav&eacute;s de cada uno de los criterios citados anteriormente. </p>     <p align="center"><img src="/img/revistas/rtc/v7n7/a07v7n7img14.gif" width="310" height="201"> <img src="/img/revistas/rtc/v7n7/a07v7n7img15.gif" width="200" height="302"></p>     <p align="center" ><strong>Figura 4. </strong>a) Entrada de datos. b) Impresi&oacute;n de la longitud de     <br>   espiral para cada criterio y de los par&aacute;metros de c&aacute;lculo    en pantallade Autocad.</p>     <p align="justify" >En la figura 4 se ilustra la entrada de datos y la impresi&oacute;n de resultados en pantalla. </p> <h4 align="justify" >5. COMANDO VEQUI. </h4>     ]]></body>
<body><![CDATA[<p align="justify" >Este comando efecta la verificaci&oacute;n de tensiones que surgen en una zapata medianera por la acci&oacute;n de una viga de equilibrio. El programa verifica las tensiones transmitidas al suelo tanto en la zapata de medianer&iacute;a como en la zapata interior. Asimismo este programa cuenta con la opci&oacute;n de optimizaci&oacute;n de las dimensiones de las zapatas introducidas de manera a reducir las mismas en caso de que estas se encuentren sobredimensionadas. En la figura 5 se ilustra la entrada de datos para el an&aacute;lisis de las zapatas y c&aacute;lculo de esfuerzos en la viga de equilibrio, asimismo se muestra el diseo de las zapatas y viga de equilibrio en planta y perfil, efectuado por el programa a partir de los datos introducidos.</p>     <p align="center" ><img src="/img/revistas/rtc/v7n7/a07v7n7img16.gif" width="250" height="433"></p>     <p align="center" ><strong>Figura 5. </strong>a) Entrada de Datos para An&aacute;lisis de Zapatas.</p> <h4 align="justify" >6. CONCLUSIONES. </h4>     <p align="justify" >Autocad es un programa muy difundido hoy en d&iacute;a en el medio t&eacute;cnico para elaboraci&oacute;n de proyectos en diversas &aacute;reas de la ingenier&iacute;a. Se ha presentado en este trabajo el lenguaje de programaci&oacute;n Autolisp, el cual permite crear nuevos comandos de Autocad de acuerdo a la necesidad del &aacute;rea de ingenier&iacute;a en la cual se est&eacute; trabajando, consiguindose de esta manera la optimizaci&oacute;n en los tiempos de elaboraci&oacute;n de proyectos lo cual se traduce en una mayor productividad. </p>     <p align="center" ><img src="/img/revistas/rtc/v7n7/a07v7n7img17.gif" width="200" height="275"></p>     <p align="center" ><strong>Figura 5. </strong>b) Entrada de Datos para An&aacute;lisis de Zapatas.</p>     <p align="center" >&nbsp;</p> <h4 align="justify" >BIBLIOGRAF&Iacute;A.</h4> <ul>   <LI >AUTOCAD. Manual del Usuario. Audodesk 2009. </LI>   <LI > MOR&Aacute;N ABEL Programaci&oacute;n con AutoLisp Per&uacute; - Lima, Macro, 2002. </LI>     </ul> <h4 align="justify" >E-BIBLIOGRAF&Iacute;A.</h4>     <P align="justify">http://people.senecac.on.ca/michael.lam.AutoLisp_MLAM.htm </P>     <P align="justify">www.cadalyst.com </P>     ]]></body>
<body><![CDATA[ ]]></body><back>
<ref-list>
<ref id="B1">
<label>1.</label><nlm-citation citation-type="">
<article-title xml:lang="es"><![CDATA[AUTOCAD: Manual del Usuario. Audodesk 2009]]></article-title>
<source><![CDATA[]]></source>
<year></year>
</nlm-citation>
</ref>
<ref id="B2">
<label>2.</label><nlm-citation citation-type="">
<person-group person-group-type="author">
<name>
<surname><![CDATA[MORÁN]]></surname>
<given-names><![CDATA[ABEL]]></given-names>
</name>
</person-group>
<article-title xml:lang="es"><![CDATA[Programación con AutoLisp]]></article-title>
<source><![CDATA[]]></source>
<year></year>
</nlm-citation>
</ref>
<ref id="B3">
<label>3.</label><nlm-citation citation-type="">
<source><![CDATA[]]></source>
<year></year>
</nlm-citation>
</ref>
<ref id="B4">
<label>4.</label><nlm-citation citation-type="">
<source><![CDATA[]]></source>
<year></year>
</nlm-citation>
</ref>
</ref-list>
</back>
</article>
