|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
xem am 14.01.2009 um 12:00 Uhr (0)
Zitat:Original erstellt von Dorfy:ach nö, vlideF1Reiter Inhalt AutoLISP Reference AutoLISP Functions C Functions Cond... so.mfg heikoIch weiß - kann den Teil der Hilfe aber nicht öffnen.Internet Explorer-SkriptfehlerblablablaJA/Nein und das wars.
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
tunnelbauer am 14.01.2009 um 12:09 Uhr (0)
http://support.microsoft.com/kb/902225/ Kam hier (auf cad.de) aber auch schon 100x vor...------------------GrüsseThomasKorrekturen zum Kochbuch AutoLISP
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
Dorfy am 14.01.2009 um 12:19 Uhr (0)
ne necondmfg heiko
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
CADmium am 14.01.2009 um 12:27 Uhr (0)
Warum sichert ihr eure Progs eigentlich nicht minimal gegen abkacken wegen fehlerhafter Usereingaben ab ?z.B. so : (ungetestet nur in den Editor geschrieben..)(defun c:bel (/ corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing) (if(and(or(setq corner1 (getpoint "
Erste Ecke angeben: ")) (prompt "
Ungültiger 1. Punkt") ) (or(setq corner2 (getpoint "
Zweite Ecke angeben: ")) (prompt "
Ungültiger 2. Punkt") ) (or(and(setq columns (getint "
Anzahl wagerecht: ")) ...
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Layereigenschaften auf Zeichnungselemente
ChristianV am 14.01.2009 um 18:37 Uhr (0)
Halloich habe in diesem Forum eine alte LISP Anwendung (siehe Anhang) gefunden, welche mein Problem (siehe Betreff) fast löst. Leider überträgt die Routine, welche ab Zeile 390 abläuft die Layerinfos auf alle Elemente. Ich möchte jedoch nur diejenigen überschreiben, welche den Defaultwert vonLayer gesetzt haben. Kann mir jemand mitteilen, wie ich die LISP anpassen muss?Vielen Dank.
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
Attilio am 15.01.2009 um 16:31 Uhr (0)
Geiles Programm, funktioniert !Ist es möglich, da noch irgendwo ne Abfrage einzubauen welcher Block eingefügt werden soll ?Jetzt wird ja immer der "E-Beleuchtung" gesetzt, cool wäre aber wenn ich auf ein Symbol klicken kann, welches dann vom Programm genommen wird.Ich kann auch ohne diese Funktion leben, aber wär halt schöner :-)Gruss Attilio
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
Dorfy am 15.01.2009 um 16:39 Uhr (0)
hi,siehe weiter ober bei Dober Heinz...diese Zeile musst du geschickt in CADmium sein Zeilen einbauen...(setq Blockn......(command "_insert" Blockn ...versuch es mal ist garnet so schwer...mfg heiko[Diese Nachricht wurde von Dorfy am 15. Jan. 2009 editiert.]
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
xem am 14.01.2009 um 10:15 Uhr (0)
Hallo,ich habe hier ein sehr schönes Lisp, was auch ganz gut funzt.(defun c:bel (/ corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing)(setq corner1 (getpoint "erste Ecke angeben: ")corner2 (getpoint "zweite Ecke angeben: ")columns (getint "Anzahl wagerecht: ")rows (getint "Anzahl senkrecht: ")roomwidth (abs (- (car corner1) (car corner2)))roomheight (abs (- (cadr corner1) (cadr corner2)))colspacing (/ roomwidth columns)rowspacing (/ roomheight rows)lowerleft(list(min (car corner1) (car ...
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
tunnelbauer am 14.01.2009 um 10:20 Uhr (0)
Du weist aber schon wie der Befehl ansich funktioniert und was die "1" bewirkt?Die "1" besagt nämlich, dass es keine Reihen oder Spalten gibt, sondern alles in dieser einen Reihe/Spalte stattfndet. Und wie willst du den Abstand zwischen 1 (einem) Objekt ermitteln? Da gibt es keinen...Wenn du das Ereignis (=1) abfangen willst müsstest du mit "(cond" arbeiten...------------------GrüsseThomasKorrekturen zum Kochbuch AutoLISP
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
xem am 14.01.2009 um 10:36 Uhr (0)
Habe gerade gesehen das die Abstände richtig berechnet werden. Das mit der Variablen rows2 ist also quatsch.Bleibt das Problem mit der 1 Zitat:Original erstellt von tunnelbauer:Wenn du das Ereignis (=1) abfangen willst müsstest du mit "(cond" arbeiten...Danke tunnelbauer - aber wie soll es denn aussehen mit "(cond"
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
Dober Heinz am 14.01.2009 um 10:44 Uhr (0)
Hallo XEMHier habe ich was.(defun c:raum (/ Blockn corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing)(setq Blockn (getstring "Blockname? "))(setq corner1 (getpoint "erste Ecke im Raum: ")corner2 (getpoint "gegenüber liegende Ecke: ")columns (getint "Anzahl X Richtung: ")rows (getint "Anzahl Y Richtung: ")roomwidth (abs (- (car corner1) (car corner2)))roomheight (abs (- (cadr corner1) (cadr corner2)))colspacing (/ roomwidth columns)rowspacing (/ roomheight rows)lowerleft(list(min (car ...
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
tunnelbauer am 14.01.2009 um 10:50 Uhr (0)
@Dober:Das ist die Hälte der Miete; Was ist jetzt nämlich bei columns = 1?------------------GrüsseThomasKorrekturen zum Kochbuch AutoLISP
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block einfügen mit LISP und Wert 1
Dorfy am 15.01.2009 um 17:09 Uhr (0)
auf die schnelle so...(defun c:bel (/ blockn corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing ) (if (and (or (tblobjname "BLOCK" (setq blockn (getstring "
Blockname eingeben?: ")) ) (prompt (strcat "
BLOCK : " blockn " nicht gefunden!!")) ) (or (setq corner1 (getpoint "
Erste Ecke angeben: ")) (prompt "
Ungültiger 1. Punkt") ) (or (setq corner2 (getpoint "
Zweite Ecke angeben: ")) (prompt "
Ungültiger 2. Punkt") ) (or (and (setq ...
|
In das Form Rund um AutoCAD wechseln |