| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY WIRD VON NVIDIA ZUM HÄNDLER DES JAHRES GEWÄHLT, eine Pressemitteilung
|
Autor
|
Thema: eigene Werkzeugkästen (728 mal gelesen)
|
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 07. Feb. 2006 11:50 <-- editieren / zitieren --> Unities abgeben:
Hallo ! Hab mir ein paar Werkzeugkästen mit eigenen Befehlen in AutoCAD 2006 gemacht. Arbeite dabei mit * für Befehlswiederholung. Wie kann ich in den Makros Textanweisungen einbauen,damit in der Befehlszeile während der Ausführung des Befehls diverse Anweisungen gegeben werden ? Gruß Mario ------------------ Mario Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 07. Feb. 2006 12:07 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
|
CADdog Ehrenmitglied V.I.P. h.c.
Beiträge: 2280 Registriert: 30.04.2004 Intel Xeon 3,6 GHz 32 GB RAM NVIDIA Quadro P2000 Windows 10 Enterprise AutoCADmap 3D 2023 WS-Landcad 2023 QGIS 3.28.5
|
erstellt am: 07. Feb. 2006 12:29 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 07. Feb. 2006 12:45 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
|
CADchup Ehrenmitglied V.I.P. h.c.
Beiträge: 3336 Registriert: 14.03.2001 Sicher ist, dass nichts sicher ist. Selbst das nicht. Joachim Ringelnatz
|
erstellt am: 07. Feb. 2006 13:04 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
|
marc.scherer Ehrenmitglied V.I.P. h.c. CAD-Administrator
Beiträge: 2494 Registriert: 02.11.2001 Windows 10 64bit AutoCAD Architecture 2018/2019 (deu/eng) AEC-Collection 2019 (Revit und Zeugs) Wenn sich's nicht vermeiden läßt: D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 07. Feb. 2006 13:22 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
Zitat: Original erstellt von cpims: Wie kann ich in den Makros Textanweisungen einbauen,damit in der Befehlszeile während der Ausführung des Befehls diverse Anweisungen gegeben werden ?
Indem Du Dir für Deine Makros Lisp Funktionen schreibst. Diese Lisp-Funktionen rufst Du dann aus dem Toolbar auf. Da kannst Du dann Anweisungen bis zum Abwinken ausgeben. Beispiel: Folgenden Code als "liesmich.lsp" im AutoCAD-Suchpfad speichern
Code:
(defun C:LIESMICH (/ INDEX STRING) (setq INDEX 0) (if (setq STRING (getstring "\nLos, tipp' wat: " 't)) (repeat 10000 (princ (strcat "\nZeile >" (itoa (setq INDEX (1+ INDEX))) "<: \"" STRING "\"") ) ) ) (princ) )
Dann folgende Anweisung einem Menüpunkt/Toolbaricon/Palettenicon zuweisen:
Code:
^c^c(if (null C:LIESMICH)(load "liesmich.lsp"))(princ);liesmich;
Fertig.------------------ Ciao, Marc [Diese Nachricht wurde von marc.scherer am 07. Feb. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 07. Feb. 2006 15:48 <-- editieren / zitieren --> Unities abgeben:
Danke für Eure Antworten ! Hier ein einfaches Beispiel. *^C^Cklinie a Ihr seht, es geht um ganz einfache Dinge, also ich brauche keine Lisp-Programme zu schreiben. Wenn ich den Befehl starte kommt die Anweisung "Abstand eingeben" nicht, deshalb möchte ich selber diesen Text ins Makro einbauen. Gruß Mario ------------------ Mario Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 07. Feb. 2006 16:02 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
|
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 07. Feb. 2006 16:04 <-- editieren / zitieren --> Unities abgeben:
|
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 07. Feb. 2006 16:05 <-- editieren / zitieren --> Unities abgeben:
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 07. Feb. 2006 16:08 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
Mario, du bist echt´ne Wucht mit deinem Makro eben kommt aber doch ganz normal der Abfrage-Text ? WOBEI hast du denn nu ein Problem ? Die OPTION (A) des BEFEHLS (KLINIE) hast du doch schon im Griff ! (wobei ich Semikolons statt Leerstelle besser finde im Makro..) Und Benutzereingaben wärend des Ablaufes kannst du mit dem bereits genannten "\" Backslash abwarten lassen... TIP: AcadHilfe / Reiter "Suchen" | Suchwort: "
1.) Warten auf Benutzereingaben in Makros 2.) Erstellen von Makros 3.) Verwenden von Sonderzeichen und Steuerzeichen in Makros usw Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marc.scherer Ehrenmitglied V.I.P. h.c. CAD-Administrator
Beiträge: 2494 Registriert: 02.11.2001 Windows 10 64bit AutoCAD Architecture 2018/2019 (deu/eng) AEC-Collection 2019 (Revit und Zeugs) Wenn sich's nicht vermeiden läßt: D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 07. Feb. 2006 16:14 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
Zitat: Original erstellt von cpims: Meines Wissens bewirkt das Leerzeichnen hinter klinie bzw. a das gleich wie ; nämlich ein Enter.
Da weißt Du recht... Nur ist 'n Semikolon doch deutlich besser lesbar ;-) ------------------ Ciao, Marc Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 07. Feb. 2006 16:26 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
genau, Semi´s lassen sich besser "zählen" als Leerzeichen... allerdings ist es auch falsch zu sagen das es das Gleiche ist Manche Befehle kann man garnicht mit einem Leertastendruck beenden usw - steht aber auch alles in der Hilfe. Ebensowenig ist ein Leerzeichen in Scripten das Gleiche wie ein Zeilenumruch.. auch hier: Je nach sachverhalt/Befehl . Beides jedoch ( Semi=Space im Makro / Space=Zeilenumbruch im Script) würde ich jedoch "zum Anfang" mal behaupten, wenn du jedoch etwas mehr mit Buttonmakros oder Scripten arbeitest werden die ganzen Feinheiten und weiteren Steuerzeichen bedeutsam.. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 07. Feb. 2006 16:46 <-- editieren / zitieren --> Unities abgeben:
Semikolon oder Leerzeichen ist nicht das Thema. Ich bekomme bei meinem Beispielmakro *^C^Cklinie;a; nicht den Text "Abstand eingeben oder [Durch Punkt]". Diesen Text bekomme ich nur wenn ich den * für die Befehlswiederholung weglasse, also bei ^C^Cklinie;a; Ich brauche aber die Befehlswiederholung um durch ein ENTER gleich den nächsten Abstand eingeben zu können. Ich verwende eine AutoCAD-Applikation mit einer AutoCAD-OEM-Lizenz. ------------------ Mario Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 07. Feb. 2006 17:09 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
Erzähl mal in Worten wie das ablaufen soll, in etwa so: ButtonKlick, Abstand über Tastatur eingeben.. Objekt wählen, Seite wählen, und wieder von vorn: Abstand eingeben... Hier zB: *^C^C_.XLINE;_O;\\\; (funktioniert mit Abstandseingabe via Tastatur/Zahlenwert)
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 20. Feb. 2006 09:01 <-- editieren / zitieren --> Unities abgeben:
Hallo cadffm ! War einige Zeit nicht im Büro und greife das Thema deshalb erst jetzt wieder auf. Danke für deine Antwort! Das Makro sieht so aus: *^C^C-layer;t;kon1;se;kon1;;klinie;a; -> Befehl starten -> Meldung "Abstand eingeben" kommt nicht -< ich gebe z.B Abstand 500 ein -> Meldung "Linienobjekt wählen" -> Meldung "zu versetzende Seite angeben" -> ich gebe die Seite an -> Befehl erfolgreich ausgeführt -> 1x Enter -> Meldung "Abstand eingeben" kommt nicht............. Was kann ich machen, daß die Meldung "Abstand eingeben" kommt ? Danke und Gruß ! Mario ------------------ Mario Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 20. Feb. 2006 09:16 <-- editieren / zitieren --> Unities abgeben: Nur für cpims
|
cpims Mitglied
Beiträge: 227 Registriert: 28.08.2003 AutoCAD 2016, Windows 8.1,
|
erstellt am: 20. Feb. 2006 10:55 <-- editieren / zitieren --> Unities abgeben:
Hallo ! Habe hier folgende 2 Befehle gestartet: Klinie-Horizontal mit Layerschaltung auf KON1 -> dann mit esc abgebrochen -> Klinie-Abstand mit Layerschaltung auf KON1 -> nach Setzen des ersten Abstandes 1x Enter und dann den nächsten Abstand eingegeben usw. Hier das log: Befehl: Durchpunkt angeben: Durchpunkt angeben: *Abbruch* Befehl: 500 Linienobjekt wählen: Zu versetzende Seite angeben: Linienobjekt wählen: Befehl: 300 Linienobjekt wählen: Zu versetzende Seite angeben: Linienobjekt wählen: Befehl: 400 Linienobjekt wählen: Zu versetzende Seite angeben: Linienobjekt wählen: *Abbruch* Befehl: *Abbruch* Gruß Mario
------------------ Mario Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |