Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  AutoCAD LT
  Bogen.lsp in AutoCAD LT 2000/04

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:  Bogen.lsp in AutoCAD LT 2000/04 (1154 mal gelesen)
geddo
Mitglied
Techniker


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

Beiträge: 330
Registriert: 12.07.2004

erstellt am: 03. Nov. 2004 15:24    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 NG

Mein Bruder arbeite mit AutoCAD LT 2000 und 2004. Die Bogenbemaßung wird bei LT nicht unterstützt. Nun hat er ein bogen.LSP Programm von seinem alten Lehrer bekommen. Wie kann ich es bewerkstellingen das AutoCAD LT 2000 oder 2004 das Programm ausführen kann.


Programm CODE
(defun C:BoL ()
  (setvar "OSMODE" 512)
  (setq EL (entget (car (entsel "Bogen antippen: "))))
  (if (= (cdr (assoc 0 EL)) "ARC")
    (progn
      (setq Radius (cdr (assoc 40 EL)))
      (setq AWinkel (cdr (assoc 50 EL)))
      (setq EWinkel (cdr (assoc 51 EL)))
      (if (< AWinkel EWinkel)
        (setq Winkel (- EWinkel AWinkel))
        (setq Winkel (+ (- (* 2 PI) AWinkel) EWinkel)) )
      (setq bl (* Radius Winkel))
      (setq hlp (strcat " Radius: " (rtos Radius 2 3)
                        "    Bogenlänge: " (rtos bl 2 2)))
      (setvar "OSMODE" 0) (princ hlp) (princ)
) ) )

------------------
----------------
Gruß
geddo

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

Angelika Hädrich
Ehrenmitglied V.I.P. h.c.
Application Engineer



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

Beiträge: 5123
Registriert: 12.07.2000

Der erreicht am meisten, der immer auch anders kann, als er vorhatte.

erstellt am: 03. Nov. 2004 15:27    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 geddo 10 Unities + Antwort hilfreich

Hallo geddo,

AutoCAD LT alleine kann mit LISP-Programmen nichts anfangen, das würde nur mit LT Extender gehen...

Gruß Angelika

------------------
Lieber Fehler riskieren als Initiative verhindern.
(Reinhard Mohn)

Bitte Supportangaben eintragen, warum siehst du hier
:

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: 21533
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 03. Nov. 2004 15:31    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 geddo 10 Unities + Antwort hilfreich

  • Das sieht man doch auch bei beiden ACADversionen im Eigenschaftsfenster.. Befehl "EIGENSCHAFTEN"

  • oder über den Befehl "LISTE"

  • Ansonsten suche mal hier im Forum nach dem Stichwort "EXTENDER"

    ------------------
    .Signatur hat derzeit leider Urlaub.

    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