---

Hallo Liebe Leute

ich habe von "LEEMAC" eine Lisp-Datei heruntergeladen (die sogenannte "numincv3-3")
diese lisp lässt nachfolgende zahlen erstellen.

diese LISP ist auf Englisch und ich habe sie auf deutsch übersetzen wollen.
ich habe erst einmal einen test gemacht ob ich es richtig gemacht habe und ein wort umbenannt; geladen; getestet; und es hat funktioniert...
also ran an den speck und alles umgeschrieben (NUR TEXTE, keine befehle)

also "appload" eingegeben, die numinc datei geladen und dann kam der schlag 

mir wurde nur das erste geänderte wort angezeigt und alle anderen waren immernoch auf englisch.
die LISP habe ich im ACAD 2011 getestet.

habe dann mal die LISP in ACAD 2013 geöffnet und da waren dann fast alle benennungen auf deutsch ( wie ich es übersetzt habe)
denke nicht, dass es was mit den 2 verschiedenen ACAD versionen was zu tun hat.

mir sind dann aber noch ein paar sachen aufgefallen die geändert werden könnten, aber mir kommts so vor, dass wenn ich eine lisp lade und diese im nachgang ändere NUR der zuerst geladene "status" angezeigt wird.

ich habe auch die lisp 100 mal umbenannt, aber er behält sich wohl irgendwie die sachen.
gibt es vielleicht irgendwo-irgendwas, womit ich die lisp komplett entfernen kann?
es gibt ja die Funktion "ENtladen" aber da wird die numinc datei nur grau hinterlegt und kann diese dort nicht entladen.

ich hoffe ihr könnt verstehen was ich meine und mir HOFFENTLICH helfen   

Vielen dank im vorraus

Gruß Marcel 

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

---

An deiner Geschichte stimmt zwar eine Aussage nicht, aber es ist unsinnig der Sache auf den Grund zu gehen.
mache eine neue Zeichnung auf, lade die Lispdatei und teste sie in dieser neuen Datei.
(Lispprogramme sind ausschließlich in der Datei definiert, bzw. neudefiniert in der sie geladen wurden.)

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

---

hallo und danke für deine antwort...

ich weiß es hört sich etwas kompliziert an, aber es ist genau so wie ich es geschrieben habe.

ich habe in der acad.doc- startdatei die numinc eingebunden, dass die LISp datei ssich immer mitlädt...
habe es auch schon dort enfernt und NUR einzeln für eine Neue Zeichnung geladen, aber es ändert sich immernoch nix. 

gruß

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

---

Hallo Marcel,
vielleicht hast du ja die englische auch noch in einem Supportpfad und die wird "zuerst" gefunden und damit die deutsche nicht geladen.

Schau doch mal was (findfile "numincv3-3.lsp") sagt.

------------------
Geht nicht, gibts nicht

Gruß
Andreas

http://kraus-cad.de

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

---

Hallo Andreas und danke.

ich habe die numinc datei in keinem Support ordner mehr drin... daran liegt es nicht mehr...
nurnoch in meinem ablageordner wo die LISP liegen soll ist sie drin und sonst nirgends.

Danke

Gruß Marcel

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

---

wie sieht denn die Zeile aus mit der du die Datei lädst ?

(PS: Nein, es kann nicht sein wie beschrieben - aber wir werden dir helfen können das Problemkind zu finden)

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

---

hey

ich habe da folgendes stehen:
(prompt "\nLaden der Datei NumIncV3-3_ger.LSP\n")
(load "C:/Programm/Autodesk/AutoCAD_2011/Support/NumIncV3-3_ger.LSP")

aber wenn ich es manuell einlade, ohne in der acaddoc was reinzuschreiben geht es wie eben geschrieben auch nicht 

geh doch mal auf diese seite und lad die lisp datei runter, öffne diese und übersetz ein paar sachen afu deutsch.. lade sie und dann ändere sie nochmal und dann wieder laden. was kommt bei dir/euch dann raus? ändert sich dann alles mit?

http://www.lee-mac.com/numinc.html

gruß Marcel

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

---

Ich denke du wirst die Definition der DCL-Datei geändert haben ?
Diese existiert jedoch bereits und wird nicht neu erzeugt.

Code:

---

(progn
    (if (setq dclfname (findfile (strcat (NumInc:GetSavePath)
                                              "\\LMAC_NumInc_V"
                                                  (vl-string-translate "." "-" NumIncVersion)
                                                    ".dcl"
        )              )        )
        (progn (vl-file-delete dclfname)(c:NumInc))
        (alert (strcat "Schau mal hier nach: " (NumInc:GetSavePath)))
    )
  )

---

  

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

---

guten morgen 

sorry, aber ich versteh nicht so ganz was du gerade meinst 

ich habe kein fachwissen über das ganze bin noch ein anfänger was LISP betrifft...
Was ist diese DCL-Datei?
wo finde ich die?

Gruß MArcel

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

---

Zitat:

---

Original erstellt von deadmau5er:
guten morgen  

sorry, aber ich versteh nicht so ganz was du gerade meinst  

ich habe kein fachwissen über das ganze bin noch ein anfänger was LISP betrifft...
Was ist diese DCL-Datei?
wo finde ich die?

Gruß MArcel

---

Update:

bei mir steht das:
(progn
                (setq dclfname (strcat savepath "\\LMAC_NumInc_V" (vl-string-translate "." "-" NumIncVersion) ".dcl")
                      cfgfname (strcat savepath "\\LMAC_NumInc_V" (vl-string-translate "." "-" NumIncVersion) ".cfg")
                      dcltitle (strcat "Incremental Numbering Suite V" NumIncversion)
                )

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

---

Kopiere die ganze Klammer (MEINE Klammer oben) in die Zwischenablage, kein Zeichen mehr, keines weniger.
In AutoCAD fügst du es dann in die Befehlszeile ein, teste und berichte..

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

---

Wenn ich etwas weiter unten gucke steht da folgendes:

    (cond
        (  (= 4 (logand 4 (cdr (assoc 70 (tblsearch "LAYER" (getvar 'CLAYER))))))
            (princ "\nCurrent Layer Locked.")
        )
        (  (not (vl-file-directory-p (setq savepath (NumInc:GetSavePath))))
            (NumInc:Popup "Warning" 16 "Save Path not Valid.")
            (princ "\nSave Path not Valid.")
        )
        (  (progn
                (setq dclfname (strcat savepath "\\LMAC_NumInc_V" (vl-string-translate "." "-" NumIncVersion) ".dcl")
                      cfgfname (strcat savepath "\\LMAC_NumInc_V" (vl-string-translate "." "-" NumIncVersion) ".cfg")
                      dcltitle (strcat "Incremental Numbering Suite V" NumIncversion)
                )
                (not (NumInc:WriteDCL dclfname))
            )
            (NumInc:Popup "Warning" 16 "DCL File could not be Written.")
            (princ "\nDCL File could not be Written.")
        )
        (  (<= (setq dclID (load_dialog dclfname)) 0)
            (NumInc:Popup "Warning" 16 "The DCL File could not be Loaded.")
            (princ "\nThe DCL File could not be Loaded.")

könte da evtl. ein "fehler" drin stehen, da dort steht "could not be written/could not be loaded"?

Gruß

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

---

*FREU FREU*

es hat funktioniert 

DANKE DANKE 

würdest du mich wissen lassen, wo jetzt der Fehler war?
das ich das nächste mal nicht nochmal einen fehler mache bzw bescheid weiß, was zu tun ist.

und wie baue ich das jetzt in die Datei rein (LSP)

VIELEN DANK nochmal   

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

---

Es gab keinen Fehler. Die Lispdatei erzeugt eine Dialogdatei (und eine Konfigurationdatei). Wenn das Programm startet wird geschaut
ob es die Datei gibt oder nicht, nur im letzten Fall wird sie neu erstellt.

Code:

---

(defun NumInc:WriteDCL ( fname / file )
    (cond
        (  (findfile fname) ; wenn gefunden, mach nichts,
        )
        (  (setq file (open fname "w"))  ; ansonsten erstelle die Datei neu
            (foreach line....

---

Die Datei(en) liegen hier: (NumInc:GetSavePath)
*ausführen und schauen was zurück kommt..*

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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