| |
| 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: grdraw für TEXT (1216 / mal gelesen)
|
gmk Mitglied Dipl.-Ing.(FH) Vermessung
Beiträge: 669 Registriert: 23.10.2002 Autocad 2004, WS CadCompass, Normica V2000, WinXP Prof., AMD Athlon 64 X2, 2GB, NVIDIA GeForce 7600GS, HP1055CM
|
erstellt am: 28. Feb. 2020 17:16 <-- editieren / zitieren --> Unities abgeben:
|
cadffm Moderator 良い精神
Beiträge: 22171 Registriert: 03.06.2002 Alles
|
erstellt am: 28. Feb. 2020 18:57 <-- editieren / zitieren --> Unities abgeben: Nur für gmk
Nein, das müsste man sich selbst erstellen, in der Praxis wäre dann Text erstellen/löschen naheliegender. Wobei du die Vektorendaten für eine Schriftart auch schnell selbst zusammen hast und dann nur noch eine assoc Liste benötigst, fertig. Ok, wenn mqn keine Monoschrift möchte, dann muss man noch die Breite der Zeichen vorhalten. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Meldin Mitglied
Beiträge: 397 Registriert: 15.07.2011 ACA2020 Windows10
|
erstellt am: 29. Feb. 2020 09:23 <-- editieren / zitieren --> Unities abgeben: Nur für gmk
|
Peter2 Ehrenmitglied V.I.P. h.c.
Beiträge: 3834 Registriert: 15.10.2003 Win 10/64 Pro AutoCAD MAP 3D 2023 BricsCAD 23
|
erstellt am: 05. Mrz. 2020 11:58 <-- editieren / zitieren --> Unities abgeben: Nur für gmk
|
gmk Mitglied Dipl.-Ing.(FH) Vermessung
Beiträge: 669 Registriert: 23.10.2002 Autocad 2004, WS CadCompass, Normica V2000, WinXP Prof., AMD Athlon 64 X2, 2GB, NVIDIA GeForce 7600GS, HP1055CM
|
erstellt am: 05. Mrz. 2020 14:40 <-- editieren / zitieren --> Unities abgeben:
Servus! Hab in der Hektik ganz vergessen mich nochmal zu melden .... Ich hab's jetzt selber gebastelt, für Schriftart romans, Höhe 1, Breitenfaktor 1, Neigung 0. Sind bis jetzt nur Zahlen, mehr brauch ich i.M. nicht. (DEFUN gmk_grwrite ( string pkt hoehe breitenfaktor farbe highlight / rw hw i zeichen rw0 hpkt1 hpkt2 ) ; Zeichen Abstand-vorne Abstand-hinten max.Breite max.Höhe Linienliste (SETQ strli (LIST '("1" 0.1 0.1 0.23347 0.99808 (((0.23347 0.99808) (0.23347 0.00000)) ((0.09339 0.85800) (0.23347 0.99808)) ((0.00000 0.80547) (0.09339 0.85800)))) '("2" 0.1 0.1 0.66539 1.00391 (((0.00000 0.00000) (0.66539 0.00000)) ((0.47861 0.47861) (0.00000 0.00000)) ((0.57200 0.61869) (0.47861 0.47861)) ((0.61869 0.71792) (0.57200 0.61869)) ((0.61869 0.81130) (0.61869 0.71792)) ((0.57200 0.90469) (0.61869 0.81130)) ((0.52530 0.95722) (0.57200 0.90469)) ((0.42608 1.00391) (0.52530 0.95722)) ((0.23931 1.00391) (0.42608 1.00391)) ((0.14592 0.95722) (0.23931 1.00391)) ((0.09339 0.90469) (0.14592 0.95722)) ((0.04669 0.81130) (0.09339 0.90469)) ((0.04669 0.76461) (0.04669 0.81130)))) '("3" 0.1 0.1 0.66539 0.99808 (((0.04669 0.09339) (0.00000 0.19261)) ((0.09339 0.04669) (0.04669 0.09339)) ((0.23931 0.00000) (0.09339 0.04669)) ((0.37939 0.00000) (0.23931 0.00000)) ((0.52530 0.04669) (0.37939 0.00000)) ((0.61869 0.14592) (0.52530 0.04669)) ((0.66539 0.28600) (0.61869 0.14592)) ((0.66539 0.37939) (0.66539 0.28600)) ((0.61869 0.52530) (0.66539 0.37939)) ((0.57200 0.57200) (0.61869 0.52530)) ((0.47861 0.61869) (0.57200 0.57200)) ((0.33269 0.61869) (0.47861 0.61869)) ((0.61869 0.99808) (0.33269 0.61869)) ((0.09339 0.99808) (0.61869 0.99808)))) '("4" 0.1 0.1 0.71208 0.99808 (((0.47861 0.99808) (0.47861 0.00000)) ((0.00000 0.33269) (0.71208 0.33269)) ((0.47861 0.99808) (0.00000 0.33269)))) '("5" 0.1 0.1 0.66539 1.00391 (((0.04669 0.09922) (0.00000 0.19261)) ((0.09339 0.04669) (0.04669 0.09922)) ((0.23931 0.00000) (0.09339 0.04669)) ((0.37939 0.00000) (0.23931 0.00000)) ((0.52530 0.04669) (0.37939 0.00000)) ((0.61869 0.14592) (0.52530 0.04669)) ((0.66539 0.28600) (0.61869 0.14592)) ((0.66539 0.38522) (0.66539 0.28600)) ((0.61869 0.52530) (0.66539 0.38522)) ((0.52530 0.61869) (0.61869 0.52530)) ((0.37939 0.66539) (0.52530 0.61869)) ((0.23931 0.66539) (0.37939 0.66539)) ((0.09339 0.61869) (0.23931 0.66539)) ((0.04669 0.57200) (0.09339 0.61869)) ((0.09339 1.00391) (0.04669 0.57200)) ((0.57200 1.00391) (0.09339 1.00391)))) '("6" 0.1 0.1 0.61869 0.99808 (((0.04669 0.47277) (0.00000 0.33269)) ((0.14592 0.57200) (0.04669 0.47277)) ((0.28600 0.61869) (0.14592 0.57200)) ((0.33269 0.61869) (0.28600 0.61869)) ((0.47861 0.57200) (0.33269 0.61869)) ((0.57200 0.47277) (0.47861 0.57200)) ((0.61869 0.33269) (0.57200 0.47277)) ((0.61869 0.28600) (0.61869 0.33269)) ((0.57200 0.14008) (0.61869 0.28600)) ((0.47861 0.04669) (0.57200 0.14008)) ((0.33269 0.00000) (0.47861 0.04669)) ((0.28600 0.00000) (0.33269 0.00000)) ((0.14592 0.04669) (0.28600 0.00000)) ((0.04669 0.14008) (0.14592 0.04669)) ((0.00000 0.33269) (0.04669 0.14008)) ((0.00000 0.57200) (0.00000 0.33269)) ((0.04669 0.81130) (0.00000 0.57200)) ((0.14592 0.95138) (0.04669 0.81130)) ((0.28600 0.99808) (0.14592 0.95138)) ((0.37939 0.99808) (0.28600 0.99808)) ((0.52530 0.95138) (0.37939 0.99808)) ((0.57200 0.85800) (0.52530 0.95138)))) '("7" 0.1 0.1 0.66539 0.99808 (((0.00000 0.99808) (0.66539 0.99808)) ((0.66539 0.99808) (0.19261 0.00000)))) '("8" 0.1 0.1 0.66539 0.99808 (((0.23931 0.99808) (0.23931 0.99808)) ((0.42608 0.99808) (0.23931 0.99808)) ((0.57200 0.95138) (0.42608 0.99808)) ((0.61869 0.85800) (0.57200 0.95138)) ((0.61869 0.76461) (0.61869 0.85800)) ((0.57200 0.66539) (0.61869 0.76461)) ((0.47861 0.61869) (0.57200 0.66539)) ((0.28600 0.57200) (0.47861 0.61869)) ((0.14592 0.52530) (0.28600 0.57200)) ((0.04669 0.43192) (0.14592 0.52530)) ((0.00000 0.33269) (0.04669 0.43192)) ((0.00000 0.19261) (0.00000 0.33269)) ((0.04669 0.09339) (0.00000 0.19261)) ((0.09339 0.04669) (0.04669 0.09339)) ((0.23931 0.00000) (0.09339 0.04669)) ((0.42608 0.00000) (0.23931 0.00000)) ((0.57200 0.04669) (0.42608 0.00000)) ((0.61869 0.09339) (0.57200 0.04669)) ((0.66539 0.19261) (0.61869 0.09339)) ((0.66539 0.33269) (0.66539 0.19261)) ((0.61869 0.43192) (0.66539 0.33269)) ((0.52530 0.52530) (0.61869 0.43192)) ((0.37939 0.57200) (0.52530 0.52530)) ((0.19261 0.61869) (0.37939 0.57200)) ((0.09339 0.66539) (0.19261 0.61869)) ((0.04669 0.76461) (0.09339 0.66539)) ((0.04669 0.85800) (0.04669 0.76461)) ((0.09339 0.95138) (0.04669 0.85800)) ((0.23931 0.99808) (0.09339 0.95138)))) '("9" 0.1 0.1 0.61869 0.99808 (((0.09339 0.04669) (0.04669 0.14008)) ((0.23931 0.00000) (0.09339 0.04669)) ((0.33269 0.00000) (0.23931 0.00000)) ((0.47861 0.04669) (0.33269 0.00000)) ((0.57200 0.18677) (0.47861 0.04669)) ((0.61869 0.42608) (0.57200 0.18677)) ((0.61869 0.66539) (0.61869 0.42608)) ((0.57200 0.85800) (0.61869 0.66539)) ((0.47861 0.95138) (0.57200 0.85800)) ((0.33269 0.99808) (0.47861 0.95138)) ((0.28600 0.99808) (0.33269 0.99808)) ((0.14592 0.95138) (0.28600 0.99808)) ((0.04669 0.85800) (0.14592 0.95138)) ((0.00000 0.71208) (0.04669 0.85800)) ((0.00000 0.66539) (0.00000 0.71208)) ((0.04669 0.52530) (0.00000 0.66539)) ((0.14592 0.42608) (0.04669 0.52530)) ((0.28600 0.37939) (0.14592 0.42608)) ((0.33269 0.37939) (0.28600 0.37939)) ((0.47861 0.42608) (0.33269 0.37939)) ((0.57200 0.52530) (0.47861 0.42608)) ((0.61869 0.66539) (0.57200 0.52530)))) '("0" 0.1 0.1 0.66539 1.00391 (((0.28600 1.00391) (0.28600 1.00391)) ((0.37939 1.00391) (0.28600 1.00391)) ((0.52530 0.95722) (0.37939 1.00391)) ((0.61869 0.81130) (0.52530 0.95722)) ((0.66539 0.57200) (0.61869 0.81130)) ((0.66539 0.43192) (0.66539 0.57200)) ((0.61869 0.19261) (0.66539 0.43192)) ((0.52530 0.05253) (0.61869 0.19261)) ((0.37939 0.00000) (0.52530 0.05253)) ((0.28600 0.00000) (0.37939 0.00000)) ((0.14592 0.05253) (0.28600 0.00000)) ((0.04669 0.19261) (0.14592 0.05253)) ((0.00000 0.43192) (0.04669 0.19261)) ((0.00000 0.57200) (0.00000 0.43192)) ((0.04669 0.81130) (0.00000 0.57200)) ((0.14592 0.95722) (0.04669 0.81130)) ((0.28600 1.00391) (0.14592 0.95722)))) '("-" 0.1 0.1 0.64204 0.00000 (((0.00000 0.42857) (0.64204 0.42857)))) ) ) ;SETQ (SETQ rw (NTH 0 pkt)) (SETQ hw (NTH 1 pkt)) (SETQ i 1) (REPEAT (STRLEN string) (SETQ zeichen (SUBSTR string i 1)) (SETQ zeichen (gc_dxf zeichen strli)) (SETQ rw (+ rw (* (NTH 0 zeichen) hoehe))) ;Abstand-vorne vor Zeichenbeginn (SETQ rw0 rw) (FOREACH n (NTH 4 zeichen) (SETQ hpkt1 (NTH 0 n)) (SETQ hpkt2 (NTH 1 n)) (grdraw (LIST (+ rw (* (* (NTH 0 hpkt1) hoehe) breitenfaktor)) (+ hw (* (NTH 1 hpkt1) hoehe))) (LIST (+ rw (* (* (NTH 0 hpkt2) hoehe) breitenfaktor)) (+ hw (* (NTH 1 hpkt2) hoehe))) farbe highlight) ) (SETQ rw (+ rw (* (* (NTH 2 zeichen) hoehe) breitenfaktor) (NTH 1 zeichen))) (SETQ i (+ i 1)) ) ) Ciao Georg
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
hanns-g Mitglied
Beiträge: 55 Registriert: 14.10.2015 Win10 Bricscad V21 Vestra INFRAVISION Build60
|
erstellt am: 29. Apr. 2024 10:02 <-- editieren / zitieren --> Unities abgeben: Nur für gmk
Hallo Georg, bin gerade auf deinen Code gestoßen und will versuchen diesen zu verwenden. Es scheint die Funktion GC_DXF zu fehlen: ; error : no function definition <GC_DXF> ; expected FUNCTION at [eval]
Könntest du mir diese bitte noch raussuchen? Vielen Dank hanns-g
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
joern bosse Ehrenmitglied Dipl.-Ing. Vermessung
Beiträge: 1760 Registriert: 11.10.2004 Window 11 ACAD 2021 CIVIL 2021 BricsCAD ab V14 11th Gen Intel(R) Core(TM) i7-1165G7 @ 2.80GHz 2.80 GHz 32.0GB RAM NVIDIA GeForce MX450<P>
|
erstellt am: 30. Apr. 2024 08:07 <-- editieren / zitieren --> Unities abgeben: Nur für gmk
|
gmk Mitglied Dipl.-Ing.(FH) Vermessung
Beiträge: 669 Registriert: 23.10.2002 Autocad 2004, WS CadCompass, Normica V2000, WinXP Prof., AMD Athlon 64 X2, 2GB, NVIDIA GeForce 7600GS, HP1055CM
|
erstellt am: 30. Apr. 2024 08:34 <-- editieren / zitieren --> Unities abgeben:
|