Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  Nationalflaggen

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
Autor Thema:  Nationalflaggen (459 mal gelesen)
StephanJP
Mitglied
CAD-Admin


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

Beiträge: 829
Registriert: 09.11.2000

AutoCAD ,MAP 3D, Civil 3D, P&ID, VehicleTracking alles bis 2022, BBSoft, Win 10 Enterprise, Canon PlotClient
Canon TX2000, TX3000

erstellt am: 29. Mai. 2004 13:23    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 Forum,

weiss einer hier, wo man CAD- oder Vektorvorlagen von Nationalflaggen herbekommt?

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

gruß
Stephan

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

Proxy
Ehrenmitglied
Stateless-DHCP v6-Paketfragmentierer


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

Beiträge: 1629
Registriert: 13.11.2003

Tastaturen, Mäuse,
Pladden, Monitore, ...

erstellt am: 29. Mai. 2004 18:44    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 StephanJP 10 Unities + Antwort hilfreich

Entweder aus irgend einer DXF-CD, aus einer anderen Anwendung (Corel, MS-Office Cliparts, OpenOffice etc) oder gelisplt
Code:

;;          ***** USA.LSP *****
;;
;;  Creates the United States of America banner.
;;  Use black screen background for best results.
;;
;;  W. Kilbourne, CompugraphX, Revised October 1, 2001
;;
(defun c:USA (/ CE BM OS OE SP HT XD XA EP YA D1 D2 D3 D4 RP RH XZ YZ
                P1 P2 P3 P4 P5 P6 P7 P8 P9 PX PY PZ S1 S2 S3 S4 S5 S6)
  (setq CE (getvar "CMDECHO") BM (getvar "BLIPMODE") OM (getvar "OSMODE"))
  (defun NE (NE) (setvar "CMDECHO" CE) (setvar "BLIPMODE" BM)
      (setvar "OSMODE" OM) (princ "Function cancelled ") (princ)
  )
  (setq OE *error* *error* NE)
  (setvar "CMDECHO" 0) (setvar "OSMODE" 0)
  (while (= SP nil)
      (setq SP (getpoint "\nPick lower left corner of flag: "))
  )
  (while (= HT nil)
      (setq HT (getcorner SP "\nPick upper right corner of flag <height>: "))
  )
  (if (>= (angle SP HT)(/ pi 2))
      (setq HT (polar SP (/ pi 4) (distance SP HT)))
  )
  (setq XD (distance SP HT)
        XA (angle SP HT)
        EP (polar SP (/ pi 2) (* XD (sin XA)))
        YA (angle SP EP)
        D1 (distance SP EP)
        D2 (/ D1 13)
        D3 (* D2 0.8)
        D4 (* D2 1.4)
        RP (polar SP 0.0 (* D1 1.5))
        RH (polar EP 0.0 (* D1 1.5))
        XZ (polar SP (* pi 1.25) D2)
        YZ (polar RH (* pi 0.25) D2)
        P1 (polar SP (/ pi 2) (* D2 6))
        P2 (polar P1 0.0 (* D2 8.5))
        P3 (polar EP 0.0 (* D2 8.5))
        P4 (polar SP YA D2)
        P5 (polar RP YA D2)
        P6 (polar P4 YA D2)
        P7 (polar P5 YA D2)
        P8 (polar RP YA (* D2 6))
        P9 (polar P2 YA D2)
        PX (polar P8 YA D2)
        PY (polar P9 YA D2)
        PZ (polar PX YA D2)
        S1 (polar P1 (* pi 0.25) D2)
        S2 (polar S1 (* pi 0.3) (* D3 0.172))
        S3 (polar S1 (* pi 0.7) (* D3 0.172))
        S4 (polar S1 YA (* D3 0.43952))
        S5 (polar S1 (* pi 0.25) D2)
        S6 (polar P3 (* pi 1.25) D4)
  )
  (command "._BLIPMODE" "_OFF"
            "._FILL" "_ON"
            "._ZOOM" "_W" XZ YZ
            "._LAYER" "_New" "BLUE" "_Color" "5" "BLUE" "_S" "BLUE" ""
            "._SOLID" P1 P2 EP P3 ""
            "._LAYER" "_N" "RED" "_C" "1" "RED" "_S" "RED" ""
            "._SOLID" SP P4 RP P5 ""
            "._ARRAY" "_L" "" "_R" "3" "1" (* D2 2)
            "._SOLID" P2 P9 P8 PX ""
            "._ARRAY" "_L" "" "_R" "4" "1" (* D2 2)
            "._LAYER" "_N" "WHITE" "_C" "7" "WHITE" "_S" "WHITE" ""
            "._SOLID" P4 P6 P5 P7 ""
            "._ARRAY" "_L" "" "_R" "3" "1" (* D2 2)
            "._SOLID" P9 PY PX PZ ""
            "._ARRAY" "_L" "" "_R" "3" "1" (* D2 2)
            "._SOLID" S1 S2 S3 S4 ""
            "._ARRAY" "_L" "" "_P" S1 "5" "360" "_Y"
            "._ARRAY" "_W" P1 S5 "" "_R" "5" "6" D4 D4
            "._COPY" "_W" P1 S6 "" S1 S5
  )
  (setvar "CMDECHO" CE)
  (setvar "BLIPMODE" BM)
  (setvar "OSMODE" OM)
  (setq *error* OE OE nil)
  (princ)
)


Ich würde mal google|image befragen und dann entsprechend die Flagen als Bilder einfügen. Tipp: World Flag Database

------------------
"Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?"  Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF

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: 3329
Registriert: 14.03.2001

Sicher ist, dass nichts sicher ist. Selbst das nicht.
Joachim Ringelnatz

erstellt am: 01. Jun. 2004 12:39    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 StephanJP 10 Unities + Antwort hilfreich

@usa.lsp
Unglaublich, womit manche Leute ihre Energie verschwenden.... 
Naja, wo soll's sonst herkommen.

Danke Proxy! :wink

------------------
www.cadditions.de

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)2023 CAD.de | Impressum | Datenschutz