| |
![](https://ww3.cad.de/php/image.php?resolution=width:20050) | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Linie aus Funktion y=f(x) erstellen (564 mal gelesen)
|
Carsten Storm Mitglied
![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Carsten Storm](/foren/ubb/pmimages/gbu.gif) Beiträge: 50 Registriert: 21.09.2006 AutoCAD 2015 Win 7
|
erstellt am: 21. Sep. 2006 13:39 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Guten Tag, habe eine Funktion f(x), die ja einen entsprechenden Graphen bildet, in der x^(1/n), x^n (also Wurzeln bzw. Potenzen) und Arcostangens(x) und Ähnliches vorkommt, und möchte daraus in AutoCAD 2005 eine 2D-Linie (Polylinie, Kante oder wie auch immer) bzw. 3D-Linie generieren. Wie macht man sowas? Danke sehr für weiterführende Antworten!! Carsten Storm Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
deepspeed Ehrenmitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für deepspeed](/foren/ubb/pmimages/gbu.gif) Beiträge: 1575 Registriert: 28.06.2004
|
erstellt am: 21. Sep. 2006 14:06 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
in excel in spalte 1 die x-werte in spalte 2 die ergebnisse. abspeichern als .csv (mit Trennzeichen). dann musst die datei nur nochmal mit dem editor öffnen und die simikolons durch kommata ersetzen und als .scr abspeichern. in acad nimmst du den befehl linie und dann unter EXTRAS/ SKRIPT AUSFÜHREN dann sollte das laufen ------------------ Gruß DEEPSPEED ------------------------------------------------ www.caddesign-online.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
captainfritz Mitglied Bauingenieur/Wasserbau
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für captainfritz](/foren/ubb/pmimages/gbu.gif) Beiträge: 270 Registriert: 07.05.2004 AutoCAD 2005/2006/2007 Map, AutoTerrain, bbsoft, Geotools, Windows XP
|
erstellt am: 21. Sep. 2006 15:37 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
|
Clayton Ehrenmitglied Konstrukteur
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Clayton](/foren/ubb/pmimages/gbu.gif) Beiträge: 1632 Registriert: 07.02.2004 AMD Athlon 64X2 5600+, 1GB, Nvidia Quadro Pro FX 1100 Inventor Series 10 Mathcad 13
|
erstellt am: 21. Sep. 2006 15:50 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
Hi, Oder verwende die Excelfunktion "CONCATENATE". Ich hab ein Beispiel angehaengt. Die "G"-Kolonne ueber die Zwischenablage in einen Texteditor und als *.scr speichern. "_pline" kann natuerlich in einen anderen, passenden Befehl umgeaendert werden. Man spart sich dadurch den Umweg ueber *.csv. Gruss [Diese Nachricht wurde von Clayton am 21. Sep. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Werner-Maahs.de Mitglied CAD-Dozent + Konstrukteur + Autor
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Werner-Maahs.de](/foren/ubb/pmimages/gbu.gif) Beiträge: 626 Registriert: 04.05.2005 Win XP AC 2005/6 AC 2013
|
erstellt am: 23. Sep. 2006 17:26 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
Oder, wenn Du Dich mit Lisp auskennst, z.B. so etwas Code: (defun yfx ( / x y) (setq x 1) (command "Linie" '(0 0)) (while (< x 10) (setq y (sqrt x)) (command "Linie" (list x y)) (setq x (+ x 1)) (command "") )
Soll keine professionelle Lösung sein, nur eine Idee, wie man es machen könnte. Hier mit Y = Wurzel von X Habe die Eingaben mangels Programm nicht testen können, sollte aber laufen. ------------------ strukturiertes Zeichnen mit www.Werner-Maahs.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
![](/foren/avatars/CAD-Huebner.gif)
![Schreiben Sie einen Gästebucheintrag für CAD-Huebner](/foren/ubb/pmimages/gbu.gif) Beiträge: 9795 Registriert: 01.12.2003 AutoCAD 2.5 - 2025, Civil 3D, MAP 3D, ACADM, ACA Inventor Prof. 2025, AIP 4-2025 Win 11
|
erstellt am: 23. Sep. 2006 20:38 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
@Werner - ich hab den Code mal korrigiert, damit er überhaupt funktioniert: Zitat:
(defun C:yfx ( / x y) (setq x 1) (command "Linie" '(0 0)) (while (< x 10) (setq y (sqrt x)) (command (list x y)) (setq x (+ x 1)) ) (command "") )
Anbei noch mal ein einfaches Programm von mir zum Erstellen von Funktionsplots Zitat:
Funktionsplot beliebiger Funktionen ; Udo Hübner 20.04.2001 ;(DEFUN C:FVONX ( / os Xa Xe X inc) ; es wird eine LISP-FUNKTION namens ; FUNKTION aufgerufen, die das Argument x bekommt und y zurückgibt ; gezeichnet wird aus den Punkten eine Polylinie, die später in einen SPLINE verwandelt werden kann. (SETVAR "CMDECHO" 0) (if (< (SETQ os (GETVAR "OSMODE")) 16384) (SETVAR "OSMODE" (+ os 16384)) ) (INITGET 1); keine Leereingaben erlaubt (SETQ Xa (GETREAL "\nXa Startwert:")) (INITGET 1); keine Leereingaben erlaubt (WHILE (<= (SETQ Xe (GETREAL "\nXe Endwertwert:")) Xa) (PROMPT "\nEndwert muss größer als Startwert sein !") ) (INITGET 7) ; keine Leereingaben, oder Null oder neg. Eingaben erlaubt (SETQ inc (GETREAL "\nInkrement (Zuwachs):")) (SETQ X Xa) (COMMAND "_PLINE") (WHILE (<= X Xe) ; Hauptschleife (COMMAND (PRINT (LIST x (Funktion x)))) (SETQ X (+ X inc)) ) (COMMAND "") (SETVAR "OSMODE" os) (SETVAR "CMDECHO" 1) (PRIN1) ) ; Hier benutzerdefinierte Funktion definieren (DEFUN Funktion (x) ; SIN (X) (sin x) ; y = sin(x) ; oder ;(* 0.02 (EXPT x 3)) ; 1/50 * x³ ;(* 0.1 (EXP (* 0.1 x))) ; y = sin(x) ;(SQRT (* 3.0 X)) ; Y²=m*x bzw. y = Wurzel( 3 * x) ) ; Ende Funktionsplot beliebiger Funktionen ;
------------------ Mit freundlichem Gruß
Udo Hübner [EDIT] Achtung das '<' Zeichen ohne folgendes ';' wird immer vom Editor im [CODE ] [ /CODE] UBB-Code auf '<;' gewandelt. So ein Mist. [/EDIT] [Diese Nachricht wurde von CAD-Huebner am 23. Sep. 2006 editiert.] [Diese Nachricht wurde von CAD-Huebner am 23. Sep. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Werner-Maahs.de Mitglied CAD-Dozent + Konstrukteur + Autor
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Werner-Maahs.de](/foren/ubb/pmimages/gbu.gif) Beiträge: 626 Registriert: 04.05.2005 Win XP AC 2005/6 AC 2013
|
erstellt am: 24. Sep. 2006 09:54 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
Zitat: Original erstellt von CAD-Huebner: Achtung das '<' Zeichen ohne folgendes ';' wird immer vom Editor im [CODE ] [ /CODE] UBB-Code auf '<;' gewandelt. So ein Mist.
Ups, das habe ich nicht gewußt und nicht einmal bemerkt! Es sollte ja auch nur eine Idee wiedergeben, da der Umweg über EXCEL auch nicht gerade komfortable ist. ------------------ strukturiertes Zeichnen mit www.Werner-Maahs.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Huebner Ehrenmitglied V.I.P. h.c. Verm.- Ing., ATC-Trainer
![](/foren/avatars/CAD-Huebner.gif)
![Schreiben Sie einen Gästebucheintrag für CAD-Huebner](/foren/ubb/pmimages/gbu.gif) Beiträge: 9795 Registriert: 01.12.2003 AutoCAD 2.5 - 2025, Civil 3D, MAP 3D, ACADM, ACA Inventor Prof. 2025, AIP 4-2025 Win 11
|
erstellt am: 24. Sep. 2006 18:54 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
Ich hab das Problem mit dem UBB Code schon an AndreadK bei CAD.de berichtet und er hat es bereits gefixt. @Werner Es fehlte u.a. auch ne Klammer in deinem Code - hattest du das vorher nicht getestet? ![](/foren/ubb/zwinker.gif) ------------------ Mit freundlichem Gruß Udo Hübner Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Werner-Maahs.de Mitglied CAD-Dozent + Konstrukteur + Autor
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Werner-Maahs.de](/foren/ubb/pmimages/gbu.gif) Beiträge: 626 Registriert: 04.05.2005 Win XP AC 2005/6 AC 2013
|
erstellt am: 24. Sep. 2006 20:29 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
Zitat: Original erstellt von CAD-Huebner: @Werner Es fehlte u.a. auch ne Klammer in deinem Code - hattest du das vorher nicht getestet?
Zitat: Original erstellt von 'Werner': ... Habe die Eingaben mangels Programm nicht testen können, ...[/B]
@CAD-Huebner:
------------------ strukturiertes Zeichnen mit www.Werner-Maahs.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten Storm Mitglied
![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Carsten Storm](/foren/ubb/pmimages/gbu.gif) Beiträge: 50 Registriert: 21.09.2006 AutoCAD 2015 Win 7
|
erstellt am: 25. Sep. 2006 15:41 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
|
Werner-Maahs.de Mitglied CAD-Dozent + Konstrukteur + Autor
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Werner-Maahs.de](/foren/ubb/pmimages/gbu.gif) Beiträge: 626 Registriert: 04.05.2005 Win XP AC 2005/6 AC 2013
|
erstellt am: 25. Sep. 2006 16:07 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
@CAD-Huebner, habe Dein Lisp heute mal durchgespielt. Gefällt mir gut! Was mir nicht gefällt und ich selbst noch nicht hinbekommen habe: Wenn ich die Eingaben im AC-Bildschirm mache, würde ich auch die Funktion dort gern machen. Ist dies möglich? ------------------ strukturiertes Zeichnen mit www.Werner-Maahs.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
andi2050 Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für andi2050](/foren/ubb/pmimages/gbu.gif) Beiträge: 107 Registriert: 11.03.2003
|
erstellt am: 25. Sep. 2006 20:54 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
Hi ! Hier der Code mit Funktionseingabe an der Befehlszeile. Die Funktion muß jedoch als LISp-Ausdruck geschieben werden. z.B. x * x -> (* x x) oder 1/x -> (/ 1 x) etc. Hoffentlich hat Udo nichts dagegen, wenn ich seinen Code 'verhunzle' ![](/foren/ubb/zwinker.gif) Code:
(defun c:fvonx (/ os xa xe x inc func err) (vl-load-com) ;; Benutzerfunktion eingeben und "prüfen" (while (vl-catch-all-error-p (setq err (vl-catch-all-apply 'read (list (setq func (getstring "\nFunktion f(x) eingeben (LISP-Ausdruck ) z.B (* 2 x) :")) ) ) ) ) (alert (strcat "Fehlerhafter LISP-Ausdruck: \n" (vl-catch-all-error-message err)) ) ) (setvar "CMDECHO" 0) (if (< (setq os (getvar "OSMODE")) 16384) (setvar "OSMODE" (+ os 16384)) ) (initget 1) (setq xa (getreal "\nXa Startwert:")) (initget 1) (while (<= (setq xe (getreal "\nXe Endwertwert:")) xa) (prompt "\nEndwert muss größer als Startwert sein !") ) (initget 7) (setq inc (getreal "\nInkrement (Zuwachs):")) (setq x xa) (command "_PLINE") (while (<= x xe) ;; Hier wird Benutzerfunktion evaluiert (command (print (list x (eval (read func))))) (setq x (+ x inc)) ) (command "") (setvar "OSMODE" os) (setvar "CMDECHO" 1) (prin1) )
Grüße Andi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Werner-Maahs.de Mitglied CAD-Dozent + Konstrukteur + Autor
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Werner-Maahs.de](/foren/ubb/pmimages/gbu.gif) Beiträge: 626 Registriert: 04.05.2005 Win XP AC 2005/6 AC 2013
|
erstellt am: 26. Sep. 2006 11:08 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Carsten Storm
|