|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 07.09.2012 um 14:40 Uhr (0)
Hallo zusammen,erstmal danke für die Hilfe.Nun aber das nächste Problem.Ich habe die Routine in die Routine von CADwiesel eingefügt, aber sie läuft nicht richtig. Hier die geänderte Routine:; Lisp-Programm zum Absetzen eines Textes für %o-Angabe(defun c rozenthoehe ( / ech sli li proz sel el diff L P1 P2 X1 X2 Y1 Y2 Z1 Z2 S) (setq ech (getvar "CMDECHO")) (setvar "CMDECHO" 0) (princ "") (princ "Angabe über %-Neigung einer Linie") (princ "Wert durch Ersetzen eines vorhandenen Textes absetzen") (princ "von tg ...
| | In das Form Lisp wechseln |
|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 24.09.2012 um 15:35 Uhr (0)
Zitat:Original erstellt von mueller-spies:Hallo zusammen,ich habe mal an dem Skript weiter gebastelt.nun funktioniert das Erstzen eines vorhandenen Textes nicht. Es kommt die Fehlermeldung:Fehler: Fehlerhafter Argumenttyp: lentityp nilHier das erweiterte Skrpt(defun C:steigung(/ L P1 P2 X1 X2 Y1 Y2 Z1 Z2 S proz el sel) (if(and (setq L(car(entsel "
Linie wählen: "))) (setq L(entget L)) (=(cdr(assoc 0 L))"LINE") (setq P1 (cdr(assoc 10 L))) (setq P2 (cdr(assoc 11 L))) ...
| | In das Form Lisp wechseln |
|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 24.09.2012 um 14:54 Uhr (0)
Hallo zusammen,ich habe mal an dem Skript weiter gebastelt.nun funktioniert das Erstzen eines vorhandenen Textes nicht. Es kommt die Fehlermeldung:Fehler: Fehlerhafter Argumenttyp: lentityp nilHier das erweiterte Skrpt(defun C:steigung(/ L P1 P2 X1 X2 Y1 Y2 Z1 Z2 S proz el sel) (if(and (setq L(car(entsel "
Linie wählen: "))) (setq L(entget L)) (=(cdr(assoc 0 L))"LINE") (setq P1 (cdr(assoc 10 L))) (setq P2 (cdr(assoc 11 L))) (setq X1(car P1) Y1(c ...
| | In das Form Lisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
