| |
![](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 Creo |
Autor
|
Thema: Problem bei kleinem Macro (2743 mal gelesen)
|
Ulf Selve Mitglied Dipl.-Ing. Maschbau
![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Ulf Selve](/foren/ubb/pmimages/gbu.gif) Beiträge: 68 Registriert: 03.09.2001 OSDM15.00B/ME10 15.00 WIN-XP Prof, eine MEGA-Frau und drei Turbo-Kinder
|
erstellt am: 29. Aug. 2008 08:33 <-- 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)
Moin, ich habe ein kleines Macro geschrieben, das einfach nur deinen Text als 3D-Geometrie erzeugen soll (ist für 'ne Kinderbelustigung im Rahmen eines Betriebsfestes). Das Macro funktioniert auch so weit, schmeißt aber zwischendurch die Fehlermeldung "Unerwarteten Wert eingegeben" raus. Wenn man <ok> drückt läuft das Macro weiter und tut das gewünschte. Kann mir jemand einen Tip geben wo es klemmt? Vielen Dank im voraus Ulf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Walter Geppert Moderator Frank und Frei
![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif) ![](/foren/ubb/Admin4.gif) ![](/foren/ubb/Admin5.gif) ![](/foren/ubb/Admin1.gif)
![](/foren/avatars/Walter_Geppert.gif)
![Schreiben Sie einen Gästebucheintrag für Walter Geppert](/foren/ubb/pmimages/gbu.gif) Beiträge: 2143 Registriert: 12.12.2000 Konstruktion von Sondermaschinen, Montageautomaten, Meß- und Prüfeinrichtungen, Vorrichtungen und Produktentwicklung mit Creo Elements/Direct Modeling 20.4, AdvancedDesign, Surfacing, Simulate, SolidPower, ModelManager auf HP ZBook 17 G4, Windows 10 Pro 64
|
erstellt am: 29. Aug. 2008 09:34 <-- 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 Ulf Selve
Die fetten Teile sind dran schuld, und die kursiven kann man weglassen (akueller Teil und aktuelle AE sind default): :Ok-action '(progn ;(display Feld1) (create_assembly :name "B1") (create_part :name "Namenszug" :Owner "/B1") (create_workplane :new complete :name "A1") (create_geo_text :text Feld1 :Pos 0,0 :size 10 :font "book_antiqua" complete) (create_part "Namenszug") (extrude :auto_direction :yes :keep_wp :no ;:keep_profile :no :Part "/B1/Namenszug"] :distance 10 :wp "/A1" );;extrude );;progn
------------------ meine LISP-Makros sind auf osd.cad.de Disclaimer Grüße aus Wien Walter DC4 Technisches Büro GmbH Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ulf Selve Mitglied Dipl.-Ing. Maschbau
![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Ulf Selve](/foren/ubb/pmimages/gbu.gif) Beiträge: 68 Registriert: 03.09.2001 OSDM15.00B/ME10 15.00 WIN-XP Prof, eine MEGA-Frau und drei Turbo-Kinder
|
erstellt am: 29. Aug. 2008 10: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)
|
highway45 Moderator Bastler mit Diplom
![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif) ![](/foren/ubb/Admin4.gif) ![](/foren/ubb/Admin5.gif) ![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif)
![](/foren/avatars/highway45.gif)
![Schreiben Sie einen Gästebucheintrag für highway45](/foren/ubb/pmimages/gbu.gif) Beiträge: 6331 Registriert: 14.12.2004 CoCreate Modeling V20 + PE6 NotePad++
|
erstellt am: 29. Aug. 2008 11:21 <-- 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 Ulf Selve
Das finde ich ja niedlich ! Kleiner Verbesserungsvorschlag: Am Anfang würde ich (delete_3d :all_at_top) einbauen, dann muß man nicht extra auf löschen drücken. Am Ende würde ich (create_part :name "foobar")(delete_3d "/foobar") einbauen, dann sind alle Buchstaben inaktiv geschaltet. Vielleicht könnte man anschließend noch Zufalls-Farbe.lsp laufen lassen... (cher_farbe_aendern :cher_bgr "/B1") Matthias [Diese Nachricht wurde von highway45 am 29. Aug. 2008 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |