Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  eigene Werkzeugkästen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
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



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 07. Feb. 2006 11:50    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22275
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Feb. 2006 12:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

mit einem Backslash "\"

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

CADdog
Ehrenmitglied V.I.P. h.c.




Sehen Sie sich das Profil von CADdog an!   Senden Sie eine Private Message an CADdog  Schreiben Sie einen Gästebucheintrag für CADdog

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

gar nicht

------------------

gruß
CADdog,
the dog formerly known as TR

AutoCAD spricht mit einem, aber viele hören nicht zu.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22275
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Feb. 2006 12:45    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

Was sind "Textanweisungen" ??

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

CADchup
Ehrenmitglied V.I.P. h.c.




Sehen Sie sich das Profil von CADchup an!   Senden Sie eine Private Message an CADchup  Schreiben Sie einen Gästebucheintrag für CADchup

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

Hi,

vielleicht CMDECHO auf 1 stellen?


Gruß
CADchup



Deine Welt ist stehengeblieben.
Mach's gut, Axel

------------------
CADmaro.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

marc.scherer
Ehrenmitglied V.I.P. h.c.
CAD-Administrator



Sehen Sie sich das Profil von marc.scherer an!   Senden Sie eine Private Message an marc.scherer  Schreiben Sie einen Gästebucheintrag für marc.scherer

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 07. Feb. 2006 15:48    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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




Sehen Sie sich das Profil von CADmium an!   Senden Sie eine Private Message an CADmium  Schreiben Sie einen Gästebucheintrag für CADmium

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

^C^Cklinie;a;

------------------
- Thomas -
"Du bist einen uns unbekannten Weg in eine andere Form des Seins gegangen. - Wir sehen uns wieder in deinem Paradies! - Tschüß Axel.."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cpims
Mitglied



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 07. Feb. 2006 16:04    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Meines Wissens bewirkt das Leerzeichnen hinter klinie bzw. a
das gleich wie ; nämlich ein Enter.

------------------
Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cpims
Mitglied



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 07. Feb. 2006 16:05    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Außerdem brauche ich den * am Anfang um eine
Befehlswiederholung zu bekommen.

------------------
Mario

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22275
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Feb. 2006 16:08    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von marc.scherer an!   Senden Sie eine Private Message an marc.scherer  Schreiben Sie einen Gästebucheintrag für marc.scherer

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

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
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22275
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Feb. 2006 16:26    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 07. Feb. 2006 16:46    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22275
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 07. Feb. 2006 17:09    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich


XLINE_Log.txt

 
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



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 20. Feb. 2006 09:01    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 22275
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 20. Feb. 2006 09:16    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cpims 10 Unities + Antwort hilfreich


xline2log.txt

 
kaum zu glauben eigentlich...

Ich zeige dir gerne mein Log mit deinem Makro..

(poste doch mal dein Log !)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

cpims
Mitglied



Sehen Sie sich das Profil von cpims an!   Senden Sie eine Private Message an cpims  Schreiben Sie einen Gästebucheintrag für cpims

Beiträge: 227
Registriert: 28.08.2003

AutoCAD 2016, Windows 8.1,

erstellt am: 20. Feb. 2006 10:55    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2024 CAD.de | Impressum | Datenschutz