|
Lisp : Umstieg openDCL nach VBA
Gerd_Ecke am 21.10.2019 um 11:29 Uhr (1)
Hallo, bevor ich mit begonnen habe Funktionen mit Lisp zu erstellen ( 2006 ) hatte ich schon eine Messdateneinlese-Funktion mittels Excel-VBA erstellt.Damals war das Ziel ltPlus (eine IntelliCAD Variante). Aber damals noch ohne Dialogfenster, also vor vielen Jahren schonmal reingeschnuppert ;-)Und mit 57 will ich mich nicht in noch eine Sprache einarbeiten, mache die Programmierung nebenbei. Mein Weg war GWBASIC - TurboPascal - Delphi - (kurz VBA) - Lisp.Also weder .net noch C++.Der erste Dialog (ein ganz ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Tachymeterdaten in Autocad 2005 einfügen??
Gerd_Ecke am 10.05.2006 um 09:20 Uhr (0)
Hallo Thomasneu!Folgenden Weg würde auch ich empfehlen :- in Excel die Rechtwinkligen Koordinaten errechnen ( Gauß Krüger )- diese Punkte ins ACAD rein - gibt es sehr viele Lösungen (besonders in den Foren auf CAD.de- Karte erstellen --- färtsch (mit erstem Teil)2. Teil:- Die Textdatei mit den XYZ-Werten in ein MAP 2005 mit Civil einlesen und DGM erstellen daraus Höhenschichtlinien erzeugen.- Wenn kein Civil zur Hand mußt Du eine Vermessungssoftware nutzen um DGM zu erstellen.Die GK-Koordinaten aus den Po ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Tachymeterdaten in Autocad 2005 einfügen??
Gerd_Ecke am 10.05.2006 um 11:26 Uhr (0)
Hallo,wie schon gesagt :1. Rechtwinklige Koordinaten in Excel berechnen2. Textdatei mit ACADIN ins AutoCAD einlesen oder hier reinstellen.MfGGE------------------ACAD 2000, Map 2006, GeoCADwenig LTplus pur (ICAD)alles unter w2k
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Datenrückgabe Funktion
Gerd_Ecke am 17.10.2005 um 10:56 Uhr (0)
Hallo Mitstreiter,beginne mich ein wenig mit LISP zu beschäftigen.Erstelle eine Routine die Blöcke und Attribute in eine Textdatei schreibt.Mit folgenden Zeilen schreibe ich die XYZ werte in besagte Datei, ohne Probleme :(Princ (rtos (car (cdr (assoc 10 (entget aa)))) 2 3) Datei )(Princ "; " Datei)(Princ (rtos (cadr (cdr (assoc 10 (entget aa)))) 2 3) Datei )(Princ "; " Datei)(Princ (rtos (caddr (cdr (assoc 10 (entget aa)))) 2 3) Datei )Da aber mein Excel als dezitrenner das Komma haben will habe ich fol ...
|
| In das Form AutoLisp wechseln |