Resultados 1 al 2 de 2

Tema: Sugerencias de autolisp

  1. #1
    Usuario Nuevo
    Fecha de ingreso
    May 2015
    Mensajes
    1
    Gracias (Dadas)
    1
    Gracias (Recibidas)
    0

    Post Ayuda de autolisp

    Estoy elaborando un programa para estrechar una línea con la longitud que al principio se pide. Esto es desde el mouse doy dos puntos y el programa estrechara estos dos puntos y dibujara una línea. Este es mi programa inicial.
    (DEFUn C:LD (/ P1 P2 N P1X P2X P3X P1Y P2Y P3Y).
    (setq N (getreal \nLONGITUD DE DESARROLLO? )) ;PARA PeDIR La LONGITUD DE DESARROLLO
    (SETQ P1 (GETPOINT PUNTO 1:"))
    (SETQ P1X (CAR P1))
    (SETQ P1Y (CADR P1))
    (SETQ P2 (GETPOINT PUNTO 2:"))
    (SETQ P2X (CAR P2))
    (SETQ P2Y (CADR P2)).
    (COMAND LINE P1 P2 )
    (COMAND ID P1)
    (COMAND ID P2)
    ;(COMAND WRITE P1X)
    ;(COMAND WRITE P2Y)
    ).

    La idea es que el p1 y p2 al momento de dibujarse sean la suma de los puntos más la longitud de desarrollo de cada lado ejemplo:
    longitud de desarrollo igual a 35cm, con el mouse doy el primer y segundo punto, a esa longitud le tengo que sumar de cada lado los 35cm de la longitud de desarrollo y el programa dibuje en sentido que se dieron los puntos la línea correspondiente a la suma total.
    gracias espero me puedan ayudar, saludos

  2. #2
    Administrador y fundador. Avatar de 3dpoder
    Fecha de ingreso
    Apr 2002
    Mensajes
    18,636
    Gracias (Dadas)
    1894
    Gracias (Recibidas)
    4374

    Thumbs up Ayuda de autolisp

    Hola pixaeiro y bienvenido a foro3d, esperamos que sea de su agrado. A continuación, le ruego que lea estas líneas, respetarlas, hará que el foro sea útil y agradable.
    * Si no está familiarizado con el funcionamiento del foro, use la barra de herramientas.
    * Antes de realizar una pregunta, use el buscador del foro, puede que esto resuelva sus dudas de forma rápida, en caso contrario, por favor haga la pregunta.
    * Publicar el mensaje en la sección correcta le reportará respuesta rápida, en el menú superior tiene la opción Preguntar sobre".
    * Intente escribir un título descriptivo de su mensaje y escriba de forma correcta en español.
    * Cuando suba un trabajo al foro, sea imagen, animación o cualquier otro archivo, use la opción Adjuntar o insertar imagen, no utilice servidores externos al foro, la barra de herramientas superior que aparece cuando está publicado un mensaje, le proporciona todo lo que necesita, sólo pase el ratón sobre los iconos y aparecerá la descripción. Gracias por leer estas indicaciones, póngase cómodo y disfrute del foro, está en su casa.
    Si tienes activado Adblock o alguno similar en este sitio, te estás perdiendo muchas cosas interesantes. Puedes desactivarlo para foro3d.com como te muestro en este enlace

    |Agradecer cuando alguien te ayuda es de ser agradecido|

  3. Gracias control Agradece este post

Temas similares

  1. AutoCAD Pasar programa de variables en Visual Basic a AutoLisp
    Por Emilio Perez en el foro Modelado
    Respuestas: 3
    : 03-04-2020, 14:09
  2. Autolisp para export objectos a oracle
    Por pedrojoseruiz en el foro Programación y Scripts
    Respuestas: 0
    : 04-02-2019, 16:18
  3. Cómo dividir 2 ángulos a la mitad en autolisp
    Por jes2008 en el foro Programas de Diseño gráfico y CAD
    Respuestas: 0
    : 02-04-2008, 06:14
  4. Sugerencias con autolisp
    Por ing_ldc en el foro Programas de Diseño gráfico y CAD
    Respuestas: 10
    : 02-02-2006, 23:18
  5. Una de autolisp
    Por Gepetto en el foro Programas de Diseño gráfico y CAD
    Respuestas: 17
    : 15-10-2005, 09:14