01. Como crear un Lisp con Chat GPT para Autocad o Civil 3D desde cero

Este es el primero de una serie de Videos que voy a subir tratando el tema de Chat GPT.
En este video te enseño desde cero como crear un lisp para Autocad que sume las longitudes de líneas y polilíneas utilizando Chat GPT.
Totalmente "GRATIS".
Link chat GPT: chat.openai.com/
Enlace a contenido exclusivo en Patreon:
/ javilapina
Donaciones
www.paypal.com...
Grupo de telegram:
t.me/autocad_t...
suscribete a mi canal / @javilapina
Me puedes seguir twitter:
/ javilapina
#ChatGPT #Lisp #autocad

[@javiLapina]

Link chat GPT: chat.openai.com/

[@armandohernandez4356]

Excelente sigue con más videos sobre este tema interesante. Gracias

[@javiLapina]

Gracias... Tienes otros 2 más no sé si los viste..??

[@angelsierra2197]

Buenas tardes Javi, gracias por tus aportes porque nos lo pones un poco mas facil

[@javiLapina]

Gracias a ti por comentar 👍

[@danielgonzaga1826]

GRACIAS, POR EL VIDEO. ESTO ES EL FUEGO DE PROMETEO, ES EL INICIO DE UNA NUEVA "REVOLUCIÓN INDUSTRIAL"

[@javiLapina]

Si.... correcto

[@edherrevideos]

O el fin del mundo...🧟‍♂️👹☠️

[@javiLapina]

Esperemos que no..... jejeje

[@fgarcial15]

😅Un saludo Javi. Yo empecé con AutoCAD en el año 1986 y a programar en AutoLips a finales de los años 90. Imagínate el trabajo que nos llevaba y ahora la IA lo hace en segundos. En squellos años era una revolución dibujar con ordensdor y shora la IA es otra revolucion.

[@javiLapina]

Si...si, cuánta razón tienes.

[@israelbarberena7518]

Excelente video, atento a los que subas de Dynamo, saludos desde Nicaragua

[@javiLapina]

Gracias por comentar

[@norbertoagustindelgadopino1653]

Genial. Muchas gracias por compartir...

[@javiLapina]

Gracias a ti por comentar

[@edherrevideos]

Excelenteeee video. Gracias.

[@javiLapina]

Gracias

[@Chicleturiaga]

Muchas gracias Javier. Un saludo

[@javiLapina]

Un abrazo

[@clintonmalpartidaperez9327]

Excelente

[@carlosandresdiazsarria6030]

Gracias por los aportes

[@javiLapina]

No hay de que

[@oscarselfaiperona7920]

Fantástico! falta pedirle que inserte un texto o una tabla con la suma

[@javiLapina]

Si...si puede ser otra ampliación de codigo. Un fuerte abrazo Óscar 😜

[@junasiul]

Gracias Javi

[@javiLapina]

A ti por comentar

[@MrMarjav]

¡¡MUY BUENO EL VIDEO!! Javi Tenes una banda de datos para obtener la distancia acumulada inclinada de una línea o rasante en cada quiebre?

[@javiLapina]

Creo que no, pero revisaré mis lisp

[@candidomigallon3983]

Buenisimo

[@javiLapina]

Gracias Cándido 🤜🤛

[@cristianhq7627]

Saludos amigo javi, consulta si el chato GPT puede realizar Lips, también puede realizar Macros de Exel y hacer que funcione con el Autocad

[@javiLapina]

Si puedes pedirle código en Visual Basic y meterlo en Excel, incluso VBA para AutoCAD

[@andresfures]

que genial , esto necesitaba, como le hablarías para que modifique un codigo lisp ya escrito? , es muy sencillo tengo un LISP que me hace polilineas en 2D con respecto a puntos X,Y pero quiero la poliliena en 3D osea que la cree en X,Y,Z ...como le preguntarías?

[@javiLapina]

Tengo un código que funciona perfecto, pero necesito hacer una modificación para que la entidad obtenida en vez de ser una polilinea 2D sea una 3Dpol... Podría ser algo asi

[@carlosandresdiazsarria6030]

Estaremos esperando los videos nuevos

[@javiLapina]

Gracias por comentar 👍

[@DanteAcevedo]

😮😮

[@javiLapina]

😵‍💫

[@habilidadesyconocimientos]

Buen aporte, Se podra generar un Lips, que me pueda votar las coordenadas X,Y al seleccionar blocks reference?

[@javiLapina]

Creo que sí, no lo veo complicado....

[@diegosegura7290]

hola javi, tengo un lisp que me triangula y me hace curvas pero no me funciona en zwcad pero si en autocad me podrias ayudar?

[@javiLapina]

No tengo ni utilizo ZWcad los siento...

[@dagobertoantonioalbornozra5068]

Quiero hacer un lisp con chat gpt que deje a todos los bloques con layer 0 en su interior. No me ha resultado aún tratando de que lo haga con uno solo bloque. Tienes alguna sugerencia?... Muchas gracias por el tutorial y saludos

[@javiLapina]

mira este link de Lee Mac que tiene un lisp que resuelve tu problema lee-mac.com/applytoblockobjects.html

[@osomania4196]

javi tengo un lisp que solo me funciona en versiones de cad 2012 o inferior y solo en win xp o win 7. me podrias ayudar para que funcione en versiones actuales. Gracias de ante mano

[@javiLapina]

Hola, si el lisp no está compilado le puedo echar un ojo.... Envíamelo a [e-mail]

[@duover1]

Trato de convertir una línea o polilínea en 2d dibujada en planta y aplicando un ángulo de inclinación al eje Z en el inicio dibuje en 3d . Pero no hay manera. Un saludo

[@javiLapina]

No todo se puede hacer y a veces ni la IA puede ... Paciencia y práctica en esto casos

[@duover1]

ok y Felicitarte por tus aportes de calidad y prácticos, en mi caso Autocad

[@javiLapina]

Muchas gracias 👍

[@camilodiazmallea9257]

Intente que hiciera un lisp para cambiar el nombre de las capas, cierto texto de una o varias capas modificarlo por otro y no lo logró u.u

[@javiLapina]

Paciencia y si tienes algún ejemplo que mostrar a GPT mucho mejor

[@egg6666]

la IA no le va a quitar el trabajo a nadie, solo quienes aprendan a usarla y controlarla, esos si

[@javiLapina]

en nuestra profesión... esta todavía un poco lejos que una IA te quite el puesto, pero eso si, siempre tenemos que estar formándonos para intentar estar lo mejor preparados y que nada nos pille por sorpresa.

[@broderyon]

Magia negra...

[@javiLapina]

Jajajajaja

[@ALDUCRA25]

Wau, nada somos ❓❓❓😭, los Marcianos llegaron ya, y llegaron con Gpt 😂😂

[@javiLapina]

Jajjajaja

[@TheOskkk4]

ya antes habia intentado hacer un lisp para convertir lineas y polilineas a 3d polilinea, y no pude, ahora con tu asesoria volvi a intentar y no me da, me da esto: (defun c:Convertir3D () (setq entidades (ssget '((0 . "LINE, LWPOLYLINE")))) (if entidades (progn (setq total-entidades (sslength entidades)) (setq i 0) (while (< i total-entidades) (setq entidad (ssname entidades i)) (if (and (entget entidad) (or (= (cdr (assoc 0 (entget entidad))) "LINE") (= (cdr (assoc 0 (entget entidad))) "LWPOLYLINE"))) (progn ; Obtener puntos de la entidad (setq puntos (entget entidad)) (setq j 0) (setq lista-puntos '()) (while (< j (length puntos)) (setq punto (cdr (assoc 10 puntos))) (if punto (setq lista-puntos (append lista-puntos (list punto)))) (setq j (+ j 1)) (setq puntos (cdr puntos))) ; Crear una nueva 3DPOLY con los puntos (command "_3DPOLY" lista-puntos "") (entdel entidad))) (setq i (1+ i))) (princ " Conversion completada.")) (princ " No se encontraron entidades seleccionadas.")) (princ) ) (princ) y no me deja seleccionar polilinea, nada mas linea, pero no la convierte, la borra y no convierte nada.

[@javiLapina]

Es un poco complejo... Pero un buen ejemplo a ver si se puede hacer, le daré una vuelta....

[@edherrevideos]

Excelenteeee video. Gracias.

[@javiLapina]

No hay de que